hi Atish,
*select project(s) def(pspnr)
SELECT PSPNR FROM PROJ INTO TABLE I_PROJ
WHERE PSPID IN S_PSPID.
IF NOT I_PROJ[] IS INITIAL.
SELECT POSID OBJNR PRART
FROM PRPS
INTO TABLE I_PRPS
FOR ALL ENTRIES IN I_PROJ
WHERE PSPHI = I_PROJ-PSPNR
AND BELKZ <> SPACE.
endif.
IF NOT I_PRPS[] IS INITIAL.
Select REFBN REFBK REFGJ
from COVP
INTO TABLE I_COVP
FOR ALL ENTRIES IN I_PRPS
where OBJNR = I_PRPS-OBJNR .
IF NOT I_covp[] IS INITIAL.
SELECT BUKRS BELNR GJAHR XBLNR BUDAT
FROM BKPF
INTO TABLE I_BKPF
FOR ALL ENTRIES IN I_COVP
WHERE BUKRS = I_COVP-REFBK
AND BELNR = I_COVP-REFBN
AND GJAHR = I_COVP-REFGJ.
endif.
IF NOT I_bkpf[] IS INITIAL.
SELECT BUKRS BELNR GJAHR AUGBL WRBTR wmwst LIFNR sknto ebeln NEBTR
FROM BSEG
INTO TABLE I_BSEG
FOR ALL ENTRIES IN I_BKPF
WHERE BUKRS = I_BKPF-BUKRS
AND BELNR = I_BKPF-BELNR
AND GJAHR = I_BKPF-GJAHR.
endif.
if not i_bseg[] is initial.
SELECT CHECT VBLNR
FROM Z_PAYR
INTO TABLE I_PAYR
FOR ALL ENTRIES IN I_BSEG2
WHERE VBLNR = I_BSEG2-AUGBL AND
RZAWE = 'C'.
Now In this I_PAYR ,,I have 3 check no's(CHECT) for each AUGBL from BSEG..
I want to move 3 check no's for each AUGBL into I_BSEG int.table.
plz help with code
waiitng for ur reply
regards
Vaja
Bluesky
