SAP EHSB_SCRT_TEXT_EDIT Function Module for NOTRANSL: EHS: Bearbeitung von Langtexten mittels SAPscript mit Originalte









EHSB_SCRT_TEXT_EDIT is a standard ehsb scrt text edit SAP function module available within SAP R/3 or S/4 Hana systems, depending on your version and release level. It is used for NOTRANSL: EHS: Bearbeitung von Langtexten mittels SAPscript mit Originalte processing and below is the pattern details for this FM, showing its interface including any import and export parameters, exceptions etc. there is also a full "cut and paste" ABAP pattern code example, along with implementation ABAP coding, documentation and contribution comments specific to this or related objects.


See here to view full function module documentation and code listing for ehsb scrt text edit FM, simply by entering the name EHSB_SCRT_TEXT_EDIT into the relevant SAP transaction such as SE37 or SE38.

Function Group: EHSB_SCRT
Program Name: SAPLEHSB_SCRT
Main Program: SAPLEHSB_SCRT
Appliation area:
Release date: N/A
Mode(Normal, Remote etc): Normal Function Module
Update:



Function EHSB_SCRT_TEXT_EDIT pattern details

In-order to call this FM within your sap programs, simply using the below ABAP pattern details to trigger the function call...or see the full ABAP code listing at the end of this article. You can simply cut and paste this code into your ABAP progrom as it is, including variable declarations.
CALL FUNCTION 'EHSB_SCRT_TEXT_EDIT'"NOTRANSL: EHS: Bearbeitung von Langtexten mittels SAPscript mit Originalte
  EXPORTING
   I_WINDOWTITLE =  "Short Text
*  I_SRC_RECN = 0 "GUID Number
*  I_SRC_ACTN = 0 "GUID Number
*  I_SRC_TEXT = ' ' "Source Text
*  I_SRC_LTXTFLG = ESP1_FALSE "Long Text
*  I_FLG_FORCE_LTXT_WRITE = ESP1_FALSE "
   I_TABLENAME =  "DE-EN-LANG-SWITCH-NO-TRANSLATION
   I_FIELDNAME =  "DE-EN-LANG-SWITCH-NO-TRANSLATION
*  I_LANGUAGE =  "Language Key
   I_RECN =  "GUID Number
   I_ACTN =  "GUID Number
   I_ACTYPE =  "Activity Type
*  I_FLG_WINDOW = ESP1_FALSE "
*  I_SRC_TITLE = ' ' "Text Line

 IMPORTING
   E_TXT_CHANGED_FLG =  "Generic Type

CHANGING
   X_TEXT =  "Phrase Text
   X_LTXTFLG =  "Long Text

EXCEPTIONS
   PARAMETER_ERROR = 1    DDIC_ERROR = 2    READ_TEXT_FAILED = 3    EDIT_TEXT_FAILED = 4    SAVE_TEXT_FAILED = 5    INTERNAL_ERROR = 6
.



IMPORTING Parameters details for EHSB_SCRT_TEXT_EDIT

I_WINDOWTITLE - Short Text

Data type: TTXCT-ED_TITLE
Optional: No
Call by Reference: No ( called with pass by value option)

I_SRC_RECN - GUID Number

Data type: EHSBS_UKEY_GUID-RECN
Optional: Yes
Call by Reference: No ( called with pass by value option)

I_SRC_ACTN - GUID Number

Data type: EHSBS_UKEY_GUID-ACTN
Optional: Yes
Call by Reference: No ( called with pass by value option)

I_SRC_TEXT - Source Text

Data type: EHSBS_TXTFIELDS-TEXT
Default: SPACE
Optional: Yes
Call by Reference: No ( called with pass by value option)

I_SRC_LTXTFLG - Long Text

Data type: EHSBS_TXTFIELDS-LTXTFLG
Default: ESP1_FALSE
Optional: Yes
Call by Reference: No ( called with pass by value option)

I_FLG_FORCE_LTXT_WRITE -

Data type: ESP1_BOOLEAN
Default: ESP1_FALSE
Optional: Yes
Call by Reference: No ( called with pass by value option)

I_TABLENAME - DE-EN-LANG-SWITCH-NO-TRANSLATION

Data type: ESP1_TAB_NAME
Optional: No
Call by Reference: No ( called with pass by value option)

I_FIELDNAME - DE-EN-LANG-SWITCH-NO-TRANSLATION

