Skip to Content
0
Former Member
Jan 14, 2008 at 06:55 AM

How to not choose data which bisd-zuonr is blank? Please help!

25 Views

Hi,

I have problem in not choosing the bukrs (compay code) when the bisd-zuonr ( sort key )is blank. Please help!!

-


Sorce key----


LOOP AT t.

AT NEW bukrs.

CLEAR anz_dl.

CLEAR htext-anzahl.

CLEAR htext-datei.

htext-text1 = ' records writen in file '.

CLEAR p_pfad.

CONCATENATE

i_pfad

'CU_CC'

t-bukrs

'_'

sy-datum+6(2)

sy-datum+4(2)

sy-datum(4)

'_'

sy-uzeit

'.txt'

INTO p_pfad.

CLEAR outtab.

REFRESH outtab.

REFRESH: gt_outalv. "INS MG020207

ENDAT.

  • IF t-shkzg = 'H'.

  • h_betrg = t-wrbtr * -1.

  • ELSE.

h_betrg = t-wrbtr.

h_dmbtr = t-dmbtr.

  • ENDIF.

s-filler1 = s-filler2 = s-filler3 = s-filler4 = s-filler5 = ';'.

s-filler6 = s-filler7 = s-filler8 = ';'.

s-filler9 = s-filler10 = s-filler11 = s-filler12 = s-filler13 = ';'.

s-filler14 = ';'.

s-belnr = t-belnr.

IF t-xblnr NE space. "WD041005a

s-xblnr = t-xblnr. "WD041005a

ELSE. "WD041005a

s-xblnr = t-belnr. "WD041005a

ENDIF. "WD041005a

WHILE s-xblnr(1) EQ '0'. "INS MG130606

SHIFT s-xblnr LEFT. "INS MG130606

ENDWHILE. "INS MG130606

*>>>> " SKIP BLANK ZUONR

IF bsid-zuonr EQ space.

CONTINUE.

ENDIF.

*<<<<

endloop.

-


source code----


How to skip the bukrs (company code) when the bsid-zuonr = space?