'CONVERSION_EXIT_PARVW_INPUT' 表tpar 字段parvw

   " 功能（IHPA-PARVW）
    IF itab-parvw01 <> ''.
      CALL FUNCTION 'CONVERSION_EXIT_PARVW_INPUT' "          EXPORTING
          input  = itab-parvw01
        IMPORTING
          output = itab-parvw01.
      SELECT SINGLE parvw FROM tpar   INTO wa_excel-parvw01 WHERE parvw =  itab-parvw01 ."and plvar = '01'.
      IF sy-subrc <> 0 .
        CONCATENATE itab-message '合作伙伴功能' itab-parvw01  '不存在系统中!' INTO itab-message .
        flag = 'X' .
      ENDIF.
      CALL FUNCTION 'CONVERSION_EXIT_PARVW_OUTPUT'  " 

    EXPORTING
          input  = itab-parvw01
        IMPORTING
          output = itab-parvw01.
    ENDIF.

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/23495244/viewspace-694656/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/23495244/viewspace-694656/