检验批缺陷创建修改函数.docxVIP

创建FUNCTION?zrfc.*----------------------------------------------------------------------**Local?interface:*??EXPORTING*?????VALUE(PO_TYPE)?TYPE??CHAR1*?????VALUE(PO_MESS)?TYPE??BAPI_MSG*??TABLES*??????PT_QX?STRUCTURE??ZWMS013*??????PT_OUT?STRUCTURE??ZWMS012*----------------------------------------------------------------------?DATA:lw_in?LIKE?zwms010,?lw_out?LIKE?zwms012,?lw_qx?LIKE?zwms013,?l_index?TYPE?i,?l_lines?TYPE?i,?l_posnr?TYPE?qmfe-posnr,?l_prueflos?TYPE?qals-prueflos,?l_anzfehler(5)?TYPE?c,?l_rueckmelnr?TYPE?qamv-rueckmelnr,?l_message?TYPE?string.?DATA:?i_viqmfe_tLIKE?TABLE?OF?rfc_viq