Physical inventory document-SE71 form-storage bin information

[Former Member]

Hi All!

I have an SE71 form (an Z form for INVENT_VKBW). For each material I want to print on the form the storage bin, near to the storage location. In the SE71 form I have the code:

/E POS_BELZEILE2

/: DEFINE &LGPBE& = ' '

/: PERFORM LGPBE_TEXT IN PROGRAM ZATP_TEXTEB

/: USING &ISEG-MATNR&

/: USING &ISEG-WERKS&

/: CHANGING &LGPBE&

/: ENDPERFORM

/: PROTECT

L4 &ISEG-ZEILI& &ISEG-MATNR& &ISEG-CHARG&

&ISEG-LGORT&/&LGPBE(C)&

L <S>_________________________&T064T-STEXT&

= ________________________________________________</>&ISEG-ERFME&

/: ENDPROTECT

And the code for ZATP_TEXTEB is:

REPORT ZATP_TEXTEB .

TABLES: MARD, ISEG.

FORM LGPBE_TEXT TABLES INPUT STRUCTURE ITCSY

OUTPUT STRUCTURE ITCSY.

DATA : P_MATNR LIKE ISEG-MATNR ,

P_WERKS LIKE ISEG-WERKS ,

LGPBE LIKE MARD-LGPBE.

LOOP AT INPUT.

CASE INPUT-NAME.

WHEN 'ISEG-MATNR' .

MOVE INPUT-VALUE TO P_MATNR.

WHEN 'ISEG-WERKS' .

MOVE INPUT-VALUE TO P_WERKS.

ENDCASE.

ENDLOOP.

SELECT SINGLE LGPBE FROM MARD

INTO LGPBE

WHERE MATNR = P_MATNR AND

WERKS = P_WERKS.

LOOP AT OUTPUT.

CASE OUTPUT-NAME.

WHEN 'LGPBE'.

MOVE LGPBE TO OUTPUT-VALUE.

ENDCASE.

MODIFY OUTPUT.

ENDLOOP.

ENDFORM.

But i still don’t get printed the storage bin (MARD-LGPBE).

I know that there is a mistake but I don’t know where. I need some help.

Thank you all!

Best regards,

Florina

[Former Member]

Solved on my own.

[Former Member]

Solved on my own.