TEXT_FOR_PIC SAP Function module - Edit long text without inline line (example: PI characteristic)

TEXT_FOR_PIC 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_FOR_PIC into the relevant SAP transaction such as SE37 or SE80.

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

Pattern for FM TEXT_FOR_PIC - TEXT FOR PIC

CALL FUNCTION 'TEXT_FOR_PIC' "Edit long text without inline line (example: PI characteristic)
  EXPORTING
*   id = SPACE                  " thead-tdid    Text ID for SAPscript word processing
*   language = SY-LANGU         " t002-spras    Language key
*   linelength = 80             " thead-tdlinesize  Line length editor
    ltsch_alt =                 " stxh-tdname   Old long text key
    ltsch_neu =                 " stxh-tdname   New long text key
*   object = 'ROUTING'          " thead-tdobject  Text obj. type for SAPscript word processing
*   show_flag = SPACE           " sy-datar      Indicator: Display only
*   texttitle = SPACE           " ttxit-tdtext  Heading for SAPscript editor
  IMPORTING
    action =                    " ttxct-function  Editor action (changed, deleted, ...)
    first_line =                " tline-tdline  Use first line of text as characteristic value
    ltsch_exp =                 " stxh-tdname   Long text key after word processing
  EXCEPTIONS
    LONGTEXT_NOT_FOUND = 1      "               Long text not found
    TEXT_ID_NOT_FOUND = 2       "               OBJECT and ID not found in table TTXID
    .  "  TEXT_FOR_PIC

ABAP code example for Function Module TEXT_FOR_PIC

The ABAP code below is a full code listing to execute function module TEXT_FOR_PIC 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_action  
 
 TYPE TTXCT-FUNCTION
,
ld_first_line  
 
 TYPE TLINE-TDLINE
,
ld_ltsch_exp  
 
 TYPE STXH-TDNAME
.



DATA(ld_id) = some text here
 

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



DATA(ld_linelength) = Check type of data required
 

SELECT single TDNAME 
  FROM STXH 
  INTO @DATA(ld_ltsch_alt).

 

SELECT single TDNAME 
  FROM STXH 
  INTO @DATA(ld_ltsch_neu).



DATA(ld_object) = some text here

DATA(ld_show_flag) = 'some text here'.
 

SELECT single TDTEXT 
  FROM TTXIT 
  INTO @DATA(ld_texttitle).

.

CALL FUNCTION 'TEXT_FOR_PIC'
  EXPORTING
*   id =                         ld_id
*   language =                   ld_language
*   linelength =                 ld_linelength
    ltsch_alt =                  ld_ltsch_alt
    ltsch_neu =                  ld_ltsch_neu
*   object =                     ld_object
*   show_flag =                  ld_show_flag
*   texttitle =                  ld_texttitle
  IMPORTING
    action =                     ld_action
    first_line =                 ld_first_line
    ltsch_exp =                  ld_ltsch_exp
  EXCEPTIONS
    LONGTEXT_NOT_FOUND =         1
    TEXT_ID_NOT_FOUND =          2
    .  "  TEXT_FOR_PIC

IF SY-SUBRC EQ 0.
  "All OK
ELSEIF SY-SUBRC EQ 1. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 2. "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_action
 
 TYPE TTXCT-FUNCTION ,
ld_id
 
 TYPE THEAD-TDID ,
ld_first_line
 
 TYPE TLINE-TDLINE ,
ld_language
 
 TYPE T002-SPRAS ,
ld_ltsch_exp
 
 TYPE STXH-TDNAME ,
ld_linelength
 
 TYPE THEAD-TDLINESIZE ,
ld_ltsch_alt
 
 TYPE STXH-TDNAME ,
ld_ltsch_neu
 
 TYPE STXH-TDNAME ,
ld_object
 
 TYPE THEAD-TDOBJECT ,
ld_show_flag
 
 TYPE SY-DATAR ,
ld_texttitle
 
 TYPE TTXIT-TDTEXT .



ld_id = some text here

SELECT single SPRAS 
  FROM T002 
  INTO ld_language.


ld_linelength = Check type of data required

SELECT single TDNAME 
  FROM STXH 
  INTO ld_ltsch_alt.


SELECT single TDNAME 
  FROM STXH 
  INTO ld_ltsch_neu.


ld_object = some text here
ld_show_flag = 'some text here'.

SELECT single TDTEXT 
  FROM TTXIT 
  INTO ld_texttitle.