topic Re: having problem in code in Application Development and Automation Discussions

having problem in code

Former Member — Fri, 23 May 2008 08:05:29 GMT

Hi,

I am making a report in which i have to display the vendor payment for open items and i am facing the problem that when it moves to the 3rd table BSIK table the documenttype (BLART) get changes. i dont why why it is happening?

plzz help me out it iz really urgent to me as help will be definately rewarded.

here's d code:-

DATA: BEGIN OF ITBSIK OCCURS 0,

MBLNR LIKE MKPF-MBLNR,

XBLNR LIKE MKPF-XBLNR,

BLART LIKE MKPF-BLART,

BELNR LIKE BKPF-BELNR,

BUDAT LIKE BKPF-BUDAT,

BLART LIKE BSIK-BLART,

AUGBL LIKE BSIK-AUGBL,

AUGDT LIKE BSIK-AUGDT,

LIFNR LIKE BSIK-LIFNR,

WRBTR LIKE BSIK-WRBTR,

END OF ITBSIK.

*A~BLART

SELECT A_{MBLNR A}XBLNR B_{BELNR B}BUDAT C_{BLART C}AUGBL C_{AUGDT C}LIFNR C~WRBTR FROM MKPF AS A

INNER JOIN BKPF AS B ON B_{XBLNR = A}XBLNR AND B_{BLART = A}BLART

INNER JOIN BSIK AS C ON C_{XBLNR = B}XBLNR "AND C_{BLART = B}BLART

INTO TABLE ITBSIK WHERE A~XBLNR > 0.

SORT ITBSIK BY BELNR.

LOOP AT ITBSIK.

WRITE: /ITBSIK-MBLNR,ITBSIK-BELNR,ITBSIK-BUDAT,ITBSIK-BLART,ITBSIK-XBLNR,ITBSIK-AUGBL,ITBSIK-AUGDT,ITBSIK-LIFNR,ITBSIK-WRBTR.

ENDLOOP.

Re: having problem in code

former_member226999 — Fri, 23 May 2008 09:15:47 GMT

Try this code:


DATA:
BEGIN OF itbsik OCCURS 0,
    mblnr LIKE mkpf-mblnr,
    xblnr LIKE mkpf-xblnr,
    belnr LIKE bkpf-belnr,
    budat LIKE bkpf-budat,
    blart LIKE mkpf-blart,
    augbl LIKE bsik-augbl,
    augdt LIKE bsik-augdt,
    lifnr LIKE bsik-lifnr,
    wrbtr LIKE bsik-wrbtr,
END OF itbsik.

*A~BLART

SELECT a~mblnr a~xblnr
       b~belnr b~budat
       c~blart c~augbl c~augdt c~lifnr c~wrbtr
  FROM mkpf AS a
 INNER JOIN bkpf AS b ON b~xblnr = a~xblnr AND b~blart = a~blart
 INNER JOIN bsik AS c ON c~xblnr = a~xblnr AND c~blart = a~blart
  INTO TABLE itbsik WHERE a~xblnr > 0.

SORT itbsik BY belnr.

LOOP AT itbsik.

  WRITE:/ itbsik-mblnr,itbsik-belnr,itbsik-budat,itbsik-blart,
       itbsik-xblnr,itbsik-augbl,itbsik-augdt,itbsik-lifnr,itbsik-wrbtr.

ENDLOOP.

Note the change in innerjoin for table C.

Reward if helps.

Fra

Re: having problem in code

Mohamed_Mukhtar — Fri, 23 May 2008 09:22:33 GMT

check this code

DATA: BEGIN OF ITBSIK OCCURS 0,

MBLNR LIKE MKPF-MBLNR,

XBLNR LIKE MKPF-XBLNR,

BLART LIKE MKPF-BLART,

BELNR LIKE BKPF-BELNR,

BUDAT LIKE BKPF-BUDAT,

BLART LIKE BSIK-BLART,

AUGBL LIKE BSIK-AUGBL,

AUGDT LIKE BSIK-AUGDT,

LIFNR LIKE BSIK-LIFNR,

WRBTR LIKE BSIK-WRBTR,

END OF ITBSIK.

*A~BLART

SELECT A_{MBLNR A}XBLNR B_{BELNR B}BUDAT C_{BLART C}AUGBL C_{AUGDT C}LIFNR C~WRBTR INTO TABLE ITBSIK FROM ( ( MKPF AS A

INNER JOIN BKPF AS B ON B_{XBLNR = A}XBLNR AND B_{BLART = A}BLART )

INNER JOIN BSIK AS C ON C_{XBLNR = B}XBLNR "AND C_{BLART = B}BLART )

AND WHERE A~XBLNR > 0.

SORT ITBSIK BY BELNR.

LOOP AT ITBSIK.

WRITE: /ITBSIK-MBLNR,ITBSIK-BELNR,ITBSIK-BUDAT,ITBSIK-BLART,ITBSIK-XBLNR,ITBSIK-AUGBL,ITBSIK-AUGDT,ITBSIK-LIFNR,ITBSIK-WRBTR.

ENDLOOP.

REWARD IF IT IS HELPFULL

Re: having problem in code

Former Member — Fri, 23 May 2008 09:29:57 GMT

HI FRA,

I had tried that change u have mentioned and when i am executing this

code it does not go to output window.

i dont know why it is not displaying the output?

Edited by: abaper2008 on May 23, 2008 11:36 AM

Re: having problem in code

Former Member — Fri, 23 May 2008 09:36:18 GMT

hi always learner,

i am trying ur code but it is giving error:-

SELECT A_{MBLNR A}XBLNR B_{BELNR B}BUDAT C_{BLART C}AUGBL C_{AUGDT C}LIFNR C~WRBTR INTO TABLE ITBSIK FROM ( ( MKPF AS A

INNER JOIN BKPF AS B ON B_{XBLNR = A}XBLNR AND B_{BLART = A}BLART )

INNER JOIN BSIK AS C ON C_{XBLNR = B}XBLNR "AND C_{BLART = B}BLART )

WHERE A~XBLNR > 0.

error:-

"(" has no closing ")"

what should i do,it doesn't work.

Re: having problem in code

Mohamed_Mukhtar — Fri, 23 May 2008 09:51:51 GMT

SELECT A_{MBLNR A}XBLNR B_{BELNR B}BUDAT C_{BLART C}AUGBL C_{AUGDT C}LIFNR C~WRBTR INTO TABLE ITBSIK FROM ( ( MKPF AS A

INNER JOIN BKPF AS B ON B_{XBLNR = A}XBLNR AND B_{BLART = A}BLART )

INNER JOIN BSIK AS C ON C_{XBLNR = B}XBLNR ) and

WHERE A~XBLNR > 0.

now check this code...

with regards

always learner...

Re: having problem in code

Former Member — Fri, 23 May 2008 10:14:01 GMT

HI,

I had modified the code as you had said but it is giving the right output as the blart field had changed. accoring to the fico person the blart always remains the same through out its clearing and here in dis code it is changing.

I had found something in BKPF table i.e. AWKEY n AWTYPE , they use to store the mkpf-mblnr and mjahr field.the problem is how to reterive this data from it as it will be more helpful in tracing the a/c document no.