IF(L_LOCATION='1')THEN
SET L_MOVE_TYPE := '6';
SET L_MOVE_DESC := 'KITTING TO WHS';
ELSEIF(L_LOCATION='3')THEN
SET L_MOVE_TYPE := '7';
SET L_MOVE_DESC := 'MRB TO WHS';
ELSEIF(L_LOCATION='4')THEN
SET L_MOVE_TYPE := '9';
SET L_MOVE_DESC := 'IQC TO WHS';