User:Sylvainhuot1958/sandbox

Nouveau guide CA-7

Version 1.07

2014-01-13

François Tremblay

francois.tremblay@justice.gouv.qc.ca

Table des matières
Historique des modifications

Table des matières

Panneau CA-7 CPU Job Definition (PF4/1)

Panneau CA-7 Queue Maintenance (PF23)

Procédures diverses

1- Ajout d'un nouveau travail dans une cédule existante

2- Ajout d'un submit time dans un travail

3- Ajout d'une fréquence dans une cédule

4- Ajout d'une requête à un travail

5- Changement de fréquence pour un travail

6- Conflit entre deux travaux lors de l'usage de fichier en mode exclusif

7- Création d'une nouvelle cédule

8- Création d'une cédule en batch à partir d'une cédule déjà définie

9 - Mise en force du nouveau calendrier CA-7

10- Modification de l'exécution d'une cédule de production à une date précise

11- Modification de l'heure d'exécution des travaux Q113JDEB et T820BCKH précédant la mise en service de la livraison semestrielle de la VPTI

12- Modification de l'heure d'exécution d'une cédule

13- Rendre un fichier permanent dans CA-7

14- Suppression d'une cédule

15- Suppression d'un travail dans une cédule

16- Suppression de fréquence dans une cédule

17- Soumission de cédule de nuit sur demande (MSP)

18- Travail en SKELETON dans CA-7

19- Resolv

19.1 Resolv manuel53

19.2 Soumission du travail T855J51258

19.3 Particularités de certaines racines61

19.4 Liste des racines qui doivent faire l'objet de résolution manuelle64

19.5 Exemple de calendrier65

Annexe 1 - Liste des membres et des travaux utilitaires (T855) de CA-7

Annexe 2 - Commandes et informations utiles dans CA-7

Annexe 3 – Deck d'initialisation

Annexe 4 - Nomenclature des clés PF dans CA-7

Annexe 5 - Liste des librairies définies dans CA-7

Annexe 6 - Calendrier des événements

= Panneau CA-7 CPU Job Definition (PF4/1) =

Ce panneau est utilisé pour afficher le statut d'un travail, pour changer la librairie où il pointe, pour le mettre à no exec ou le remettre à exec, pour l'ajouter ou le supprimer.

On accède à ce panneau en appuyant sur F4 après le login, puis en inscrivant 1 à Function au menu suivant.

Pour afficher le statut d'un travail, inscrire List à Function et le nom du travail à Job

ID: 0 = JOBSPROD, 1 = JOBSTEMP, 2 = ACCEPTATION

MEMBER = le nom du membre dans la librairie

EXEC = Y, NO EXEC = N

Pour modifier faire d'abord un List du travail, puis inscrire UPD à Function, modifier le champ requis (ID, MEMBER, EXEC, etc.) et appuyer sur enter.

- CA-7 CPU JOB DEFINITION --

FUNCTION: LIST (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD)

JOB: M012J110

GENERAL: SYSTEM: M012 JOBNET: OWNER: UID: 1

JCL: ID: 0 MEMBER: M012J110 RELOAD: N EXEC: Y RETAIN-JCL: Y

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0004 CPU-TIME: 00007

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 11.035 / 15:22:44

MESSAGE: LIST SUCCESSFUL

= Panneau CA-7 Queue Maintenance (PF23) =

Appuyez sur F23 après le login de CA-7 pour accéder à ce panneau. Ce panneau affiche le statu des travaux en attente d'exécution et/ou d'intervention.

-- CA-7 QUEUE MAINTENANCE - CPU JOBS STATUS (RQMTS) --

F-JOBNAME--- J--I--E--U-- N -SH JV F-JOBNAME--- J--I--E--U-- N -SH JV

M002J060 2. . . . S M024J011. . . . . S JOB: *

M002J080. . . . . S M024J011. . . . . S SYS: *

M002J370. . . . . S M024J011. . E. . S SEQ: JOBNAME

M007J500. . . . . S M024J011. . . . . S QUEUE: REQ

M007J500. I. . . S M024J011. . . . . S LIST: ANY

M007J500. . . . . S M024J011. . . . . S FUNCTIONS:

M007J500. . . . . S M024J011. . . . . S C=CANCEL

M007J500. . . . . S M024J011. . . . . S F=RESTART

M007J500. . . . . S M024J011. . . . . S H=HOLD

M024A000. . . U. S M024J011. . . . . S J=JCLOVRD

M024A011. . . . . S M024J011. . . . . S P=RSVP

M024A014. . . . . S M024J011. . . . . SH Q=REQUEUE

M024J011. . . . . S M026J500. . . . . S R=RELEASE

M024J011. . . . . S M026J500. . . . . S S=SUBTM OFF

M024J011. . . . . S M026J500. . . . . S U=UPDATE

M024J011. . . . . S T800SCON. . . . .  *RST  V=VERIFY

M024J011. . . . . S M026J500. . . . . S X=RQMT POST

M024J011. . . . . S M026J500. . . . . S E=EDIT QJCL

PROGRAM: QM20 MSG-INDX: 00 -- QM.1-M -- 11.035 / 15:31:45

MESSAGE: ENTER FUNCTION IN 'F' FIELD OR ENTER A COMMAND ON THE TOP LINE

(USE 'PF8' KEY TO SEE NEXT PAGE)

Un chiffre ou un caractère peut s'afficher devant le travail sous les caractères J, I, E, U, N, S, H, J, V.

Voici leurs significations:

J : Le travail attend la fin d'exécution de d'autres travaux

I : Le travail attend qu'un fichier soit libéré

E : Le travail attend qu'un fichier externe soit libéré

U: Il y a une requête à satisfaire pour ce travail

S: Le travail possède un submit time

H: Le travail est en retenu d'exécution

Dans la colonne de droite du panneau, s'affichent les commandes qu'on peut saisir sous le champ "F" devant le travail où une intervention est requise (les plus usuelles ont été surlignées en jaune):

C : pour canceller le travail

F : On utilise cette option lorsqu'un travail s'est terminé anormalement ( *RST dans le tableau). Après avoir saisi cette lettre, appuyer sur enter. Un second tableau s'affiche. Voir page suivante:

CA-7 QUEUE MAINTENANCE - CPU JOB IN RESTART STATUS ---

JOB: T800SCON CODE: S222 LAST-STEP: WAIT MCNT: 001

CA-7#: 0559 JES#: 2128 NODE-NAME: LOCAL

REASON: OK

-- X -- RESUBMIT FOR PRODUCTION

-- -- FORCE COMPLETE

PROGRAM: QM50 MSG-INDX: 00 -- QM.4-X -- 11.108 / 10:34:09

MESSAGE: 'X' THE DESIRED FUNCTION OR ENTER A COMMAND ON THE TOP LINE

-Par convention, on inscrire OK à Reason et on inscrit X devant RESUBMIT FOR PRODUCTION pour resoumettre le travail ou X devant FORCE COMPLETE pour permettre au travail de relâcher le travail suivant dans la chaîne s'il y en en un.

H : Pour mettre le travail en retenu d'exécution

R : Pour relâcher un travail en retenu d'exécution

S : Pour désactiver le submit time d'un travail

U : Pour satisfaire la requête d'un travail

X : Pour afficher les requêtes d'un travail

E : Pour éditer le JCL d'un travail (pour aller saisir le numéro du chèque lors de la production des chèques par exemple)

Procédures diverses
= 1- Ajout d'un nouveau travail dans une cédule existante =

Exemple de demande:

''Pouvez-vous ajouter le nouveau travail M013J234 dans la cédule de CA-7.Il s'exécute après le travail M013J230 selon la même périodicité. Voir ci-dessous :''

Avant Après

1 1

++ ++


 * M013J230| |M013J230|

++ ++



V 1 V 1

++ ++


 * M013J235| | M013J234 |

++ ++



V 1

++


 * M013J235|

++

Procédure:

-Effectuer d'abord la mise en production du travail via M.50.2.

