help needed(urgent)

Former Member · ‎2006 Oct 03

hi all,

happy belated dusshera to all,

check the code . i have problem that i am not getting

offsetting item after clicking my 2nd radio button.

by clicking on this i am getting datathat is aslo reqired but alon with it i should get offsetting item details

aslo but i am unable to get it.

so plz provide for this any solution .

REPORT zglaccline NO STANDARD PAGE HEADING

LINE-SIZE 300

LINE-COUNT 65(3).

TABLES : bkpf, bseg.

DATA : BEGIN OF it_bkpf OCCURS 0,

bukrs LIKE bkpf-bukrs,

belnr LIKE bkpf-belnr,

gjahr LIKE bkpf-gjahr,

monat LIKE bkpf-monat,

budat LIKE bkpf-budat,

brnch LIKE bkpf-brnch,

xblnr LIKE bkpf-xblnr,

waers LIKE bkpf-waers,

END OF it_bkpf.

DATA : BEGIN OF it_bseg OCCURS 0,

gsber LIKE bseg-gsber,

hkont LIKE bseg-hkont,

kunnr LIKE bseg-kunnr,

sgtxt LIKE bseg-sgtxt,

bschl LIKE bseg-bschl,

wrbtr LIKE bseg-wrbtr,

dmbtr LIKE bseg-dmbtr,

pswsl LIKE bseg-pswsl,

kostl LIKE bseg-kostl,

prctr LIKE bseg-prctr,

aufnr LIKE bseg-aufnr,

shkzg LIKE bseg-shkzg,

augbl LIKE bseg-augbl,

END OF it_bseg.

DATA : BEGIN OF it_res OCCURS 0,

bukrs LIKE bkpf-bukrs,

gjahr LIKE bkpf-gjahr,

monat LIKE bkpf-monat,

belnr LIKE bkpf-belnr,

budat LIKE bkpf-budat,

brnch LIKE bkpf-brnch,

gsber LIKE bseg-gsber,

hkont LIKE bseg-hkont,

kunnr LIKE bseg-kunnr,

bschl LIKE bseg-bschl,

prctr LIKE bseg-prctr,

kostl LIKE bseg-kostl,

aufnr LIKE bseg-aufnr,

pswsl LIKE bseg-pswsl,

wrbtr LIKE bseg-wrbtr,

waers LIKE bkpf-waers,

dmbtr LIKE bseg-dmbtr,

xblnr LIKE bkpf-xblnr,

txt50 LIKE skat-txt50,

sgtxt LIKE bseg-sgtxt,

shkzg LIKE bseg-shkzg,

END OF it_res.

DATA : BEGIN OF itab_head OCCURS 0,

name1(20) TYPE c,

END OF itab_head.

SELECTION-SCREEN BEGIN OF BLOCK b_2 WITH FRAME TITLE text-002.

PARAMETERS : p_sel1 RADIOBUTTON GROUP sel,

p_sel2 RADIOBUTTON GROUP sel,

p_sel3 RADIOBUTTON GROUP sel.

SELECTION-SCREEN END OF BLOCK b_2.

SELECTION-SCREEN SKIP 1.

SELECTION-SCREEN BEGIN OF BLOCK b_1 WITH FRAME TITLE text-001.

PARAMETER p_bukrs LIKE bkpf-bukrs DEFAULT 'ML' OBLIGATORY.

SELECT-OPTIONS : s_belnr FOR bkpf-belnr.

SELECT-OPTIONS : s_gjahr FOR bkpf-gjahr OBLIGATORY.

SELECT-OPTIONS : s_monat FOR bkpf-monat.

SELECT-OPTIONS : s_blart FOR bkpf-blart.

SELECT-OPTIONS : s_budat FOR bkpf-budat.

SELECT-OPTIONS : s_waers FOR bkpf-waers.

SELECT-OPTIONS : s_hkont FOR bseg-hkont.

SELECT-OPTIONS : s_bldat FOR bkpf-bldat.

SELECTION-SCREEN END OF BLOCK b_1.

SELECT bukrs belnr gjahr monat budat brnch xblnr waers

INTO CORRESPONDING FIELDS OF TABLE it_bkpf

FROM bkpf

WHERE bukrs = p_bukrs

AND belnr IN s_belnr

AND gjahr IN s_gjahr

AND monat IN s_monat

AND blart IN s_blart

AND budat IN s_budat

AND bldat IN s_bldat

AND waers IN s_waers.

IF NOT it_bkpf[] IS INITIAL.

LOOP AT it_bkpf.

IF p_sel1 = 'X'.

SELECT gsber hkont kunnr sgtxt bschl wrbtr pswsl kostl shkzg

dmbtr prctr aufnr augdt augbl

INTO CORRESPONDING FIELDS OF TABLE it_bseg

FROM bseg

WHERE bukrs = it_bkpf-bukrs

AND belnr = it_bkpf-belnr

AND gjahr = it_bkpf-gjahr

AND pswsl = it_bkpf-waers

AND hkont IN s_hkont.

ELSEIF p_sel2 = 'X'.

SELECT gsber hkont kunnr sgtxt bschl wrbtr pswsl kostl shkzg

dmbtr prctr aufnr augdt augbl

INTO CORRESPONDING FIELDS OF TABLE it_bseg

FROM bseg

WHERE bukrs = it_bkpf-bukrs

AND belnr = it_bkpf-belnr

AND gjahr = it_bkpf-gjahr

AND pswsl = it_bkpf-waers.

AND koart <> 'S'.

ENDIF.

IF sy-subrc EQ 0.

