调用外部的webservice示例

DATA : CL_MATNR TYPE REF TO ZMTM_BGCO_ITAB_REPORT.

DATA : EXCP TYPE REF TO CX_AI_SYSTEM_FAULT.

DATA : LW_INPUT TYPE ZMTM_ITAB_REPORT_ADD_TAB_REPO1,

LW_OUTPUT TYPE ZMTM_ITAB_REPORT_ADD_TAB_REPOR.

DATA:IT_TAB TYPE STANDARD TABLE OF ZMTM_TAB_REPORT_REQUEST_DTO WITH HEADER LINE .

DATA ERRO_MSG TYPE STRING.

DATA: DATETIME(14) TYPE C,

DATETIME2(19) TYPE C,

DATE(8) TYPE C,

TIME(6) TYPE C.

DATE = SY-DATUM .

TIME = SY-UZEIT.

CONCATENATE DATE TIME INTO DATETIME.

CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'

EXPORTING

INPUT = DATETIME

IMPORTING

OUTPUT = DATETIME2.

.

IT_TAB-CHECK_CODE = '05'.

IT_TAB-SUM_QTY = 1.

IT_TAB-CREATE_ON = DATETIME2.

APPEND IT_TAB.

IF CL_MATNR IS NOT BOUND.

TRY .

" CREATE OBJECT CL_MATNR TYPE ZMTM_BGCO_ITAB_REPORT.

CREATE OBJECT CL_MATNR

EXPORTING

LOGICAL_PORT_NAME = 'ZMTM_BG'.

CATCH CX_AI_SYSTEM_FAULT INTO EXCP.

ENDTRY.

LW_INPUT-REQUEST-TAB_REPORT_REQUEST_DTO = IT_TAB[].

TRY.

CALL METHOD CL_MATNR->ADD_TAB_REPORT

EXPORTING

INPUT = LW_INPUT

IMPORTING

OUTPUT = LW_OUTPUT.

CATCH CX_AI_SYSTEM_FAULT INTO EXCP.

CALL METHOD EXCP->GET_TEXT

RECEIVING

RESULT = ERRO_MSG.

WRITE /1 ERRO_MSG.

ENDTRY.

WRITE /2 LW_OUTPUT-ADD_TAB_REPORT_RESULT-CODE .

WRITE /3 LW_OUTPUT-ADD_TAB_REPORT_RESULT-MESSAGE .

ENDIF.

相关推荐
小九不懂SAP3 天前
SAP(PP生产制造)拆解工单业务处理
sap·制造·s4·pp
冰魄禾5 天前
SAP ABAP开发学习——BAPI
运维·开发语言·笔记·运维开发·sap·abap
syounger8 天前
是我们“辜负”了IBM、SAP么?
sap
Liquid UI9 天前
Amcor 如何借助 Liquid UI 实现SAP PM可靠性
ui·自动化·sap·制造
数字化转型202519 天前
跨国SAP实施 - 美国 - 税法 - 咨询
sap
阿达_优阅达21 天前
优阅达携手 Theobald 亮相新加坡科技周,助力企业 SAP 数据集成与应用
科技·ai·sap·企业数字化转型·theobald
SAP Hua23 天前
SAP PP之功能 动态安全库存(Dynamic Safety stock)配置及计算逻辑说明测试
sap
数字化转型20251 个月前
Alternative Reconciliation Accounts 备选统驭科目
sap
小九不懂SAP2 个月前
6、定义字段状态变式
sap·s4
lu_rong_qq2 个月前
SAP B1 三大基本表单标准功能介绍-物料主数据(下)
数据库·sap·erp