topic LDB - KDF in Application Development and Automation Discussions

LDB - KDF

Former Member — Thu, 29 Nov 2012 08:32:41 GMT

Hi all,

I have a query where the invoice amount from the field 'bsch' must be displayed only if it is an outstanding, i.e. " bsch = '31' ".

I tried the if loop:

get lfa1.

get lfb1.

get bsik.

perform xyz.

form xyz.

if bsik-bschl = '31'.

write:/ lfa1-lifnr,

lfa1-name1,

lfb1-bukrs,

bsik-gjahr,

bsik-belnr.

if bsik-bschl = '31'.

write: at 80 bsik-dmbtr.

else.

write: '-'.

endif.

But it returns all the data and does not filter it. Any suggestions would be much appreciated!!!

Thanks!!!

Regards,

Deepak.M

Re: LDB - KDF

Sijin_Chandran — Thu, 29 Nov 2012 08:57:50 GMT

Hi Deepak ,

Its working perfectly alright .

form xyz.

if bsik-bschl = '31'.

write😕 lfa1-lifnr,

lfa1-name1,

lfb1-bukrs,

bsik-gjahr,

bsik-belnr.

if bsik-bschl = '31'.

write: at 80 bsik-dmbtr.

else.

write: '-'.

endif.

endif. " you haven't mentioned this endif in your code above

Check your cases again and debug it.

Re: LDB - KDF

Former Member — Thu, 29 Nov 2012 10:37:06 GMT

Hi Sijin,

I tried that but to no vain.

My complete program is:

REPORT YAPXX13_4.

nodes: lfa1, lfb1, bsik.

data: amt type bsik-dmbtr,

ttl type p decimals 2,

tl type p decimals 2.

get lfa1.

get lfb1.

get bsik.

perform xyz.

form xyz.

write:/ lfa1-lifnr,

lfa1-name1,

lfb1-bukrs,

bsik-gjahr,

bsik-belnr.

select dmbtr from bsik into amt where bschl = '31' and lifnr = lfa1-lifnr and bukrs = lfb1-bukrs.

write: at 80 amt.

endselect.

select sum( dmbtr ) from bsik into ttl where bschl = '31' and lifnr = lfa1-lifnr.

if ttl > '0' and bsik-bschl = '31'.

write: at 100 ttl.

endif.

select sum( dmbtr ) from bsik into tl where bschl = '31' and lifnr = lfa1-lifnr and bukrs = lfb1-bukrs.

if tl > '0'.

write: at 120 tl.

endif.

endform.

Regards,

Deepak.M

Re: LDB - KDF

Sijin_Chandran — Thu, 29 Nov 2012 11:17:30 GMT

Hi Deepak ,

You just code like this.

form xyz.

if bsik-bschl = '31'.

write:/ lfa1-lifnr,

lfa1-name1,

lfb1-bukrs,

bsik-gjahr,

bsik-belnr.

select dmbtr from bsik into amt where bschl = '31' and lifnr = lfa1-lifnr and bukrs = lfb1-bukrs.

write: at 80 amt.

endselect.

select sum( dmbtr ) from bsik into ttl where bschl = '31' and lifnr = lfa1-lifnr.

if ttl > '0' and bsik-bschl = '31'.

write: at 100 ttl.

endif.

select sum( dmbtr ) from bsik into tl where bschl = '31' and lifnr = lfa1-lifnr and bukrs =lfb1-bukrs.

if tl > '0'.

write: at 120 tl.

endif.

endif.

endform.

Re: LDB - KDF

Former Member — Thu, 29 Nov 2012 11:31:18 GMT

No. I'm still getting all the values.

Re: LDB - KDF

Former Member — Thu, 29 Nov 2012 11:37:00 GMT

Its working perfectly alright .

form xyz.

if bsik-bschl = '31'.

write😕 lfa1-lifnr,

lfa1-name1,

lfb1-bukrs,

bsik-gjahr,

bsik-belnr.

bsil-ebeln.

if bsik-bschl = '31'.

write: at 80 bsik-dmbtr.

else.

write: '-'.

endif.

endif. " you haven't mentioned this endif in your code above

Check your cases again and debug it.