BADI for storage location restriction in IW32

Question

Dear All,
I am working on one scenario in this user has to get the error message :-
1. Whenever he doesn't enter the Storage Location in Component Tab (in IW32) and also he should not be able to save the Maintenance Order.
2. There is ZTABLE (ZTPM058) , if there is no entry of the Storage location in the ZTABLE then also he should get the error.
I have used the BADI BADI_DI_PCS2_1 to do this but the problem is when the user enter the component manually then it works fine , but when he selects the component from List button (it is in the bottom of the component tab screen) , then this BADI doesn't work correctly.
Basically when the user selects component from List  then it should first put data into the component tab and then give the error . but this is not happening.
Please suggest what can be done.
Below is the code that I have  written :-
l_ucomm = sy-ucomm.
if diad_resbd-MENGE is not INITIAL.
  SELECT SINGLE ingpr         "Plant Section
                lgort         "Storage Location
          INTO  (l_ingpr,
                l_lgort)
          FROM  ztpm058
         WHERE  lgort = diad_resbd-lgort
           AND  ingpr = diad_caufvd-ingpr.
  IF sy-subrc <> 0.
if l_ucomm <> 'IMKL'. 
   CONCATENATE 'FOR ITEM NO'        diad_resbd-posnr
               ', COMPONENT'                   diad_resbd-matnr
              'AND PLANNER GROUP'       diad_caufvd-ingpr
             'THERE IS NO STORAGE LOCATION'  diad_resbd-lgort INTO txtmgs SEPARATED BY space.
    clear l_ucomm.
    clear sy-ucomm.
    MESSAGE txtmgs TYPE 'E' .
    elseif l_ucomm = 'IMKL'. (OK CODE when user press List button)
         CONCATENATE 'FOR ITEM NO'       diad_resbd-posnr
                    ', COMPONENT'                   diad_resbd-matnr
                    'AND PLANNER GROUP'      diad_caufvd-ingpr
         'THERE IS NO STORAGE LOCATION'  diad_resbd-lgort
INTO txtmgs SEPARATED BY space.
    clear l_ucomm.
    clear sy-ucomm.
    MESSAGE txtmgs TYPE 'W' .
    endif.
    endif.
    ELSE.
    message 'Please enter the Quantity' type 'W'.
    clear l_ucomm.
    clear sy-ucomm.
    endif.
Thanks and Regards,
Rachit Khanna

Answer 1

Dear Rajesh Kumar Raju
Go to IMG-->Logistics Execution >Shipping> Picking -->Determine Picking Location -->Define Rules for Picking Location Determination.  There you have to assign the MALA rule to your delivery type
Also maintain in OMJ8 and in material master under MRP2 view the default storage location in the field "Prod. stor. location"
thanks
G. Lakshmipathi