修改采购申请

GW_PRITEM-PREQ_ITEM = XVBAP-POSNR.
    GW_PRITEM-PREQ_NAME = SY-UNAME.
    GW_PRITEM-MATERIAL = XVBAP-MATNR.
    GW_PRITEM-PLANT    =  XVBAP-WERKS.
    GW_PRITEM-QUANTITY =  XVBAP-KWMENG.
    GW_PRITEM-FIXED = 'X' .
    GW_PRITEM-PUR_GROUP = LV_EKGRP.
    APPEND GW_PRITEM TO GT_PRITEM .

    GW_PRITEMX-PREQ_ITEM = XVBAP-POSNR .
    GW_PRITEMX-MATERIAL =   'X'.
    GW_PRITEMX-PLANT    =   'X'.
    GW_PRITEMX-QUANTITY =   'X'.
    GW_PRITEMX-DELIV_DATE = 'X'.
    GW_PRITEMX-FIXED = 'X' .
    GW_PRITEMX-PREQ_NAME = 'X'.
    IF GW_PRITEM-PUR_GROUP <> '' .
     GW_PRITEMX-PUR_GROUP = 'X'.
    ENDIF .
    APPEND GW_PRITEMX TO GT_PRITEMX .
    ENDLOOP.
        CALL FUNCTION 'BAPI_PR_CHANGE'
          EXPORTING
            NUMBER                       = LV_BANFN
          TABLES
           RETURN                       = GT_BAPIRETURN
           PRITEM                       = GT_PRITEM
           PRITEMX                      = GT_PRITEMX .