Hola a todos
Estoy intentando colgar un contrato de un caso expediente con la bapi BAPI_CASE_CREATE, pero no lo consigo.
A ver si alguien me puede ayudar. Este es el código:
*Inicialización Tabla valores atributos para varios elementos
APPEND lt_element_identification.
clear: lt_element_identification.
lt_element_identification-ELEM_NO = '0000000001'.
lt_element_identification-NAME = '%MODEL%'.
lt_element_identification-VALUE = 'RM_CONT_EGP'.
APPEND lt_element_identification.
clear: lt_element_identification.
lt_element_identification-ELEM_NO = '0000000001'.
lt_element_identification-NAME = 'DOC_ID'."Test Contrato 1
lt_element_identification-VALUE = 'ZPS03 19C3A0B6BD55E542AC2CEAE56D11582C'.
APPEND lt_element_identification.
*Inicialización Almacenar información por elemento a insertar
clear: lt_element_insertion.
lt_element_insertion-ELEM_NO = '0000000001'.
lt_element_insertion-ANCHOR = '*'.
lt_element_insertion-DESCRIPTION = 'Contrato'.
lt_element_insertion-MODEL_ID = '0000000035'.
APPEND lt_element_insertion.
*Inicialización Atributos del Caso
*Descripción
lt_case_attributes-NAME = 'RMPSP_DESCRIPT'.
lt_case_attributes-VALUE = 'Prueba'.
APPEND lt_case_attributes.
************OPCIONALES:
*Asunto caso
lt_case_attributes-NAME = 'PS_SUBJECT'.
lt_case_attributes-VALUE = 'Prueba'.
APPEND lt_case_attributes.
*Tipología expediente a generar
lt_case_attributes-NAME = 'ZZTIPEXP'.
lt_case_attributes-VALUE = 'OR'.
APPEND lt_case_attributes.
CALL FUNCTION 'BAPI_CASE_CREATE'
EXPORTING
case_type = 'ZEGP'
CASE_GUID = '2C73AD55BDA6234DA96C4B0175C5F823'
* CASE_WF_PATH =
skip_errors = 'X'
IMPORTING
guid = lv_guid
TABLES
return = lt_return
case_attributes = lt_case_attributes
* CASE_NOTES =
* CASE_NOTE_IDS =
ELEMENT_IDENTIFICATION = lt_element_identification
ELEMENT_INSERTION = lt_element_insertion
* ELEMENT_ATTRIBUTES =
* ELEMENT_RELATIONS =
.
Estoy intentando colgar un contrato de un caso expediente con la bapi BAPI_CASE_CREATE, pero no lo consigo.
A ver si alguien me puede ayudar. Este es el código:
*Inicialización Tabla valores atributos para varios elementos
APPEND lt_element_identification.
clear: lt_element_identification.
lt_element_identification-ELEM_NO = '0000000001'.
lt_element_identification-NAME = '%MODEL%'.
lt_element_identification-VALUE = 'RM_CONT_EGP'.
APPEND lt_element_identification.
clear: lt_element_identification.
lt_element_identification-ELEM_NO = '0000000001'.
lt_element_identification-NAME = 'DOC_ID'."Test Contrato 1
lt_element_identification-VALUE = 'ZPS03 19C3A0B6BD55E542AC2CEAE56D11582C'.
APPEND lt_element_identification.
*Inicialización Almacenar información por elemento a insertar
clear: lt_element_insertion.
lt_element_insertion-ELEM_NO = '0000000001'.
lt_element_insertion-ANCHOR = '*'.
lt_element_insertion-DESCRIPTION = 'Contrato'.
lt_element_insertion-MODEL_ID = '0000000035'.
APPEND lt_element_insertion.
*Inicialización Atributos del Caso
*Descripción
lt_case_attributes-NAME = 'RMPSP_DESCRIPT'.
lt_case_attributes-VALUE = 'Prueba'.
APPEND lt_case_attributes.
************OPCIONALES:
*Asunto caso
lt_case_attributes-NAME = 'PS_SUBJECT'.
lt_case_attributes-VALUE = 'Prueba'.
APPEND lt_case_attributes.
*Tipología expediente a generar
lt_case_attributes-NAME = 'ZZTIPEXP'.
lt_case_attributes-VALUE = 'OR'.
APPEND lt_case_attributes.
CALL FUNCTION 'BAPI_CASE_CREATE'
EXPORTING
case_type = 'ZEGP'
CASE_GUID = '2C73AD55BDA6234DA96C4B0175C5F823'
* CASE_WF_PATH =
skip_errors = 'X'
IMPORTING
guid = lv_guid
TABLES
return = lt_return
case_attributes = lt_case_attributes
* CASE_NOTES =
* CASE_NOTE_IDS =
ELEMENT_IDENTIFICATION = lt_element_identification
ELEMENT_INSERTION = lt_element_insertion
* ELEMENT_ATTRIBUTES =
* ELEMENT_RELATIONS =
.
Comentario