TEXT_COPY SAP Function module - Copy long text

TEXT_COPY is a standard SAP function module available within R/3 SAP systems depending on your version and release level. Below is the pattern details for this FM showing its interface including any import and export parameters, exceptions etc as well as any documentation contributions (Comments) specific to the object.

See here to view full function module documentation and code listing, simply by entering the name TEXT_COPY into the relevant SAP transaction such as SE37 or SE80.

Associated Function Group: C0TX
Released Date: Not Released
Processing type: Normal fucntion module

Pattern for FM TEXT_COPY - TEXT COPY

CALL FUNCTION 'TEXT_COPY' "Copy long text
  EXPORTING
*   check_id = 'X'              "
*   id_new = ' '                " thead-tdid    New text ID
    id_old =                    " thead-tdid    Text ID of the text to be copied
    ltsch_new =                 " thead-tdname  New long text name
    ltsch_old =                 " thead-tdname  Long text name of the text to be c
*   object_new = ' '            " thead-tdobject  New text object
    object_old =                " thead-tdobject  Text object of the text to be copi
*   spras_new = ' '             " t002-spras    New language indicator
    spras_old =                 " t002-spras    Language indicator of the text to
*   savemode_direct = ' '       " rc27x-flg_sel
  EXCEPTIONS
    NOT_FOUND = 1               "               Text to be copied not found
    .  "  TEXT_COPY

ABAP code example for Function Module TEXT_COPY

The ABAP code below is a full code listing to execute function module TEXT_COPY including all data declarations. The code uses 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 original method of declaring data variables up front. 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).

DATA(ld_check_id) = 'some text here'.


DATA(ld_id_new) = some text here


DATA(ld_id_old) = some text here


DATA(ld_ltsch_new) = some text here


DATA(ld_ltsch_old) = some text here


DATA(ld_object_new) = some text here


DATA(ld_object_old) = some text here
 

SELECT single SPRAS 
  FROM T002 
  INTO @DATA(ld_spras_new).

 

SELECT single SPRAS 
  FROM T002 
  INTO @DATA(ld_spras_old).



DATA(ld_savemode_direct) = some text here
.

CALL FUNCTION 'TEXT_COPY'
  EXPORTING
*   check_id =                   ld_check_id
*   id_new =                     ld_id_new
    id_old =                     ld_id_old
    ltsch_new =                  ld_ltsch_new
    ltsch_old =                  ld_ltsch_old
*   object_new =                 ld_object_new
    object_old =                 ld_object_old
*   spras_new =                  ld_spras_new
    spras_old =                  ld_spras_old
*   savemode_direct =            ld_savemode_direct
  EXCEPTIONS
    NOT_FOUND =                  1
    .  "  TEXT_COPY

IF SY-SUBRC EQ 0.
  "All OK
ELSEIF SY-SUBRC EQ 1. "Exception
  "Add code for exception here
ENDIF.

ABAP code to compare 7.40 inline data declaration with original syntax

The below ABAP code uses the older none in-line data declarations. This allows you to see the coding differences/benefits of the later inline syntax. It may also be useful if you are using an older version of SAP as some of the newer syntax above, such as the @DATA is not available until 4.70 EHP 8.

DATA:

ld_check_id
 
 TYPE STRING ,
ld_id_new
 
 TYPE THEAD-TDID ,
ld_id_old
 
 TYPE THEAD-TDID ,
ld_ltsch_new
 
 TYPE THEAD-TDNAME ,
ld_ltsch_old
 
 TYPE THEAD-TDNAME ,
ld_object_new
 
 TYPE THEAD-TDOBJECT ,
ld_object_old
 
 TYPE THEAD-TDOBJECT ,
ld_spras_new
 
 TYPE T002-SPRAS ,
ld_spras_old
 
 TYPE T002-SPRAS ,
ld_savemode_direct
 
 TYPE RC27X-FLG_SEL .


ld_check_id = 'some text here'.

ld_id_new = some text here

ld_id_old = some text here

ld_ltsch_new = some text here

ld_ltsch_old = some text here

ld_object_new = some text here

ld_object_old = some text here

SELECT single SPRAS 
  FROM T002 
  INTO ld_spras_new.


SELECT single SPRAS 
  FROM T002 
  INTO ld_spras_old.


ld_savemode_direct = some text here