LOOP AT it_bseg.

SELECT SINGLE txt50 INTO it_res-txt50

FROM skat

WHERE spras = 'EN'

AND ktopl = 'MCA'

AND saknr = it_bseg-hkont.

it_res-bukrs = it_bkpf-bukrs.

it_res-gjahr = it_bkpf-gjahr.

it_res-monat = it_bkpf-monat.

it_res-gsber = it_bseg-gsber.

it_res-belnr = it_bkpf-belnr.

it_res-budat = it_bkpf-budat.

it_res-brnch = it_bkpf-brnch.

it_res-kunnr = it_bseg-kunnr.

it_res-hkont = it_bseg-hkont.

it_res-sgtxt = it_bseg-sgtxt.

it_res-bschl = it_bseg-bschl.

it_res-wrbtr = it_bseg-wrbtr.

it_res-pswsl = it_bseg-pswsl.

it_res-waers = it_bkpf-waers.

it_res-dmbtr = it_bseg-dmbtr.

it_res-kostl = it_bseg-kostl.

it_res-prctr = it_bseg-prctr.

it_res-aufnr = it_bseg-aufnr.

it_res-shkzg = it_bseg-shkzg.

it_res-augbl = it_bseg-augbl.

it_res-xblnr = it_bkpf-xblnr.

APPEND it_res.

CLEAR it_res.

ENDLOOP.

CLEAR it_bkpf.

ENDIF.

ENDLOOP.

ENDIF.

LOOP AT it_res.

IF it_res-shkzg EQ 'H'.

it_res-wrbtr = it_res-wrbtr * -1.

it_res-dmbtr = it_res-dmbtr * -1.

ENDIF.

WRITE : /2(4) it_res-bukrs,

13(4) it_res-gjahr,

21(2) it_res-monat,

31(10) it_res-belnr,

44(10) it_res-budat,

55(4) it_res-brnch,

60(4) it_res-gsber,

70(10) it_res-hkont,

82(10) it_res-kunnr,

94(2) it_res-bschl,

104(10) it_res-prctr,

116(10) it_res-kostl,

128(12) it_res-aufnr,

142(5) it_res-pswsl,

148(13) it_res-wrbtr,

164(5) it_res-waers,

170(13) it_res-dmbtr,

187(16) it_res-xblnr,

205(50) it_res-sgtxt.

MODIFY it_res.

CLEAR it_res.

ENDLOOP.

Message was edited by: sanjeev singh

Former Member · ‎2006 Oct 03

Hi,

please can you elaborate your problem.

i copied your code but could not

replicate problem.

what is offset items?

Regards

amole

Former Member · ‎2006 Oct 03

hi amole

iam entering gl acc posting date in my selection-screen

the data which is related to that particular glacc is not coming correctly that means for that gl account 10 line items r there some r missing & also iam getting other glaccount's which is related to that posting date which is not req. Can u please help me.

Former Member · ‎2006 Oct 03

Hi

When you are populating it_bseg in the loop, the select should have been using <b>APPENDING corresponding fields of table it_bseg </b>.

Also check if relevant data is there in BSEG table for the conditions specified in Where clause.

Regards,

Raj

Former Member · ‎2006 Oct 03

hi raj

i have applied the solution given by u but it is not coming yet and as u r concerned about the data then i must tell u that data is there.

do have any code regarding my reqiurement then plz share with me .

my id is- [email protected]

thanks & regards

sanjeev

i will surely give points to u for ur effort

Former Member · ‎2006 Oct 03

Hi Sanjeev,

I took your code, pasted in my client and when executed with BUKRS (GF1A, available in this client), I got the contents.

So, I feel there is some problem in the data, not the code.

Plz, check in debug, if corresponding entries does exist in both tables.

Regards,

Raj

Former Member · ‎2006 Oct 03

hi raj

iam entering gl acc posting date in my selection-screen

the data which is related to that particular glacc is not coming correctly that means for that gl account 10 line items r there some r missing & also iam getting other glaccount's which is related to that posting date which is not req. Can u please help me.

Former Member · ‎2006 Oct 03

Hello Sanjeev

IF p_sel1 = 'X'.

SELECT gsber hkont kunnr sgtxt bschl wrbtr pswsl kostl shkzg

dmbtr prctr aufnr augdt augbl

INTO CORRESPONDING FIELDS OF TABLE it_bseg

FROM bseg

WHERE bukrs = it_bkpf-bukrs

AND belnr = it_bkpf-belnr

AND gjahr = it_bkpf-gjahr

AND pswsl = it_bkpf-waers

AND hkont IN s_hkont.

ELSEIF p_sel2 = 'X'.

SELECT gsber hkont kunnr sgtxt bschl wrbtr pswsl kostl shkzg

dmbtr prctr aufnr augdt augbl

INTO CORRESPONDING FIELDS OF TABLE it_bseg

FROM bseg

WHERE bukrs = it_bkpf-bukrs

AND belnr = it_bkpf-belnr

AND gjahr = it_bkpf-gjahr

AND pswsl = it_bkpf-waers.

AND koart <> 'S'.

ENDIF.

Can you explain what you are trying to do on the selected radio button P_sel1 and p_sel2. Basically what do they stand for....because if you select p_sel2 there is no filter for hkont so it is surely to fetch data for all hkonts !!

By Category

Related Content

Activity Groups

Industry Groups

Influence and Feedback Groups

Interest Groups

Location Groups

Customer Only Groups

Forums

Related Resources

Products

Learning and Support

About

My SAP Profile

My SAP Profile

help needed(urgent)