SAP WPER（POS接口监控器）IDCO过账凭证ALV报表

1. 实现

• 代码

  * CONSTANTS FOR IDOC STATUS
  CONSTANTS: c_idoc_status_ok    LIKE edidc-status VALUE '53',
             c_idoc_status_nok   LIKE edidc-status VALUE '51',
             c_idoc_status_orig  LIKE edidc-status VALUE '70',
             c_idoc_status_copy  LIKE edidc-status VALUE '69',
             c_idoc_status_ready LIKE edidc-status VALUE '64',
             c_idoc_status_end   LIKE edidc-status VALUE '68'.
  
  TYPES: BEGIN OF type_idoc,
         docnum   LIKE edidc-docnum,
         mestyp   LIKE edidc-mestyp,
         sndprn   LIKE edidc-sndprn,
         credat   LIKE edidc-credat,
         status   LIKE edidc-status,
         name1    LIKE t001w-name1,
         mestypnr LIKE sy-tabix.
  TYPES: END OF type_idoc.
  
  DATA: lt_idocs  TYPE TABLE OF type_idoc,
        wa_idocs  TYPE type_idoc.
  
  TYPES: BEGIN OF ty_data,
         sndprn   LIKE edidc-sndprn,
         mestyp   LIKE edidc-mestyp,
         credat   LIKE edidc-credat,
         docnum   LIKE edidc-docnum,
         status   LIKE edidc-status,
         objtype LIKE objectconn-objecttype,
         text TYPE seu_text,
         name  TYPE seu_name,
    END OF ty_data.
  
  DATA: lt_data TYPE TABLE OF ty_data,
        wa_data TYPE ty_data.
  
  DATA:    t_foldoc     TYPE wpusa_t_foldoc,
           wa_foldoc    LIKE LINE OF t_foldoc.
  
  DATA : gr_table TYPE REF TO cl_salv_table.
  
  SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME TITLE l_text1.
  SELECTION-SCREEN BEGIN OF LINE.
  SELECTION-SCREEN COMMENT 1(31) l_text2 FOR FIELD p_dat_v.
  PARAMETERS        p_dat_v      LIKE edidc-credat.
  PARAMETERS:       p_time_v     LIKE edidc-cretim
                                 VISIBLE LENGTH 10.
  SELECTION-SCREEN COMMENT 57(5) l_text3 FOR FIELD p_dat_b.
  PARAMETERS        p_dat_b      LIKE edidc-credat.
  PARAMETERS        p_time_b     LIKE edidc-cretim  DEFAULT '235959'
                                 VISIBLE LENGTH 10.
  SELECTION-SCREEN END OF LINE.
  SELECTION-SCREEN END OF BLOCK block1.
  
  
  INITIALIZATION.
    l_text1 = '选择条件'.
    l_text2 = '建立时间'.
    l_text3 = '至'.
  
    p_dat_b = sy-datum.
    p_dat_v