userexit_save_document_prepare
* start change by rohini kumar
IF sy-uname = 'rohinik'.
IF VBAK-kunnr IS INITIAL.
DATA: lv_kunnr(10) TYPE C VALUE 'BNAYAK'.
VBAK-kunnr = LV_KUNNR.
ENDIF.
IF VBAP-matnr IS INITIAL.
DATA : LV_MATNR(12) TYPE C VALUE 'BNAYAK'.
VBAP-matnr = LV_MATNR.
ENDIF.
IF VBAP-kwmeng IS INITIAL.
DATA: LV_KWMENG TYPE MENG15 VALUE '1.00'.
VBAP-kwmeng = LV_KWMENG.
ENDIF.
IF VBAP-werks IS INITIAL.
DATA: LV_WERKS(4) TYPE C VALUE 'B100'.
VBAP-werks = LV_WERKS.
ENDIF.
ENDIF.
*BREAK ROHINIK.
*if sy-uname = 'ROHINIK'.
*IF vbak-audat < sy-datum.
* fcode = 'ENT1'.
* MESSAGE 'SO Date Should Not be Less Than Current Date.' TYPE 'E'.
* SET SCREEN SYST-DYNNR.
* LEAVE SCREEN.
*ENDIF.
*ENDIF.
* end change by rohini kumar
IF sy-uname = 'rohinik'.
IF VBAK-kunnr IS INITIAL.
DATA: lv_kunnr(10) TYPE C VALUE 'BNAYAK'.
VBAK-kunnr = LV_KUNNR.
ENDIF.
IF VBAP-matnr IS INITIAL.
DATA : LV_MATNR(12) TYPE C VALUE 'BNAYAK'.
VBAP-matnr = LV_MATNR.
ENDIF.
IF VBAP-kwmeng IS INITIAL.
DATA: LV_KWMENG TYPE MENG15 VALUE '1.00'.
VBAP-kwmeng = LV_KWMENG.
ENDIF.
IF VBAP-werks IS INITIAL.
DATA: LV_WERKS(4) TYPE C VALUE 'B100'.
VBAP-werks = LV_WERKS.
ENDIF.
ENDIF.
*BREAK ROHINIK.
*if sy-uname = 'ROHINIK'.
*IF vbak-audat < sy-datum.
* fcode = 'ENT1'.
* MESSAGE 'SO Date Should Not be Less Than Current Date.' TYPE 'E'.
* SET SCREEN SYST-DYNNR.
* LEAVE SCREEN.
*ENDIF.
*ENDIF.
* end change by rohini kumar
Comments
Post a Comment