¿Como grabar un Texto con SAVE_TEXT?

**azua14** · 26/05/2008, 19:54:01

Debo reconocer que no conocía esa función...pero buscando por ahi encontre esto, creo que es bastante explicativo.

FUNCTION ZSAVE_NOTES_SAVE.
*"----------------------------------------------------------------------
""Local interface:
*" IMPORTING
*" VALUE(OBJECT_ID) TYPE CRMT_OBJECT_ID
*" VALUE(OBJECT_TYPE) TYPE CRMT_SUBOBJECT_CATEGORY
*" REFERENCE(HEADER) TYPE THEAD OPTIONAL
*" REFERENCE(TEXT) TYPE TDTXTLINES
*" TABLES
*" LINES STRUCTURE TLINE
*"----------------------------------------------------------------------

TYPES : BEGIN OF STRUC,
GUID TYPE CRMD_ORDERADM_H-GUID,
END OF STRUC.
DATA : WA_STRUC TYPE STRUC,
IT_STRUC LIKE TABLE OF WA_STRUC.
TYPES : BEGIN OF STRUC1,
TDOBJECT TYPE STXH-TDOBJECT,
TDNAME TYPE STXH-TDNAME,
TDID TYPE STXH-TDID,
TDSPRAS TYPE STXH-TDSPRAS,
TDTITLE TYPE STXH-TDTITLE,
TDLINE TYPE STXH-TDTXTLINES,
END OF STRUC1.
DATA : WA_STRUC1 TYPE STRUC1,
IT_STRUC1 LIKE TABLE OF WA_STRUC1.

SELECT SINGLE GUID FROM CRMD_ORDERADM_H INTO WA_STRUC WHERE
OBJECT_ID = OBJECT_ID AND OBJECT_TYPE = OBJECT_TYPE.

SELECT SINGLE TDOBJECT TDNAME TDID TDSPRAS TDTITLE TDTXTLINES FROM STXH
INTO WA_STRUC1 WHERE TDNAME = WA_STRUC-GUID.

APPEND WA_STRUC1 TO IT_STRUC1.
CALL FUNCTION 'SAVE_TEXT'
EXPORTING
CLIENT = SY-MANDT
HEADER = HEADER
INSERT = ' I '
SAVEMODE_DIRECT = ' X '
OWNER_SPECIFIED = ' SAPUSER '

LOCAL_CAT = ' '
IMPORTING
FUNCTION =
NEWHEADER = HEADER
TABLES
LINES = LINES
EXCEPTIONS
ID = 1
LANGUAGE = 2
NAME = 3
OBJECT = 4
OTHERS = 5
.
IF SY-SUBRC 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

COMMIT WORK.

ENDFUNCTION.

**Zamichiei_24** · 18/05/2020, 17:44:54

Seve

Originalmente publicado por paulafloresf

Hola chicos ... a ver si alguien me puede ayudar.

Utilizo la funcin READ_TEXT pata leer un texto , pero necisto grabar este texto en otro objeto , me recomendaron que utilize la funcion SAVE_TEXT (pero no se cuales son los parámetros que tengo que usar ) ¿donde le pongo el "NAME" ?

Saludos

Hola,
te dejo un ejemplo claro paso a paso y con video de como utilizar SAVE_TEXT y READ_TEXT. tambien hay un ejemplo de encapsulat en un modulo de funciones para simplificarlo