CODE PLEASE URGENT

[Former Member]

HI GEMS,

PLEASE SEND ME THE CODE PLEASE ITS URGENT.

The retrieval logic is to be used only for displaying the accounting and assessment year

1) Accounting Year: GJAHR-(GJAHR+1)

Assessment Year GJAHR1) – (GJAHR2)

2) Get the following details from BSIS/BSAS

BSIS/BSAS – BELNR

BSIS/BSAS – DMBTR

BSIS/BSAS – SHKZG

Where

BSIS/BSAS – GJAHR = P_GJAHR

BSIS/BSAS – HKONT = (334551, 499001, 402001, 402002, 403000) and store them in an internal table INTAB1

Summate the BSIS/BSAS –DMBTR and depict it in the first line of the table

3) For the documents contained in the INTAB1 table check whether there are any line items posted to HKONT’s =(260501,260502,260503) and store them in an internal table INTAB2

If yes then get the following fields from BSIS/BSAS table

BSIS/BSAS – BELNR

BSIS/BSAS – DMBTR

BSIS/BSAS – SHKZG

Where

BELNR = INTAB2-BELNR

GJAHR = P_GJAHR

HKONT = (260501, 260502 and, 260503)

SHKZG = “H”.

Summate the BSIS/BSAS – DMBTR and depict against second line item and fourth line.

4) Subtract line1 and line2 and depict against the 3 line.

5) Subtract the DMBTR of 4th line from the 2nd line DMBTR and depict against the 5th line item.

[andreas_mann3]

hi,

please send me (or post) your complete requirement-

your postings are confusing!

regards Andreas

[Former Member]

Do you want us to write code for you?

Kindly post only your doubts and clarifications.

[Former Member]

select BELNR DMBTR SHKZG

from BSIS

into itab

Where

GJAHR = P_GJAHR and

HKONT in (334551, 499001, 402001, 402002, 403000).

data s1 type i value 0.

loop at itab.

s1 = s1 + itab-dmbtr.

endloop.

Read itab where index = 1.

itab-dmbtr = s1.

append itab.

clear s1.

If itab1[] is not initial.

select BELNR DMBTR SHKZG

from BSIS

into itab2

Where

BELNR = INTAB2-BELNR and

GJAHR = P_GJAHR and

HKONT in (260501, 260502 , 260503) and

SHKZG = “H”.

endif.

data s2 type i value 0.

loop at itab2.

s2 = s2 + itab2-dmbtr.

endloop.

read itab2 where index =2.

itab2-dmbtr = s2.

append itab2.

read itab2 where index =4.

itab2-dmbtr = s2.

append itab2.

clear s2.