Data type: ESP1_FIELD_NAME
Optional: No
Call by Reference: No ( called with pass by value option)

I_LANGUAGE - Language Key

Data type: THEAD-TDSPRAS
Optional: Yes
Call by Reference: No ( called with pass by value option)

I_RECN - GUID Number

Data type: EHSBS_UKEY_GUID-RECN
Optional: No
Call by Reference: No ( called with pass by value option)

I_ACTN - GUID Number

Data type: EHSBS_UKEY_GUID-ACTN
Optional: No
Call by Reference: No ( called with pass by value option)

I_ACTYPE - Activity Type

Data type: RCGDIALCTR-ACTYPE
Optional: No
Call by Reference: No ( called with pass by value option)

I_FLG_WINDOW -

Data type: ESP1_BOOLEAN
Default: ESP1_FALSE
Optional: Yes
Call by Reference: No ( called with pass by value option)

I_SRC_TITLE - Text Line

Data type: TLINE-TDLINE
Default: SPACE
Optional: Yes
Call by Reference: No ( called with pass by value option)

EXPORTING Parameters details for EHSB_SCRT_TEXT_EDIT

E_TXT_CHANGED_FLG - Generic Type

Data type: C
Optional: No
Call by Reference: No ( called with pass by value option)

CHANGING Parameters details for EHSB_SCRT_TEXT_EDIT

X_TEXT - Phrase Text

Data type: ESTPP-PHRTEXT
Optional: No
Call by Reference: No ( called with pass by value option)

X_LTXTFLG - Long Text

Data type: ESTPP-LTXTFLG
Optional: No
Call by Reference: No ( called with pass by value option)

EXCEPTIONS details

PARAMETER_ERROR - DE-EN-LANG-SWITCH-NO-TRANSLATION

Data type:
Optional: No
Call by Reference: No ( called with pass by value option)

DDIC_ERROR - DE-EN-LANG-SWITCH-NO-TRANSLATION

Data type:
Optional: No
Call by Reference: No ( called with pass by value option)

READ_TEXT_FAILED - DE-EN-LANG-SWITCH-NO-TRANSLATION

Data type:
Optional: No
Call by Reference: No ( called with pass by value option)

EDIT_TEXT_FAILED - DE-EN-LANG-SWITCH-NO-TRANSLATION

Data type:
Optional: No
Call by Reference: No ( called with pass by value option)

SAVE_TEXT_FAILED - DE-EN-LANG-SWITCH-NO-TRANSLATION

Data type:
Optional: No
Call by Reference: No ( called with pass by value option)

INTERNAL_ERROR - DE-EN-LANG-SWITCH-NO-TRANSLATION

Data type:
Optional: No
Call by Reference: No ( called with pass by value option)

Copy and paste ABAP code example for EHSB_SCRT_TEXT_EDIT Function Module

The ABAP code below is a full code listing to execute function module POPUP_TO_CONFIRM including all data declarations. The code uses the original data declarations rather than the latest in-line data DECLARATION SYNTAX but I have included an ABAP code snippet at the end to show how declarations would look using the newer method of declaring data variables on the fly. This will allow you to compare and fully understand the new inline method. Please note some of the newer syntax such as the @DATA is not available until a later 4.70 service pack (SP8), which i why i have stuck to the origianl for this example.

