Delivery quantity control Badi CL_IM_LE_SHP_DELIVERY_PRO

Question

Hi ;
I want to check delivery quantity not to be greater than Po quantity , so on exit MV50AFZ1 save_document_prepare and badi CL_IM_LE_SHP_DELIVERY_PRO, save_document_prepare method . Both of them I can change lips-lfimg field and also another method of delivery read_delivery is passing on VL02N I see the change but it doesnt written at the screen which is displayed on delivery ,
Message was edited by:
        yanut

Answer 1

This issue is solved my self .
form userexit_move_field_to_lips.
     types: begin of ty_kna1,
             kunnr type kunnr,
             regio  type regio,
             end of ty_kna1.
   data :    it_kna1 type ty_kna1.
     types: begin of ty_ekpo,
             ebeln type ebeln,
             ebelp type ebelp,
             retpo type retpo,
             werks type werks,
             end of ty_ekpo.
   data :    it_ekpo type ty_ekpo.
   types:    begin of ty_zsloc,
             lgort type zlgort,
             end of ty_zsloc.
   data :    it_zsloc type ty_zsloc.
   data: wa_zsloc type ty_zsloc.
   select single kunnr regio from kna1 into it_kna1 where kunnr = likp-kunnr.
   shift likp-kunnr left deleting leading '0'.
   select single ebeln ebelp retpo werks from ekpo into it_ekpo where ebeln = lips-vgbel
                      and ebelp = lips-vgpos.
         select single kunnr regio from kna1 into it_kna1 where werks = it_ekpo-werks.
   select single lgort from zsloc into it_zsloc where werks = likp-kunnr
                  and region = it_kna1-regio
                  and ind = it_ekpo-retpo.
        wa_zsloc = it_zsloc.
          if sy-subrc eq 0.
            lips-lgort = it_zsloc.
            modify lips.
          endif.