Ist ein dynamischer Methodenaufruf möglich?
7 Beiträge
•
Seite 1 von 1
7 Beiträge
Seite 1 von 1
Beitrag
von Michael.Nett (ForumUser / 17 / 0 /
0
)
»
Hallo Community,
ich versuche mal, mein Anliegen zu erklären.
Voraussetzung:
Ich hab ein Dynpro erstellt und mit Hilfe des Screen-Painters drei Container angelegt. In diese Container sollten drei TextEdit-Controls angelegt werden.
Jetzt habe ich ein Unterprogramm erstellt, welches prüfen soll, ob sich ein TextEdit-Control vom Inhalt her verändert hat.
Ich übergebe Ihm ein Objekt und bekomme den Wert 1 (true) oder 0 (false) zurück.
Ich rufe das Unterprogramm folgendermaßen auf:
Das funktioniert wunderbar. Später frag ich die Variable tmp ab, ob sich etwas geändert hat und zeige dann ggf. das Speicher-Dialog an.
Das ganze muss ich aber für jedes Textfeld machen und da kam mir die sensationelle Idee, dies dynamisch zu machen. Ich sehe ein, für drei Textfelder ist das nicht wirklich sinnvoll, aber es interessiert mich halt.
Jetzt hab ich meinen Quelltext modifiziert und zwar, das ich mir in einer Schleife den Objektname "backe":
Mein Unterprogramm hab ich folgendermaßen modifiziert:
Soviel zur Theorie, klappt natürlich nicht. Wie vielleicht ersichtlich, habe ich auch mehrere Möglichkeiten durchprobiert (daher das "gewusel" an Kommentaren).
Gibt es irgendeine Möglichkeit die Variable tmpobjekt in ein "richtiges" Objekt zu konvertieren?
Wie kann ich mein Vorhaben evtl. anderes lösen und geht sowas überhaupt?
Über eine kleine Hilfe wäre ich sehr erfreut.
Mit freundlichem Gruß
Michael
ich versuche mal, mein Anliegen zu erklären.
Voraussetzung:
Ich hab ein Dynpro erstellt und mit Hilfe des Screen-Painters drei Container angelegt. In diese Container sollten drei TextEdit-Controls angelegt werden.
Code: Alles auswählen.
DATA: container TYPE REF TO cl_gui_custom_container,
editor1 TYPE REF TO cl_gui_textedit,
editor2 TYPE REF TO cl_gui_textedit,
editor3 TYPE REF TO cl_gui_textedit.
CREATE OBJECT: container EXPORTING container_name = 'DYNPRO_CONTAINER',
editor1 EXPORTING parent = container.
CREATE OBJECT: container EXPORTING
container_name = 'DYNPRO_CONTAINER_2',
editor2 EXPORTING parent = container.
CREATE OBJECT: container EXPORTING
container_name = 'DYNPRO_CONTAINER_3',
editor3 EXPORTING parent = container.
Ich übergebe Ihm ein Objekt und bekomme den Wert 1 (true) oder 0 (false) zurück.
Code: Alles auswählen.
FORM pruefe_textedit USING name_editor TYPE REF TO cl_gui_textedit CHANGING is_modified TYPE i.
CALL METHOD name_editor->get_textmodified_status
IMPORTING
status = is_modified
EXCEPTIONS
OTHERS = 1.
IF sy-subrc <> 0.
RAISE error_cntl_call_method.
ENDIF.
ENDFORM. " pruefe_textedit
Code: Alles auswählen.
PERFORM PRUEFE_TEXTEDIT
USING
EDITOR1
CHANGING
IS_MODIFIED.
IF is_modified EQ 1.
tmp = 'X'.
ENDIF.
Das ganze muss ich aber für jedes Textfeld machen und da kam mir die sensationelle Idee, dies dynamisch zu machen. Ich sehe ein, für drei Textfelder ist das nicht wirklich sinnvoll, aber es interessiert mich halt.
Jetzt hab ich meinen Quelltext modifiziert und zwar, das ich mir in einer Schleife den Objektname "backe":
Code: Alles auswählen.
DATA: tmp TYPE c VALUE ' '.
DATA: textobjekt(6) type c VALUE 'EDITOR'.
DATA: tmpobjekt(8) TYPE c.
DATA: zaehler TYPE c.
DO 3 TIMES. "derzeit 3 Textfelder
ADD 1 TO zaehler.
CONCATENATE textobjekt zaehler INTO tmpobjekt.
PERFORM PRUEFE_TEXTEDIT
USING
tmpobjekt
CHANGING
IS_MODIFIED.
IF is_modified EQ 1.
tmp = 'X'.
ENDIF.
ENDDO.
Code: Alles auswählen.
FORM pruefe_textedit USING name_editor
CHANGING is_modified TYPE i.
DATA: name_editor_class TYPE REF TO cl_gui_textedit.
MOVE name_editor TO name_editor_class.
* field-symbols: <text> type ref to cl_gui_textedit,
* <editor> type any.
* assign name_editor to <editor>.
* assign <editor> to <text>.
* CALL METHOD <text>->get_textmodified_status
CALL METHOD name_editor_class->get_textmodified_status
IMPORTING
status = is_modified
EXCEPTIONS
OTHERS = 1.
IF sy-subrc <> 0.
RAISE error_cntl_call_method.
ENDIF.
ENDFORM. " pruefe_textedit
Gibt es irgendeine Möglichkeit die Variable tmpobjekt in ein "richtiges" Objekt zu konvertieren?
Wie kann ich mein Vorhaben evtl. anderes lösen und geht sowas überhaupt?
Über eine kleine Hilfe wäre ich sehr erfreut.
Mit freundlichem Gruß
Michael
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Mal ein kleiner workaround:)
speicher die 3 editorobjekte in eine Tabelle und loop über die tabelle und übergebe immer die aktuelle zeile an die Form:)
Oder du rufst die Form die du zuerst hattest auf:
perform blabla using (objektname) changing blub
könnte auch funktionieren.
speicher die 3 editorobjekte in eine Tabelle und loop über die tabelle und übergebe immer die aktuelle zeile an die Form:)
Oder du rufst die Form die du zuerst hattest auf:
perform blabla using (objektname) changing blub
könnte auch funktionieren.
Beitrag
von Michael.Nett (ForumUser / 17 / 0 /
0
)
»
Hallo Flo,
danke für die Antwort, aber entweder wir reden aneinander vorbei, oder ich bin zu blöd Deinen Workaround zu verstehen.
Das Problem besteht darin, das ich mir die Objektnamen in einer Schleife aus Präfix (in diesem Fall 'editor') und einem Schleifen-Zähler mittels CONCATENATE zusammensetze.
//Edit: Wenn ich tmpobjekt mit REF TO cl_gui_textedit deklariere, kann ich leider (Typen unverträglich) nicht mit CONCATENATE den Objektnamen zusammensetzen.
Jetzt hab ich den Objektnamen aber nicht das Objekt (ich denke, da liegt der Hund begraben).
Wenn ich mir die Objektnamen in eine Tabelle sichere, hab ich wiederum nur die Namen, aber nicht die eigentlichen Objekte.
Oh, hab gerade Dein Edit gesehen, aber das hilft mir auch nicht wirklich weiter (oder halt, ich versteh es nicht).
Meine FORM erwartet ein Objekt und ich übergebe Ihm einen Objektnamen (der identisch mit dem Objekt ist), aber schmecken tuts dem Interpreter leider nicht. Wenn ich Ihm das Objekt übergebe (also nicht den zusammengewürfelten Namen), funktioniert auch alles.
Also, ich habe den Objektname, aber ich müsste das eigentliche Objekt übergeben.
Nur, wie löse ich sowas?
Gruß Michael
danke für die Antwort, aber entweder wir reden aneinander vorbei, oder ich bin zu blöd Deinen Workaround zu verstehen.
Das Problem besteht darin, das ich mir die Objektnamen in einer Schleife aus Präfix (in diesem Fall 'editor') und einem Schleifen-Zähler mittels CONCATENATE zusammensetze.
//Edit: Wenn ich tmpobjekt mit REF TO cl_gui_textedit deklariere, kann ich leider (Typen unverträglich) nicht mit CONCATENATE den Objektnamen zusammensetzen.
Jetzt hab ich den Objektnamen aber nicht das Objekt (ich denke, da liegt der Hund begraben).
Wenn ich mir die Objektnamen in eine Tabelle sichere, hab ich wiederum nur die Namen, aber nicht die eigentlichen Objekte.
Oh, hab gerade Dein Edit gesehen, aber das hilft mir auch nicht wirklich weiter (oder halt, ich versteh es nicht).
Meine FORM erwartet ein Objekt und ich übergebe Ihm einen Objektnamen (der identisch mit dem Objekt ist), aber schmecken tuts dem Interpreter leider nicht. Wenn ich Ihm das Objekt übergebe (also nicht den zusammengewürfelten Namen), funktioniert auch alles.
Also, ich habe den Objektname, aber ich müsste das eigentliche Objekt übergeben.
Nur, wie löse ich sowas?
Gruß Michael
"3 Haie? Das macht 4810 Zähne!" (Findet Nemo)
Achso Workaround war so gemeint:
Du machst dir eine Tabelle mit der Zeilenstruktur objekt type cl_gui_textedit
dann hängst du deine objekte an die tabelle ran.
dann mit einem loop über die tabelle schleifen und die form aufrufen.
Das ist insofern dynamisch, das es egal ist wieviele Objekte in der Tabelle sind die Form durchlaufen wird.
//Edit
Mir ist keine Möglichkeit bekannt über den Namen des Objektes das Objekt aus dem Speicher auszulesen. Du brauchst soweit ich weis immer eine Referenz auf das Objekt um damit arbeiten zu können.
Du machst dir eine Tabelle mit der Zeilenstruktur objekt type cl_gui_textedit
dann hängst du deine objekte an die tabelle ran.
dann mit einem loop über die tabelle schleifen und die form aufrufen.
Das ist insofern dynamisch, das es egal ist wieviele Objekte in der Tabelle sind die Form durchlaufen wird.
//Edit
Mir ist keine Möglichkeit bekannt über den Namen des Objektes das Objekt aus dem Speicher auszulesen. Du brauchst soweit ich weis immer eine Referenz auf das Objekt um damit arbeiten zu können.
Beitrag
von Michael.Nett (ForumUser / 17 / 0 /
0
)
»
Das hab ich befürchtet, einen FuBa z.B. GET_OBJECT_FROM_OBJECTNAME konnte ich leider auch nicht finden.Flo hat geschrieben: //Edit
Mir ist keine Möglichkeit bekannt über den Namen des Objektes das Objekt aus dem Speicher auszulesen. Du brauchst soweit ich weis immer eine Referenz auf das Objekt um damit arbeiten zu können.
Danke & Gruß
Michael
"3 Haie? Das macht 4810 Zähne!" (Findet Nemo)
Habs doch noch hinbekommen:)
Code: Alles auswählen.
field-symbols: <editor> TYPE REF TO cl_gui_textedit.
DO 3 TIMES. "derzeit 3 Textfelder
ADD 1 TO zaehler.
CONCATENATE textobjekt zaehler INTO tmpobjekt.
assign (tmpobjekt) to <editor> .
PERFORM pruefe_textedit
USING
<editor>.
Seite 1 von 1
Vergleichbare Themen
2
Antw.
Antw.
2130
Views
Views
Dynamischer Methodenaufruf mit dynamischer Tabelle
von mark.thk » 12.12.2018 10:34 • Verfasst in ABAP Objects®
von mark.thk » 12.12.2018 10:34 • Verfasst in ABAP Objects®
5
Antw.
Antw.
4914
Views
Views
Dynamischer Methodenaufruf mit dynamischer Tabelle
von Tommy Nightmare » 08.09.2017 13:23 • Verfasst in ABAP Objects®
von Tommy Nightmare » 08.09.2017 13:23 • Verfasst in ABAP Objects®
4
Antw.
Antw.
20092
Views
Views
11
Antw.
Antw.
5172
Views
Views
2
Antw.
Antw.
2679
Views
Views
Dynamischer Methodenaufruf: Methode nicht gefunden
von ralf.wenzel » 08.09.2014 18:20 • Verfasst in ABAP Objects®
von ralf.wenzel » 08.09.2014 18:20 • Verfasst in ABAP Objects®
Frage die ABAP Experten
Über diesen Beitrag
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.