Bestehendes Programm ins anderen mit Includes speichern

Bestehendes Programm ins anderen mit Includes speichern

Hallo
ich habe ein Programm mit unterprogramme FORMs alles hintereinander geschrieben so dass ich den Überblick verliere.
kann ich durch das Kopieren dieses Programm in einem anderen Namen eine Option klicken sodas ich am Ende die Unterprogramme als Includes kriege, oder muss ich mir ein neues anlegen und alles selbs schreiben,
Danke
managero

hier

Hi managero!

anbei mein Programm, dass dafür ausgelegt ist, die USEREXIT-Routinen aus der SAPMV45A in eigene Includes auszulagern.

läuft unter ECC6.0. bei kleineren Releases... keine Ahnung.

Musst du an einigen Stellen anpassen:
1. Abfrage IF sy-sysid <> "entwicklungssystem".
damit soll sichergestellt werden, dass das Programm nur im Entwicklungssystem ausgeführt wird. da musst du natürlich die SYSID deines Entwl. Systems einfügen...!
2. Es wird abgefragt, ob die Routine mit "USEREXIT" beginnt. Die muss du natürlich rausnehmen.
3. du kannst im SelScreen ein Prefix angeben, das die neues Includes bekommen sollen. Das wird dann einfach anstelle der ersten vier includenamen gesetzt.
Aus Routine MACH_WAS und dem Prefix ZZ01 würde dann halt ZZ01_WAS.
lässt sich aber auch einfach anpassen, dass das Kürzel MZ_ einfach davor gesetzt wird.
Die Entwicklungsklasse muss angegeben werden und es wird ein Transportauftrag erzeugt.

Solange P_UPDATE nicht gesetzt ist, passiert ausser einer Listausgabe gar nichts.

Das Programm legt die neuen Includes mit dem Coding aus den Form-Routinen an. Im Hauptprogramm passiert nichts.

Im Protokoll wird ausgegeben, welche Include-Anweisungen dann in das Hauptprogramm eingegeben werden müssen.

Nur dass das klar ist: ICH ÜBERNEHME KEINE HAFTUNG FÜR EVENTUELLE FOLGESCHÄDEN!!!
Nur im Entwicklungssystem ausführen und nur für eigene Programme!!
Und nun :arrow: viel Spaß!

Danke ewx,
ich musste es leider neu erstellen, sonst hätte ich ich vieles noch einstellen müssen wo ich mich nicht gut auskenne.
Bin aber einen Tick schlauer geworden durch das probieren.
Danke