Jobfahrplan - wrkjobscde

[andreaspr@aon.at]

Schaut korrekt aus.
Das Programm kannst du entweder über SBMJOB oder mit dem Job-Planungseintrag übergeben lassen.

Du könntest im JOBSCDE das Programm täglich aufrufen und das Wochendend vom Aufruf ausschließen.

Allerdings solltest du in der Schleife deines Programms ein Ende einbauen, sonst hast du den Job am nächsten Tag mehrfach vorhanden.

Mit diesem Code-Teil verabschiedet sich das Programm ab 23 Uhr.

DCL        VAR(&ZEITC)   TYPE(*CHAR) LEN(6)
DCL        VAR(&ZEITI)   TYPE(*int)

RTVSYSVAL  SYSVAL(QTIME) RTNVAR(&ZEITC)
CHGVAR     VAR(&ZEITI) VALUE(&ZEITC)

if   (&ZEITI > 230000) Then(goto ENDE)

lg Andreas

[BenderD]

... die erste Idee war schon die beste, für jede Zeit einen Eintrag und fertig ist.
Wenn denn CL, dann einmal morgens um 5:00 Uhr in die Schedule den Aufruf folgenden CLs stellen:

PGM
SBMJOB CMD(CALL PGM(EBBES)) JOB(EBBES) SCDTIME('06:00:00')
...
SBMJOB CMD(CALL PGM(EBBES)) JOB(EBBES) SCDTIME('15:00:00')

alles andere sind doch FerzMitKrücke, die in irgendeiner Konstellation schief gehen können...

D*B

[Franz.Rung]

Wow super danke für deine Hilfe.

Dann wäre das eben das Programm was ich über den Jobfahrplan dann ganz normal von Mo-Fr. aufrufen kann ?

PGM
DCL VAR(&ZEITC) TYPE(*CHAR) LEN(6)
DCL VAR(&ZEITI) TYPE(*INT)
START:
CALL PGM(R4CV00ST) PARM('1' '000' '')
DLYJOB DLY(600)
GOTO CMDLBL(START)

RTVSYSVAL SYSVAL(QTIME) RTNVAR(&ZEITC)
CHGVAR VAR(&ZEITI) VALUE(&ZEITC)
IF (&ZEITI > 230000) THEN(GOTO ENDE)

ENDE: ENDPGM

Gruss
Franz

[andreaspr@aon.at]

Genau, so kannst du es aufrufen.
Allerdings beachte, dass das Delay erst anfängt sobald das aufgerufende Programm beendet ist.

Wenn also um 6 Uhr das PGM aufgerufen wird und 20 min benötigt, so wird der nächste Aufruf erst um 6:20 Uhr stattfinden.
Wenn du sicher gehen willst, dass pünktlich jede Stunde der Aufruf stattfindet, wären die 10 separaten Job-Einträge eine Überlegung Wert. (Solange es im überschaubaren Bereich ist).

[Fuerchau]

GOTO CMDLBL(START)

Sollte nach der Zeitabfrage stehen, sonst kommst du da nie hin.

[Franz.Rung]

Vielen Dank für euere Hilfe - habe es jetzt einfach mit den separaten Einträgen gemacht.

Wusste nicht das man hier im SBMJOB auch die Uhrzeit mitgegeben kann.

Danke !

[Bodo Roggenkamp]

Hallo,

also ich würde einen SCDE-Job erstellen, der von Mo-Fr zu einer bestimmten Uhrzeit startet, dass dann ein CL-Pgm aufruft, dass zuerst die Uhrzeit ermittelt, 2 Stunden draufrechnen und dann den SCDE-Job mit der neuen Uhrzeit ändert. Gewisse Randbedingungen hinsichtlich der neuen Startzeit, ist der Job noch vom vorherigen Aufruf (Abbruch etc.) aktiv usw. müssen natürlich berücksichtigt werden. Aber das muss natürlich auch bei den anderen Varianten gemacht werden.

Habe selbst solche SCDE-Jobs generiert und finde, diese Lösung elegant und sie bietet auch einige Vorteile.

Gruß
Bodo