zoukankan      html  css  js  c++  java
  • 工艺路线修改——CPCC_S_TASK_LIST_MAINTAIN

    代码:

    DATA: lt_return TYPE TABLE OF bapiret2,
          lt_oper   TYPE TABLE OF cps_task_list_maint_opr,
          ls_oper   TYPE cps_task_list_maint_opr,
          lt_operx  TYPE TABLE OF cps_task_list_maint_opr_x,
          ls_operx  TYPE cps_task_list_maint_opr_x.
    
    ls_oper-maintain_mode = 'M'. 
    ls_oper-flag_bar_pointer = '0000000001'.
    ls_oper-activity = '0010'.
    ls_oper-std_value_01 = 700.
    APPEND ls_oper TO lt_oper.
    CLEAR ls_oper.
    
    ls_oper-maintain_mode = 'M'.
    ls_oper-flag_bar_pointer = '0000000002'.
    ls_oper-activity = '0020'.
    ls_oper-std_value_02 = 700.
    APPEND ls_oper TO lt_oper.
    CLEAR ls_oper.
    
    ls_operx-std_value_01 = 'X'.
    APPEND ls_operx TO lt_operx.
    CLEAR ls_operx.
    
    ls_operx-std_value_02 = 'X'.
    APPEND ls_operx TO lt_operx.
    CLEAR ls_operx.
    
    CALL FUNCTION 'CPCC_S_TASK_LIST_MAINTAIN'
      EXPORTING
        key_date        = sy-datum
        task_list_type  = 'N'
        task_list_group = '50062824'
        group_counter   = '01'
      TABLES
        operations      = lt_oper
        operations_x    = lt_operx
        return          = lt_return.
    
    READ TABLE lt_return WITH KEY type = 'E' TRANSPORTING NO FIELDS.
    IF sy-subrc NE 0.
      COMMIT WORK AND WAIT.
    ELSE.
      ROLLBACK WORK.
    ENDIF.
    
    cl_demo_output=>write( lt_return ).
    cl_demo_output=>display(  ).

    运行效果:

    木叶飞舞之处,火亦生生不息
  • 相关阅读:
    用webservice实现的一个天气预报程序
    让VS.net2005手机模拟器上网
    EVC4.0 PPC2003 Emulator 转中文版
    BSTR转CString
    在pocket pc 2003上播放声音
    VC++.net 2005 SmartDevice 屏幕转向
    c#.net2005 调用evc4.0生成的dll文件
    Json
    adb 命令模拟按键事件
    bat 截取字符
  • 原文地址:https://www.cnblogs.com/StephenAmell/p/15026550.html
Copyright © 2011-2022 走看看