-Accéder ensuite au menu Data Base Maintenance (F4) de CA-7 et choisir l'option 1 pour accéder au menu CA-7 CPU Job Definition, '''enter. '''Voir ci-dessous:

- CA-7 DATA BASE MAINTENANCE MENU --

FUNCTION ===> 1

DATA BASE DEFINITION FOR:

1 - CPU JOB

10 - CROSS PLATFORM (XPS) JOB DEFINITION

2 - SCHEDULING

3 - JOB PREDECESSOR/SUCCESSOR

4 - WORKLOAD DOCUMENTATION

5 - INPUT/OUTPUT NETWORK

6 - DATA SET

OTHER FUNCTIONS AVAILABLE:

7 - JCL LIBRARY MAINTENANCE

8 - TEXT EDITOR

9 - CLEAR THE TEXT EDITOR ACTIVE AREA

ACTIVE AREA NOW CONTAINS 0000 LINES OF TEXT

PROGRAM: SDM0 MSG-INDX: 00 -- DB -- 11.088 / 14:28:02

MESSAGE: SPECIFY DESIRED OPTION OR ENTER A COMMAND ON THE TOP LINE

-Inscrire List à Function et saisir un nom de travail déjà existant avec des paramètres similaires à celui que vous voulez ajouter (ex.: M013j230) et vérifier s'il pointe dans la librairie de production (ID=0), qu'il est en mode exécution (EXEC=Y) et aussi que le travail ne demande pas de ruban (Tape drives= 000). Voir ci-dessous:

- CA-7 CPU JOB DEFINITION --

FUNCTION: LIST (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD)

JOB: M013J230

GENERAL: SYSTEM: M013 JOBNET: OWNER: UID: 1

JCL: ID: 0 MEMBER: M013J230 RELOAD: N EXEC: Y RETAIN-JCL: Y

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0007 CPU-TIME: 00028

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 11.088 / 14:32:35

MESSAGE: LIST SUCCESSFUL

Si oui, faire un Add du nouveau travail en saisissant son nom au champ Job. Voir ci-dessous:

- CA-7 CPU JOB DEFINITION --

FUNCTION: ADD (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD)

JOB: M013J234

GENERAL: SYSTEM: M013 JOBNET: OWNER: UID: 1

JCL: ID: 0 MEMBER: M013J230 RELOAD: N EXEC: Y RETAIN-JCL: Y

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0007 CPU-TIME: 00028

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 11.088 / 14:32:35

MESSAGE: LIST SUCCESSFUL

-Effectuer maintenant un Load en saisissant la commande (top command) suivante: LOAD,JOB=Nom du travail. Voir ci-dessous:

LOAD,JOB=M013J324

- CA-7 CPU JOB DEFINITION --

FUNCTION: LIST (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD)

JOB: M013J234

GENERAL: SYSTEM: M013 JOBNET: OWNER: UID: 1

JCL: ID: 0 MEMBER: M013J234 RELOAD: N EXEC: Y RETAIN-JCL: Y

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0004 CPU-TIME: 00005

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 11.088 / 14:43:40

MESSAGE: LIST SUCCESSFUL

-Le travail T855XXXX sera alors soumis. Faire un LQ pour vérifier s'il s'est bien terminé. Ce travail est équivalent à M013J324 avec un genre de TYPRUN=SCAN (renforcé : plus de validations).

-Ajouter ensuite les triggers (travaux déclenchés) et les dépendances (requis pour démarrer) s'il y a lieu dans CA-7 avec les schedules ids appropriés en effectuant la top command '''SCHD,JTRG, enter. '''Voir ci-dessous:

SCHD,JTRG

- CA-7 CPU JOB DEFINITION --

FUNCTION: LIST (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD)

JOB: M013J324

GENERAL: SYSTEM: M013 JOBNET: OWNER: UID: 1

JCL: ID: 0 MEMBER: M013J324 RELOAD: N EXEC: Y RETAIN-JCL: Y

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0004 CPU-TIME: 00004

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 11.088 / 14:51:22

MESSAGE: LIST SUCCESSFUL

-Au tableau suivant, inscrire List à Function et inscrire le nom du travail qui va relâcher le travail à ajouter dans la cédule (ex: M013J230) au champ Job et appuyer sur enter. Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: LIST (FORMAT,LIST,UPD) PAGE 0001

JOB: M013J230

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS *

000 M013J235 0000 0010

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 11.088 / 14:53:22

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Au tableau suivant, inscrire UPD à Function, "A" sous le champ OPT après la dernière ligne de saisie. Inscrire le numéro de cédule à ajouter à SCHID (accéder au membre ID de la librairie T855P.CA7.CEDULE pour déterminer le numéro de cédule), ou inscrire 000 pour appliquer le triggering à toutes les cédules.

-Inscrire le nom du travail qui est déclenché (ex: M013J234) sous TRGD-JOB, puis 0000 sous QTM et 0010 sous LDTM, enter.

-Répéter cette opération autant de fois qu'il y a de cédules spécifiques à ajouter.

Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: UPD (FORMAT,LIST,UPD) PAGE 0001

JOB: M013J230

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS *

000 M013J235 0000 0010

a 000 M013J234 0000 0010

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 11.088 / 14:55:44

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

-Il faut maintenant faire relâcher le travail M013J235 par le travail M013J234. Voici comment procéder:

-Faire un List du travail M013J230. Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: List (FORMAT,LIST,UPD) PAGE 0001

JOB: M013J230

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS *

000 M013J235 0000 0010

000 M013J234 0000 0010

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 11.088 / 14:55:44

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

-Inscrire UPD à Function, inscrire M013J234 à Job et "A" sous OPT devant M013J235, enter. Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: UPD (FORMAT,LIST,UPD) PAGE 0001

JOB: M013J234

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS *

a 000 M013J235 0000 0010

000 M013J234 0000 0010

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 11.088 / 14:55:44

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

-Il faut maintenant supprimer l'ancien trigger du travail M013J235 qui était auparavant relâché par le travail M013J230. Voici comment procéder:

-Refaire un List du travail M013J230. Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: List (FORMAT,LIST,UPD) PAGE 0001

JOB: M013J230

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS *

000 M013J235 0000 0010

000 M013J234 0000 0010

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 11.088 / 14:55:44

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

-Inscrire UPD à Function, M013J230 à Job et "D" sous OPT devant le travail M013J235, enter. Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: UPD (FORMAT,LIST,UPD) PAGE 0001

JOB: M013J230

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS *

d 000 M013J235 0000 0010

 000 M013J234 0000 0010

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 11.088 / 14:55:44

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

-Faire ensuite un List de tous les travaux dans le panneau SCHD,JTRG ainsi qu'un LJOB,JOB=XXXXJYYY,LIST=ALL pour valider que la cédule s'exécute en tenant compte des nouveaux paramètres appliqués.

-Modifier la documentation :* Accéder au membre FREQ de la librairie T855P.CA7.CEDULE et ajouter le nouveau travail avec sa description.
 * Accéder au membre ORGA de la librairie T855P.CA7.CEDULE et ajouter le travail dans l'organigramme.
 * Aviser l'usager que le travail a été ajouté et classer sa demande.

Définitions:

LDTM (lead time): Paramètre qui permet de spécifier le temps (hhmm) d'exécution approximatif du travail. Si le temps d'exécution dépasse le temps spécifié au paramètre LDTM, un message "LATE" s'affichera à côté du travail qui s'exécute dans la list queue.

QTM (queued time): Paramètre qui permet de spécifier le temps (hhmm) qu'un travail peut demeurer en attente dans la request queue. Ce paramètre est utilisé seulement si le travail possède un submit time. Ce n'est pas le cas ici. On inscrit donc 0000 sous ce paramètre.

= 2- Ajout d'un submit time dans un travail  =

-Taper la top command suivante dans CA-7: SCHD,JTRG, '''enter. '''Voir ci-dessous:

SCHD,JTRG

--MINISTERE DE LA JUSTICE(QUEBEC) (PF15 : FIN)-

CA-7.023 LOGON ACCEPTED, PRESS ENTER FOR MENU OR ENTER COMMAND

TSS7000I TO11$ Last-Used 30 Mar 11 08:22 System=JUSP Facility=CA7

TSS7001I Count=00428 Mode=Fail Locktime=None Name=FRANCOIS TREMBLAY

USERID : TO11$ TERMINAL NAME : CA7001 DATE : 11.089

VTAM APPLID : A18CA7 TIME : 09:36:24

LUNAME : A18MF008 LEVEL : r11.1(SP3 )

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCC AAA AAA 7777

CCC AAAAAAAAAA 7777

CCC AAAAAAAAAA 7777

CCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

Copyright (c) 2007 CA.

All rights reserved.

-Au tableau suivant, faire un List du travail qui précède le travail qui a besoin d'un submit time (ex.:'''M022J020). '''Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: LIST (FORMAT,LIST,UPD) PAGE 0001

JOB: M022J020

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS *

005 M022J043 0000 0010

105 M022J043 0000 0010

205 M022J043 0000 0010

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 11.089 / 09:39:18

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

-Au tableau suivant, inscrire UPD à Function, U à Option devant le SCHID, 0200 à QTM, 0430 à SBTM, '''enter. '''Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: UPD (FORMAT,LIST,UPD) PAGE 0001

JOB: M022J020

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS *

u 005 M022J043 0200 0010 0430

105 M022J043 0000 0010

205 M022J043 0000 0010

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 11.089 / 09:39:18

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

Définitions.:

QTM (queued time): Paramètre obligatoire qui permet de spécifier le temps (hhmm) qu'un travail peut demeurer en attente dans la request queue.

SBTM (submit time): Paramètre qui permet de spécifier l'heure de soumission d'un travail au 15 mn près.

Remarque: Généralement, ces travaux arrivent un certain temps avant leur heure de soumission. Certaines exceptions telles que M024J451 qui est déclenchée de soir mais soumise seulement à 11h15 du matin.

= 3- Ajout d'une fréquence dans une cédule =

-Inscrire la top command '''SCHD,JOB, enter. '''Voir ci-dessous:

SCHD,JOB

--MINISTERE DE LA JUSTICE(QUEBEC) (PF15 : FIN)-

CA-7.023 LOGON ACCEPTED, PRESS ENTER FOR MENU OR ENTER COMMAND

TSS7000I TO11$ Last-Used 30 Mar 11 08:22 System=JUSP Facility=CA7

TSS7001I Count=00428 Mode=Fail Locktime=None Name=FRANCOIS TREMBLAY

USERID : TO11$ TERMINAL NAME : CA7001 DATE : 11.089

VTAM APPLID : A18CA7 TIME : 10:07:55

LUNAME : A18MF008 LEVEL : r11.1(SP3 )

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCC AAA AAA 7777

CCC AAAAAAAAAA 7777

CCC AAAAAAAAAA 7777

CCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

Copyright (c) 2007 CA.

All rights reserved.

Au tableau suivant, inscrire FE à Function et le nom du travail à Job, '''enter. '''Voir ci-dessous:

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: FE (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE)

JOB: T860J951

SCAL: (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 000

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 11.089 / 10:09:49

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Au panneau suivant CA-7 CPU JOB SCHEDULING PARAMETER EDIT (voir ci-dessous):

-- CA-7 CPU JOB SCHEDULING PARAMETER EDIT --

FUNCTION: ADD (ADD,DELETE,EXIT,FORMAT,LIST,REPL,SAVE,SR,SS)

JOB: T860J951 SCHID: 93 SCAL: 00 ROLL: N INDEX: 000

DOTM LDTM SBTM -REPEAT--

1640 0010 1630 INTERVAL: 0000 TYPE: COUNT: 0000 STOP: 0000

__ X __ DAILY

__ __ WEEKLY SUN: MON: TUE: WED: THU: FRI: SAT:

__ X __ MONTHLY JAN: X FEB: X MAR: X APR: X MAY: X JUN: X

JUL: X AUG: X SEP: X OCT: X NOV: X DEC: X

WEEK: 1,2,3,4,5 DAY-OF-WEEK: SUN

RDAY:

__ __ ANNUAL DAY:

DEFAULT SCAL: 00

__ __ SYMETRIC START: SPAN: SCHID-COUNT: 005

PROGRAM: SM72 MSG-INDX: 00 -- DB.2.1-E -- 11.089 / 10:23:57

MESSAGE: LIST FUNCTION SUCCESSFUL

USE '/PAGE+1' COMMAND OR PFK EQUIVALENT FOR NEXT SCHID

-inscrire Add à Function ;

-inscrire le numéro de cédule désirée au champ SCHID ;  

-toujours inscrire 00 au champ SCAL (calendrier unique) ;

-inscrire D (jours ouvrables), ou N (7 jours sur 7) au champ Roll ;  

-toujours inscrire 000 au champ Index ;

-inscrire les données requises aux champs DOTM, LDTM et SBTM

X: Monthly, mettre un X à tous les mois pour un travail mensuel

Rday: à 1 pour premier jour ouvrable du mois

à -0 pour le dernier jour ouvrable du mois

-Appuyer sur '''enter. '''

-Réponse du système: ADD FUNCTION SUCCESSFUL.

Définitions:

Cédule (SCHD) : Structure générale des travaux inter reliés

Fréquence (SCHID) : Suite de travaux appartenant à cette structure et qui s'exécutent à un moment donné.

DOTM: Due Out Time est l'heure prévue de fin équivalent au Submit Time (SBTM) plus la durée prévue (LDTM généralement dix minutes), Si un travail s'affiche en LATE dans le Ready Queue, c'est que le DOTM est dépassé.

Remarque:

Usage du ROLL: Pour une fréquence du dernier jour ouvrable de la semaine (WEEKLY FRIDAY), on utiliserait B (BACKWARD) pour tenir compte du cas d'un vendredi férié. Il existe aussi F (FORWARD) pour un lundi férié.

Annual day: Indiquer la ou les journées en julien (exemple: 032 pour le 1er février)

-Obligatoire, saisir Save à Function, '''enter. '''Voir ci-dessous:

-- CA-7 CPU JOB SCHEDULING PARAMETER EDIT --

FUNCTION: SAVE (ADD,DELETE,EXIT,FORMAT,LIST,REPL,SAVE,SR,SS)

JOB: T860J951 SCHID: 93 SCAL: ROLL: N INDEX: 000

DOTM LDTM SBTM -REPEAT--

1640 0010 1630 INTERVAL: 0000 TYPE: COUNT: 0000 STOP: 0000

__ X __ DAILY

__ __ WEEKLY SUN: MON: TUE: WED: THU: FRI: SAT:

__ X __ MONTHLY JAN: X FEB: X MAR: X APR: X MAY: X JUN: X

JUL: X AUG: X SEP: X OCT: X NOV: X DEC: X

WEEK: 1,2,3,4,5 DAY-OF-WEEK: SUN

RDAY:

__ __ ANNUAL DAY:

DEFAULT SCAL: 00

__ __ SYMETRIC START: SPAN: SCHID-COUNT: 006

PROGRAM: SM72 MSG-INDX: 00 -- DB.2.1-E -- 11.089 / 10:32:29

MESSAGE: ADD FUNCTION SUCCESSFUL

-Obligatoire, saisir REPL, '''enter. '''Voir ci-dessous:

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: REPL (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE)

JOB: T860J951

SCAL: 00 (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 006

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 11.089 / 10:38:02

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

Saisir Resolv, '''enter. '''Voir ci-dessous: et vérifier que tout est ok.

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: RESOLV (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE)

JOB: T860J951

SCAL: 00 (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 006

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 11.089 / 10:38:02

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Mettre à jour les membres FREQ, ORGA et ID.

= 4- Ajout d'une requête à un travail =

-Inscrire la commande JOBCONN,USR, enter

JOBCONN,USR

--MINISTERE DE LA JUSTICE(QUEBEC) (PF15 : FIN)-

CA-7.023 LOGON ACCEPTED, PRESS ENTER FOR MENU OR ENTER COMMAND

TSS7000I TO11$ Last-Used 30 Mar 11 10:18 System=JUST Facility=CA7

TSS7001I Count=00356 Mode=Fail Locktime=None Name=FRANCOIS TREMBLAY

USERID : TO11$ TERMINAL NAME : CA7001 DATE : 11.089

VTAM APPLID : A18CA7 TIME : 11:22:22

LUNAME : A18MF001 LEVEL : r11.1(SP3 )

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCC AAA AAA 7777

CCC AAAAAAAAAA 7777

CCC AAAAAAAAAA 7777

CCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

Copyright (c) 2007 CA.

All rights reserved.

-Au tableau suivant (CA-7 USER MEMO-FORM PREDECESSOR), inscrire List à Function et le PRED FOR JOB qui est le travail avant lequel on désire poser une action (ex. M012J009) , enter (voir ci-dessous):

- CA-7 USER MEMO-FORM PREDECESSORS -

FUNCTION: LIST (FORMAT,LIST,UPD) PAGE 0001

PRED FOR JOB: M012J009 LIST-SCHID:

OPT SCHID *--- MEMO-FORM USER PREDECESSOR ---* NEXT-RUN

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM61 MSG-INDX: 00 -- DB.3.6 -- 11.097 / 09:23:32

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Au tableau suivant, inscrire UPD à Function, "A" (pour Add) sous OPT et laisser le champ SCHID à blanc ou inscrire "0". La requête s'appliquera alors à la prochaine cédule, peut importe son SCHID.

-Saisir le texte requis entre les astérisques (*) sous '''MEMO-FORM USER PREDECESSOR. Si la requête n'est bonne que pour une fois remplacer YES par ONLY sous NEXT-RUN'''. Appuyer sur enter (voir ci-dessous):

- CA-7 USER MEMO-FORM PREDECESSORS -

FUNCTION: UPD (FORMAT,LIST,UPD) PAGE 0001

PRED FOR JOB: M012J009 LIST-SCHID:

OPT SCHID  *--- MEMO-FORM USER PREDECESSOR ---* NEXT-RUN

A 0 LES TRANSFERTS VIKING DU PROJET YES

A 0 GREFFES CIVILS (M012), DES CAUSES YES

A 0 EN APPEL ET DES éTIQUETTES YES

A 0 DOIVENT-êTRE TERMINéS AVANT DE YES

A 0 POURSUIVRE YES

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM61 MSG-INDX: 00 -- DB.3.6 -- 11.097 / 09:28:02

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

N.B. ne pas oublier d'aller aussi saisir le texte de la requête dans la librairie ORGA si celle-ci elle est permanente.

= 5- Changement de fréquence pour un travail =

Mise en contexte:

Serait-il possible de modifier la cédule du travail M012J271 pour la fréquence 8 plutôt que la 9 et y ajouter BR#

 

Merci.

 

Détails: 

-La fréquence 8 comprend les cédules 150 et 155

-La fréquence 9 comprend les cédules 119 et 129

-Le travail M012J001 relâche le travail M012J271

-Le travail M012J150 correspond au début de la copie de la banque des rapports''' (BR). Il faut donc ajouter une dépendance au travail M012J271, parce que l'exécution de ce travail doit être terminée avant que ne commence l'exécution du travail M012J150. '''

Procédure:

Ajout / suppression de triggers:

-Faire un SCHD,JTRG du travail M012J001 

-Supprimer M012J271 SCHD: 119 et M012J271 SCHD: 129

-Ajouter M012J271 SCHD: 150 et M012J271 SCHD: 155

Dépendances:

-Faire un JOBCONN,JDEP du travail M012J150

-Ajouter M012J271 SCHD: 150 et M012J271 SCHD: 155

Désactivation et gestion des cédules:

-Faire SCHD,JOB du travail M012J000

-Désactiver les cédules 119 et 129 (/222)

-Supprimer les exceptions de dates où les cédules 119 et 129 roulaient dans la cédule 99

-Effectuer un Replace, SR et Resolv

-Vérifier dans un premier temps, s'il y a des cédules qui s'exécutent pour toutes les journées requises

-Soumettre le travail T855J512 et valider que ce sont les cédules appropriées selon les journées spécifiées dans le calendrier annuel des Resolvs qui s'exécutent.

-Mettre à jour ID, FREQ et ORGA.

= 6- Conflit entre deux travaux lors de l'usage de fichier en mode exclusif =

Il arrive que deux travaux accaparent un fichier en exclusivité en même temps. Il faut alors modifier les paramètres d'exécution de ses travaux dans CA-7 pour rendre l'accès au fichier mutuellement exclusif. Voici comment procéder:

-Dans CA-7: JOBCONN,JDEP (voir ci-dessous);

JOBCONN,JDEP

--MINISTERE DE LA JUSTICE(QUEBEC) (PF15 : FIN)-

CA-7.023 LOGON ACCEPTED, PRESS ENTER FOR MENU OR ENTER COMMAND

TSS7000I TO11$ Last-Used 07 Apr 11 08:30 System=JUSP Facility=CA7

TSS7001I Count=00434 Mode=Fail Locktime=None Name=FRANCOIS TREMBLAY

USERID : TO11$ TERMINAL NAME : CA7001 DATE : 11.097

VTAM APPLID : A18CA7 TIME : 09:48:04

LUNAME : A18MF014 LEVEL : r11.1(SP3 )

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCC AAA AAA 7777

CCC AAAAAAAAAA 7777

CCC AAAAAAAAAA 7777

CCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

Copyright (c) 2007 CA.

All rights reserved.

-Faire un List des deux travaux puis un Update, en ajoutant A à OPT, ne rien inscrire à '''SCHID. LEADTM: 0001, PRD-JOB: /M022J099, /M023J900, /M107J805, enter '''(voir ci-dessous):

CA-7 CPU JOB PREDECESSORS -

FUNCTION: UPD (FORMAT,LIST,UPD) PAGE 0001

PRED FOR JOB: M006J003 LIST-SCHID:

OPT SCHID LEADTM PRED-JOB NEXT-RUN

A 0 0001 /M022J099 YES

A 0 0001 /M023J900 YES

A 0 0001 /M107J805 YES

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM61 MSG-INDX: 00 -- DB.3.2 -- 11.097 / 09:56:35

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

N.B.: / = mutuellement exclusif (voir les travaux M006J003 et M022J099 comme exemple).

N.B.: Le lead time : LEADTM est le paramètre qui permet de spécifier le temps en heure où nous pouvons retourner en arrière pour la gestion des dépendances (une heure dans ce cas-ci).

-Mettre à jour le fichier ORGA en ajoutant le travail en dépendance précédé d'un / et suivi d'un  * 

= 7- Création d'une nouvelle cédule =

-Effectuer d'abord la mise en production du travail, s'il y a lieu via M.50.2.