DATA:
lv_x_text  TYPE ESTPP-PHRTEXT, "   
lv_i_windowtitle  TYPE TTXCT-ED_TITLE, "   
lv_parameter_error  TYPE TTXCT, "   
lv_e_txt_changed_flg  TYPE C, "   
lv_i_src_recn  TYPE EHSBS_UKEY_GUID-RECN, "   0
lv_i_src_actn  TYPE EHSBS_UKEY_GUID-ACTN, "   0
lv_i_src_text  TYPE EHSBS_TXTFIELDS-TEXT, "   SPACE
lv_i_src_ltxtflg  TYPE EHSBS_TXTFIELDS-LTXTFLG, "   ESP1_FALSE
lv_i_flg_force_ltxt_write  TYPE ESP1_BOOLEAN, "   ESP1_FALSE
lv_x_ltxtflg  TYPE ESTPP-LTXTFLG, "   
lv_ddic_error  TYPE ESTPP, "   
lv_i_tablename  TYPE ESP1_TAB_NAME, "   
lv_i_fieldname  TYPE ESP1_FIELD_NAME, "   
lv_read_text_failed  TYPE ESP1_FIELD_NAME, "   
lv_i_language  TYPE THEAD-TDSPRAS, "   
lv_edit_text_failed  TYPE THEAD, "   
lv_i_recn  TYPE EHSBS_UKEY_GUID-RECN, "   
lv_save_text_failed  TYPE EHSBS_UKEY_GUID, "   
lv_i_actn  TYPE EHSBS_UKEY_GUID-ACTN, "   
lv_internal_error  TYPE EHSBS_UKEY_GUID, "   
lv_i_actype  TYPE RCGDIALCTR-ACTYPE, "   
lv_i_flg_window  TYPE ESP1_BOOLEAN, "   ESP1_FALSE
lv_i_src_title  TYPE TLINE-TDLINE. "   SPACE

  CALL FUNCTION 'EHSB_SCRT_TEXT_EDIT'  "NOTRANSL: EHS: Bearbeitung von Langtexten mittels SAPscript mit Originalte
    EXPORTING
         I_WINDOWTITLE = lv_i_windowtitle
         I_SRC_RECN = lv_i_src_recn
         I_SRC_ACTN = lv_i_src_actn
         I_SRC_TEXT = lv_i_src_text
         I_SRC_LTXTFLG = lv_i_src_ltxtflg
         I_FLG_FORCE_LTXT_WRITE = lv_i_flg_force_ltxt_write
         I_TABLENAME = lv_i_tablename
         I_FIELDNAME = lv_i_fieldname
         I_LANGUAGE = lv_i_language
         I_RECN = lv_i_recn
         I_ACTN = lv_i_actn
         I_ACTYPE = lv_i_actype
         I_FLG_WINDOW = lv_i_flg_window
         I_SRC_TITLE = lv_i_src_title
    IMPORTING
         E_TXT_CHANGED_FLG = lv_e_txt_changed_flg
    CHANGING
         X_TEXT = lv_x_text
         X_LTXTFLG = lv_x_ltxtflg
    EXCEPTIONS
        PARAMETER_ERROR = 1
        DDIC_ERROR = 2
        READ_TEXT_FAILED = 3
        EDIT_TEXT_FAILED = 4
        SAVE_TEXT_FAILED = 5
        INTERNAL_ERROR = 6
. " EHSB_SCRT_TEXT_EDIT




ABAP code using 7.40 inline data declarations to call FM EHSB_SCRT_TEXT_EDIT

The below ABAP code uses the newer in-line data declarations. This allows you to see the coding differences/benefits of the later inline syntax. Please note some of the newer syntax below, such as the @DATA is not available until 4.70 EHP 8.

"SELECT single PHRTEXT FROM ESTPP INTO @DATA(ld_x_text).
 
"SELECT single ED_TITLE FROM TTXCT INTO @DATA(ld_i_windowtitle).
 
 
 
"SELECT single RECN FROM EHSBS_UKEY_GUID INTO @DATA(ld_i_src_recn).
 
"SELECT single ACTN FROM EHSBS_UKEY_GUID INTO @DATA(ld_i_src_actn).
 
"SELECT single TEXT FROM EHSBS_TXTFIELDS INTO @DATA(ld_i_src_text).
DATA(ld_i_src_text) = ' '.
 
"SELECT single LTXTFLG FROM EHSBS_TXTFIELDS INTO @DATA(ld_i_src_ltxtflg).
DATA(ld_i_src_ltxtflg) = ESP1_FALSE.
 
DATA(ld_i_flg_force_ltxt_write) = ESP1_FALSE.
 
"SELECT single LTXTFLG FROM ESTPP INTO @DATA(ld_x_ltxtflg).
 
 
 
 
 
"SELECT single TDSPRAS FROM THEAD INTO @DATA(ld_i_language).
 
 
"SELECT single RECN FROM EHSBS_UKEY_GUID INTO @DATA(ld_i_recn).
 
 
"SELECT single ACTN FROM EHSBS_UKEY_GUID INTO @DATA(ld_i_actn).
 
 
"SELECT single ACTYPE FROM RCGDIALCTR INTO @DATA(ld_i_actype).
 
DATA(ld_i_flg_window) = ESP1_FALSE.
 
"SELECT single TDLINE FROM TLINE INTO @DATA(ld_i_src_title).
DATA(ld_i_src_title) = ' '.
 


Search for further information about these or an SAP related objects



Comments on this SAP object

What made you want to lookup this SAP object? Please tell us what you were looking for and anything you would like to be included on this page!