topic Re: internal table in Application Development and Automation Discussions

internal table

Former Member — Thu, 19 Oct 2006 21:25:49 GMT

i_tab

Parameters Sample data

MATERIAL abcd

PLANT Get from PO line item in SAP

STGE Get from PO line item in SAP

MOVE_TYPE 101

ENTRY_QNT 1

PO_NUMBER 458987567

PO_IT 00001

MVT_IND B

hi i have the following internal table in that table i have to get the plant and stge location from ekpo table using po line item no and update this internal table with plant and storage location.

can any one please send the code for this.

Re: internal table

Former Member — Thu, 19 Oct 2006 21:31:14 GMT

Hi,

Try this..

DATA: BEGIN OF ITAB_PO OCCURS 0,

EBELN TYPE EBELN,

EBELP TYPE EBELP,

WERKS TYPE WERKS_D,

LGORT TYPE LGORT_D,

END OF ITAB_PO.

GET THE PO DETAILS.

IF NOT ITAB[] IS INITIAL.

SELECT EBELN EBELP WERKS LGORT

FROM TABLE EKPO

INTO TABLE ITAB_PO

FOR ALL ENTRIES IN ITAB

WHERE EBELN = ITAB-PO_NUMBER

AND EBELP = PO_IT.

IF SY-SUBRC = 0.

SORT ITAB_PO BY EBELN EBELP.

ENDIF.

DATA: V_TABIX TYPE SYTABIX.

PROCESS THE INTERNAL TABLE.

LOOP AT ITAB.

V_TABIX = SY-TABIX.

READ TABLE ITAB_PO

WITH KEY EBELN = ITAB-PO_NUMBER

EBELP = ITAB-PO_IT.

IF SY-SUBRC = 0.

ITAB-PLANT = ITAB_PO-WERKS.

ITAB-STGE = ITAB_PO-LGORT.

MODIFY ITAB INDEX V_TABIX

TRANSPORTING PLANT STGE.

ENDIF.

ENDLOOP.

Thanks,

Naren

Re: internal table

Former Member — Thu, 19 Oct 2006 21:40:25 GMT

thanks naren.

Re: internal table

Former Member — Thu, 19 Oct 2006 21:46:13 GMT

hi naren but my internal table has some extra fields movement type, mov ind, qty and i should get the plant and storage location only using po line item.

Re: internal table

RichHeilman — Thu, 19 Oct 2006 21:49:24 GMT

It appears that you might be trying to do a goods reciept against a PO? This is correct? You simply need to do a select against the PO line EKPO and move the plant, storage location to the the itab line.

select single werks lgort into (itab-plant, itab-STGE)
            from ekpo
                where ebeln = p_ebeln   "<-- Po Number
                  and ebelp = p_ebelp.  "<-- Po item

Regards,

Rich Heilman