Code: Alles auswählen.
DATA: wa_dokil like dokil,
gl_such(20) type c value 'ZBSP070'.
SELECT * FROM DOKIL INTO wa_dokil
where object = gl_such.
Code: Alles auswählen.
data: wa_dokhl like dokhl,
wa_doktl like doktl,
it_doktl type table of doktl.
select single * from dokhl into wa_dokhl
where id = wa_dokil-id
and object = wa_dokil-object
and langu = wa_dokil-langu
and typ = wa_dokil-typ
and dokversion = wa_dokil-version.
if sy-subrc = 0.
select * from doktl into table it_doktl
where id = wa_dokhl-id
and object = wa_dokhl-object
and langu = wa_dokhl-langu
and typ = wa_dokhl-typ
and dokversion = wa_dokhl-dokversion.
loop at it_doktl into wa_doktl.
write: / wa_doktl-doktext.
endloop.
endif.