-Accéder ensuite au menu Data Base Maintenance (F4) de CA-7 et choisir l'option 1 pour accéder au menu CA-7 CPU Job Definition, '''enter. '''Voir ci-dessous:

- CA-7 DATA BASE MAINTENANCE MENU --

FUNCTION ===> 1

DATA BASE DEFINITION FOR:

1 - CPU JOB

10 - CROSS PLATFORM (XPS) JOB DEFINITION

2 - SCHEDULING

3 - JOB PREDECESSOR/SUCCESSOR

4 - WORKLOAD DOCUMENTATION

5 - INPUT/OUTPUT NETWORK

6 - DATA SET

OTHER FUNCTIONS AVAILABLE:

7 - JCL LIBRARY MAINTENANCE

8 - TEXT EDITOR

9 - CLEAR THE TEXT EDITOR ACTIVE AREA

ACTIVE AREA NOW CONTAINS 0000 LINES OF TEXT

PROGRAM: SDM0 MSG-INDX: 00 -- DB -- 11.088 / 14:28:02

MESSAGE: SPECIFY DESIRED OPTION OR ENTER A COMMAND ON THE TOP LINE

-Inscrire List à Function et saisir un nom de travail déjà existant avec des paramètres similaires à celui que vous voulez ajouter (ex.: M013j230) et vérifier s'il pointe dans la librairie de production (ID=0), qu'il est en mode exécution (EXEC=Y) et aussi que le travail ne demande pas de ruban (Tape drives= 000). Voir ci-dessous:

- CA-7 CPU JOB DEFINITION --

FUNCTION: LIST (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD)

JOB: M013J230

GENERAL: SYSTEM: M013 JOBNET: OWNER: UID: 1

JCL: ID: 0 MEMBER: M013J230 RELOAD: N EXEC: Y RETAIN-JCL: Y

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0007 CPU-TIME: 00028

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 11.088 / 14:32:35

MESSAGE: LIST SUCCESSFUL

-Faire un Add du nouveau travail en saisissant son nom au champ Job. Voir ci-dessous:

- CA-7 CPU JOB DEFINITION --

FUNCTION: ADD (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD)

JOB: M013J234

GENERAL: SYSTEM: M013 JOBNET: OWNER: UID: 1

JCL: ID: 0 MEMBER: M013J230 RELOAD: N EXEC: Y RETAIN-JCL: Y

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0007 CPU-TIME: 00028

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 11.088 / 14:32:35

MESSAGE: LIST SUCCESSFUL

-Effectuer maintenant un Load en saisissant la commande (top command) suivante: LOAD,JOB=Nom du travail. Voir ci-dessous:

LOAD,JOB=M013J234

- CA-7 CPU JOB DEFINITION --

FUNCTION: LIST (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD)

JOB: M013J234

GENERAL: SYSTEM: M013 JOBNET: OWNER: UID: 1

JCL: ID: 0 MEMBER: M013J234 RELOAD: N EXEC: Y RETAIN-JCL: Y

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0004 CPU-TIME: 00005

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 11.088 / 14:43:40

MESSAGE: LIST SUCCESSFUL

-Le travail T855XXXX sera alors soumis. Faire un LQ pour vérifier s'il s'est bien terminé.

-Faire ensuite un SCHD,JOB, enter 

-Au tableau suivant, faire un Edit à Function, inscrire le nom du travail au champ Job et 00 à SCAL, enter (voir ci-dessous):

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: EDIT (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE)

JOB: M013J234

SCAL: 00 (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 000

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 11.097 / 10:18:41

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Au panneau suivant CA-7 CPU JOB SCHEDULING PARAMETER EDIT (voir ci-dessous),

-- CA-7 CPU JOB SCHEDULING PARAMETER EDIT --

FUNCTION: ADD (ADD,DELETE,EXIT,FORMAT,LIST,REPL,SAVE,SR,SS)

JOB: M013J234 SCHID: 100 SCAL: 00 ROLL: D INDEX: 000

DOTM LDTM SBTM -REPEAT--

1640 0010 1630 INTERVAL: 0000 TYPE: COUNT: 0000 STOP: 0000

__ X __ DAILY

__ __ WEEKLY SUN: MON: TUE: WED: THU: FRI: SAT:

__ X __ MONTHLY JAN: X FEB: X MAR: X APR: X MAY: X JUN: X

JUL: X AUG: X SEP: X OCT: X NOV: X DEC: X

WEEK: 1,2,3,4,5 DAY-OF-WEEK: SUN

RDAY:

__ __ ANNUAL DAY:

DEFAULT SCAL: 00

__ __ SYMETRIC START: SPAN: SCHID-COUNT: 005

PROGRAM: SM72 MSG-INDX: 00 -- DB.2.1-E -- 11.089 / 10:23:57

MESSAGE: LIST FUNCTION SUCCESSFUL

USE '/PAGE+1' COMMAND OR PFK EQUIVALENT FOR NEXT SCHID

-Inscrire Add à Function ;

-Inscrire le numéro de cédule désirée au champ SCHID (ex. 100) ;  

-Inscrire 00 au champ SCAL ;

-Inscrire D ( jours ouvrables), ou N (7 jours sur 7) au champ Roll ;  

-Inscrire 000 au champ Index ;

-Inscrire les données requises aux champs DOTM, LDTM et SBTM

-L'option INTERVAL sous le paramètre REPEAT permet de spécifier la fréquence de répétition (exemple 0100 va faire en sorte que la cédule va s'exécuter aux heures) durant la période spécifiée plus bas;

X: Monthly, mettre un X à tous les mois pour un travail mensuel

Rday: à 1 pour premier jour ouvrable du mois

-Pour un travail qui roule 7 jours sur 7: Inscrire N à Roll, cocher Weekly, ainsi que les 7 jours de la semaine.

-Pour une cédule de nuit sur demande, inscrire "X" à Annual et / 222 à Day et laisser les autres champs (Daily, Weekly, Monthly) libres.

-Appuyer sur enter,

-Réponse du système: ADD FUNCTION SUCCESSFUL.

-Inscrire SS à Function, enter ; puis Resolv, enter et vérifier que tout est ok.

-Mettre à jour les fichiers FREQ, ORGA, ID et ajouter le travail dans la librairie de Resolv du projet (T855P.CA7.CNTL) si on peut effectuer le resolv de façon automatique (c'est-à-dire que le resolv ne requiert aucun ajustement manuel à effectuer au six mois). Sinon, l'ajouter à la Liste des racines qui doivent faire l'objet de résolution manuelle annexée à ce guide. 

= 8- Création d'une cédule en batch à partir d'une cédule déjà définie =

* Il faut en premier lieu s’assurer que les travaux de la cédule à créer existent dans CA7. Sinon il faut les ajouter en dupliquant le travail ADDJOB de la librairie T855P.CA7.CNTL et en le nommant AXXXYJOB où XXX correspond au projet et Y à l’environnement, ex » : A025CJOB


 * Effectuer ensuite un « change all » du nom des travaux dans le travail pour que leurs noms correspondent à l’environnement où ils sont destinés à s’exécuter. Exemple C M007A M025C ALL


 * Modifier ensuite le nom des travaux pour qu’ils correspondent à ceux qui s’exécuteront dans la nouvelle cédule.


 * S’assurer également que les travaux sont ajoutés dans la librairie désirée qui est déterminée par le paramètre JCLID=XX où XX correspond au numéro de librairie. La liste des librairies définies avec le numéro qui leurs correspondent dans CA-7 est disponible à l’annexe 5 de ce guide.


 * Soumettre le travail et aller dans CA-7 pour valider si les travaux ont bien été créés en effectuant la commande LJOB,JOB= MXXXY*. Ex : LJOB,JOB= M025C*


 * Accéder ensuite au membre ADDSCHID de la librairie T855P.CA7.CNTL.


 * Inscrire une date où la cédule existante à copier avec la fréquence appropriée a exécutée et le nom du travail de tête (voir ci-dessous):

Menu Utilities Compilers Help

¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢

BROWSE T855P.CA7.CNTL(ADDSCHID) - 01.25 Line 00000019 Col 001 080

Command ===> Scroll ===> CSR

//* *

//*  *

//* - FORECAST LISTE DES TRAVAUX DANS BATCH#3O D'UN JOUR DONNE - *

//*  *

//* *

//UCC7CMDS DD DISP=SHR,DSN=SYSD.CA7.COMMDS *

//BATCHIN DD DISP=SHR,DSN=SYSD.CA7.BATCH#3I *

//BATCHOUT DD DISP=SHR,DSN=SYSD.CA7.BATCH#3O *

//SYSPRINT DD SYSOUT=* *

//SYSUDUMP DD SYSOUT=D *

//SYSIN DD * *

/LOGON UCC7RD,UCC7RD *

FJOB,FROM= MMJJAA ,SPAN=24,JOB= M012J000

/LOGOFF *

//FREE EXEC PGM=SASSBEND,COND=ONLY,PARM=3 *

//UCC7CMDS DD DISP=SHR,DSN=SYSD.CA7.COMMDS *

//COPY#3O EXEC PGM=IEBGENER *

//SYSPRINT DD SYSOUT=* *

//SYSUT1 DD DSN=SYSD.CA7.BATCH#3O,DISP=SHR *

. . . . . . . . . . . . . . . . . . . . . . . . . ..


 * Inscrire ensuite le numéro de cédule désirée à l'étape CLISTEX (voir ci-dessous):

Menu Utilities Compilers Help

¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢

BROWSE T855P.CA7.CNTL(ADDSCHID) - 01.25 CHARS 'CLIST' found

Command ===> Scroll ===> CSR

//* -- *

//* - APPEL DU CLIST QUI CREE LES CARTES - *

//* - DANS "T855P.CA7.UCC7CART" -

//* -- *

//CLISTEX EXEC PGM=IKJEFT01,DYNAMNBR=2,TIME=20 *

//SYSTSPRT DD SYSOUT=* *

//SYSPROC DD DSN=T855P.CA7.CLIST,DISP=SHR *

//SYSTSIN DD * *

%UCC7CAR2 ID( 099 )

//T850J999 EXEC T850J999 *

/*EOF *

******************************** Bottom of Data ********************************


 * Soumettre le travail et accéder ensuite au fichier T855P.CA7.UCC7CART en edit via 1.3.4.


 * Vérifier et ajuster ensuite la cédule selon les exigences de la nouvelle cédule.


 * Copier (copy after) ensuite le fichier dans un travail que vous avez créé dans la librairie T855P.CA7.CNTL avec le libellé suivant : AXXXYCED ou XXX correspond au projet et Y à l’environnement ex » : A025CCED selon le modèle de JCL ADDCEDU


 * Inscrire son identifiant au champ LOGON et soumettre le travail.

Voir ci-dessous :

EDIT T855P.CA7.CNTL(A025CCED) - 01.03 Columns 00001 00072

Command ===> copy Scroll ===> CSR

000004 //* * *

000005 //* * CRÉATION DE CÉDULE À PARTIR DE T855P.CA7.UUC7CART *

000006 //* * *

000007 //* ***********************************************************

000008 //ETAPE01 EXEC PGM=SASSBSTR,PARM=3

000009 //UCC7CMDS DD DISP=SHR,DSN=SYSD.CA7.COMMDS

000010 //BATCHIN DD DISP=SHR,DSN=SYSD.CA7.BATCH#3I

000011 //BATCHOUT DD DISP=SHR,DSN=SYSD.CA7.BATCH#3O

000012 //SYSPRINT DD SYSOUT=*

000013 //SYSUDUMP DD SYSOUT=D

000014 //SYSIN DD *

a 00015 / LOGON TO11$, XXXXXX

000016 DBM 

000017 SCHD 

000018 TRGR 

000019 UPD,JTRG,JOB=M025C000,SCHID=099,TJOB=M025C900, 

000020 QTM=0000,LEADTM=0010,OPT=A 

000021 UPD,JTRG,JOB=M025C900,SCHID=099,TJOB=M025C010, 

000022 QTM=0000,LEADTM=0010,OPT=A

________________________________________________________________________________


 * Aller ensuite dans CA7 pour valider que la cédule a effectivement été créée via la commande SCHD,JTRG et faire ensuite un list de chacun des travaux de la cédule. Comparer avec celle du membre ORGA du projet concerné.


 * Ajouter la cédule dans SCHD,JOB, s'il y a lieu afin qu’elle s’exécute automatiquement.

= 9 - Mise en force du nouveau calendrier CA-7 =

Le premier juillet ou le plus tôt après cette date, effectuer cette procédure pour mettre en force le nouveau calendrier dans CA-7. Tant que le nouveau calendrier n’est pas créé, il n’est pas possible de faire de RESOLV.

-Avec l'identifiant TT39$, aller dans SYSL.CA7.JCLLIB pour créer le nouveau membre SCALxx00 (xx=année), faire un copy du membre de l'année précédente (SCAL1000), modifier son nom à la ligne 2 et y inscrire les journées fériées de la façon décrite dans le membre. Inscrire la prochaine année à CALENDAR YEAR (2011), la date du jour à CURDATE (10186), les jours fériés à NOSCHDY et '''HOLIDAY. Sauvegarder les changements.'''

-Accéder au membre SYSL.CA7.JCLLIB(JCLSCAL), modifier SET AN=XX à la ligne 6 où XX est égal à l'année suivante. Sauvegarder la modification et soumettre le travail (sub). Quand l'exécution du travail est terminée, vérifier dans le résultat (TT39$CAL) les dates du calendrier et les jours fériés.

-Accéder au membre Online (deck d'initialisation) de la librairie SYSL.CA7.JCLLIB et ajouter la nouvelle année CALBLK,NAME=SCALxx00 à la suite des autres (ligne 11701 pour 2011) et sauvegarder.

-Pour rendre le calendrier opérationnel, il faut procéder à un arrêt/départ de CA7.

Attendre à 12h10 et effectuer la commande suivant avec un identifiant TTXX$:

/<ARR CA7 Attendre l’arrêt complet de CA7 puis effectuer la commande suivante :

/<DEP CA7 

-Effectuer ensuite la commande suivante dans CA7 pour valider que le nouveau calendrier est opérationnel: PRINT,YEAR=XX,SCAL=00

XX = l'année

= 10- Modification de l'exécution d'une cédule de production à une date précise =

-Faire la top command SCHDMOD, enter (voir-ci-dessous):

SCHDMOD

--MINISTERE DE LA JUSTICE(QUEBEC) (PF15 : FIN)-

CA-7.023 LOGON ACCEPTED, PRESS ENTER FOR MENU OR ENTER COMMAND

TSS7000I TO11$ Last-Used 29 Mar 11 08:17 System=JUSP Facility=CA7

TSS7001I Count=00427 Mode=Fail Locktime=None Name=FRANCOIS TREMBLAY

USERID : TO11$ TERMINAL NAME : CA7001 DATE : 11.088

VTAM APPLID : A18CA7 TIME : 14:13:30

LUNAME : A18MF006 LEVEL : r11.1(SP3 )

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCC AAA AAA 7777

CCC AAAAAAAAAA 7777

CCC AAAAAAAAAA 7777

CCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

Copyright (c) 2007 CA.

All rights reserved.

-Au tableau suivant, inscrire List à Function, QXXXJYYY à Job et le numéro de cédule à SCHID , enter (voir ci-dessous):

--- CA-7 MODIFICATION TO RESOLVED SCHEDULE DATES ---

FUNCTION : LIST (FORMAT,LIST,UPD)

JOB: Q113J997 NETWORK: MODSTAT:

SCHID: 100 YEAR:

1 1 2 2 3 3

....5....0 ....5....0 ....5....0 1

JAN

FEB

MAR

APR

MAY

JUN

JUL

AUG

SEP

OCT

NOV

DEC

PROGRAM: SM80 MSG-INDX: 00 -- DB.2.7 -- 11.088 / 13:59:45

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Au tableau suivant, inscrire UPD à Function, aller se positionner sur la date et modifier (1 = Prod, 0 = No Prod). Appuyer sur enter, (voir ci-dessous):

--- CA-7 MODIFICATION TO RESOLVED SCHEDULE DATES ---

FUNCTION: UPD (FORMAT,LIST,UPD)

JOB: Q113J997 NETWORK: MODSTAT: CURRENT

SCHID: 100 YEAR: 2010

1 1 2 2 3 3

....5....0 ....5....0 ....5....0 1

JUL 0000000000 0000000000 0000000000 0

AUG 0000000000 0000000000 0000000000 0

SEP 0000000000 0000000000 0000000000

OCT 0000000000 0000000000 0000000000 0

NOV 0000000000 0000000000 0000000000

DEC 0000000000 1000000000 0000000000 0

JAN 0000000000 0000000000 0000000000 0

FEB 0000100000 0000000000 00000000

MAR 0000000000 00000000 1 0 0000000000 0

APR 0000000000 0000000000 0000000000

MAY 0000000000 0000000000 0000000000 0

JUN 0000000000 0000000000 0000000000

PROGRAM: SM80 MSG-INDX: 00 -- DB.2.7 -- 11.088 / 14:04:26

MESSAGE: LIST FUNCTION SUCCESSFUL FOR SJ000278

= 11- Modification de l'heure d'exécution des travaux Q113JDEB et T820BCKH précédant la mise en service de la livraison semestrielle de la VPTI =

- À faire dans la semaine précédant le dimanche de la livraison 

Production du client (MSP)


 * Déterminer le numéro de la cédule de Q113JDEB (dimanche 7 ou 57). (voir SCHDMOD dans CA-7 ou sur le calendrier de Resolv du travail).

* Recéduler dans CA-7 (RESOLV) Q113JDEB cédule 7 ou 57 à 2h50 (SCHD,JOB dans CA-7).


 * Remettre la cédule 7 ou 57 de Q113JDEB à son heure originale (04h30)
 * Dans CA-7 dans la semaine suivant la livraison semestrielle.

Flashcopy (VPTI)


 * Soumettre le travail T855JBKH de Jobstemp, une journée ou deux avant la livraison et donner le nom et le numéro de travail au responsable de la livraison à la VPTI. Ce travail sera soumis en hold et sera relâché par le personnel de la VPTI le jour de la livraison semestrielle à l'heure qu'ils jugeront appropriée. Ce travail effectuera alors un demand du travail T820BCKP.

- Retirer le travail T820JBKH de la production pour la date du dimanche de

la livraison dans CA-7:

SCHDMOD

Liste à Function 

T820BCKH à Job

7 à SCHID 

= 12- Modification de l'heure d'exécution d'une cédule =

Mise en contexte: 

Salut François,

 

Peux-tu déplacer le travail T860J951 de 23h45 à 23h40.

Procédure:

- Saisir la top command SCHD,JOB, enter (voir ci-dessous):

SCHD,JOB

-- CA-7 QUEUE MAINTENANCE - CPU JOBS STATUS (RQMTS) --

F-JOBNAME---J--I--E--U--N-SHJV F-JOBNAME---J--I--E--U--N-SHJV

M007J500. . . . . S M024J011. . . . . S JOB: *

M007J500. . . . . S M024J011. . . . . S SYS: *

M007J500. . . . . S M024J011. . . . . S SEQ: JOBNAME

M007J500. . . . . S M024J011. . . . . S QUEUE: REQ

M007J500. . . . . S M024J011. . . . . S LIST: ANY

M024A011. . . . . S M024J011. . . . . S FUNCTIONS:

M024J011. . . . . S M024J011. . . . . S C=CANCEL

M024J011. . . . . S M026J500. . . . . S F=RESTART

M024J011. . . . . S M026J500. . . . . S H=HOLD

M024J011. . . . . S M026J500. . . . . S J=JCLOVRD

M024J011. . . . . S M026J500. . . . . S P=RSVP

M024J011. . . . . S M026J500. . . . . S Q=REQUEUE

M024J011. . . . . S T800J501. . . . . S R=RELEASE

M024J011. . . . . S T806J201. . . . . S S=SUBTM OFF

M024J011. . . . . S T820J050. . . . . S U=UPDATE

M024J011. . . . . S T855JDU2. . . . . S V=VERIFY

M024J011. . . . . S T855J513. . . . . S X=RQMT POST

M024J011. . . . . S T860J921. . . . . S E=EDIT QJCL

PROGRAM: QM20 MSG-INDX: 00 -- QM.1-M -- 13.212 / 15:14:47

MESSAGE: ENTER FUNCTION IN 'F' FIELD OR ENTER A COMMAND ON THE TOP LINE

(USE 'PF8' KEY TO SEE NEXT PAGE)

- Au tableau suivant, inscrire FE à Function et le nom du travail à Job, enter (voir ci-dessous):

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: FE (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE)

JOB: T860J951 

SCAL: (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 000

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 13.212 / 15:49:21

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

- Au tableau suivant, appuyer sur F8 jusqu'à ce que la cédule de production à modifier s'affiche (déterminé d'après l'heure d'exécution au champ SBTM); modifier l'heure d'exécution sous le champ SBTM ; ajuster le DOTM en conséquence, inscrire REPL à Function et appuyer sur enter (voir ci-dessous):

-- CA-7 CPU JOB SCHEDULING PARAMETER EDIT --

FUNCTION: REPL (ADD,DELETE,EXIT,FORMAT,LIST,REPL,SAVE,SR,SS)

JOB: T860J951 SCHID: 96 SCAL: ROLL: N INDEX: 000 

DOTM LDTM SBTM -REPEAT--

2350 0010 2340 INTERVAL: 0000 TYPE: COUNT: 0000 STOP: 0000

__ X __ DAILY

__ __ WEEKLY SUN: MON: TUE: WED: THU: FRI: SAT:

__ __ MONTHLY JAN: FEB: MAR: APR: MAY: JUN:

JUL: AUG: SEP: OCT: NOV: DEC:

WEEK: DAY-OF-WEEK:

RDAY:

__ __ ANNUAL DAY:

DEFAULT SCAL: 00

__ __ SYMETRIC START: SPAN: SCHID-COUNT: 006

PROGRAM: SM72 MSG-INDX: 00 -- DB.2.1-E -- 13.212 / 15:51:48

MESSAGE: LIST FUNCTION SUCCESSFUL

USE '/PAGE+1' COMMAND OR PFK EQUIVALENT FOR NEXT SCHID

-Réponse du système: REPL FUNCTION SUCCESSFUL. (voir ci-dessous):

-- CA-7 CPU JOB SCHEDULING PARAMETER EDIT --

FUNCTION: REPL (ADD,DELETE,EXIT,FORMAT,LIST,REPL,SAVE,SR,SS)

JOB: T860J951 SCHID: 96 SCAL: ROLL: N INDEX: 000 

DOTM LDTM SBTM -REPEAT--

2350 0010 2340 INTERVAL: 0000 TYPE: COUNT: 0000 STOP: 0000

__ X __ DAILY

__ __ WEEKLY SUN: MON: TUE: WED: THU: FRI: SAT:

__ __ MONTHLY JAN: FEB: MAR: APR: MAY: JUN:

JUL: AUG: SEP: OCT: NOV: DEC:

WEEK: DAY-OF-WEEK:

RDAY:

__ __ ANNUAL DAY:

DEFAULT SCAL: 00

__ __ SYMETRIC START: SPAN: SCHID-COUNT: 006

PROGRAM: SM72 MSG-INDX: 00 -- DB.2.1-E -- 13.212 / 16:00:08

MESSAGE: REPL FUNCTION SUCCESSFUL

-Inscrire ensuite SR à Function et appuyer sur '''enter. Réponse du système: REPL FUNCTION SUCCESSFUL FOR SJ000XXX SCHEDULE MUST BE RESOLVED '''(voir ci-dessous):

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: REPL (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE) 

JOB: T860J951 

SCAL: 00 (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 006

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 13.212 / 16:03:29

MESSAGE: REPL FUNCTION SUCCESSFUL FOR SJ000299 

SCHEDULE MUST BE RESOLVED

-Inscrire RESOLV à Function et appuyer sur enter

- Appuyer sur enter plusieurs fois pour visualiser que le changement est effectif dans la cédule visée (voir ci-dessous):

RESOLV,TEST=NO,PRINT=YES,OLDYR=*,JOB=T860J951

CA-7 SCHEDULE / BASE CALENDAR RESOLUTION

DATE 13.212 TIME 16:06:58 PAGE NO. 0002

OPTIONS: YEAR=13/14 SCAL=00 JOB=T860J951

TEST=NO PRINT=YES DUPDATE=NO

**SCHEDULE DATA :

ID=097 ROLL=N INDEX=+000

SCAL= DOTM=2205 LEADTM=0010 SUBTM=2155 STARTM=2155

DAILY

**SCHEDULE DAYS ROLL STARTED : ROLL=N

**SCHEDULE DAYS ROLL COMPLETED

SRC1-117 (W) ID MULTIPLE SCHEDULES AT LEAST ONE DAY

 **SCHEDULE DATA : 

ID=096 ROLL=N INDEX=+000 

SCAL= DOTM=2350 LEADTM=0010 SUBTM= 2340 STARTM= 2340 

DAILY 

**SCHEDULE DAYS ROLL STARTED : ROLL=N

**SCHEDULE DAYS ROLL COMPLETED

SRC1-117 (W) ID MULTIPLE SCHEDULES AT LEAST ONE DAY

**SCHEDULE DATA :

ID=095 ROLL=N INDEX=+000

SCAL= DOTM=0210 LEADTM=0010 SUBTM=0200 STARTM=0200

-Mettre à jour les membres ORGA et ID

= 13- Rendre un fichier permanent dans CA-7 =

C'est le travail T855J513 qui rend permanents les nouveaux fichiers dans '''CA-7. Il accède à l'application via l'identifiant TO12$'''. Il faut donc veiller à changer le mot de passe de cet identifiant régulièrement sinon il pourrait arriver que T855J513 ne puisse plus effectuer sa tâche. Ce qui aurait pour effet de causer des WAITING FOR EXTERNAL DATASET dans CA-7 lors de la production de nuit (accéder à la librairie T855P.PARM.DATA(SIGNON) pour connaître le mot de passe de TO12$).

Voici comment procéder pour rendre un fichier permanent:

Appuyer sur F4 après le login de CA-7 et au tableau suivant effectuer le choix 6 (data set), '''enter. '''Voir ci-dessous:

- CA-7 DATA BASE MAINTENANCE MENU --

FUNCTION ===> 6

DATA BASE DEFINITION FOR:

1 - CPU JOB

10 - CROSS PLATFORM (XPS) JOB DEFINITION

2 - SCHEDULING

3 - JOB PREDECESSOR/SUCCESSOR

4 - WORKLOAD DOCUMENTATION

5 - INPUT/OUTPUT NETWORK

6 - DATA SET

OTHER FUNCTIONS AVAILABLE:

7 - JCL LIBRARY MAINTENANCE

8 - TEXT EDITOR

9 - CLEAR THE TEXT EDITOR ACTIVE AREA

ACTIVE AREA NOW CONTAINS 0000 LINES OF TEXT

PROGRAM: SDM0 MSG-INDX: 00 -- DB -- 11.097 / 13:56:10

MESSAGE: SPECIFY DESIRED OPTION OR ENTER A COMMAND ON THE TOP LINE

Au tableau suivant, inscrire LIST à Function, inscrire le nom du fichier à modifier à DSN (ex: M012P.D001), '''enter. '''Voir ci-dessous:

- CA-7 DATA SET DEFINITION -

FUNCTION: LIST (ADD,DELETE,FORMAT,LIST,RENAME,UPD)

DSN: M012P.D001 DSNBR: 1302

NEWNAME:

TYPE: NORM GDG: N

SMF FEEDBACK REQUIRED: N POST AT CLOSE TIME: N

DEVICE: DASD

DSORG: PS

RECFM: FB

LRECL: 220

BLKSIZE: 9020

PROGRAM: SM30 MSG-INDX: 00 -- DB.6 -- 11.097 / 14:01:53

MESSAGE: LIST FUNCTION SUCCESSFUL

Si le type est à NORM, le fichier est temporaire.

Pour le rendre permanent, inscrire UPD à Function et PERM à TYPE, enter (voir ci-dessous):

- CA-7 DATA SET DEFINITION -

FUNCTION: UPD (ADD,DELETE,FORMAT,LIST,RENAME,UPD)

DSN: M012P.D001 DSNBR: 1302

NEWNAME:

TYPE: PERM GDG: N

SMF FEEDBACK REQUIRED: N POST AT CLOSE TIME: N

DEVICE: DASD

DSORG: PS

RECFM: FB

LRECL: 220

BLKSIZE: 9020

PROGRAM: SM30 MSG-INDX: 00 -- DB.6 -- 11.097 / 14:07:19

MESSAGE: UPD FUNCTION SUCCESSFUL

14- Suppression d'une cédule

-Effectuer la commande SCHD,JOB, enter

-Au tableau suivant (CA-7 CPU JOB SCHEDULING), inscrire DEL à Function et inscrire le nom de la cédule à supprimer à Job, enter. Voir ci-dessous:

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: DEL (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE)

JOB: T855JDU1 

SCAL: (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 000

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 14.015 / 16:11:11

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Réponse du système au bas du tableau: Delete function successful. Voir ci-dessous:

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: DELETE (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE)

JOB: T855JDU1 

SCAL: (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 000

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 14.015 / 16:15:18

MESSAGE: DELETE FUNCTION SUCCESSFUL FOR SJ000280

= 15- Suppression d'un travail dans une cédule =

Exemple de demande:

''Pouvez-vous retirer le travail M012J145 dans la cédule du projet M012P de CA-7.Il s'exécute après le travail M012J318. Voir ci-dessous :''

Avant Après

3 3

++ ++


 * M012J318| |M012J318|

++ ++



V 3 V 3

++ ++

| M012J145 | |M012J106|

++ ++



V 3 V 3

++ ++


 * M012J106| |M012J093|

++ ++

Procédure:

-Effectuer la commande SCHD,JTRG dans CA-7, puis faire un List du travail qui précède celui qui est à supprimer, enter. Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: LIST (FORMAT,LIST,UPD) PAGE 0001

JOB: M012J318 

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS * 

100 M012J145 0000 0010 

105 M012J145 0000 0010 

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 14.009 / 11:30:51

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

-Inscrire ensuite UPD à Function ; "D" sous OPT devant le nom du travail à supprimer pour chacune des fréquences; inscrire un "A" à la ligne suivante sous OPT suivi de la fréquence (100) et du travail qui sera désormais relâché (M012J106) par le travail qui relâchait le travail qui sera supprimé. Répéter l'opération à la ligne suivante autant de fois qu'il y a de fréquences (ici, il y en a deux (100 et 105)) enter. Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: upd (FORMAT,LIST,UPD) PAGE 0001

JOB: M012J318 

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS * 

d 100 M012J145 0000 0010 

d 105 M012J145 0000 0010 

a 100 M012J106 0000 0010 

a 105 M012J106 0000 0010 

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 14.013 / 09:38:39

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

-Effectuer ensuite un List du travail pour valider que le changement a bien été effectué. Voir ci-dessous:

--- CA-7 JOB TRIGGERING

FUNCTION: LIST (FORMAT,LIST,UPD) PAGE 0001

JOB: M012J318 

OPT SCHID TRGD-JOB TRGID DOTM QTM LDTM SBTM * EXCEPTIONS * 

100 M012J106 0000 0010 

105 M012J106 0000 0010 

OPTIONS: A=ADD,D=DELETE,U=UPDATE,*=PROCESSED,?=ERROR

PROGRAM: SM75 MSG-INDX: 00 -- DB.2.4 -- 14.013 / 09:41:38

MESSAGE: LIST FUNCTION SUCCESSFUL

END OF DATA REACHED

-Appuyer ensuite sur F4 et inscrire le choix 1 au tableau CA-7 DATA BASE MAINTENANCE MENU, enter Voir ci-dessous:

- CA-7 DATA BASE MAINTENANCE MENU  --

FUNCTION ===> 1 

DATA BASE DEFINITION FOR:

1 - CPU JOB 

A - CROSS PLATFORM (XPS) JOB DEFINITION 

2 - SCHEDULING

3 - JOB PREDECESSOR/SUCCESSOR

4 - WORKLOAD DOCUMENTATION

5 - INPUT/OUTPUT NETWORK

6 - DATA SET

OTHER FUNCTIONS AVAILABLE:

7 - JCL LIBRARY MAINTENANCE

8 - TEXT EDITOR

9 - CLEAR THE TEXT EDITOR ACTIVE AREA

ACTIVE AREA NOW CONTAINS 0000 LINES OF TEXT

PROGRAM: SDM0 MSG-INDX: 00 -- DB -- 14.013 / 09:58:00

MESSAGE: SPECIFY DESIRED OPTION OR ENTER A COMMAND ON THE TOP LINE

-Au tableau suivant (CA-7 CPU JOB DEFINITION), inscrire List à Function et le nom du travail à supprimer à Job, enter. Voir ci-dessous:

- CA-7 CPU JOB DEFINITION --

FUNCTION: LIST (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD) 

JOB: M012J145 

GENERAL: SYSTEM: M012 JOBNET: OWNER: UID: 1 

JCL: ID: 0 MEMBER: M012J145 RELOAD: N EXEC: Y RETAIN-JCL: Y 

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0005 CPU-TIME: 00008

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 14.013 / 10:05:01

MESSAGE: LIST SUCCESSFUL

-Puis saisir la commande Delete à Function, enter. Voir ci-dessous:

- CA-7 CPU JOB DEFINITION --

FUNCTION: delete (ADD,DELETE,DD,PURGE,DELPRRN,FORMAT,LIST,UPD) 

JOB: M012J145 

GENERAL: SYSTEM: M012 JOBNET: OWNER: UID: 1 

JCL: ID: 0 MEMBER: M012J145 RELOAD: N EXEC: Y RETAIN-JCL: Y 

LIB:

REQUIREMENTS: HOLD: N JCL-OVRD: N USE-OVRD-LIB: N VERIFY: N MAINT: N

SATISFACTION LEAD-TIME: JOB: 0 DSN: 0 ARFSET:

EXECUTION: MAINID: ALL INSERT-RMS: N COND-CODE: 0 RO: 0

DONT SCHEDULE -- BEFORE: 00000 0000 AFTER: 99999 0000

MESSAGES: LTERM: REQUIREMENT-LIST: Y PROMPTS: Y

ERROR MSGS -- RQMTS NOT USED: Y DSN NOT FOUND: Y

RESOURCES: REGION: 768 CLOCK-TIME: 0005 CPU-TIME: 00008

CLASS: A PRTY: 000 MSGCLASS: O DRCLASS:

TAPE DRIVES...TYPE1: 000 M 000 C TYPE2: 000 M 000 C

PROGRAM: SM20 MSG-INDX: 00 -- DB.1 -- 14.013 / 10:05:01

MESSAGE: LIST SUCCESSFUL

-Mettre ensuite à jour les membres FREQ et ORGA de la librairie T855P.CA7.CEDULE.

= 16- Suppression de fréquence dans une cédule =

-Effectuer la commande SCHD,JOB, enter

-Au tableau suivant (CA-7 CPU JOB SCHEDULING), inscrire FE à Function et le nom du travail de tête de la cédule à Job, enter. Voir ci-dessous:

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: FE (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE) 

JOB: M012J000 

SCAL: (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 000

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 14.016 / 09:24:04

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Au tableau suivant (CA-7 CPU JOB SCHEDULING PARAMETER EDIT), appuyer sur F8 jusqu'à ce que la fréquence à supprimer s'affiche et inscrire DELETE à Function, '''enter. '''Voir ci-dessous:

-- CA-7 CPU JOB SCHEDULING PARAMETER EDIT --

FUNCTION: DEL (ADD,DELETE,EXIT,FORMAT,LIST,REPL,SAVE,SR,SS)

JOB: M012J000 SCHID: 105 SCAL: ROLL: D INDEX: 000 

DOTM LDTM SBTM -REPEAT--

1815 0010 1805 INTERVAL: 0000 TYPE: COUNT: 0000 STOP: 0000

__ __ DAILY

__ __ WEEKLY SUN: MON: TUE: WED: THU: FRI: SAT:

__ X __ MONTHLY JAN: X FEB: X MAR: X APR: X MAY: X JUN: X

JUL: X AUG: X SEP: X OCT: X NOV: X DEC: X

WEEK: 1 DAY-OF-WEEK: FRI

RDAY: /2,/3,/4,/5,/6,/7

__ __ ANNUAL DAY:

DEFAULT SCAL: 00

__ __ SYMETRIC START: SPAN: SCHID-COUNT: 007

PROGRAM: SM72 MSG-INDX: 00 -- DB.2.1-E -- 14.016 / 09:30:50

MESSAGE: LIST FUNCTION SUCCESSFUL

USE '/PAGE+1' COMMAND OR PFK EQUIVALENT FOR NEXT SCHID

-Puis inscrire SR à Function, enter ; puis RESOLV.

-Refaire ensuite un SCHD,JOB pour vérifier que la fréquence a bien été supprimée.

= 17- Soumission de cédule de nuit sur demande (MSP) =

-Il arrive occasionnellement que Denis Dussault du MSP expédie des demandes de soumission de travaux en dehors des plages horaires où un opérateur est sur place pour voir à l'exécution desdits travaux.

Deux cédules ont été spécifiquement créées à cet effet dans CA-7 jusqu'à maintenant (voir ci-dessous):

Q113J996

Cédule: 100

Contact: Denis Dussault

Q113J997

Cédule: 100

Contact: Denis Dussault

D'autres cédules pourraient être créées au besoin via la commande SCHD,JOB (voir la procédure Création d'une nouvelle cédule de ce guide pour plus de détails).

Voici comment procéder pour les activer:

-Inscrire la top command SCHDMOD dans CA-7, enter (voir ci-dessous) :

schdmod 

-- CA-7 QUEUE MAINTENANCE - CPU JOBS STATUS (RQMTS) --

F-JOBNAME---J--I--E--U--N-SHJV F-JOBNAME---J--I--E--U--N-SHJV

M007J500. . . . . S M024J011. . . . . S JOB: *

M007J500. . . . . S M024J011. . . . . S SYS: *

M007J500. . . . . S M026J500. . . . . S SEQ: JOBNAME

M007J500. . . . . S M026J500. . . . . S QUEUE: REQ

M024J011. . . . . S M026J500. . . . . S LIST: ANY

M024J011. . . . . S M026J500. . . . . S FUNCTIONS:

M024J011. . . . . S M142J012. . . . . S C=CANCEL

M024J011. . . . . S Q032J252. . . . . *RST F=RESTART

M024J011. . . . . S Q113J292. . . . . S H=HOLD

M024J011. . . . . S Q113J293. . . . . S J=JCLOVRD

M024J011. . . . . S T800J501. . . . . S P=RSVP

M024J011. . . . . S T806J300. . . . . S Q=REQUEUE

M024J011. . . . . S T820JB34. . . . . S R=RELEASE

M024J011. . . . . S T820J050. . . . . S S=SUBTM OFF

M024J011. . . . . S T855JSCA. . . . . S U=UPDATE

M024J011. . . . . S T855J500. . . . . S V=VERIFY

M024J011. . . . . S T860J921. . . . . S X=RQMT POST

M024J011. . . . . S E=EDIT QJCL

PROGRAM: QM20 MSG-INDX: 00 -- QM.1-M -- 13.212 / 11:27:22

MESSAGE: ENTER FUNCTION IN 'F' FIELD OR ENTER A COMMAND ON THE TOP LINE

-Au tableau suivant, inscrire List à Function, QXXXJYYY à Job et inscrire le numéro de cédule (100) à SCHID, enter (voir ci-dessous):

--- CA-7 MODIFICATION TO RESOLVED SCHEDULE DATES ---

FUNCTION: list (FORMAT,LIST,UPD)

JOB: Q113j997 NETWORK: MODSTAT: 

SCHID: 100 YEAR:

1 1 2 2 3 3 LAST RESOLV:

....5....0 ....5....0 ....5....0 1

JAN

FEB

MAR

APR

MAY

JUN

JUL

AUG

SEP

OCT

NOV

DEC

PROGRAM: SM80 MSG-INDX: 00 -- DB.2.7 -- 13.212 / 11:29:24

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Au tableau suivant, inscrire UPD à Function et remplacer le "0" par un "1" à la date spécifiée dans la demande, enter (voir ci-dessous):

--- CA-7 MODIFICATION TO RESOLVED SCHEDULE DATES ---

FUNCTION: upd (FORMAT,LIST,UPD)

JOB: Q113J997 NETWORK: MODSTAT: CURRENT 

SCHID: 100 YEAR: 2013

1 1 2 2 3 3 LAST RESOLV: 13.130 / 16:02

....5....0 ....5....0 ....5....0 1

JAN 0000000000 0000000000 0000000000 0

FEB 0000000000 0000000000 00000000

MAR 0000000000 0000000000 0000000000 0

APR 0000000000 0000000000 0000000000

MAY 0000000000 0000000000 0000000000 0

JUN 0000000000 0000000000 1 000000000

JUL 0000000000 0000000000 0000000000 0

AUG 0000000000 0000000000 0000000000 0

SEP 0000000000 0000000000 0000000000

OCT 0000000000 0000000000 0000000000 0

NOV 0000000000 0000000000 0000000000

DEC 0000000000 0000000000 0000000000 0

PROGRAM: SM80 MSG-INDX: 00 -- DB.2.7 -- 13.212 / 11:32:54

MESSAGE: LIST FUNCTION SUCCESSFUL FOR SJ000278

-Faire de nouveau un List à Function pour vérifier si le changement est en force.

N.B.: Quand une nouvelle cédule est créée dans SCHD,JOB, il faut aller l'ajouter dans le membre RSLVMSP de la librairie T855P.CA7.LIST et dans les membres ID et FREQ.

= 18- Travail en SKELETON dans CA-7 =

-Voir dans CA-7 dans quelle librairie pointe le travail et vérifier s'il est effectivement présent dans la librairie.

-Aller dans la librairie SYSD.CA7.BROWSEDS et faire un Find du travail.

-Prendre note du code d'erreur (ex.: SATO-38) et des 4 premiers caractères du code JCL (ex.: 00009C1C) et se référer au Guide de référence des messages de CA-7 sous le choix Plate-forme de la Documentation électronique du CSPQ.

-Prendre action selon les recommandations du guide s'il y a lieu.

-Vérifier le JCL du travail dans CA-7.

-Quand l'erreur est trouvée, aviser l'analyste et faire un Cancel du travail dans CA-7 (CANCEL,JOB=XXX, FORCE=YES.)

-Resoumettre le travail via un DEMAND,JOB=Q032J022,SCHID=XXX où XXX correspond au numéro de cédule que vous aurez déterminé en vous référant au travail T855J500 (ici, SCHD=031).

-Si le numéro de cédule n'est pas requis, soumettre le Demand de la façon suivante: DEMAND,JOB=Q032J022,SET=NTR

= 19- Resolv =

La procédure des resolvs consiste à ajuster les dates d'exécution des cédules de production selon les particularités du calendrier de l'année courante.

-Les resolvs doivent être effectués deux fois par année; soit durant les mois de mai et juin et ensuite durant les mois d'octobre et novembre

-Imprimer la Liste des racines qui doivent faire l'objet de résolution manuelle (RSLVMANU), située dans la librairie '''T855P.CA7.CNTL. Utiliser le membre IMPRIME situé dans la même librairie pour l'imprimer ou imprimer le fichier Word''' situé à la fin de ce document.

