Online Tutorials & Training Materials | STechies.com
Register Login

Steps to Create User Exit for Vendor Master

|| || 0

Steps to Create User Exit for Vendor Master
Stechies

What are the steps to Create User Exit for Vendor Master?

To Create User Exit for vendor master follow these steps:-

Step1. Go to transaction CMOD.

Step2. Put Project as ZPROJ. Click on Create.

Step3. Put Short Text “Check PAN for Vendor and Customer”.

Step4. Click on Enhancement Assignment.

Step5. Put Enhancement as “SAPMF02K”.

Step6. Press Enter. Click on Components.

Step7. Click on “EXIT_SAPMF02K_001”.

Step8. Click on Include “ZXF05U01”.

Step9. Copy the below written code to this include:

*&---------------------------------------------------------------------*
*& Include ZXF05U01
*&---------------------------------------------------------------------*

FIELD-SYMBOLS :<fs_pgname1> TYPE j_1ipanno.
ASSIGN ('(SAPLJ1I_MASTER)J_1IMOVEND-J_1IPANNO') TO <fs_pgname1> .
if <fs_pgname1> IS not ASSIGNED.
MESSAGE w000(8i) WITH 'PAN Number is not available.Please update PAN '.
endif.
DATA: it_lfai TYPE TABLE OF lfa1,
lifnr TYPE lfa1-lifnr.
DATA: pan TYPE j_1imovend-j_1ipanno,
l_ilen TYPE i.
DATA: wt_t059z TYPE t059z OCCURS 1 WITH HEADER LINE.
DATA : BEGIN OF wt_lfbw OCCURS 0.
INCLUDE STRUCTURE t_lfbw.
DATA : END OF wt_lfbw.
READ TABLE t_lfbw INDEX 1.
lifnr = t_lfbw-lifnr .
CALL FUNCTION 'J_1BSA_COMPONENT_ACTIVE'
EXPORTING
bukrs = t_lfbw-bukrs
component = 'IN'
EXCEPTIONS
component_not_active = 1
OTHERS = 2.
CHECK sy-subrc = 0.
pan = <fs_pgname1>.
l_ilen = strlen( pan ).
*if pan is initial.
*SELECT SINGLE j_1ipanno FROM j_1imovend INTO pan WHERE lifnr = lifnr.
* endif.
IF pan = ' '.
MESSAGE w000(8i) WITH 'PAN Number is not available.Please update PAN '.
ELSEIF l_ilen NE 10 .
MESSAGE 'Please enter 10 DIGIT PANCARD NO.' TYPE 'E'.
ELSEIF pan+0(5) CA '0123456789'
OR "q
pan+5(4) CA 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
OR
pan+9(1) CA '0123456789'.
MESSAGE 'PANCARD no should be in the format 1-5 char 6-9 numeric last char' TYPE 'E'.
ENDIF.

Step10. Activate the Include and Project.


Related Articles

0.0129 seconds.