PDA

View Full Version : Objekt erstellen mittels pgm. Objektname soll zum Teil aus einer Varaible bestehen.



_MG_
21-11-15, 22:05
Hallo zusammen,

...bin neu hier im Forum darum ganz kurz zu meiner Person.
Ich bin Azubi im 3.LJ und eigentlich eher in der Anwendungsadministration und im Prozessmanagement Bereich tätig.
Wenn es sich ergibt und ein sinnvoller Grund existiert schreibe ich ab und zu mal ein "CL´chen".
Folgendes Problem:
Vor Programmupdates sichern wir die relevanten Bibliotheken in savefiles.
Momentan per copy and paste per Befehl.
Ich würde gern ein PGM schreiben was das automatisiert erledigt. Bis dahin... einfach.
Da wir während eines Updates diese Sicherungen jedoch mehrmals vornehmen (warum ist ja erstmal egal) müsste das PGM prüfen ob es ein savf bereits gibt und dann eben eine folgende Version erstellen.
Beispiel:
Das savfile xyz1 existiert --> erstelle xyz2 usw usw.
Ich bekomme den Namen mit einer Variable gefüllt. Mein Problem ist jedoch das man den "xyz" -Teil nicht einfach als Konstante vor die Variable schreiben kann.

Zusammengefasst :
--> Mit welchem Befehl prüft man ob ein Objekt bereits existiert
--> Wie kann ich ein Objekt erstellen dessen Namen zum Teil aus einer Variablen und Konstanten besteht.


Ich hoffe ich habe das Problem einiger Maßen verständlich beschrieben.
Hier hat doch bestimmt jmd einen Lösungsweg.

Danke im Voraus für Tipps.

Grüße
_MG_

holgerscherer
21-11-15, 23:18
Hier hat doch bestimmt jmd einen Lösungsweg.


Hallo MG,
für den Lerneffekt:

schau Dir CHKOBJ an (Hilfstext, Messages ganz unten)

Für dynamische Namen:
- Variable &ZAHL *DEC erstellen
- Variable &ZAHLSTR *CHAR 1 erstellen
- Variable &NAME *CHAR 10 erstellen
- &ZAHL initialisieren auf 1
- LOOP:
- CHGVAR VAR(&ZAHLSTR) VALUE(&ZAHL)
- CHGVAR VAR(&NAME) VALUE('SAVE' *TCAT &ZAHLSTR)
- CHKOBJ &NAME *LIB
- Wenn existiert, &ZAHL erhöhen
- Wenn &ZAHL *LE 9 GOTO LOOP

und so fort. Ist jetzt nur mal so dahingeschluderter Code, aber das kriegst Du schon hin ;-)

-h

_MG_
22-11-15, 09:19
Hallo,

vielen Dank für die Antwort und den Tipp.
Ich werde mir morgen CHKOBJ mal genauer ansehen. Damit sollte ich was anfangen können.

Grüße und schönen Sonntag noch
_MG_