-Imprimer la liste LSCHD,DSNBR=SJ* (dans la librairie T855P.CA7.CNTL(LSCHD)) en faisant un submit du travail. Cette liste affiche toutes les cédules de production.

Les resolvs des cédules de certains projets sont assez simples qu'un travail peut être soumis via une librairie (T855P.CA7.CNTL) pour les exécuter en batch, membre RSLV* ( *  = le # de projet, ex M013).

N.B. Pour les resolvs du MSP, il faut vérifier s'il n'y a pas de travaux (Q113J997, Q113J996 et Q118J992) qui ont été cédulés manuellement car ils seront effacés dans '''SCHDMOD. '''Il faudra alors de nouveau les programmer manuellement.

-On accède au membre, on y inscrit la date du jour dans les commentaires et on fait un sub à partir du membre (voir ci-dessous):

File Edit Edit_Settings Menu Utilities Compilers Test Help

¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢

EDIT T855P.CA7.CNTL(RSLVMSP) - 01.49 Columns 00001 00072

Command ===> SUB Scroll ===> CSR

****** ***************************** Top of Data ******************************

000001 //TO11$RSL JOB (T855,1060,10,10),'FRANCOIS',CLASS=B,NOTIFY=TO11$,

000002 // MSGCLASS=Q

000003 //*---*

