Übung 4: Module programmieren 
In der vorhergehenden Übung haben Sie mit dem ABAP-Editor Coding in Ihr Top-Include-Programm eingefügt. In dieser Übung werden Sie über die Tastatur und mit besonderen Hilfsmitteln der Workbench-Umgebung sowohl Coding kopieren als auch vordefinierte Funktionen automatisch einbinden.
Coding im Editor eingeben
Öffnen Sie die Liste PBO-Module in der Liste Programmobjekte.Markieren Sie das Modul INITIALIZE_100, und wählen Sie Ändern.
Das System zeigt das Modul im Änderungsmodus an.
Geben Sie in der Zeile nach module initialize_100 output
folgendes ein:
set pf-status ’100’.
set titlebar ’100’.
Sichern Sie Ihre Änderungen, und kehren Sie in die Programmliste zurück.
Coding aus einem anderen Programm kopieren
Häufig erstellen Programmierer neue Programme, indem sie bestehende ähnliche Programme kopieren und entsprechend abändern. Dabei helfen Ihnen die Werkzeuge der Workbench:
- Kehren Sie zum Einstiegsbild des Object Browser zurück.
- Markieren Sie Programm, und geben Sie als Programmnamen
TUTPROG
ein.
Das Musterprogramm wird angezeigt.
Wählen Sie Anzeigen.
Öffnen Sie das PAI-Modul
FRAGMENT
.
Das System zeigt das Modul im Anzeigemodus an.
Stellen Sie den Cursor auf die Zeile mit dem Eintrag fcode = ok-code.
Wählen Sie Bearbeiten
®
Markieren.
Das System markiert die Zeile
.
Markieren Sie den Eintrag endcase in Zeile 97, und wählen Sie Markieren.
Wählen Sie Block/Ablage
®
Kopieren in Clipboard.
Verlassen Sie den Baustein, und kehren Sie in die Programmobjektliste zurück.
Wenn Sie möchten, können Sie auch die Funktion Sprungmarken verwenden, um zu Ihrer Objektliste zurückzukehren.
Markieren Sie das Modul
FCODE_100,
und wählen Sie
Ändern.
Stellen Sie den Cursor auf die leere Zeile unter
module fcode_100 input
.
Wählen Sie Block/Ablage
®
Einsetzen aus Clipboard.
Das System fügt den Abschnitt aus
FRAGMENT
ein.
Wählen Sie Bearbeiten
®
Ersetzen, um wbtable mit Ihrem Tabellennamen
zu ersetzen.
Sichern Sie Ihre Änderungen.
Systemfunktionen einfügen
Sie können im ABAP-Editor Funktionsschablonen automatisch in Ihr Coding einfügen und diese Schablonen dann für Ihre Anwendung anpassen. So fügen Sie Schablonen ein:
- Gehen Sie im Änderungsmodus in Ihr Modul
fcode_100
.
Suchen Sie den Eintrag
endif
, der sich unmittelbar vor dem Eintrag
when space
befindet.
Dieser
endif-Eintrag
muß ungefähr um Zeile 97 herum erscheinen.Fügen Sie vor
endif
eine Leerzeile ein.
Wählen Sie Bearbeiten
®
Anweisungsmuster.Das Dialogfenster zum Einfügen einer Anweisung erscheint.
Wählen Sie CALL FUNCTION.
Geben Sie
POPUP_TO_CONFIRM_LOSS_OF_DATA
ein.
Wählen Sie Weiter.
Das System fügt eine Schablone für diese Funktion ein.
Fügen Sie Ihrem Coding die Bedingung IF hinzu und vervollständigen Sie die Schablone.
Das Ergebnis sieht folgendermaßen aus (den roten Text müssen Sie hinzufügen):
message e004 with <tabellenname>-flid.
else.
call function '
POPUP_TO_CONFIRM_LOSS_OF_DATA
'
exporting
textline1 = '
Flug löschen?
'
TEXTLINE2 = ' '
titel = '
Achtung
'
START_COLUMN =
25
START_ROW = 6
importing
answer = answer.
check answer ne ’N’.
delete <tabellenname>.
clear <tabellenname>.
message s003 with <tabellenname>-flid.
endif.
Sichern Sie Ihre Änderungen.
Überprüfen Sie Ihre Arbeit
Prüfen Sie die Syntax in Ihrem Modul mit Programm
®
Prüfen.