hi leute kann man das irgendwie realisieren?
Danke
Code: Alles auswählen.
data: t(4) type c.
t = 'test'.
write at 50 t.
write: / 'hallo' under t.
write at 50 'test'.Anonymous hat geschrieben:
[/quote]
hi leute kann man das irgendwie realisieren?
Danke
Code: Alles auswählen.
loop at itab1 where artnr = matnr_tab-matnr.
write: ' ', itab1-t.
endloop.
...
loop at itab1 where artnr = tab-matnr
and ouse = tab-ouse.
text = itab1-t.
write: itab1-mgdem under text.
endloop.
Code: Alles auswählen.
LOOP AT itab1 WHERE artnr = matnr_tab-matnr.
WRITE: ' ', itab1-t.
ENDLOOP.
...
LOOP AT itab1 WHERE artnr = tab-matnr
AND ouse = tab-ouse.
WRITE: itab1-mgdem UNDER itab1-t.
ENDLOOP.
So funktioniert das nicht!Anonymous hat geschrieben: text = itab1-t.
write: itab1-mgdem under text.
Code: Alles auswählen.
data: itab1 type table of zdemand with header line.
data: begin of matnr_tab occurs 10000,
matnr type char30,
end of matnr_tab.
data: begin of hous_tab occurs 10000,
matnr type char30,
hous type char10,
end of hous_tab.
data: anf type i value 20,
abs type i value 13,
anfang type i ,
abstand type i ,
ab type i ,
datum(10) type c,
dat type string.
loop at itab1.
matnr_tab-matnr = itab1-artnr.
warehous_tab-matnr = itab1-artnr.
warehous_tab-warehous = itab1-dm_warehouse.
collect matnr_tab. clear matnr_tab.
collect warehous_tab. clear warehous_tab.
endloop.
loop at matnr_tab.
abstand = abs.
anfang = anf.
clear ab.
* Datum
sort itab1 by artnr datum.
loop at itab1 where artnr = matnr_tab-matnr.
if sy-tabix = 1.
write: at anfang itab1-datum.
ab = anfang + abstand.
else.
write: at ab itab1-datum.
ab = ab + abstand.
endif.
endloop.
abstand = abs.
anfang = anf.
clear ab.
*// verschiedene houses
loop at hous_tab where matnr = matnr_tab-matnr.
write /3 hous_tab-hous.
*// welches Datum?
loop at itab1 where artnr = matnr_tab-matnr.
if itab1-house = hous_tab-hous.
if sy-tabix = 1.
write: at anfang itab1-mgdem left-justified.
ab = anfang + abstand.
else.
write: at ab itab1-mgdem left-justified.
ab = ab + abstand.
endif.
else.
if sy-tabix = 1.
write: at anfang '0'.
ab = anfang + abstand.
else.
write: at ab '0'.
ab = ab + abstand.
endif.
endif.
endloop."itab1
anfang = anf.
abstand = abs.
clear ab.
endloop."warehous_tab
endloop."matnr_tab
endform."ausgabe