000004 //* 14/10/10 *

000005 //* RESOLV *

000006 //* *

000007 //*---*

000008 //STEP1 EXEC CA7BT,ID=2

000009 //SYSIN DD *

000010 /LOGON TO11$,XXXXXX

000011 DBM

000012 SCHD

000013 JOB

000014 FE,JOB=Q501J998,SCAL=00

000015 EXIT

000016 REPL,JOB=Q501J998,SCAL=00

000017 RESOLV,JOB=Q501J998,SCAL=00

000018 DBM

000019 SCHD

Quand le travail est terminé, on le vérifie dans le held. On accède à l'endroit à vérifier en faisant un N 3. On coche ensuite toutes les racines qui ont été vérifiées sur la liste LSCHD.

19.1 Resolv manuel
-Dans un premier temps, il faut aller dans le membre ID de chacun des projets pour identifier les numéros de cédules à modifier et les inscrire sur le calendrier de l'année pour les six prochains mois à venir (voir à la section 18.5 pour un exemple de calendrier).

-Aller ensuite dans CA-7 pour effectuer les modifications nécessaires.

-Faire la commande SCHD,JOB dans CA-7 (voir ci-dessous):

SCHD,JOB

--MINISTERE DE LA JUSTICE(QUEBEC) (PF15 : FIN)-

CA-7.023 LOGON ACCEPTED, PRESS ENTER FOR MENU OR ENTER COMMAND

TSS7000I TO11$ Last-Used 11 Apr 11 08:16 System=JUSP Facility=CA7

TSS7001I Count=00437 Mode=Fail Locktime=None Name=FRANCOIS TREMBLAY

USERID : TO11$ TERMINAL NAME : CA7001 DATE : 11.101

VTAM APPLID : A18CA7 TIME : 09:03:34

