sicherstellen das ein Trigger enabled wurde

[Fuerchau]

Beim ADDPFTRG mittels MONMSG feststellen, dass der Trigger angehängt wurde.
Um sicherzustellen, dass kein Programm mit der Datei arbeiten kann wenn solche Aktionen ausgeführt werden, per ALCOBJ die Datei vorher exclusiv sperren und hinterher per DLCOBJ wieder freigeben.
Allerdings stürzen dann andere Programme beim Zugriff auf die Datei ggf. ab !!!

[cimbala]

Danke für deine Antwort.
Bei der MONMSG kann ich einfach die CPF32C6 abfragen und dann evtl. neu versuchen den Trigger anzuhängen, oder?

[Fuerchau]

Stimmt, aber der Trigger hat ja eine spezielle Aufgabe und der Zugriff auf die Datei sollte verweigert werden, solange der Trigger eben nicht angehängt ist.
Mittels ALCOBJ und MONMSG kannst du prüfen, ob die Datei verwendet wird und eben solange sperren, bis deine Aktion abgeschlossen ist.
Je nach dem, wie die Datei verwendet wird oder wie lange sie noch bearbeitet wird, kann das Anhängen des Triggers eben dauern und solange wird die Datei eben nicht überwacht.

[VisioX]

So in etwa war es geplant :-)

[cimbala]

Das sind die 3 Befehle aus meinem CL.

CHGPFTRG FILE(LIB/FILE) TRG(*ALL) STATE(*DISABLED)
RUNSQLSTM SRCFILE(LIB/FILE) SRCMBR(SQLFILE) COMMIT(*NONE)
CHGPFTRG FILE(LIB/FILE) TRG(*ALL) STATE(*ENABLED)


und so könnte es aussehen damit es klappt, oder?
also einfach nur abfragen, ob ein Fehler aufgetreten ist und wenn ja dann nochmal versuchen den Trigger anzuhängen...

CHGPFTRG FILE(LIB/FILE) TRG(*ALL) STATE(*DISABLED)
RUNSQLSTM SRCFILE(LIB/FILE) SRCMBR(SQLFILE) COMMIT(*NONE)
TRG1:
CHGPFTRG FILE(LIB/FILE) TRG(*ALL) STATE(*ENABLED)
MONMSG MSGID(CPF0000) EXEC(GOTO TRG1)

Das Ding ist wir kopieren am Wochenende immer einige Umgebungen von uns mit Hilfe von CL´s und ständig sind dann montag morgen irgendwelche trigger nicht wieder angehängt... das soll vermieden werden !


Danke für eure Hilfe...

[Fuerchau]

Wenn du so verfährst, könnte es sein, dass die Programme übers WE nicht fertig werden !!!!
Sie warten ja ständig auf Freigabe des Objektes.
Übrigens auch der 1. CHGPFTRG kann fehlschlagen, wenn die Datei bereits offen ist !!!

Mach dir lieber nochmal Gedanken zum Konzept mit ALCOBJ/DLCOBJ