Bull DPS 7000 Guide De L'utilisateur page 102

GCOS 7 en bref Volume 1 - Mise en oeuvre
Séquence de lancement système
Pour la compréhension de cet exemple, il est conseillé de lire le paragraphe du volume 3
qui traite de la relance du système.
SEND '***********************************************';
SEND '*** SYSTEME XYZ ***';
SEND '***********************************************';
AI >AWARM IF=(#ELEM(#SWITCHES,1));
AI >ACOLD IF=(#ELEM(#SWITCHES,2));
AI >ACLEAN IF=(#ELEM(#SWITCHES,3));
SEND '>>TYPE DE RELANCE IMPOSSIBLE';
AI >END;
$ACLEAN:
SEND '>>>>RELANCE A VIDE';
AI NG-BP2C LIB=SYS.DSACONF;
MDC PLM=H_EXECUTE;
MDC PLM=H_RUN;
MDC PLM=H_WRITER;
MDC PLM=H_CATALOG;
MDC PLM=H_UTILITY;
EJ MMLGEN VL=(MS/FSA FSA3) WHEN=+20M HOLDOUT;
EJ MMLEXEC USER=SYSADMIN VL=(MS/FSA FSA3 MS/FSA FSA3) WHEN=+30M NAME=MML HOLDOUT;
AI >END;
$ACOLD:
SEND '>>>>RELANCE A FROID';
EJ MMLGEN VL=(MS/FSA FSA3) WHEN=+15M HOLDOUT;
EJ MMLEXEC USER=SYSADMIN VL=(MS/FSA FSA3 MS/FSA FSA3)
WHEN=+25M NAME=MML HOLDOUT;
AI >END;
$AWARM:
SEND '>>>>RELANCE A CHAUD';
STSVR TNS;
$END:
AI >ADUMP IF=(#ELEM(#SWITCHES,4));
AI >ANODUMP;
$ADUMP:
SEND '>>>> VIDAGE EFFECTUE <<<<';
$ANODUMP:
MDIOF RT=15 IDT=60;
SLD A-P;
SLD PA-PP;
SOW PR01;
SLD JTRACE;
SEND '>>>> FIN DU LANCEMENT SYSTEME <<<<';
8-8 47 F2 20US Rev04