Folgendermaßen habe ich das definiert (Teilcode):Der Typ von "I_PERSON" ist nicht in den Typ von "ME->PERSONEN" konvertierbar.
Code: Alles auswählen.
CLASS lcl_auto DEFINITION.
PUBLIC SECTION.
DATA: personen TYPE STANDARD TABLE OF REF TO lcl_person.
....
METHODS: besitzer IMPORTING i_person TYPE REF TO lcl_person.
....
CLASS lcl_auto IMPLEMENTATION.
METHOD besitzer.
personen = i_person. "Hier liegt ein Fehler
ENDMETHOD.
"CLASS lcl_person IMPLEMENTATION.
METHOD besitzt.
APPEND i_auto TO autos.
i_auto->besitzer( me ). "Wenn ich dieses ME entferne erscheint folgende Fehlermeldung: Der obligatorische Parameter 'I_PERSON' wurde nicht versorgt.
ENDMETHOD.
Folgende Benutzer bedankten sich beim Autor a-dead-trousers für den Beitrag:
yuro
Code: Alles auswählen.
person1->besitzt( i_auto = auto1 ).
APPEND auto2 TO person1->autos.
person1->drucke_gesamt( ).
Code: Alles auswählen.
LOOP AT me->autos INTO lr_auto.
lr_auto->drucke_auto( ). "Oder ähnliches.
ENDLOOP.
Code: Alles auswählen.
APPEND auto2 TO person1->autos.