Sicherung der iSeries und deren Programme

[Chris.jan]

Wo wir gerade dabei sind, bei BRMS gibt es ja eine Zeitdauer, nach der spätestens der eingeschränkte Zustand verlassen werden soll, falls die Maschine nicht von selbst wieder hoch kommt.
Wie definiert man soetwas dann ohne BRMS?

CL ist definiv die beste Lösung. Speziell deshalb weil man ja ohnehin nur Betriebssystem-Kommandos startet.

nachtrag:
ich empfehle Dir dringend Dich da professionell beraten zu lassen. Das komplette Thema "so nebenbei" als Neueinsteiger ist vielleicht etwas zuviel. Besonders wenn du auch noch ein CL-Script für den eingeschränkten Zustand schreiben willst.

[-rada-]

naja, kann man den nicht eine vorgegebene zeit ablaufen lassen, das dann der eingeschränkte modus verlassen wird.

apropo eingeschränkter modus: das ist der wo die maschine "eingefroren" wird? aber nicht runtergefahren wird?

[KingofKning]

Mal so als Vorlage

PGM
/************************************************** **************/
/* */
/* Programm: SAVALL . */
/* */
/* erstellt: 14.12.2009 Copyright 2007 by XX */
/* von.....: GS */
/* */
/* Tel: 022 */
/* Fax: 022 */
/*. */
/*. */
/*. AUFRUF MIT */
/*. SBMJOB CMD(CALL PGM(xx/SAVALL)) JOBQ(QCTL) */
/*. */
/* Nr. Datum wer was */
/* 01 24.06.11 GS BENUTZERPROFILE SICHERN */
/* 02 24.12.11 GS 2 X ENDSBS EINGEBAUT */
/* xxxx xx.xx.xx xxx xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx */
/************************************************** **************/
CHKTAP DEV(TAP01)
MONMSG MSGID(CPF6760) EXEC(GOTO CMDLBL(ENDE))
INZTAP DEV(TAP01) NEWVOL(SAVALL) +
NEWOWNID(JAHRESDASI) CHECK(*NO) +
DENSITY(*ULTRIUM3)
MONMSG MSGID(CPF0000)
CHKTAP DEV(TAP01)
MONMSG MSGID(CPF6760) EXEC(GOTO CMDLBL(ENDE))
ENDDOMSVR SERVER(DOM01) JSC(*YES)
DLYJOB DLY(90)
CALL PGM(ENDFAX)
MONMSG MSGID(CPF0000)
DLYJOB DLY(15)
CALL PGM(ENDFAXSPL)
MONMSG MSGID(CPF0000 TLX1100)
DLYJOB DLY(15)
/*02*/
ENDSBS SBS(ASLSTSUB) DELAY(30)
DLYJOB DLY(45)
ENDSBS SBS(CONTROL400) DELAY(30)
DLYJOB DLY(45)
ENDSBS SBS(*ALL) OPTION(*CNTRLD) DELAY(30) +
ENDSBSOPT(*NOJOBLOG) BCHTIMLMT(180)
MONMSG MSGID(CPF0000)
DLYJOB DLY(60)
ENDSBS SBS(*ALL) OPTION(*CNTRLD) DELAY(30) +
ENDSBSOPT(*NOJOBLOG) BCHTIMLMT(180)
MONMSG MSGID(CPF0000)
*01*/
DLYJOB DLY(90)
SAVSYS DEV(TAP01) ENDOPT(*LEAVE) OUTPUT(*PRINT) +
CLEAR(*ALL)
MONMSG MSGID(CPF0000)
SAVLIB LIB(*NONSYS) DEV(TAP01) ENDOPT(*LEAVE) +
ACCPTH(*YES) SPLFDTA(*ALL) OUTPUT(*PRINT)
MONMSG MSGID(CPF0000)
SAVDLO DLO(*ALL) DEV(TAP01) ENDOPT(*LEAVE)
MONMSG MSGID(CPF0000)
SAV DEV('/QSYS.LIB/TAP01.DEVD') OBJ(('/*') +
('/QDLS' *OMIT) ('/QSYS.LIB' *OMIT)) +
ENDOPT(*REWIND)
MONMSG MSGID(CPF0000)
SAVCFG DEV(TAP01) ENDOPT(*LEAVE)
MONMSG MSGID(CPF0000)
SAVSECDTA DEV(TAP01) ENDOPT(*LEAVE) /* BENUTZERPROFILE +
SICHERN */
MONMSG MSGID(CPF0000)
PWRDWNSYS DELAY(60) RESTART(*YES *FULL)
ENDE: ENDPGM


GG

[-rada-]

danke kingofkning
werde das mir genauer anschauen.

[Pikachu]

Wo wir gerade dabei sind, bei BRMS gibt es ja eine Zeitdauer, nach der spätestens der eingeschränkte Zustand verlassen werden soll, falls die Maschine nicht von selbst wieder hoch kommt.
Wie definiert man soetwas dann ohne BRMS?

Beim ENDSBS gibts dafür (ab V5R4) den Parameter BCHTIMLMT.