调用外部的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.

相关推荐

  1. 调用外部webservice示例

    2024-05-16 01:26:12       3 阅读
  2. Webservice调用方式解析!

    2024-05-16 01:26:12       29 阅读
  3. 使用.net core 调用C#WebService三种方式

    2024-05-16 01:26:12       0 阅读
  4. maya外部调用

    2024-05-16 01:26:12       9 阅读

最近更新

  1. .Net Core WebAPI参数的传递方式

    2024-05-16 01:26:12       0 阅读
  2. QT--气泡框的实现

    2024-05-16 01:26:12       0 阅读
  3. LeetCode 968.监控二叉树 (hard)

    2024-05-16 01:26:12       0 阅读
  4. leetcode热题100.完全平方数(动态规划进阶)

    2024-05-16 01:26:12       0 阅读
  5. leetcode328-Odd Even Linked List

    2024-05-16 01:26:12       0 阅读
  6. C 语言设计模式(结构型)

    2024-05-16 01:26:12       0 阅读
  7. v-if 与 v-show(vue3条件渲染)

    2024-05-16 01:26:12       0 阅读
  8. kafka防止消息丢失配置

    2024-05-16 01:26:12       0 阅读

热门阅读

  1. 局域网路由器 交换机 ap模式

    2024-05-16 01:26:12       2 阅读
  2. Spring-Cloud-OpenFeign源码解析-02-OpenFeign自动装配

    2024-05-16 01:26:12       2 阅读
  3. 【鱼眼+普通相机】相机标定

    2024-05-16 01:26:12       3 阅读
  4. FastAdmin菜单规则树形结构分类显示

    2024-05-16 01:26:12       2 阅读
  5. 第十一周学习笔记DAY.1-MySQL

    2024-05-16 01:26:12       2 阅读
  6. mysql 索引失效的原因

    2024-05-16 01:26:12       2 阅读
  7. 设计模式:备忘录模式

    2024-05-16 01:26:12       3 阅读