Code: Alles auswählen.
METHOD get_hierarchy.
DATA: lc_cursor TYPE cursor.
OPEN CURSOR lc_cursor FOR
** Hierarchy.
SELECT otype objid sclas sobid rsign relat prozt begda endda aedtm
FROM hrp1001
WHERE relat EQ zcl_data_employee=>gc_relat_002
AND sclas EQ zcl_data_employee=>gc_otype_o
AND plvar EQ me->liv_plvar
AND endda GE me->liv_date
AND otype EQ zcl_data_employee=>gc_otype_o
AND begda LE me->liv_date
AND subty EQ zcl_data_employee=>gc_subty_b002.
DO.
FETCH NEXT CURSOR lc_cursor APPENDING TABLE me->lit_hierarchy PACKAGE SIZE 60000.
IF ( sy-subrc NE 0 ).
EXIT.
ENDIF.
ENDDO.
CLOSE CURSOR lc_cursor.
ENDMETHOD.
Die interessiert uns hier bestimmt alle.DeathAndPain hat geschrieben:Also ihr seid alle meiner Meinung, dass das in dieser Form Unsinn ist und ein gewöhnlicher SELECT INTO TABLE besser wäre? Dann werde ich ihn mal fragen, wenn er wieder da ist.
*heul*DeathAndPain hat geschrieben:gc: global constant (als Attribute definiert)
lc: local cursor (logisch oder? )
me->lit_hierarchy: local internal table
Wir sollten hier nun nicht das Ursprungsthema "Cursor" verwässern.Ray Ozzie hat geschrieben:When you’re working in somebody else’s module, though, you’d better use his or her conventions. It’s part of learning to work with others.