LUNAME : A18MF003 LEVEL : r11.1(SP3 )

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCCCCCCCCCC AAAAAAAAAA 77777777777

CCC AAA AAA 7777

CCC AAAAAAAAAA 7777

CCC AAAAAAAAAA 7777

CCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

CCCCCCCCCCC AAA AAA 7777

Copyright (c) 2007 CA.

All rights reserved.

-Au tableau suivant (CA-7 CPU JOB Scheduling), inscrire FE à Function et le nom de la racine à Job, enter (voir ci-dessous): 

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: FE (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE)

JOB: M013J200

SCAL: (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 000

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 11.101 / 09:07:54

MESSAGE: ENTER FUNCTION, TRANSFER OR ENTER A COMMAND ON THE TOP LINE

-Effectuer les modifications de dates qui s'imposent dans la cédule, faire ensuite un REPL, enter (voir ci-dessous):

-- CA-7 CPU JOB SCHEDULING PARAMETER EDIT --

FUNCTION: REPL (ADD,DELETE,EXIT,FORMAT,LIST,REPL,SAVE,SR,SS)

JOB: M013J200 SCHID: 99 SCAL: ROLL: D INDEX: 000

DOTM LDTM SBTM -REPEAT--

1810 0010 1800 INTERVAL: 0000 TYPE: COUNT: 0000 STOP: 0000

__ __ DAILY

__ X __ WEEKLY SUN: MON: X TUE: X WED: X THU: X FRI: SAT:

__ X __ MONTHLY JAN: X FEB: X MAR: X APR: X MAY: X JUN: X

JUL: X AUG: X SEP: X OCT: X NOV: X DEC: X

WEEK: DAY-OF-WEEK:

RDAY: /1,/3

__ X __ ANNUAL DAY: /111,/174,/181,/357,/364

DEFAULT SCAL: 00

__ __ SYMETRIC START: SPAN: SCHID-COUNT: 022

PROGRAM: SM72 MSG-INDX: 00 -- DB.2.1-E -- 11.101 / 09:10:19

MESSAGE: LIST FUNCTION SUCCESSFUL

USE '/PAGE+1' COMMAND OR PFK EQUIVALENT FOR NEXT SCHID

-Passer à la cédule suivante en faisant un List et en appuyant sur F8 (voir ci-dessous): 

-- CA-7 CPU JOB SCHEDULING PARAMETER EDIT --

FUNCTION: LIST (ADD,DELETE,EXIT,FORMAT,LIST,REPL,SAVE,SR,SS)

JOB: M013J200 SCHID: 5 SCAL: ROLL: B INDEX: 000

DOTM LDTM SBTM -REPEAT--

1810 0010 1800 INTERVAL: 0000 TYPE: COUNT: 0000 STOP: 0000

__ __ DAILY

__ X __ WEEKLY SUN: MON: TUE: WED: THU: FRI: X SAT:

__ X __ MONTHLY JAN: X FEB: X MAR: X APR: X MAY: X JUN: X

JUL: X AUG: X SEP: X OCT: X NOV: X DEC: X

WEEK: /1 DAY-OF-WEEK: FRI

RDAY: /3

__ __ ANNUAL DAY:

DEFAULT SCAL: 00

__ __ SYMETRIC START: SPAN: SCHID-COUNT: 022

PROGRAM: SM72 MSG-INDX: 00 -- DB.2.1-E -- 11.109 / 11:40:38

MESSAGE: LIST FUNCTION SUCCESSFUL

USE '/PAGE+1' COMMAND OR PFK EQUIVALENT FOR NEXT SCHID

-Procéder à la modification de la cédule suivante et effectuer de nouveau un REPL puis faire un List et appuyer sur F8.

Procéder ainsi jusqu'à la dernière cédule de la racine.

-On inscrit alors SR (SAVE and REPLACE) à Function, enter (voir ci-dessous):

-- CA-7 CPU JOB SCHEDULING PARAMETER EDIT --

FUNCTION: SR (ADD,DELETE,EXIT,FORMAT,LIST,REPL,SAVE,SR,SS)

JOB: M013J200 SCHID: 182 SCAL: ROLL: D INDEX: 000

DOTM LDTM SBTM -REPEAT--

1810 0010 1800 INTERVAL: 0000 TYPE: COUNT: 0000 STOP: 0000

__ __ DAILY

__ __ WEEKLY SUN: MON: TUE: WED: THU: FRI: SAT:

__ X __ MONTHLY JAN: FEB: MAR: APR: MAY: JUN:

JUL: AUG: X SEP: OCT: NOV: DEC:

WEEK: 1 DAY-OF-WEEK: FRI

RDAY: /2,/3,/4,/5,/6,/7

__ __ ANNUAL DAY:

DEFAULT SCAL: 00

__ __ SYMETRIC START: SPAN: SCHID-COUNT: 022

PROGRAM: SM72 MSG-INDX: 00 -- DB.2.1-E -- 11.101 / 09:16:05

MESSAGE: LIST FUNCTION SUCCESSFUL

-Puis Resolv au tableau suivant, enter (voir ci-dessous):

- CA-7 CPU JOB SCHEDULING ---

FUNCTION: RESOLV (CLEAR,DELETE,EDIT,FE,FETCH,REPL,RESOLV,SAVE)

JOB: M013J200

SCAL: 00 (DEFAULT SCAL ID FOR ADDS)

SCHID-COUNT: 022

PROGRAM: SM71 MSG-INDX: 00 -- DB.2.1 -- 11.101 / 09:30:10

MESSAGE: REPL FUNCTION SUCCESSFUL FOR SJ000004

SCHEDULE MUST BE RESOLVED

-Appuyer de nouveau sur enter pour avancer d'une page à l'autre. Voir ci-dessous:

RESOLV,TEST=NO,PRINT=YES,OLDYR=*,JOB=M013J200

CA-7 SCHEDULE / BASE CALENDAR RESOLUTION

DATE 11.109 TIME 13:22:43 PAGE NO. 0001

OPTIONS: YEAR=11 SCAL=00 JOB=M013J200

TEST=NO PRINT=YES DUPDATE=NO

0001 SCHEDULES SELECTED FOR RESOLUTION

***** SCHEDULE RESOLUTION STARTED FOR SJ000004 JOB=M013J200

** SCHEDULE DATA :

ID=099 ROLL=D INDEX=+000

SCAL= DOTM=1810 LEADTM=0010 SUBTM=1800 STARTM=1800

WEEKLY DAY=MON,TUE,WED,THU

MONTHLY NRDAY=01 MONTH=ALL

MONTHLY NRDAY=03 MONTH=ALL

ANNUAL NDAY=111

ANNUAL NDAY=174

ANNUAL NDAY=181

ANNUAL NDAY=357

ANNUAL NDAY=364

**SCHEDULE DAYS ROLL STARTED : ROLL=D

JAN 03 (DAY# 003) FALLS ON A NON-SCHEDULE DAY : SCHEDULE DAY OMITTED

-Vérifier s'il n'y a pas de messages de Warning de plus qu'une cédule par jour. Voir ci-dessous:

RESOLV,TEST=NO,PRINT=YES,OLDYR=*,JOB=M013J200

CA-7 SCHEDULE / BASE CALENDAR RESOLUTION

DATE 11.109 TIME 13:22:43 PAGE NO. 0003

OPTIONS: YEAR=11 SCAL=00 JOB=M013J200

TEST=NO PRINT=YES DUPDATE=NO

SRC1-113 DEC 23 (DAY# 357) ROLLED BACKWARD TO DEC 22 (DAY# 356)

SRC1-113 DEC 30 (DAY# 364) ROLLED BACKWARD TO DEC 29 (DAY# 363)

**SCHEDULE DAYS ROLL COMPLETED

SRC1-117 (W) ID MULTIPLE SCHEDULES AT LEAST ONE DAY

**SCHEDULE DATA :

ID=100 ROLL=D INDEX=+000

SCAL= DOTM=1810 LEADTM=0010 SUBTM=1800 STARTM=1800

MONTHLY NDAY=FRI WEEK=01 MONTH=3,5,6,9,10,11,12

MONTHLY RDAY=01 MONTH=3,5,6,9,10,11,12

**SCHEDULE DAYS ROLL STARTED : ROLL=D

**SCHEDULE DAYS ROLL COMPLETED

**SCHEDULE DATA :

ID=105 ROLL=B INDEX=+000

SCAL= DOTM=1810 LEADTM=0010 SUBTM=1800 STARTM=1800

MONTHLY DAY=FRI WEEK=01 MONTH=5,10,11

MONTHLY NRDAY=02 MONTH=5,10,11

MONTHLY NRDAY=03 MONTH=5,10,11

-Si un message de MULTIPLE SCHEDULES AT LEAST ONE DAY s'affiche, accéder au travail T855J512 de la librairie T855P.CA-7.CNTL et suivre la procédure Soumission du travail T855J512 décrite à la page 50.

-Et vérifier aussi si les différentes cédules s'exécutent comme prévu sur les mois du calendrier de '''CA-7. '''Voir ci-dessous:

RESOLV,TEST=NO,PRINT=YES,OLDYR=*,JOB=M013J200

CA-7 SCHEDULE / BASE CALENDAR RESOLUTION

DATE 11.109 TIME 13:22:44 PAGE NO. 0015

OPTIONS: YEAR=11 SCAL=00 JOB=M013J200

TEST=NO PRINT=YES DUPDATE=NO

*******************************************************************************

* CA-7 SCHEDULE CALENDAR FOR SJ000004 *

* DATE 11109 *

* BASE CALENDAR SCAL1100 (DEFAULT) *

*******************************************************************************

* MONTH 01 JAN *

* SUN MON TUE WED THU FRI SAT *

* *

* 05 06 07 *

* 10 11 12 13 14 *

* 17 18 19 20 21 *

* 24 25 26 27 28 *

* 31 *

*******************************************************************************

19.2 Soumission du travail T855J512
Pour les gros projets (ex.: M012, M013), ou lors de messages de conflits (Warning !), on utilise le travail T855J512 de la librairie T855P.CA-7.CNTL pour valider que les cédules appropriées s'exécutent aux jours requis et qu'il n'y en a bien qu'une seule; à moins qu'il n'y en ait plus qu'une mais cédulées à des heures différentes.

Voici comment procéder:

-Aller à la ligne 19 du travail pour saisir le nom du travail de tête de la cédule, la date de la période et modifier le SPAN à 8784 si 366 jours (année bissextile), sinon le laisser à 8760 :

(FJOB,FROM=( MMJJAA ),JOB= MXXXJXXX ,SPAN= 8760 ,TRIG=N (voir ci-dessous):

File Edit Edit_Settings Menu Utilities Compilers Test Help

¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢

EDIT T855P.CA7.CNTL(T855J512) - 01.99 Columns 00001 00072

Command ===> SUB Scroll ===> CSR

000002 // MSGCLASS=Q,NOTIFY=TO11$

000003 //* ***********************************************************

000004 //* * *

000005 //* * VERIFICATION DU CALENDRIER D'UN TRAVAIL *

000006 //* * ENTRER LA PERIODE "FJOB,FROM=(MMJJAA),..." *

000007 //* * ENTRER LE NOM DU TRAVAIL: "FJOB,...JOB=TXXX$XXX,..." *

000008 //* * SPAN=8784 (VALEUR MAX. ÉQUIVAUT À 366 JOURS) *

000009 //* * 8760 365 JOURS *

000010 //* ***********************************************************

000011 //ETAPE01 EXEC PGM=SASSBSTR,PARM=3

000012 //UCC7CMDS DD DISP=SHR,DSN=SYSD.CA7.COMMDS

000013 //BATCHIN DD DISP=SHR,DSN=SYSD.CA7.BATCH#3I

000014 //BATCHOUT DD DISP=SHR,DSN=SYSD.CA7.BATCH#3O

000015 //SYSPRINT DD SYSOUT=*

000016 //SYSUDUMP DD SYSOUT=D

000017 //SYSIN DD *

000018 /LOGON UCC7RD,UCC7RD

000019 FJOB,FROM=( 010111 ),JOB= M013J200 ,SPAN= 8760 ,TRIG=N

000020 /LOGOFF

. . . . . . . . . . . . . . . . . . . . . . . . . ..

-Soumettre le travail et à la fin de son exécution, vérifier dans le held à la fin du travail, la cause des conflits de collisions de cédules et corriger. Voir ci-dessous:

SDSF OUTPUT DISPLAY TO11$FRK JOB08396 DSID 103 LINE 300 COLUMNS 02- 81

COMMAND INPUT ===> SCROLL ===> CSR

11356/1809 11356/1810 M013J200 M013 SJ000004 099

11356/1809 11356/1810 M013J200 M013 SJ000004 005

11362/1809 11362/1810 M013J200 M013 SJ000004 099

11363/1809 11363/1810 M013J200 M013 SJ000004 099

11363/1809 11363/1810 M013J200 M013 SJ000004 005

SFC1-00 REQUEST COMPLETED AT 13:51:23 ON 11.109

11109 135123 /LOGOFF

CA-7.024 - r11.1(SP3 ) OPERATOR AT TERMINAL (BT#3 ) LOGGED OFF AT 13:51:23 ON

READY

%VERISCHD

ERREUR1

11356/1809 11356/1810 M013J200 M013 SJ000004 099

11356/1809 11356/1810 M013J200 M013 SJ000004 005

ERREUR2

11363/1809 11363/1810 M013J200 M013 SJ000004 099

11363/1809 11363/1810 M013J200 M013 SJ000004 005

VERIFICATION TERMINEE POUR LE TRAVAIL: M013J200

READY

END

. . . . . . . . . . . . . . . . . . . . . . . . . ..

-Ci-dessus, on voit qu'il y a deux cédules (99 et 5) qui s'exécutent pour les journées juliennes 356 et 363.

-On peut aussi valider jour par jour, le numéro des cédules qui vont s'exécuter pour la prochaine année. Voir ci-dessous:

SDSF OUTPUT DISPLAY TO11$FRK JOB08396 DSID 103 LINE 27 COLUMNS 02- 81

COMMAND INPUT ===> SCROLL ===> CSR

FJOB DATE 04-19-11 PAGE 0001

FORECAST FOR CA-7 JOBS

PERIOD : 01-01-11 AT 0000 HRS TO 12-31-11 AT 2400 HRS

START DTTM END DTTM JOB SYS SCHED# SID TRIGGERING JOB/DSN RQMT

11005 /1809 11005/1810 M013J200 M013 SJ000004 110

11006 /1809 11006/1810 M013J200 M013 SJ000004 099

11007 /1809 11007/1810 M013J200 M013 SJ000004 153

11010 /1809 11010/1810 M013J200 M013 SJ000004 099

11011 /1809 11011/1810 M013J200 M013 SJ000004 099

11012 /1809 11012/1810 M013J200 M013 SJ000004 099

11013 /1809 11013/1810 M013J200 M013 SJ000004 099

11014 /1809 11014/1810 M013J200 M013 SJ000004 005

11017 /1809 11017/1810 M013J200 M013 SJ000004 099

11018 /1809 11018/1810 M013J200 M013 SJ000004 099

11019 /1809 11019/1810 M013J200 M013 SJ000004 099

11020 /1809 11020/1810 M013J200 M013 SJ000004 099

11021 /1809 11021/1810 M013J200 M013 SJ000004 005

11024 /1809 11024/1810 M013J200 M013 SJ000004 099

11025 /1809 11025/1810 M013J200 M013 SJ000004 099

. . . . . . . . . . . . . . . . . . . . . . . . . ..

-Quand tous les resolvs auront été exécutés, aller dans CA-7 et effectuer la commande LSCHD,DSNBR=SJ * pour vérifier si toutes les cédules sont valides jusqu'en janvier, si on a effectué les resolvs du printemps; et si elles sont valides jusqu'en juillet, si on a effectué les resolvs d'automne (voir ci-dessous):

LSCHD,DSNBR=SJ*

LIST= DSNBR=SJ* DATE=11.101 PAGE 0006

JOB SYSTEM SCHEDULE #SCH -BASE CALENDAR- PROSE COMMENTS

NAME NAME NUMBER IDS USERID B-DATE NUM

T806J901 T806 SJ000164 001 SCAL1000 09183 *NONE* JULY SCHEDULE

T855J502 T855 SJ000167 001 SCAL1000 09183 *NONE* JULY SCHEDULE

T855J503 T855 SJ000169 001 SCAL1000 09183 *NONE* JULY SCHEDULE

Q032J001 Q032 SJ000170 001 SCAL1000 09183 *NONE* JULY SCHEDULE

T855J511 T855 SJ000171 001 SCAL1000 09183 *NONE* JULY SCHEDULE

N001J001 N001 SJ000172 002 SCAL1000 09183 *NONE* JULY SCHEDULE

M026J000 M026 SJ000173 003 SCAL1000 09183 *NONE* JULY SCHEDULE

M142J052 M142 SJ000175 001 SCAL1000 09183 *NONE* JULY SCHEDULE

Q113J960 Q113 SJ000178 001 SCAL1000 09183 *NONE* JULY SCHEDULE

T806JRXJ T806 SJ000179 002 SCAL1000 09183 *NONE* JULY SCHEDULE

Q113J958 Q113 SJ000181 001 SCAL1000 09183 *NONE* JULY SCHEDULE

N001J003 N001 SJ000182 003 SCAL1000 09183 *NONE* JULY SCHEDULE

T860J708 T860 SJ000183 001 SCAL1000 09183 *NONE* JULY SCHEDULE

T806J300 T806 SJ000184 001 SCAL1000 09183 *NONE* JULY SCHEDULE

M024A000 M024 SJ000185 001 SCAL1000 09183 *NONE* JULY SCHEDULE

T855J600 T855 SJ000187 001 SCAL1000 09183 *NONE* JULY SCHEDULE

19.3 Particularités de certaines racines
G901J006 (Paie du MSP): Saisir la date du lundi aux deux semaines selon le calendrier de la SAGIP (fournit par Georgette Lévesque et dont on laisse une copie dans la chemise du projet Q032).

-Si le lundi est férié, choisir la prochaine journée ouvrable suivante.

-La première date de production de la cédule 34 est déterminée par Jean-Michel Cameron du MSP. Il y a 3 ou 4 lundis de paie consécutifs situés durant les mois de mars et avril pour cette cédule.

-On peut tout de même déterminer cette première date en utilisant la date de fin de la période de paie variable du calendrier de SAGIP et informer Jean-Michel Cameron de ces dates.

-Faire attention à la dernière paie de décembre qui est souvent devancée d'une semaine.

G901J252 (Paie du MSP): Saisir la date du mercredi aux deux semaines selon le calendrier de la SAGIP. Ne pas saisir de date durant 3 périodes de paie durant les mois de mars et avril pour la cédule 33. Les dates exactes sont précisées d'avance par Jean-Michel Cameron.

G901J25X (Paie du MSP): Saisir la date des 3 mercredis de paie aux deux semaines qui n'auront pas été saisis durant les mois de mars et avril pour la cédule 33 du travail G901J252 (voir ci-dessus) selon le calendrier de la '''SAGIP. '''Les dates exactes sont précisées d'avance par Jean-Michel Cameron.

M142J020 : Exclure les lendemains de jours fériés dans les cédules 99 et 5 et extraire les dates du Vendredi Saint (091), de la Saint-Jean-Baptiste (174), de la Confédération (182) et journées fériées des Fêtes (357, 364) de la cédule 99 si elles tombent un vendredi, et les ajouter dans la cédule 5.

M142J052 : Rien à modifier à moins d'une année bissextile. Ne pas oublier de remodifier les dates après ladite année bissextile.

Q113JDEB : Exclure les 5e dimanche pour la cédule 7 et les ajouter pour la cédule '''57. '''Poursuivre la série d'une année à l'autre.

Q113J958 : Rien à modifier à moins d'une année bissextile. Ne pas oublier de remodifier les dates après ladite année bissextile.

Q113J297 : 9e jour de chaque mois. Rien à modifier à moins d'une année bissextile. Ne pas oublier de remodifier les dates après ladite année bissextile.

Q143JDUM : Rien à modifier à moins d'une année bissextile (cédules 231,110).

M002J950 : Exclure les lendemains de jours fériés

M008J000 : Saisir les journées juridiques (%) de l'année pour la cédule 12

M010J501 (complexe) : Entre autre, exclure le jeudi saint et l'avant-veille de Noël et parfois la veille de la St-Jean et de la Confédération si elles tombent un vendredi pour la cédule 99; conflit entre cédule 5 et 210 pour la date julienne '''364. Exclure la journée 365 dans la cédule 5''' car roll back. Même chose pour 181: exclure la journée 182. Exclure les journées où la cédule 210 s'exécute dans la cédule 121. Exécuter la T855J512 pour valider.

M010J518 : 26e jour de chaque mois. Rien à modifier à moins d'une année bissextile. Ne pas oublier de remodifier les dates après ladite année bissextile.

M012J000 / M012A000 : Saisir minutieusement les numéros de cédules sur le calendrier avant de procéder au resolv. Exclure les dates des jeudis ou la cédule 5 va exceptionnellement s'exécuter à cause d'un jour férié tombant un vendredi (ex.: Jeudi Saint, veille de la St-Jean-Baptiste et de la Confédération) dans la cédule '''99. Exclure les vendredis où d'autres cédules s'exécutent (ex cédules 145, 155) pour la cédule 5'''. Exclure les dates de la cédule 105 dans la cédule 100. Exécuter le travail T855J512 pour valider.

M013J200 (complexe) : Saisir minutieusement les numéros de cédules sur le calendrier avant de procéder au resolv. La cédule journalière (99) de ce projet s’exécute le dimanche également. Extraire les journées fériées dans la cédule 99. Extraire les jeudis suivi d'une journée fériée (ex.: Jeudi Saint, veille de la St-Jean-Baptiste et de la Confédération, Noël, Jour de l'An, etc.) dans la cédule '''99. Extraire le 91 pour la cédule 140 '''(jeudi saint). Extraire le 92 de la cédule 150 (vendredi saint). Exécuter le travail T855J512 pour valider.

M013A200 : La cédule journalière (99) de ce projet s’exécute le dimanche également. Extraire les journées fériées dans la cédule 99. Extraire le Jeudi Saint, ou le jeudi précédent la Saint-Jean-Baptiste et la Fête du Canada si ces deux fêtes tombent un vendredi dans la cédule 99, car ce sera une cédule 5 qui s’exécutera ce jour-là. Extraire les dates où la cédule 105 s’exécute dans la cédule 5.

M013JDU1 : Extraire le 3e mercredi de janvier dans la cédule 99 pour permettre l’exécution de la cédule annuelle 131; Extraire les journées fériés dans la cédule 99.

M013J029 : Effectuer le resolv et vérifier ensuite si la date enregistrée est bien le 4e vendredi ouvrable  du mois de janvier sinon, saisir la date manuellement.

M022J000 : Exclure les dates du Jeudi Saint, de la Saint-Jean-Baptiste, de la Confédération ou de la période des Fêtes si elles tombent un vendredi dans la cédule 99. Exclure la 365 dans la cédule 5 car roll back et parfois conflit entre cédule 5 et 205 pour la date julienne '''364. Ajouter la journée 91 pour la cédule 105 et l'exclure pour la 100. Exclure la 175 dans la cédule 205. (T855J512)'''

M022A000 : Comme la M022J000, mais sans les fréquences 200, '''205 et 231. '''(T855J512)

M024J000 : Saisir les dates juliennes fériées pour la cédule 7.

M024A018 : Extraire les lendemains de jours fériés pour la cédule 99.

M025J000 : Saisir les journées juridiques (%) de l'année en cours pour la cédule 99.

M026J000 : La cédule s’exécute du mardi au samedi. Saisir manuellement le premier jour ouvrable (mardi au samedi) de chaque mois pour la cédule 100 (complexe). Extraire les lendemains de jours fériés et les jours où roulera la cédule 100 pour la cédule 99 (à faire en deux temps).

M026A500 : Exclure les lendemains de jours fériés

M107J000 : Exclure les jeudis de la cédule 5 (Jeudi Saint, Saint-Jean-Baptiste, si ces deux jours tombent un vendredi, l'avant-veille de Noël et du Jour de l'An) dans la cédule 99.

N001JAUD – N001J003 : Rien à modifier à moins d'une année bissextile ou l'année suivant une année bissextile pour les cédules 99 et 100

Q032J001 : Extraire les mardis précédés d'une journée fériée

Q032J002 : Extraire les mercredis précédés d'une journée fériée

Q032J003 : Extraire les jeudis précédés d'une journée fériée

Q032J004 : Extraire les vendredis précédés d'une journée fériée

Q032J005 : Extraire les samedis précédés d'une journée fériée

Q032J006 : Saisir les lundis suivant la semaine de paie d'après le calendrier opérationnel du SAGIP. Devrait correspondre à la date inscrite dans la colonne de gauche sous Acheminement des données (il peut être indiqué une autre journée que lundi pour la première date de janvier sur ce calendrier, si elle tombe sur un jour férié. Choisir alors le lundi précédent cette date même si elle est fériée). Le calendrier SAGIP est fourni par Georgette Lévesque

Q032J011 : Saisir les mercredis suivant la semaine de paie d'après le calendrier opérationnel du SAGIP. Devrait correspondre au mercredi suivant la date inscrite dans la colonne de gauche sous '''Acheminement des données. Le calendrier SAGIP est fourni par Georgette Lévesque'''

Q032J400 : Saisir les mardis suivant la semaine de paie d'après le calendrier opérationnel du SAGIP. Devrait correspondre au mardi suivant la date inscrite dans la colonne de gauche sous '''Acheminement des données. Le calendrier SAGIP est fourni par Georgette Lévesque'''

T855J500 :

-Extraire les journées du lundi au jeudi où une autre cédule roule pour la cédule 99.

-Extraire les vendredis précédents la fête des Patriotes, la fête du Travail et l'Action de Grâce de la cédule 5.

-Saisir la journée du Jeudi Saint pour la cédule 80.

-Saisir les vendredis précédents la fête des Patriotes, la St-Jean-Baptiste et la Confédération (si elles tombent un lundi ou un vendredi), la fête du Travail et l'Action de Grâce dans la cédule 81 et exclure ces date de la cédule 5.

-Saisir la date précédant un congé dans le milieu de la semaine, habituellement la St-Jean-Baptiste et la Confédération pour la cédule 82.

-Saisir la journée précédant les congés de Noël et du Jour de l'An pour la cédule 83 si le congé des Fêtes arrive durant la fin de semaine ou juste avant ou juste après (autrement dit, qu'il n'y a pas de jour ouvrable entre le congé des Fêtes et la fin de semaine, exemple: lundi, mardi, mercredi ou mercredi, jeudi, vendredi fériés). 

-Utiliser la cédule 81, si les congés de Noël et du Jour de l'An arrivent en milieu de semaine.

T860J951: Extraire les lendemains de jours fériés pour la cédule 95.

19.4 Liste des racines qui doivent faire l'objet de résolution manuelle
- MSP –

G901J006 – G901J252 – G901J25X

M142J020 – M142J052

Q113JDEB – Q113J958 – Q113J297

Q143JDUM

- MJQ –

$UNIVERSE (ORSYP / AUTOMIC)

M002J950

M008J000

M010J501 – M010J518

M012J000 – M012A000 

M013J200 - M013A200 – M013JDU1 – M013J029

M022J000 – M022A000

M024J000 – M024A018

M025J000

M026J000 - M026A500

M107J000

N001JAUD – N001J003

Q032J001 – Q032J002 – Q032J003 – Q032J004 – Q032J005 – Q032J006 – Q032J011 – Q032J400

T855J500

T860J951

19.5 Exemple de calendrier
CALENDRIER 2011

JANVIER FEVRIER MARS AVRIL MAI JUIN

S 01 001

D 02 002 D 01 121

%L 03 003 L 02 122

%M 04 004 M 01 032 M 01 060 M 03 123

M 05 005 M 02 033 M 02 061 M 04 124 M 01 152

J 06 006 J 03 034 J 03 062 J 05 125 J 02 153

V 07 007 V 04 035 V 04 063 V 01 091 V 06 126 V 03 154

S 08 008 S 05 036 S 05 064 S 02 092 S 07 127 S 04 155

D 09 009 D 06 037 D 06 065 D 03 093 D 08 128 D 05 156

L 10 010 L 07 038 L 07 066 L 04 094 L 09 129 L 06 157

M 11 011 M 08 039 M 08 067 M 05 095 M 10 130 M 07 158

M 12 012 M 09 040 M 09 068 M 06 096 M 11 131 M 08 159

J 13 013 J 10 041 J 10 069 J 07 097 J 12 132 J 09 160

V 14 014 V 11 042 V 11 070 V 08 098 V 13 133 V 10 161

S 15 015 S 12 043 S 12 071 S 09 099 S 14 134 S 11 162

D 16 016 D 13 044 D 13 072 D 10 100 D 15 135 D 12 163

L 17 017 L 14 045 L 14 073 L 11 101 L 16 136 L 13 164

M 18 018 M 15 046 M 15 074 M 12 102 M 17 137 M 14 165

M 19 019 M 16 047 M 16 075 M 13 103 M 18 138 M 15 166

J 20 020 J 17 048 J 17 076 J 14 104 J 19 139 J 16 167

V 21 021 V 18 049 V 18 077 V 15 105 V 20 140 V 17 168

S 22 022 S 19 050 S 19 078 S 16 106 S 21 141 S 18 169

D 23 023 D 20 051 D 20 079 D 17 107 D 22 142 D 19 170

L 24 024 L 21 052 L 21 080 L 18 108  *L 23 143  L 20 171

M 25 025 M 22 053 M 22 081 M 19 109 M 24 144 M 21 172

M 26 026 M 23 054 M 23 082 M 20 110 M 25 145 M 22 173

J 27 027 J 24 055 J 24 083 J 21 111 J 26 146 J 23 174

V 28 028 V 25 056 V 25 084  *V 22 112  V 27 147  *V 24 175 

S 29 029 S 26 057 S 26 085 S 23 113 S 28 148 S 25 176

D 30 030 D 27 058 D 27 086 D 24 114 D 29 149 D 26 177

L 31 031 L 28 059 L 28 087  *L 25 115  L 30 150 L 27 178

M 29 088 M 26 116 M 31 151 M 28 179

M 30 089 M 27 117 M 29 180

J 31 090 J 28 118 J 30 181

V 29 119

S 30 120

 *  CONGÉS FÉRIÉS NON-JURIDIQUES

% CONGÉS FÉRIÉS MAIS JURIDIQUES

CALENDRIER 2011

JUILLLET AOUT SEPTEMBRE OCTOBRE NOVEMBRE DECEMBRE

S 01 274

D 02 275

L 01 213 L 03 276

M 02 214 M 04 277 M 01 305

M 03 215 M 05 278 M 02 306

J 04 216 J 01 244 J 06 279 J 03 307 J 01 335

 *V 01 182  V 05 217 V 02 245 V 07 280 V 04 308 V 02 336

S 02 183 S 06 218 S 03 246 S 08 281 S 05 309 S 03 337

D 03 184 D 07 219 D 04 247 D 09 282 D 06 310 D 04 338

L 04 185 L 08 220  *L 05 248   *L 10 283  L 07 311 L 05 339

M 05 186 M 09 221 M 06 249 M 11 284 M 08 312 M 06 340

M 06 187 M 10 222 M 07 250 M 12 285 M 09 313 M 07 341

J 07 188 J 11 223 J 08 251 J 13 286 J 10 314 J 08 342

V 08 189 V 12 224 V 09 252 V 14 287 V 11 315 V 09 343

S 09 190 S 13 225 S 10 253 S 15 288 S 12 316 S 10 344

D 10 191 D 14 226 D 11 254 D 16 289 D 13 317 D 11 345

L 11 192 L 15 227 L 12 255 L 17 290 L 14 318 L 12 346

M 12 193 M 16 228 M 13 256 M 18 291 M 15 319 M 13 347

M 13 194 M 17 229 M 14 257 M 19 292 M 16 320 M 14 348

J 14 195 J 18 230 J 15 258 J 20 293 J 17 321 J 15 349

V 15 196 V 19 231 V 16 259 V 21 294 V 18 322 V 16 350

S 16 197 S 20 232 S 17 260 S 22 295 S 19 323 S 17 351

D 17 198 D 21 233 D 18 261 D 23 296 D 20 324 D 18 352

L 18 199 L 22 234 L 19 262 L 24 297 L 21 325 L 19 353

M 19 200 M 23 235 M 20 263 M 25 298 M 22 326 M 20 354

M 20 201 M 24 236 M 21 264 M 26 299 M 23 327 M 21 355

J 21 202 J 25 237 J 22 265 J 27 300 J 24 328 J 22 356

V 22 203 V 26 238 V 23 266 V 28 301 V 25 329 %V 23 357

S 23 204 S 27 239 S 24 267 S 29 302 S 26 330 S 24 358

D 24 205 D 28 240 D 25 268 D 30 303 D 27 331 D 25 359

L 25 206 L 29 241 L 26 269 L 31 304 L 28 332  *L 26 360 

M 26 207 M 30 242 M 27 270 M 29 333 %M 27 361

M 27 208 M 31 243 M 28 271 M 30 334 M 28 362

J 28 209 J 29 272 J 29 363

V 29 210 V 30 273 %V 30 364

S 30 211 S 31 365

D 31 212 D 1 001

 *L 2 002

 *  CONGÉS FÉRIÉS NON-JURIDIQUES %M 3 003

% CONGÉS FÉRIÉS MAIS JURIDIQUES

= Annexe 1 - Liste des membres et des travaux utilitaires (T855) de CA-7 =

La librairie T855P.CA7.CNTL contient plusieurs membres qui permettent d'exécuter des travaux en batch dans CA-7. Leur titre est habituellement assez représentatif des tâches qu'ils peuvent accomplir (ADDSCHID, DELJOB, FORECAST, FSTRUC, etc).

Librairie T855P.CA7.CEDULE (FREQ, ID, ORGA)

3 membres pour chaque projet:

-FREQ: Nom et description de tous les travaux d'un projet selon leurs fréquences

-ID: Description de chacune des fréquences utilisées par l'application

-ORGA: Organigramme des projets

T855J500: Ce travail s'exécute tous les jours ouvrables à midi et donne les cédules avec les travaux qui sont prévues pour les prochaines 28 heures durant la semaine et pour les prochaines 76 heures pour les fins de semaine. On le retrouve en held.

Si on a besoin de prévision d'exécution plus spécifique concernant un projet où une période donnée, on peut aussi soumettre un travail via le membre FORECAST de la librairie TO11$.CA7.UTIL en y précisant les paramètres requis.

T855J504:Travail qui affiche le déroulement des travaux qui se sont exécutés durant les derniers 24 heures.

T855J510: Travail qui contient le log des commandes effectuées dans CA-7

T855J512: Travail qui produit une liste des exécutions d'une racine pour une période d'un an, afin de détecter les collisions (cédulée plus d'une fois par jour) ou les journées manquantes. (Utilisé lors des resolvs).

T855J513: Travail qui rend permanents (vs "norm", c.a.d. impliquant une requête) les nouveaux fichiers. Ce travail s'exécute à 15h30 tous les jours.

T855J999: Copie de sécurité de toutes les queues de CA-7 effectués tous les matins, 7 jours sur 7 vers 07h00.

T855JOGP: Travail de vidange du log courant de CA-7.

T855JWLB: Travail qui modifie certaines ressources disponibles pour les travaux, tel que les initiateurs et les tapes drives. Le travail est présentement inactif (sur demande, no exec).

La librairie SYSD.CA7.BROWSEDS nous permet de voir le log complet de CA-7.

On peut aussi faire un DA de CA7 dans SDSF, faire un " ? " devant la tâche et faire un " S " devant la sous-tâche JESMSGLG.

= Annexe 2 - Commandes et informations utiles dans CA-7 =

/<ARR CA7 : Pour arrêter CA7.

/<DEP CA7 : Pour repartir CA7.

CANCEL,JOB=XXX,FORCE=YES: Pour supprimer un travail en attente dans le céduleur (XXX = # de job qu'on peut voir dans LQ).

DELPRRN: Pour supprimer les statistiques d'un travail qui n'existe plus (à faire après un list d'un travail).

DEMAND,JOB=XXXXXXXX,SCHID=YYY: Pour soumettre un travail via CA-7, si on veut que la suite de la production s'exécute (PF2).

DEMAND,JOB=XXXXXXXX,SET=NTR : Pour soumettre un travail via CA-7, sans que la production se poursuive. (PF14).

DEMAND,JOB=XXXXXXXX,SCHID=XXX,DATE=AAJJJ,TIME=HHMM : Pour soumettre un travail via CA-7 à une date et à une heure précise.

/DISPLAY,ST=JCL : Pour obtenir la liste des librairies connues de CA-7 ainsi que l'index correspondant.

FJOB,FROM=(mmjjaa,0800),TO=(mmjjaa,1500),JOB=* : Pour faire un forecast des travaux qui s'exécuterons durant la plage spécifiée au champ FROM

FRJOB,JOB=xxxxJxxx (ou FRQJOB): Donne un « reverse jobflow », le but de cette commande est d’identifié comment cette job a pu être amenée dans le système. C’est un forecast à l’envers.

FSTRUC,SCHID=99,JOB=M012J230: Pour vérifier le déroulement adéquat de la cédule. N.B.: pour afficher sur papier, aller dans membre FSTRUC de la librairie T855P.CA7.CNTL, inscrire le nom du travail et le numéro de cédule à la ligne 18 et soumettre. La liste s'imprimera sur l'imprimante spécifiée à la ligne 13.

JOBCONN,JDEP pour gérer les dépendances de travaux, pour aller supprimer les dépendances et les triggers.

JOBCONN,USR pour ajouter une requête à un travail.

LJOB,EXEC=N,JOB=T804J* pour afficher la liste des travaux à NOEXEC pour un projet.

LJOB,JCLID=X,JOB=T804J* pour afficher la liste pour un projet pointant sur une librairie (X =librairie).

LJOB,JOB=M013J086,LIST=ALL pour obtenir toute l'information relative à un travail.

LQ: Liste des travaux qui se trouvent dans les queues de CA-7 (PF22).

LPRRN,JOB=M012J000,SEQ=JOB pour connaître la dernière date d'exécution d'un travail

LRLOG,JOB=M013* pour faire afficher la liste des travaux qui ont fini d'exécuter pour un projet donné.

ou LRLOG,JOB=M013*,SEQ=REV pour l'afficher dans l'ordre inverse

LSCHD,DSNBR=SJ* pour obtenir la liste des racines des travaux dans CA-7.

POST,JOB=T855JDU1,USR=TEST-$UNIVERS pour satisfaire la requête d'un travail dans le request queue dans CA-7

SCHD,JOB: Pour accéder au menu général des cédules de production.

SCHD,JTRG: Pour voir la liste des travaux relâchés par un travail donné.

SCHDMOD: Pour aller modifier la date d'exécution d'une cédule.

SSCAN,SCAN=HLD: Pour mettre en retenu d'exécution tous les travaux qui entre dans CA-7.

SSCAN,SCAN=REL pour relâcher tous les travaux qui ont été mis en retenu d'exécution dans CA-7.

SSCAN: Pour voir les paramètres de chargement des travaux dans CA-7 (présentement, le chargement s'effectue à toutes les heures à la demie pour deux heures)

XQM: Liste des travaux ayant une ou plusieurs requêtes pas encore satisfaites (PF23).

XQ,Q=ACT: Liste des travaux dans la ACTIVE queue (en attente d'exécution avec requêtes satisfaites)

XQ,Q=REQ: Liste des travaux dans la REQUEST queue (en attente d'exécution avec requêtes satisfaites)

XQ,Q=RDY: Liste des travaux dans la READY queue (en attente d'exécution avec requêtes satisfaites) (PF24).

XQ,JOB=JJJJJJJJ ou XQ,JOB=nnnn: Liste d’un travail

XWLB: Donne l'état du work load balancing et affiche les initiateurs de CA-7. Les valeurs peuvent être modifiées au besoin. (PF21).

UCC7RD/UCC7RD est le code d'accès et le mot de passe que les programmeurs utilisent pour accéder à CA-7 en consultation.

F4 et choix 6: Pour afficher un fichier, pour le modifier ou le rendre permanent.

Le livre de CA7 pour la définition des codes d'application avec le macro SECURITY est :CA-7 Security Reference Guide Chapitre 7 - Internal Security sujet "Security macro"

= Annexe 3 – Deck d'initialisation =

Le membre Online de la librairie SYSL.CA7.JCLLIB contient toutes les informations nécessaires au paramétrage de CA-7.

Les batch terminals au nombre de 4 sont des identifiants de CA-7 utilisés lors de soumission de travaux en batch via la librairie T855P.CA7.CNTL.

Quand les CICS se terminent, CA-7 est avisé via les trailer steps. Ceci pour permettre l'exécution des travaux qui ont des dépendances avec les CICS. On peut accéder à ceux-ci via le deck d'initialisation.

C'est aussi dans le deck d'initialisation qu'on peut modifier la configuration des clés PF.

Durant l'opération normale de CA-7, le RUNOPT est à SCAN, ce qui permet au céduleur de scanner les nouvelles cédules aux heures à la demie. Mais durant un exercice de relève le RUNOPT est à NSTA, il n'y a donc plus de scan automatique de cédule. Voir ci-dessous:

Menu Utilities Compilers Help

¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢¢

BROWSE SYSL.CA7.JCLLIB(ONLINE) - 01.06 CHARS 'INIT' found

Command ===> Scroll ===> CSR

*-* 00580000

* INIT - INITIALIZATION OPTIONS * 00590000

* - CONFIG - OPERATING SYSTEM CONFIGURATION * 00600000

* - RUNOPT - RUN OPTIONS:: * 00610000

* - SCAN - ACTIVE SCHEDULE SCAN * 00620000

* - NSTA - DUMMY (NO SCHEDULING) * 00630000

* - MAIN - MAINTENANCE ONLY * 00640000

* - TYPE - TYPE OF RESTART * 00650000

* - WARM - NORMAL RESTART * 00660000

* - ERST - EMERGENCY RESTART * 00670000

* - COLD - CLEAR WORKLOAD RESTART * 00680000

* - MOVQ - MOVE QUEUE RESTART * 00690000

* - PERFORM - OPTION D'AMELIORATION DE PERFORMANCE * 00700000

* - VALIDATE - POUR STOPER LE SÉDULEUR APRES UN * 00710000

* ARRET TROP PROLONGE DE UCC7 * 00720000

** 00730000

INIT,CONFIG=(MVS,JES2), RUNOPT=(SCAN) ,TYPE=WARM,PERFORM=(7,8),VALIDATE=0 00740000

*-* 00750000

* SVCNO - INDICATE THE AVAILABILITY OF UCC7 SVC 4 * 00760000

. . . . . . . . . . . . . . . . . . . . . . . . . ..

-Accéder au membre P0069001 de la librairie SYSD.PLEX.USEROPER.APPL.PTFIN pour changer le niveau de sécurité d'un individu pour une application définie dans CA-7

= Annexe 4 - Nomenclature des clés PF dans CA-7 =

PF01 /DISPLAY,ST=KEY

PF02 /ECHO,M=(DEMAND,JOB=________,SCHID=___,SET=NTR,TYPE=RES)

PF03 /ECHO,M=(/MSG,LT=BTERM,M=(#### MESSAGE A ENVOYER DANS BROWSE

(FORMATTED SCREENS USE PF3 TO RETURN TO MENU)

PF04 DBM

PF05 LJOB,JOB=M013J000,LIST=ALL

PF06 /ECHO,M=(LJCL,JOB=________)

PF07 /ECHO,M=(LJES,JOB=________,Q=*)

(FORMATTED SCREENS USE PF7 FOR /PAGE-1)

PF08 /ECHO,M=(LJOB,JOB=____*,EXEC=N,LIST=ALL)

(FORMATTED SCREENS USE PF8 FOR /PAGE+1)

PF09 /ECHO,M=(LJOBR,JOB=____*,TP1=02,ELT=0200,CLS=A)

PF10 /ECHO,M=(LPRRN,JOB=____*,SEQ=JOB)

PF11 /ECHO,M=(LRLOG,JOB=____*,DATE=*AAJJJ,ST=CANC)

PF12 /ECHO,M=(FQJOB,SPAN=01,JOB=*)

PF13 /ECHO,M=(LPRRN,JOB=)

PF14 /ECHO,M=(DEMAND,JOB=________,SCHID=___,SET=NTR,TYPE=RES)

PF15 /CLOSE

PF16 LRDYP,LIST=STATUS

PF17 XWLB

PF18 /ECHO,M=(XUPD,JOB=________)

PF19 /PAGE-1

PF20 /PAGE+1

PF21 XWLB

PF22 LQ

PF23 XQM

PF24 XQ,Q=RDY

= Annexe 5 - Liste des librairies définies dans CA-7 =

T850P.JOBSPROD.CNTL,INDEX=0

T850T.JOBSTEMP.CNTL,INDEX=1

T850A.JOBS.CNTL,INDEX=2

T850F.JOBS.CNTL,INDEX=3

T850P.JOBSPROD.CNTL.BKUP,INDEX=4,

T850A.JOBS.CNTL.BKUP,INDEX=5

T850F.JOBS.CNTL.BKUP,INDEX=6

T850T.JOBS.CNTL,INDEX=7

SYSD.CA7.JOBLIB,INDEX=9

T850C.JOBS.CNTL,INDEX=10

T850C.JOBS.CNTL.BKUP,INDEX=11

SYSL.CA7.JCLLIB,INDEX=200

T855P.CA7.OVERLIB,INDEX=254

SYSL.CA7.CAIHELP,INDEX=255

= Annexe 6 - Calendrier des événements =

Mai-juin : Resolv

1er jour ouvrable de juillet: Mise en force du calendrier de l'année

suivante dans CA-7

Octobre-novembre : Resolv