二、field module的on input和on request 测试DEMO

傷城~ 2022-10-02 13:48 14阅读 0赞

PAI字段内容及变化检查

有两种操作：on input和on request。

**触发条件**：

on input：字段值***不为空***后触发检查  
on request：字段值***变更***后触发检查

***注意点***：

使用ON INPUT时，如果检查的字段参考类型是STRING 或SSTRING，

则该字段在使用ON INPUT检查时，***任何情况下都是非空值状态***，

即：屏幕每次操作都会触发ON INPUT检查。

系统F1标准解释

![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3dhbmdsZWk4ODA1MjY_size_16_color_FFFFFF_t_70][]

**语法**：

场景一、单个字段单个检查

FIELD <FIELD1>

MODULE <MDL1> \[ON INPUT\] / \[ON REQUEST\].

场景二、单个字段多个检查

FIELD <FIELD1>

MODULE: <MDL1> \[ON INPUT\] / \[ON REQUEST\],

<MDL2> \[ON INPUT\] / \[ON REQUEST\] .

场景三、多个字段单个检查

CHAIN.

FIELD:  <FIELD1> ,

<FIELD2> .

MODULE <MDL1> \[ON CHAIN-INPUT\] / \[ON CHAIN-REQUEST\].

ENDCHAIN.

主程序

REPORT  zwldemo007.
    
    DATA: gv_ok_code_2000 TYPE sy-ucomm.
    
    DATA: gv_io_1 TYPE char40 VALUE '',
          gv_io_2 TYPE char40 VALUE '',
          gv_io_3 TYPE char40 VALUE '',
          gv_io_4 TYPE char40 VALUE ''.
    
    
    CALL SCREEN 2000.
    
    *&---------------------------------------------------------------------*
    *&      Module  STATUS_2000  OUTPUT
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    MODULE status_2000 OUTPUT.
    
      SET PF-STATUS 'ZPF_2000'.
      SET TITLEBAR 'ZTB_2000'.
    
    ENDMODULE.                 " STATUS_2000  OUTPUT
    
    *&---------------------------------------------------------------------*
    *&      Module  USER_COMMAND_2000  INPUT
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    MODULE user_command_2000 INPUT.
    
      CASE gv_ok_code_2000.
        WHEN 'BACK' OR 'RETURN' OR 'CANCEL'.
          LEAVE TO SCREEN 0.
        WHEN OTHERS.
      ENDCASE.
    
    ENDMODULE.                 " USER_COMMAND_2000  INPUT
    
    *&---------------------------------------------------------------------*
    *&      Module  PAI_CHECK_REQUEST_CASE1  INPUT
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    MODULE pai_check_request_case1 INPUT.
      BREAK-POINT.
    ENDMODULE.                 " PAI_CHECK_REQUEST_CASE1  INPUT
    
    *&---------------------------------------------------------------------*
    *&      Module  PAI_CHECK_INPUT_CASE2  INPUT
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    MODULE pai_check_input_case2 INPUT.
      BREAK-POINT.
    ENDMODULE.                 " PAI_CHECK_INPUT  INPUT
    
    *&---------------------------------------------------------------------*
    *&      Module  PAI_CHECK_REQUEST_CASE2  INPUT
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    MODULE pai_check_request_case2 INPUT.
      BREAK-POINT.
    ENDMODULE.                 " PAI_CHECK_REQUEST_CASE2   INPUT
    
    *&---------------------------------------------------------------------*
    *&      Module  PAI_CHECK_REQUEST_CASE3  INPUT
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    MODULE pai_check_request_case3 INPUT.
      BREAK-POINT.
    ENDMODULE.                 " PAI_CHECK_REQUEST_CASE3  INPUT

PBO & PAI部分

PROCESS BEFORE OUTPUT.
      MODULE status_2000.
    
    *
    PROCESS AFTER INPUT.
      "场景一、单个字段单个检查
      FIELD gv_io_1 MODULE pai_check_request_case1 ON REQUEST.
    
      "场景二、单个字段多个检查
      FIELD gv_io_2
      MODULE: pai_check_input_case2 ON INPUT,
              pai_check_request_case2 ON REQUEST.
    
      "场景三、多个字段单个检查
      CHAIN.
        FIELD:gv_io_3,
              gv_io_4.
        MODULE pai_check_request_case3 ON CHAIN-REQUEST.
      ENDCHAIN.
    
    
      MODULE user_command_2000.

![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3dhbmdsZWk4ODA1MjY_size_16_color_FFFFFF_t_70 1][]

[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3dhbmdsZWk4ODA1MjY_size_16_color_FFFFFF_t_70]: /images/20220112/95d0a46d1ebb468fa627ac7a3e777d42.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3dhbmdsZWk4ODA1MjY_size_16_color_FFFFFF_t_70 1]: /images/20220112/893adfea67eb43afa7f83074f92cde40.png