DATA:LR_MODEL类型参考IF_USMD_MODEL_EXT, LT_SEL类型USMD_TS_SEL, LS_SEL类型USMD_S_SEL, LT_CREQUEST_1类型USMD_T_CREQUEST_ENTITY, LO_MODE_数据类型REF REF LR_BP_DATA_TAB类型参考数据, LV_CR_NUMBER类型USMD120C-USMD_CREQUEST, LV_BP类型C长度10, LR_BP_KEY_STR类型参考数据, LR_BP_KEY_TAB类型参考数据。 > FIELD-SYMBOLS: TYPE ANY, TYPE INDEX TABLE, TYPE ANY, TYPE INDEX TABLE, TYPE ANY。< br>开始选择。 BREAK-POINT。
首先使用BP号获得CR:
数据:IF_USMD_MODEL的LR_MODEL类型参考,
USMD_T_VALUE的LT_ENT类型参考,
LO_USMD_CHG_DOC CL_USMD_MDF_CHANGE_DOCUMENT的类型。LS_ENT类型USMD_S_VALUE的参考。
调用方法CL_USMD_MODEL => GET_INSTANCE
调用方法CL_USMD_DOCF => GET_INSTANCE
导出
I_USMD_MODEL ='BP'
导入
EO_INSTANCE = LR_MODEL
ET_MESSAGE = DATA(LT_MSG)。
接收
EO_INSTANCE = LO_USMD_CHG_DOC。
LS_ENT-FIELDNAME ='BP_HEADER'。
LS_ENT-VALUE ='23'。 "在此处传递前导零的BP号,否则将不起作用
将LS_ENT附加到LT_ENT。
调用方法LO_USMD_CHG_DOC-> READ_DOCUMENT_HEADER
导出
I_ENTITY ='BP_HEADER'
IT_ENTITY_VALUE = LT_ENT
IO_MODEL = LR_MODEL
IMPORTING
ET_DOCUMENT_HEADER = DATA(LT_HEADER)。"此表包含CR编号
然后接下来获取这样的实体数据:
DATA:LR_MODEL类型参考IF_USMD_MODEL_EXT, TYPE ANY,
TYPE INDEX TABLE,
TYPE ANY,
TYPE INDEX TABLE,
TYPE ANY。< br>开始选择。
LT_SEL类型USMD_TS_SEL,
LS_SEL类型USMD_S_SEL,
LT_CREQUEST_1类型USMD_T_CREQUEST_ENTITY,
LO_MODE_数据类型REF REF
LR_BP_DATA_TAB类型参考数据,
LV_CR_NUMBER类型USMD120C-USMD_CREQUEST,
LV_BP类型C长度10,
LR_BP_KEY_STR类型参考数据,
LR_BP_KEY_TAB类型参考数据。 > FIELD-SYMBOLS:
BREAK-POINT。
LV_CR_NUMBER ='000000000605'。 "取自逻辑的第一部分
LV_BP ='0001600058'。"将前导零传递给BP
TRY.CALL方法CL_USMD_GOV_API => GET_INSTANCEEXPORTING
IV_MODEL_NAME ='BP'
接收
RO_GOV_API = LO_MODEL.CATCH CX_USMD_GOV_API .ENDTRY。
IV_ENTITY_NAME ='BP_VENGEN'
IV_STRUCT = LO_MODEL-> GC_STRUCT_KEYIMPORTING
ER_STRUCTURE = LR_BP_KEY_STR
ER_TABLE = LR_BP_KEY_TAB)。 '
IV_STRUCT = LO_MODEL-> GC_STRUCT_KEY_ATTRIMPORTING
ER_STRUCTURE = LR_BP_DATA_STR
ER_TABLE = LR_BP_DATA_TAB)。
ASSIGN LR_BP_KEY_STR-> * TO
ASSIGN LR_BP_DATA_TAB-> *到
尝试呼叫LO_MODEL-> IF_USMD_GOV_API_ENTITY〜READ_ENTITYEXPORTING
IV_CREQUEST_ID = LV_CR_NUMBER
IV_ENTITY_NAME ='BP_HEADER'
IT_KEY =
IF_ACTIVE_DA TA =''IMPORTING
ET_DATA =
一周热门 更多>