data: lt_seltab      type table of rsparams,ls_tcoa        type tcoa,lv_overview    type flag,l_repid        type sy-repid,l_valid(1)     type c,ls_seltab type rsparams.
Data:plv type table of rsparams with header line.data:faufnr type afko-aufnr.
faufnr = ''.    生产订单号
l_repid  = 'PPIO_ENTRY'.call function 'RS_REFRESH_FROM_SELECTOPTIONS'exportingcurr_report     = l_repidtablesselection_table = lt_seltabexceptionsnot_found       = 1no_report       = 2others          = 3.
if sy-subrc <> 0.message id sy-msgid type sy-msgty number sy-msgnowith sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.exit.
endif.loop at lt_seltab into ls_seltab.case ls_seltab-selname.when 'P_ALV'.ls_seltab-low = 'X'.when 'P_AUTYP'.ls_seltab-low = '10'.when  'P_SC1100'.ls_seltab-low = 'PPIOD000                        00000000001X'.when  'P_TCOA'.ls_seltab-low = '000IOHEADER                      000001 00000'.when 'P_TCODE'.ls_seltab-low = 'COOIS'.when 'S_AUFNR'.ls_seltab-sign = 'I'.ls_seltab-option = 'EQ'.ls_seltab-low = faufnr.when 'S_FCTALW  '.ls_seltab-sign = 'E'.ls_seltab-option = 'CP'.ls_seltab-low = '*'.endcase.modify lt_seltab from ls_seltab.
endloop.data:gs_tcoa type table of tcoa with header line .
gs_tcoa-mamo_sel = 'X'.
gs_tcoa-layoutid_bd = '/ZM'.   200系统  coois变式* 转换选择信息
call function 'COIS_SELECT_PARAMETERS_SET'exportingit_parameter = lt_seltabis_tcoa      = gs_tcoa.
data: iomamo_tab type  iomamo_tab .
* 读取移动明细
call function 'COIS_SELECT_ORDERS_READ'changingct_iomamo = iomamo_tab[].