Deriving Customer Code

[Former Member]

Hi Experts,

Is the way right for which I am deriving the customer code.

Proj table is enhanced to store customer code.

LOOP AT IT_tab.

CALL FUNCTION 'CONVERSION_EXIT_ABPSP_INPUT'

EXPORTING

INPUT = IT_tab-PRCODE

IMPORTING

OUTPUT = OPSPNR

EXCEPTIONS

NOT_FOUND = 1

OTHERS = 2.

CLEAR PRPS.

SELECT SINGLE * FROM PRPS WHERE PSPNR = OPSPNR.

IF SY-SUBRC = 0.

CLEAR PROJ.

SELECT SINGLE * FROM PROJ WHERE PSPNR = PRPS-PSPHI.

IF SY-SUBRC = 0.

CUST = PROJ-ZZKUNNR.

ENDIF.

ENDIF.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

INPUT = CUST

IMPORTING

OUTPUT = CUST.

TTCUST_EAT = CUST.

***

***

endloop.

[andreas_mann3]

hi,

seems to be ok.

You have append table proj with field zzkunnr

A.