Home

L`utilisation des mémoires auxiliaires en informatique au

1. compilation F RT diteur de liens LKED exemple compilation et link edit d un programme source FORTRAN L aide du compilateur G1 carte J B REXECHETG CL F RT SYSINbDDb programme FORTRAN sur cartes Proc dures FIG1CLG et FTXCLG Ces proc dures permettent de compiler effec tuer le link edit et ex cuter un programme source F RTRAN On a 3 tapes compilation FPRT diteur de liens Guen ex cution G l les noms des cartes DD incluesdans ces proc dures pour les Fhoaters usuels sont lecteur des donn es FTOSFO01 et SYSIN impression des dobiera FTO6F001 PRIOR de cartes ON Nous donnons en annexe 1a liste des Sotrons de contr le g n r es par le bau l appel de Ia proc dure FTXCLG exemple d utilisation compilation link edit et ex cution d un programme source FORTRAN l aide du compilateur H tendu 3 58 et avec donn es sur cartes carte JfB HE REXECHETICLG REGI N G 200K F RT SYSINbDDb programme source F RTRAN sur cartes h 88 SYSINbDDb donn es sur cartes J H Proc dures FIGIIG et FTXLG Ces proc dures permettent d effectuer le link edit et l ex cution d un programme d j compil c est dire sous forme de module objet On n a donc que 2 tapes diteur de Liens LKED ex cution ag exemple d utilisation link edit et ex cution d un programme comp
2. n oy i H Pour repr senter un nombre n gatif on a 1 dans le bit signe on ajoute donc 128 la caract ristique Par exemple un nombre n gatif avec un exposant r el de 2 a pour caract ristique C 2 6k 3 128 194 Un nombre flottant simple pr cision a une repr sentation hexad cimale de 8 caract res hexad cimaux les 6 caract res de droite repr sentant la mantisse et les 2 caract res de gauche la caract ristique En double pr cision REAL 8 ou quadruple pr cision REAL 16 les nombres en virgule flottante conservent la m me configuration qu en lt Ale simple PRE on mais avec une mantisse pie longue Soit 56 bits dans le cas o le nombre occupe 2 mots double pr cision Soit 120 bits dans le cas o le nombre occupe mots quadruple pr cision Le signe est toujours dans le premier bit et la caract ristique est ex prim e dans les 7 bits 1 7 suivant le signe Les valeurs exti mes autoris es pour un nombre flottant sont de r 1624 environ 10776 et 1665 environ 107 La pr cision est de 6 chiffres hexad cimaux environ 7 2 chiffres d cimaux pour positions de m moire simple pr cision 14 chiffres hexad cimaux nviron 16 8 chiffres d cimaux pour 8 posi tions de m moire double pr cision 28 chiffres hexad cimaux environ 35 chiffres d cimaux pour 16 posi tions de m moire quadruple pr cision REPRESENTATION D UN NOMBRE REEL REAL Pr cision
3. Au cours du traitement de l information par un programme les d placements des donn es entre la m moire principale et les unit s d Entr e Sortie sont effectu s au moyen d un syst me de gestion des donn es appel IQCS INPUT QUTPUT CONTROL SYSTEM L IQCS corprend deux parties 1 IQCS physique qui est un ensemble de routines d Enbr e Sortie qui supervisent la lecture et l criture des donn es sans tenir compte de leur contenu logique ni de leur formate L IQCS physique organise les op rations d Entr e Sortie les con tr le et traite les erreurs 1 I CS logique qui est un ensemble de routings pour le traitement des enregistrements logiques d finis dans le programme de l uti lisateur L IQCS logique demande Les op rations d Entr e Sortie Igcs physique traite les conditions E F fin de fichier et E V fin _ de volume contr l t crit les lab ls groupe et Aogroupo les enregistrements logiques 1 5 Forme a e enregistrements voir figure 3 1501 Enregistrements non bloqu s la gestion des donn es d finit 3 for mats pour les enregistrements logiques Format Fixe F Tous les enregistrements logiques ont le m me nombre fixe de caract res ou m me longueur en octets Il n y a pap de compteurs Format Variable V Les enregistrements logiques ont un nombre variable de caract res ou ure longueur diff rente cf figure 4 Un enregistrement de forme variable compor
4. Choix choix ovooe choix xn m me signification que la note tion pr c dente MAJUSCULES mot cl dont l orthographe est imp rative 2 2 2 Format des cartes de contr le OS ASP De la colonne 1 la colonne 80 les zones sont r parties de la fa on suivante nombop rationbop randesbcomentaires On a 1 ou plusieurs op randes s par es par des virgules Ces zones sont psitionnelles c est dire que c est le nombre d alter nances zone vierge zone perfor e qui permet de savoir si un zone donn e doit contenir le Fo L op ration Les p rendes ou le commentaire exemple Si l on a perfor XXXPYYYZZZ la zone XXX contient le nom la zone YYY contient l op ration la zone ZZZ contient les op randes Si l on a perfor bXXXbYYYbZZZ la zone XXX contient l op ration le nom tant omis la zone YYY contient les op rando la zone ZZZ contient le commentaire 3 8 _Le d tail des zones est le suivant r f rences ult rieures IL comporte 1 8 caract res al phanum riques le 1er tant obligatoirement alphab tique Cette zone commence obligatoirement en colonne 3 puisque les 2 premi res sont occup es par exemple JJTRIA aoe O FUSION ou P1 esae le nom identifie l instruction de contr le permettant ainsi des l op ration pr cise Le type d instruction de contr le dont il s agit C est obligatoirement l un des mots convention n
5. Les autres sont mont s uniquement sur demande et sont dits en SETUP Au CIRCE l utilisation des volumes se fait selon certaines conventions Montage la demande SETnnn le volume est mont sp cialement pour le travail qui Tiutilises Cette op ration est comptabilis e et n cessite la disponibilit d une unit Actuellement 12 unit s en Setup sont dis ponibles SETOO1 SETO12 Volume banal BANinn volumes utilisables en permanence mais aucun fichier cr sur l un de ces volumes ne peut tre conserv apr s la fin du travail qui l a cr L utilisation de ces volumes n l est pas compta bilis e Volume priv en Ligne ou r sident RESinn volumes utilisables en permanence r serv saux fichiers permanents des utilisateurs L espace utilis leur est comptabilis Actuellement 4 unit s r sident sont disponibles RES301 RES302 RES303 et RES304 Volume priv provisoire PP3330 mont et utilisable en permanence mais tous les fichiers qu il contient sont supprim s 1 fois par jour entre 7 et 9 heures du matin L espace utilis sur cette unit n est pas comptabilis 3 2 Caract ristiques des unit s 3330 Ces caract ristiques sont rassembl es gt o dans le tableau 2e TABLEAU 2 CARACTERISTIQUES 33530 11 Nombre de cylindres par module Nombre de pistes par cylindre Nombre de pistes par module Capacit par piste 13030 octets 13030 octets C
6. Nous donnons ici quelques erreurs tentes avec des explications possibles permettant d orienter la recherche de l erreur partir des messages fournis par le syst me 2e 1 COMPLETION CODE 00 eut 09 me Wu 0 Sat a me ne ve Ce type de diagnostic appara t dans le fichier SYSMSG arent la liste du programme et le plus souvent l tape G Un compl tion code entr ne syst matiquement l abandon de L ex cution en cours par le syst me 001 x En COBOL il s agit en g n ral d une erreur d Entr e Sortie qui provient d une diff rence de longueur entre ce qu il y a de d crit dans le programme FILE SECTION et ce qui existe r ellement sur le fichier DCB En gestion de fichier cela provient en g n ral d un mauvais JL g1 qu lques exemples entra nant ce message 1 carte DD manquante programme COBOL avec instructions DISPLAY et omission de la carte SYSQUT t geh _ criture sur un fichier non ouvert taille du bloc et de l enregistrement incorrecte pour des enregistrements de Longueur variable mouvement de donn es sur un fichier non ouvert E eme sur un onzer non ouvert u sans carte DD mor En oo FORTRAN il sat en g n ral d une instruction entra nant un mauvais positionnement en m moire centrale chevau chement des donn es C1 h C5 Cette erreur d adressage peut avoir des causes diverses par exemple une variable est non d finie ou
7. REGION encombrement maximal g m moire centrale n cessaire chaque tape du travail Exprim en K octets K 1024 IL est pr f rable d utiliser le param tre REGION de la carte bEXEC La carte JOB est la 1 re carte de contr le bite se place en t te du JOB Elle est obligatoire Exemple d utilisation de la carte JOB 8MD76DEBDJPBDWRR 1358 ROCHEMAR TIME O 20 212 l CARTE MAIN Forme g n rale AIND nnn LINES cr eus mn l 2000 lignes 00 cartes LINES nombre maximum de lignes diter en milliers pour l ensemble des fichiers du travail destin s l impression type SYSOUT Valeur par d faut 2000 lignes CARDS nombre maximum de cartes perforer en centaines pour l ensemble des fichiers du travail destin s la PPLA type SYSOUT Val r par d faut 200 cartes D si le nombre maximum de lignes ou de cartes pr vu est atteint en cours d ex cution un dump du programme sera tir et list Une carte du type SYSABENDoDD ou SYSDUMPbDD doit alors figurer parmi les cartes de contr le x Si le travail provoque le d passement de ces quantit s maximales LINES ou CARDS il sera interrompu et donnera dans l tat du SYSMSG un mes sage d erreur du type S COMPLETION CODE m SYSTEM 222 Pour estimer Le param tre LINES il faut se rappeler qu il est compt une ligne d impression l ex cution de chaque instru
8. diter ag L absence d IDENT tout le fichier sera dit par 1 Lo gueur en octets de l identificateur lt 8 octets fparet identificateur lui m me par 3 rang de l octet o commence l identificateur dans l enregistrement FTELD Ce param tre a 2 fonctions diff rentes donc 2 critures possibles re fonction copie de tout ou partie de l enregistrement avec sans r organisation d l enregistrement diter et avec sans conversion de caract res par 1 longueur de l enregistrement diter Valeur par d faut 80 par 2 rang de l octet du d but de l enregistrement diter en entr e valeur par d faut 4 par 3 conversion demand e par 3 HE les caract res BCD sont traduits en EBODIC 4 40 PZ les caract res UNPACK sont traduits en PACK ZP les caract res PACK sont traduits en UNPACK par 3 par 5 valeur par d faut pas de conversion par rang du l octet de l enregistrement diter en sortie valeur par d faut 1 2 me fonction rajout de caract res dans un enregistrement avec sans conversion de caract res par 5 nombre de caract res rajouter anig chaque enregistrement diter maximum par les caract res eux m mes rajouter maximum 40 par 7 conversion des caract res identique par 3 de la Ire fonc tion de FIELD par 8 rang de L octet o on d sire ins rer les caract res exemple Copie de tout le fichier j p
9. exemple acc s direct en FORTRAN par l instruction DEFINE FILE l adresse logique ou cl affect par l utilisateur et qui est en g n ral une information de contr le faisant partie de la donn e de L enregistrement Cette cl permet l acc s aux enregistrements en ordre logi que exemple s quentiel index Bien entendu l organisation s quentielle pure permettant l acc s s quen tiel identique au mode d acc s sur bande magn tique est galement pos sible sur les m moires acc s s lectif On aura galement des syst mes d organisation interm diaires entre le s quentiel pur et le syst me par adressage exemple organisation par titionn e Nous examinerons ces diff rents types d organisation et les possibili t s d acc s l information qui leur correspondent 2e2e 1 Organisation partitionn e IlL s agit en fait d une organi sation particuli re des fichiers voir figure 6 Dans cette organisation chaque fichier est divis en sous fichiers appel s MEMBRES haque membre a une organisation s quentielle et poss de un nom Le r pertoire des noms des membres et leur adresse M 4 S sont plac s en d but de fi chier et constituent Le DIRECTORY R pertoire Ce directory est form d enregistrements aR longueur fixe 256 octets de Au cours de la cr ation d un fichier partitionn il faut pr voir la place n cessaire au directory qui est cod e dans le h me sous param tre du p
10. un autre Byte octet voir octet Canal channel organe qui connecte des unit s entre elles et plus particuli rement des unit s d entr e sortie l unit centrale Caract re digit l ment d un ensemble employ conventionnellement pour cons tituer ou repr senter des donn es Des caract res peuvent tre des lettres des chiffres des signes de ponctuation ou d autres symboles Charger to load placer en m moire des informations partir d un milieu externe cette m moire Dans le syst me d exploitation 370 mettre en place c est dire lire un module de chargement en m moire principale en vue de son ex cution Chargeur diteur de liens Linkage loader programme du syst me d exploitation 370 ayant les m mes fonctions que l diteur de liens mais permettant en outre de regrouper enune m me tape de travail l dition des modules de chargement et leur ex cution sans n cessiter l intervention du programme de contr le des travaux Cl un ou plusieurs caract res faisant partie d un enregistrement et permettant de l identifier Compilateur PN _ programme permettant de traduire un langage volu en un programme en langage machine directement ex cutable Concat nation encha nement Conversion de donn es transformation de donn es par changement de leur repr sentation sans modification des informations elles m mes Data donn e repr sen
11. CAND Ce param tre sp cifie les conditions sous lesquelles l tape doit tre ou non ex cut e selon le r sultat des tapes pr c dentes code de retour code op rateur Condition code op rateur nom d tape code op rateur nom d tape nep avec Code nombre entier compris entre O et 4095 Il sera compar au code de retour d une ou plusieurs tapes pr c dentes Op rateur arlam op rateur Logique EVEN ex cution de l tape m me si une ou plusieurs tapes pr c dentes ont eu une fin anormale ABEND par exemple QNLY ex cution de l tape seulement si une ou plusieurs tapes pr c dentes ont eu une fin anormale ABEND par exemple Le code est compar l aide de 1 op rateur au code de retour issu de chaque tape pr c dente du travail Si nom d tape est pr cis le code ne sera compar qu au code de retour de cette tape cette tape n appartenant pas une proc dure et n en faisant pas intervenir Si nom d tape nep est pr cis nep nom d tape d une proc dure catalogu e le code n est compar qu au code de retour de l tape nep de la proc dure ins r e L tape du travail nom d tape exemple ETAPObEXECbPGM UBU C ND EVEN 4 GT ETAP3 12 LT ETAP5 LKED l tape ETAP6 sera ex cut e dans les cas suivants m me si une ou plusieurs des tapes pr c dentes ont eu une fin anormale ABEND si le code retour de l tape ETAP3
12. Cette op ration n est valide que pour des fichiers cr s en format F ou V Ici encore aucune instruction sp cifique l IEBGENER n est n ces saire on a donc SYSINbDDbDUMMY Exemple 1 Copie du fichier WRR 1358 RECHEMAR FICH 1 r sidant sur SHI002 avec SIZE DRE SE WRR1 28 carte J B usuelle bEXECbPGM TEBGENER SYSPRINTHDDbSYSQUT A SYSUT1bDDbUNIT 3330 VOL SER SETOO2 DISP PLD DSN WRR1358 ROCHEMAR FICH1 SYSUTZbDDbUNI T 3330 VPL SER SETOOZ DISP KEEP DELETE DSN WRR1358 R CHEMAR PT SPACE TRK 3 1 DOB BLKSIZE 6400 LRECL 80 RECFM FB SISINbDDbDUMMY 138 exemple 2 Copie avec changement de blocage de 2 fichiers s quentiels e nouvelle carte J B usuelle 09P1REXECHPGM TEBGENER REGI N 90K SXSPRINTHDDbSYSPUT A SISUTbDDbUNIT BD16 V L RETAIN SER 103871 DISP LD Z DSN FICH1 LABEL 1 8L X RECFM FB LRECL 80 BLKSTZE 1920 SYSUTZbDDbUNIT BD16 VOL RETAIN DISP NEW KEEP DELETE DSN FICH1 LABEL 1 8L DCB RECFM FB LRECL 80 BLKSIZE 12800 SXSINbDDEDUMMY C8P2bEXECLPGM TEBGENER REGI N 90K SISPRINTODDbSYS UT A SXSUTTbDDPUNIT BD 16 V L SER 103871 DISP LD DSN FICH2 LABEL 2 8L DCB RECIM FB LRECL 80 BLKSIZE 1920 SXSUT2bDDUNIT BD 16 V L REF C P1 SYSUT2 DSN FICH LABEL 2 SL DCB RECFM FB LRECL 80 BLKSIZE 12800 M ha1e3 3 Co
13. ORSTOM Service HydroLogi que kkk L UTILISATION DES MEMOIRES AUXILIAIRES EN INFORMATIQUE AU SERVICE HYDROLOGIQUE DE L ORSTOM par H DOSSEUR PARTS septembre 1976 Collection de R f rence gulo B Huy di EEEE E AEEA A A E E EE E AREE E A A EA EA SOMMAIRE INTRODUCTION re PARTIE LES SUPPORTS D INFORMATION Ovescossvcoccescosessenenee 1 Les cartes perfor es asesssosssoooscoasseosossoceene 2 Les bandes magn tiques snecoseoesoesesesosseanvcesece 3 Les m moires acc s s lectif MAS disques magn tiques 2 me PARTIE LES FICHIERS ET L ACCES A L INFORMATION I ENS 4 Notion de fichier vevoesee0 0080029 06000006e 000 00 8 2 Organisation des fichiers et acc s l information 3 me PARTIE LES INSTRUCTIONS DE CONTROLE HEEE EEETKEZKEEETEEESEEE ETE EE 1s G n ralit s Lune ocasu ecas drenasenenouesses dou 2 Les cartes de contr le s ceocceosesoooscoseosooorooas 3e Carte JB 2060609606 0600 0906N98000088 0068ee009000a6e00 ba Carte MAIN oeosoasoecoecoomoocsoseaaeaeooonoaone osean oan ene De Carte FORMAT 000000806909 0008069800000860e 5009 e0864 6e Carte EXEC sosossoooooeesesooocosoonoocgspoocossects s A Ze Carte DD evoacosoecaoarosooocoososcocoosoocogoosaooooadveos s 8 Cartes DATASET et ENDDATASET anvoumJos0o0oceronecsecaa De Carte NET 200909000020 008050 09068 000006006 000990 10 Carte CIROE des ioucsenessagdeose sise ess os Ia Carte COMMENTAIRE eonrocoseoowoao
14. dans un langage volu FORTRAN COBOL PL1 ese n est pas exploitable tel quel par l ordinateur IL doit tre tra duit en langage machine COMPILATION rendu chargeable EDITEUR DE LIEN ou AA EDIT et ex cut EXECUTION Prenons comme exemple 1e traitement diun travail SRE L ex cution d un programme cod en langage volu partir de donn es at un fichier Les a i tapes sont les suivantes Co e tape 1 COMPILATION Traduction du programme SOURCE E cod en langage volu en module objet cod en langage machine l aide du traducteur de langage appropri compilateur Le module objet cr cons titue un fichier d sign SYSLIN 1 Une proc dure catalogu e d finie par une instruction de contr le EXEC correspond g n ralement plusieurs tapes a a tape 2 LINK EDIT R alisation des liens entre le module objet et les sous programmes et fonctions de la biblio th que des r f rences externes l aide de l diteur de liens Le r sultat de cette op ration donne le module char geable qui constitue un fichier d sign SYSLMOD tape 3 EXECUTION Ex cution du programme partir des donn es par appel des diff rents fichiers les conte nant Signalons que dans le cas d une ex cution avec CODE AND GO proc dure WATFIV il n y a qu une seule tape comportant la traduction de langage et l ex cution L encha nement des tapes d
15. octets 1 mot en m moire Double ou quadruple pr cision IL faut obligatoirement sp cifier la lettre D ou Q lorsqu on af fecte une valeur num rique une variable nine A en double ou quadruple pr cision exemple Si L on crit REAL 8 A 5 SA La valeur donn e est tronqu e et ne sera prise qu en simple pr cision c est dire dans cet exemple A 5 843216 L criture correcte est REAL S A 5 843216734D 00 Limites d un tableau Un tableau peut avoir san 7 dimensions sur l ordinateur IBM 3704 Te Le Instructions _de contr le Valeurs limites des param tres LRECL et BLKSIZE de la carte DD valeur th orique minimale admise 18 octets valeur maximale admise On peut S perdREr magmenter ces valeurs maximales sur disque par L emploi de L option MTRACK VERFLOW T du param tre RECFM sur bande en utilisant L option SPANNED S du param tre RECIM Sortie sur imprimante Actuellement au CIRCE les fichiers du type SYSQUT pour sortir sur imprimante ont un param tre BLKSIZE ee 2020 Ainsi par exemple pour imprimer des lignes en 132 positions vec le minimum d op rations E S on pourra effectuer cette impression par groupe de 14 lignes en codant le LRECL et le BLKSIZE de la fa on suivante uo 32760 octets sur bane 13030 octets sur disque sms sp cification sp ciale RECM VBT RECEM VBS A c est dire 137 4 octets pour le compte
16. ro 2 P2 C 25 IDENT identifie le dernier enregistrement diter Il ne doit y avoir qu un seul IDENT par carte REC RD En L absence d IDENT tout le fichier sera dit 11 longueur en octets de l identificateur lt lt 8 caract res valeur nom de l identificateur P1 rang de l octet o commence l identificateur dans l enre gistrement FIELD d finit les zones s lecter dans l enregistrement et Les formats de sortie 12 longueur de l enregistrement diter en octets 120 P2 rang du 1er octet Option par d faut ee Qs diter en entr e 1 C conversion ventuelle XE alphanum rique gt hexa cimale PZ d cimal pack gt d cimal tendu Option par d faut pas de conversion copie de l entr e sur la sortie P3 rang du ter octet diter dans l enregistrement de sortie Do2e5ulte Exemples d utilisation de L TEBPTPCH exemple 1 impression du fichier WRR1358 RSCHEMAR FICH1 r sidant K sur le disque RES302 et dont le DCB est RECFM FB LRECL 80 BLKSIZE 800 carte J B usuelle REXECRPGM TEBPTPCH SYSPRINTbDDbSYS UT A SYSUT TbDDbDSN WRR 1358 R CHEMAR FICH1 VOL SER RES302 UNIT 3330 1 DISP LD SISUT2bDDbSYS UT A SXSINbDDb bPRINT 1 4 31 exemple 2 impression du m me fichier avec repr sentation hexad cimale des caract res carte J B usuelle 2EXECbPGM TEBPTPCH SISPRI
17. tape fichier existant consult dans l tape non partag M D fichier existant modifi dans l tape Val 2 e DELETE fichier non conserv en fin d tape KEEP fichier conserv en fin d tape fichier repris dans une tape ult rieure du travail Val 3 DELETE m me signification que val 2 en cas KEEP de fin anormale d tape a e DEN 1 pour 556 bpi 2 pour 800 bpi 3 pour 1600 bpi l4 pour 6250 bpi at U enregistrement de longueur ind finie V enregistrement de Longueur Vari able F enregistrement de longueur fixe B A enregistrements bloqu s l enregistrement contient un ca ract re de saut ASA i enregistrements tendus ou span 2 n s LRECL L longueur d un enregistrement Logique en a octets pour RECM F ou FB longueur maximale d un enregistrement Logique 4 pour RECEM V o VB ou VBS BLKSIZE B longueur r elle ou maximale d un enre PERETANE Physique n allocation par blocs de n octets TRK allocation par piste 13030 octets piste CYL allo ation par cylindre 19 pistes cylindre g1 allocation primaire q2 allocation secondaire 15 fois q2 q3 r servation pour le directory pour un fi chier partitionn ou pour l index pour un fichier s quentiel in dex q3 enregistrement de 256 octets RLSE permet de restituer la place inutilis e la cr ation uniquemen
18. y compris le compteur Ce sous param tre est obligatoire pour les enregistrements de lon gueur fixe et de longueur variable dans ce cas la longueur indiqu e est celle de l enregistrement le plus grand LRECL ne doit pas d passer la longueur du BLKSIZE sauf lorsqu il s a git d enregistrement en variable spann e RECFM VS Donc Si RECEM F ou FB LRECL doit tre gal la longueur de 1fenregistrenent logique Si RECEM V ou VB LRECL doit tre sen la longueur du plus grand enregistrement 4 pour le compteur U LRECL doit tre omis VS ou VBS et si L enregistrement logique est gt 32756 il faut sp cifier LRECL X I Si RE MM Si RECM il RECFM sp cifie le format et Les caract ristiques des enregistrements d un fichier Rappelons que la forme des enregistrements a t examin e dans le paragraphe 1 5 de la deuxi me parties Les options possibles pour coder le RECFM sont les suivantes avec les m thodes d acc s BSAM et QSAM l enregistrement contient un caract re de saut ASA exemple les fichiers de type SYSQUT A pour l impression ont un attribut RECFM du param tre DCB qui est cod A RECF VBA B les enregistrements sont bloqu s F les enregistrements ont une longueur fixe ta les enregistrements contiennent un caract re de saut mae chine indique des enregistrements tendus c est dire conte nus sur plusieurs blocs SPANNED C
19. 4 5 6 7 8 9 A a B D E F 00111010 14410010 ST ue 10000101 En r sum 4 octet 2 fois k bits 4 bits 16 combinaisons possibles 1 octet 8 positions binaires ou 2 chiffres hexa d cimaux A1 La conversion Hexad cimal D cimal est donn e dans la table A1 2 TABLEAU A1 2 TABLE DE CONVERSION HEXADECTMAT DECTMAL EIRE ERCEICEICIER e O 4O96 8192 12288 16384 20480 24576 28672 32768 36864 40960 45056 49152 53248 5734 61440 COLONNES HEXADECIMAL y Q 256 512 768 1024 1280 1536 1792 2048 2304 2560 2816 3072 3328 3584 3840 O 65536 131072 0 o 1048576 1 2097152 2 3145728 3 41494304 4 5242880 5 6291456 6 7340032 7 8388608 8 9437184 9 10485760 f A 11534336 B 12582912 C 13631488 D 14680064 E 15728640 F O ON QUI HN N a O Hi El O Q WU CI OUI HU D Hi Hi Q y D 10 ON UT UN Us H tj D Q O0 ON OUI FUN kj E o a b e O Co ONU HN D ss O 0 1 2 3 4 5 6 7 8 9 A B C D R F Exemple Conversion de 7048 Hexad cimal en d cimal lt Colonne 1 8 gt 8 Colonne 2 A gt 160 Colonne 3 OO 0 Colonne 4 7 8672 TOTAL 28840 1 4 Repr sentation D cimal Condens Packed decimal Il s agit d une m thode de repr sentation dans laquelle plusieurs chiffres d cimaux sont enregis tr s dans un seul multiplet par exemple 2 chiffres d
20. C MPLETI N C DE SYSTEM 000 USER 0240 Enfin un r capitulatif des erreurs est donn sur le fichier FTO6F001 22 71 Messages au niveau de la compilation TIFEXXXI Ces messages correspondent des erreurs la compilation Il s agit de fautes de syntaxe du langage F RTRAN H Ces messages indiquent le num ro de liste ISNxxxx ou le num ro d instruc tion LABELxxxx dans laquelle L erreur s est produite Ces messages sont suffisamment explicites pour que l erreur soit imm dia tement d tect e 2 242 Messages au niveau du link dit TEWxxxx Les erreurs au niveau de l diteur de liens sont assez Tarese Nous ne retiendrons que la plus fr quente IEW0132 Ce message indique l utilisation due fonction ou d un sous programme non tini 2 2 53 Messages au niveau de L ex cution THPxxxl Ces messages apparaissent dae le courant d s r sultats Nous n examine rons ici gue les plus fr quents Here OVERFLOW il y a d passement de capacit m moire c est dire utilisation d un nombre flottant gt 10 On v rifiera en particulier que toutes les variables utilis es dans des op rations sont bien initialis es La correction standard permet de continuer l ex cution en pre nant le plus grand nombre possible pouvant tre repr sent IH 2Q8I UNDERFLOW il y a sous d passement de capacit c est dire uti lisation d un nombre flottant lt 10 lt 78 M me processus que pour l overflow
21. EXEMPLE DE MOT DE CONTROLE CONSTITUE DE 4 ZONES DE CONTROLES TRI FUSION Enregistrement gt lt 7 y t Zone de contr le majeure i octet Zone 2 8 octets E 26res 3 octets Zone 4 5 octets O R S T O M Service Hydrologique os Ge e i TORRE H5 La forme g n rale d une carte directive est la suivante b zone d criture du nom de la b op rande b Commentaires directive Colonne 1 lt colonie 71 PE Colonne 72 blanc Poire T colonne suite trees non cat h la carte commence obligatoirement par un blanc la z ne d criture du nom de la directive doit tre la premi re d une carte directive Elle ne peut d passer la colonne 71 Elle contient L un des mots S RT MERGE ou END la zone des op randes est la seconde de la carte directive Elle comprend 1 ou plusieurs op randes s par s par une virgule Si l criture d passe la colonne 71 La zone des op randes doit d buter sur la carte o est crit le nom de la directive Chaque op randeest d fini par un mot cl me mot cl re valeur 2 me valeur n valeur exemples FIELDS FORMAT 1 5 FL A CH la zone commentaire est facultative et peut contenir toute infor mation d sir e la colonne 72 est r serv e la demande ventuelle de cartes suites On y perfore alorsun caract re quelconque Une carte suite comporte 1klanc en colonne 1 L criture du para ie ou du comm
22. Fusionner to Merge combiner en un seul fichier deux ou plusieurs fichiers selon un ordre donn et d fini l avance Gap entre enregistrement intervalle s parant 2 enregistrements sur un support continu Hardware mat riel de traitement de l information Ensemble des machines de traitement de l information ou de leurs parties constituantes par opposition aux programmes et autres moyens abstraits Fe de ces machines Hexad cimale CR R A repr sentation des nombres dans un mode de num ration de base 16 voir paragraphe 1 A nexe 1e Identificateur en programmation nom symbolique d signant une variable un sous programme une proc dure un fichier co Image copie d informations sur un autre support aI exemple image de carte repr sentation d une carte perfor e Interface plan de jonction conventionnel entre deux ordinateurs ou organes limit s des mat riels permettant les M d information sui vant des vostes d termin es IgCS Korec abton de Input Fi output Control System Ensemble de routines pouvant tre incorpor es dans un programme quel conque afin d y g rer tous les probl mes g n raux d entr e sortie 1 A412 Lecture re contr les oc Label groupe de TEE S T Serrant identifier et d crire un volume ou un fichier Liaison Link s quence d instruction r alisant le liaison avec une autre partie du programme Linkage editor diteur de l
23. RTINO2bDDD cartes donn es 2 me fichier S RT SPRTINOZbDDb cartes donn es 3 me fichier Dans cet exemple il y a 3 fichiers d entr e sur cartes fusionner 4 9 Cartes SZRT SDRTWKnn Ces cartes d crivent les caract ristiques des fichiers utilis s pour Le stockage interm diaire des enregistrements trier Ces fichiers sont inutiles pour une fusion seule Ces fichiers sont s quentiels et situ s sur disque Nous examinerons dans Le paragraphe 1 4 3 la fa on de calculer a OR de ces fichiers de travail calcul du param tre SPACE nn nombre compris entre 01 et 32 L ordre des cartes doit tre tel que les num ros soient ro Seentss IL ne faut pas sauter 3e num ros camie de cartes SART S RTWKnn S RT e S RTWKO1WDDbUNIT 3330 SPACE TRK 5 1 S RT S RTWKO2bDDbUNI T 3330 SPACE TRK 5 1 B RT S RTWKOZbDDbUNIT 3330 SPACE TRK 5 1 Carte SORT SPRTQUT Cette carte d crit les caract ristiques du fichier dans lequel les enregistrements tri s ou fusionn s sont plac s Les performances du tri sont augment es si les enregistrements du fichier de sortie sont bloqu s exemples d criture de carte S RT S RI UT S RT S RTAUTHDDPSYSQUT A dans cet exemple le fichier de sortie est imprim S RT S RT UTODDOSYS UT B D dans cet exemple Le fichier de sortie est sur cartes perfor es S RT S RT UTODDbUNIT 3330 DSN amp amp
24. cimaux dans un seul octet s n i i i On parle alors de donn es pack es ou condens es 1 5 Repr sentation des nombres en m moire IBM 370 On appelle mot le plus petit groupe de positions de m moire adressable dans son ensemble La taille du mot varie selon les constructeurs Chez IEM on a 1 2 mot 2 octets 1 mot octets double mot 8 octets quadruple mot 16 octets A1 5 Repr sentation des nombres entiers les nombres entiers c est dire en virgule fixe occupent en m moire une zone de longueur fixe qui peut tre un mot ou un demi mot Dans les 2 cas le premier bit bit de gauche est tou jours le bit de signe Les nombres pee sont cod s dans leur repr sentation binaire vraie avec le bit signe gal O Les nombres n gatifs sont repr sent s par leur compl ment deux avec le bit signe gal 1a Le compl ment 2 s obtient en inversant chaque bit du nombre et en ajoutant 1 au bit de droite exemple Dans un format binaire d un demi mot INTEGER 2 1 et 1 st crivent respectivement 0000 0000 0000 0001 EPEE WITE ETE DATE f Les nombres i 28 0 et 28 0 s en 0000 0000 0007 1100 a a a 141111 1110 0100 La valeur du plus grand nombre positif contenu dans un mot est 1 La valeur du plus pet t nombre n gatif contenu dans un mot est DA REPRESENTATION D UN NOMBRE ENTIER Caen Longueur j en octets RARE interne Pae aos leie D ssibies
25. galement op rer des additions de cartes de contr le DD pour d finir des fichiers suppl mentaires Ces modifications doi vent alors tre effectu es en tenant compte des r gles suivantes Tous les param tres de la carte DD g n r s par la proc dure et que l on n aura pas modifi sseront conserv s Les modifications doivent tre effectu es dans l ordre dans lequel elles apparaissent dans la proc dure catalogu e et en particulier dans L ordre d encha nement des tapes L tape devant tre pr ci s e dans la carte DD modifi e Dans le cas contraire une erreur de JCL est diagnostiqu e De m me des param tres se r f rant une tape de proc dure cata logu e n existant pas entra ne une erreur de JOL Les cartes DD d addition doivent suivre les cartes DD de remplace ment les cartes dition Au CIRCE les noms des cartes DD apparaissant dans les proc dures catalogu es sont syst matiquement orAonn e aliphab tiquement Ainsi par exemple on aura LKED EXEC eee SYSLIB DD s SYSLIN DD ees SISIM D DD ass SISPRINT DD e SISUT1 DD sae exemple de modification dune carte DD d une proc dure catalogu e On d sire conserver sur bande le r sultat dtine gonpitarion faite en ir la proc dure FTXC on aur _ carte JOB B1REXECbFTXC E RT e SYSLINbDDbDSN COMPIL UNIT BD 16 VOL e e J DISP NEW KBEP 1 2 RT SYSINbDDb programme co
26. s direct recherche d un enregistrement dans un volume en fonction de son adresse et non en fonction des donn es recherch es ou enregis tr es auparavant Adresse indicatif doni gnant l emplacement qu oc upe une information mise en m moire ou qu occupera une information qui doit tre mise en m moire indicatif d signant une unit d un ordinateur dans les usine tions d un programme Alphanum rique concerne une information dont la repr sentation est d finie soit par des caract res alphab tiques soit par des caract res num riques soit par des caract res sp ciaux soit par un m lange de 2 ou de 3 de ces groupes de caract res Batch lot ensemble des donn es destin es tre trait es en diff r Bit El ment constitutif d une donn e pouvant repr senter l une ou l autre de 2 valeurs ou tats distincts Binary digit bit chiffre repr sentant l un des nombres entiers O ou 1 en num ration binaire voir paragraphe 1 de l annexe 1 Blanc partie d un support d information ne portant pas de caract res A1 9 Bloc block en programmation groupe de caract res de mots ou d articles mani pul comme un tout sur une bande d signe l enregistrement physique conpris entre 2 intervalles Buffer m moire tampon m moire utilis e pour compenser une diff rence de d bit des infor mations lorsque ces informations sont transmises d un organe
27. t 800 bpi pour les bandes 7 canaux c capacit la capacit maximaleth orique d une bande de densit 1600 bpi et de longueur 2400 pieds soit environ 730 m est de l ordre de 500 000 fois 80 caract res ou octets Mais il s agit l d une capacit id ale qui exigerait que la bande f t enti rement rem plie d enregistrements d un bout l autre En r alit les enregistrements physiques sont s par s par des intervalles appel s GAP et la capacit r elle d une bande d pend donc de lastructure de l information qu elle contient fi gure 1 Il y a galement sur la bande des caract res de contr le servant tester la polarisation intervalles de temps r gulier m thode d enregistrement par modulation de phase P E Connaissant la densit le nombre d enregistrements physiques blocs et leur longueur le nombre de caract res de contr le par bloc g n rale ment 82 la longueur d un gap 0 6 pouce il est donc possible de calculer l encombrement d un fichier sur une bande on peut uti liser la formule suivante LxB pr B S a a C capacit de la bande en octets L longueur de la bande en pouces l B longueur de l enregistrement physique ou block en octets 1 A partir d octobre 1976 unique rouleur 7 canaux du CIRCE sera d fini tivement supprim CARACTERISTIQUES DES BANDES MAGNETIQUES PARITE IMPAIRE PARITE PAIRE L a Parit Donn es 6 bits EE
28. valeur initiale du _ compteur Option par d faut n 1 MAXLINE n indique le nombre maximum de lignes imprimer par page Option par d faut n 60 i Sous param tres valables avec PUNCH seulement CDSEQ n indique la num rotation des cartes des colonnes 73 80 n est la valeur initiale du compteurs la valeur par d faut est n 00000000 CDINCR n incr ment pour la num rotation des cartes option par d faut 1e b Param tre TITLE t Ce param tre sert l impression ou la perforation d un titre Il est optionnel mais quand la carte TITLE existe elle suit obliga toirement la carte PRINT ou PUNCH Le format est le suivant bITILEDITEM titre s avec titre titre imprimer ou perforer amp hO octets s rang du fer octet du titre diter Option par d faut Ta c Param tre MEMBER TI ns Ce param tre sert s lectionner n membre d un fichier partitionn on peut mettre plusieurs cartes MEMBER si l on veut s lectionner plu sieurs membres Cette carte est facultative Le format est le suivant BMEMBERDNAME par 1 O par 1 est le nom du membre consid rer d Param tre RECPRD Ce param tre sert d finir un groupe d enregistrements ou un enre gistrement qui doit tre imprim ou perfor suivant les sp cifi 4 30 cations de l utilisateur Le format est le suivant ces bREC RDb p inent 11 iyalonri 0
29. 12 Instruction FARTRAN d entr e sortie en acc s direct ni C2 DEFINE FILE ni n l f v constante ou variable enti re repr sentant le num ro lo gique de r f rence du fichier nombre d enregistrements maximum pr vus longueur de l enregistrement en octets ou en mots d pend du param tre f mode d enregistrement avec ou sans format ee f f L avec ou sans format 1 donn e en octets valeur du param tre BLKSIZE de 2 la carte DD f E_ avec format 1 donn e en octets valeur du param tre BLKSIZE de la carte DD f U sans format 1 donn e en mots valeur LL m enti re de BLKSIZE S nom de la variable associ e la fin de chaque op ration d entr e sortie v a une valeur gale au num ro d ordre de l enregistrement qui suit celui qui vient d tre transmisa Apr s l ex cution d un ordre FIND la variable associ e a pour valeur le num ro d ordre de l enregistrement sur le quel on veut se positionner L instruction DEFINE FILE caract rise 1 ou plusieurs fi chiers mis sur disque et sur lesquels on d sire effectuer des op rations de lecture ou d criture en acc s direct Elle doit tre plac e avant toute instruction READ WRITE ou FIND qui lui fait r f rence IL peut y avoir plusieurs instructions DEFINE FILE dans le m me programme condition qu elles se rapportent des fichiers diff rents C est le DEFINE FILE qui d finit la longueur du
30. A canauXe 6250 bpi 3330 800 bpi f y i 3330 1 disques 3330 mod le 11 1600 bpi disques 3330 mod le 1 5 RETAIN employ pour un volume t en Setup Le volume n est pas RETAIN employ pour viter le d montage de SER num ro de la bande lt 6 chiffres employ pour faire r f rence un Vo lume d fini dans une tape pr c dente nom P u rang du fichier sur la bande NL N LABEL SL label standard IBM option par d faut BLP le label n est pas trait SER t Setup d mont en fin d tape nom du volume 6 carac t res r sident permanent RES301 RES302 RES303 RES304 module 11 priv provisoire PP3330 module 11 SETO01 SETOO2 es SETOT2 g n ralement inutilis A2 RECAPITULATIF DESCRIPTIF DES PRINCIPAUX PARAMETRES DE LA CARTE DD SUITE vale LRECL RECM DISP 5 fap y F val1 tat du fichier en d but d tape tat du fichier en fin d tape val3 tat du fichier SPP en cas de fin anormale d s tape L val CL BLKSIZE B DEN nn SPACE Q TRKS GyL prese q1 42 a3 a1 q2 BANDES MAGNETTQUES D FAITE 3530 eus identitique pour bande et diedi De Val 1 SHR fichier sur disque consult par plu sieurs utilisateurs quivalent LD fichier cr dans l
31. B 8TbEXECHETXOL ARS PRES programme source P H 304 oond sur cartes LRED SYSLMPDEDDEUNIT 3330 1 VAL SER RES5OH DISP SLD DSN WRR1358 RACHEMAR FICH1 P301 L utilisation ult rieure de ce programme se fera par le param tre PGM de la carte EXEC et r f rence la biblioth que l aide d une carte ai STEPLIBbDD asese Si d finition au niveau de l tape J BLIB PDD si d finition au niveau du J B 245 exemple utilisation du programme P H301 mis sur r disque avec donn es sur cartes carte J B EbEXECHPGM P301 REGION 9OK STEPLIBHDDEUNTT 5330 1 VOL SER RES304 DISP OLD 1 DSN URR1358 RECHEMAR FICHA FTO5FOO1bDDb donn es sur cartes LAPS MA sie FLO6FOO 1bDDbSYSQUT A DCB RECFM VBA LRECL 137 BLKSIZE 1922 8107 00 1bDDbSYSQUT B V A Notons que l appel du programme parle param tre PGM de Tg carte EXEC n cessite de pr ciser les fichiers 5 Lecture de cartes 6 sortie sur imprimante et 7 sortie de cartes perfor es Les cartes DD correspondantes ne sont pas en effet g n r espar le syst me comme c est le cas lorsque l on utilise une proc dure catalogu e du type FTXCLG Da du na 2 Da ut 0 Soo me ant os CU Sa En mu KA O I DA inal OP et W EB me Eu pa Ea ne SA Ge ve ts A ee 8 qu en ee ne eu DA em am am me aa n e eve Bt CU Que a 00 en Gi Le programme IEFBR14 est un programme de La biblioth que du syst me Pour l utiliser on
32. BLKSIZE longueur du bloc voir parage 7 2 7 3 Ex cution ag Le fichier SYSMSG donne la taille de la r gion r ellement utilis e en tenant compte des fichiers ouverts dans le message IEF37HI de L tape G exemple IEF374I STEP G ST P 76069 1905 CPU OMINOO 67SEC LCS OK Si le programme est ex cut pour la premi re fois on pourra proc der de la fa on suivante Pour les tapes F RT et LKED on utilisera les valeurs par d faut allou es par Le syst me et tr s largement suffisantes dans la piu part des case Pour L tape G on fera l estimation approximative suivante l encombrement du programme MAIN sous programmes sera estim partir du d compte des constantes variables et surtout des ta bleaux variables indic es en tenant compte de leur longueur res pective On se rappellera en particulier que la longueur standard d une variable enti re r elle ou logique est de 4 octets et d une va riable complexe de 8 octets et que en F RTRAN ces longueurs peu vent tre ventuellement modifi es par des instructions de sp cification implicite ou explicite double pr cision int grer 2 voir Annexe 1 paragraphe 1 6 En pratique le plus souvent il suffira de faire la somme des va riables chaque tableau repr sentant un nombre de variables gal au produit des valeurs de ses dimensions et de multiplier cette somme par 4 1000 dans le cas de variables de lon
33. E37 113 213 313 413 513 613 813 913 413 013 un message s ao nente mn dans le fichier SYSMSG donnant le nom de la carte DD ou Le DSNAME du fichier en erreur soit par exemple SYSABEO1 J B TYTY ABENDED C DE D37 nom du JB DDNAME FTO8F001 Ou SYSABEO1 J B TATY ABENDED C DE 213 nom du J B DSNAME WRR1358 R9CHEMAR FTCH1 Ces renseignements suppl mentaires sont tr s utilespour la recherche de l erreur consid r e AT ne me A oa aa amn ama oap ES D aD A D 00 Qu in A A LE aeo EN am Au OS OU oain Go nt PP NL Out AU M aa OS LS AN QUE LA D ama a 00 LS Ne US oma AU ED M ara En COR LD ARE ONE DR QE DO PS AA mma Omen n IL existe un module de mise au point des programmes FARTRAN utilisable seulement en F RPRAN Ge Ce module est plac soit dans le programme principal soit dans un sous programme FORTRAN Son effet est alors strictement limit au programme ou sous programme dans lequel il est plac IL est d fini par l instruction DEBUG UNIT n param tres n d signe une unit de sortie du programme Si L option UNIT est ommise les sorties de mise au point se font sur l unit standard n 6 imprimante Chacun des param tres d finit un sous programme particulier de mise au point Ce sont TRACE SUBTRACE INIT SUBCHK Ces sous programmes sont appel s par le PENES analyser au moment de son ex cution soit automatiquement pour Les sous programmes SUBTRACE INIT et SUBCHK
34. HC n Hold Count n nombre de travaux pr d cesseurs c est dire qui doivent tre termin s pour que celui ci puisse tre ex cut Og n 32767 Si n O ou si le param tre HC est omis le travail est ex cutable sans pr alable BL Release donne les noms des PENE successeurs pour l ex cution desquels il est n cessaire que Le travail qui contient cette carte NET soit termin MC Normal Completion ce que l on doit faire de ce travail lors que l un quelconque de ses pr d cesseurs se termine correc tement F supprimer du syst me ce travail et tous ses successeurs R conserver ce travail dans le syst me et ne pas d cr men ter la valeur de HC D d cr menter de 1 la valeur de HC Si HC devient z ro ce travail peut tre ex cut AB Abnormal completion ce que L on doit faire de ce travail lorsque l un quelconque de ses pr d cesseurs se termine incorrectement F R et D ont la m me signification que pour NC NR Net 3 43 Release permet de d signer un suceessumt qui se trouve dans un autre r seau On donne alors le nom du r seau net nom et le nom du travail travail Exemple d utilisation de la carte NET exemple T pronio E Soit T1 T2 T3 t T4 des noms sch matis s de 4 travaux pas sant sous le sigle WRR1358 cartes J B e On d sire que pour ex cuter T2 T1 doit tre termin et pour ex cuter T
35. La correction standard permet de continuer l ex cution en rem pla ant le nombre en d faut par z ro A2 10 IH 209I DIVIDE CHECK division par z ro IH 2101 TH 212I IH 212I IH 215I IH 2171 IH 219I La correction standard permet de continuer l ex cution sans faire la division Ce message peut avoir diff rentes causes une erreur dans les ordre EQUIVALENCE une division par z ro pour un entier On cherche lire ou crire avec un format qui d passe la longueur du buffer en cas d criture ou ie lecture sur disque v rifier le DEFINE FILE acc s direct en cas de sortie sur imprimante v rifier que le Toat ne d passe pas 132 caract res en cas des travaux sur band v rifier qu il n y a pas de contradiction entre le DCB et l ordre d Entr e Sortie On cherche lire ou crire sans format une liste plus grande que l enregistrement logique On fera les m mes v rifications que pour IH 212I Mauvaise lecture par exemple on demande de lire du d cimal en format I ou bien on est positionn sur un caract re invalide On v rifiera qu il ne manque pas de cartes donn es ou qu alles ne sont pas m lang es On v rifiera qu il n y a pas eu une mauvaise reproduction de cartes caract re d cal par exemple Sur bande on v rifi ra que L on est bien positionn sur le bon fichier Rencontre d une fin de fichier alors que 1e programe pr voit d
36. a o END Cet exemple montre la possibilit de disperser et de regrouper des donn es La premi re boucle D lit les enregistrements n 5 10 aso 500 sur le fichier r f renc 8 Le tableau re oit la 1 re valeur de ces enregistrements le tableau B la 2 me etc soo L ordre FIND permet de trouver l en registrement qui sera lu par la suite pendant l ex cution des ordres de la boucle La deuxi me boucle D permet partir des tableaux F d crire des enregistrements L criture commence l enregistrement n 505 si la variable associ e ID n a pas t modifi e apr s le dernier READ Remarques nap irae eak a 408 omt mn ue Les ordres END FILE BACKSPACE REWIND ne sont pas utilisables pour un fichier avec acc s direct Un fichier cr avec acc s direct peut tre lu en s quentiel dans une autre tape 3 1 sue PARTIE LES INSTRUCTIONS DE CONTROLE DS ST Ne DUT MS Se MN DO OS aratna etea en Se De mm S 1 GENERALITES 1 1 Introdu tion IL existe diff rents types de syst mes d exploitation pour la s rie des ordinateurs 370 IEM Au CIRCE le fonctionnement des ordinateurs et le d roulement des travaux sont organis s et supervis s actuellement par L OS MVT version 21 6 Operating System Multiprogramming with a Variable number of Tasks et par l ASP version 3 Attached Support Processor Il s agit d un ensemble de programmes de traitement et de con
37. abandon du programme par le syst me est donn dans le fichier FTO6FO01 On aura par exemple un message de la forme IH900I EXECUTI N TERMINATING DUE T ERR R C UNT F R ERR R NUMBER 240 IH 240I STAE ABEND C DE s SYSTEM OZCS USER 0000 ooseese code d erreur eo nr 2 Re A20A59A6 adresse d interruption du programme TRACEBACK ROUTINE CALLED FROM ISN REG 14 MAIN REGS O REG 1 00012388 01015810 FF000018 OCOBDFD8 ENTRY P INI CE le adresse de chargement du programme Dans cet exemple le programme s est termin anormalement avec un code d abandon 0C5 dans le programme principal HAIN La diff rence entre l adresse EE EA EA et i adr sce de chargement du module en erreur donne l adresse en absolue du point d arr t Soit dans cet exemple Point de chargement 0A5810 Point d interruption 0A5946 A2 12 OA59A6 0A5810 196 hexad cimal 196 est l adresse de l instruction qui suit le point o il y a eu erreur Pour trouver l instruction F RTRAN qui a provoqu l erreur il faut obtenir une liste du code assembleur g n r la compilation Cette liste s obtient en sp cifiant l option liste liste la com pilation par l utilisation du param tre PARM FZRT de la carte EXEC On aura par exemple E REXECHETE CLG PARM FART LIST Dans le cas d abandon du programme avec des codes d erreurs portant sur la gestion des fichiers tels que COMPLETION CODE SYSTEM B37 D37
38. carte J B et avant la carte EXEC qui l appelle Tout se passe comme pour les proc dures catalogu es mais cette pro c dure n est valable que pour le travail dans lequel elle se trouve La signification des param tres de la carte PR est la suivante nom de proc dure nom de la proc dure in stream 1 8 caract res alphanu m riques Le premier tant obligatoirement une lettre param nom de param tres symboliques utilis s dans la proc dure Ils seront identifi s par La notation amp symbol d faut valeur par d faut donner au param tre symbolique correspondant Cette valeur pourra tre chang e en assignant dans la carte EXEC qui appelle la proc dure une nouvelle valeur au m me param tre symbolique Si la valeur par d faut est omise le param tre sym bolique est annul 3 49 Forme g n rale de la carte PEND aombPEND Cette carte indique la fin d une proc dure in stream nom 1 8 caract res alphanum riques le premier tant obligatoirement une lettre Ce param tre est optionnel Exemple d utilisation des cartes PR C et PEND proc dure in stream carte JB EFFACE PROC V LUME PP3330 REXECbPGM TEFER 14 DD1bDDbDSN amp FICHTER SERA DISP OLD DELETE UNIT 3330 1 FINbPEND A1HEXECHEFFACE FICHIER URR1358 RACHEMAR FIC 1 A2REXECLEFFACE FICHCER URR 1558 ROCHEMAR FIC2 VOLUME RESD2 3 EFFACE est le nom de la proc dure c
39. chaque fois que l ex cution d une instruction du programme analyser justifie la sortie d un message soit sur commande pour le sous programme TRACE et l ensemble des instructions ex cutables du module L instruction AT nan plac e dans le module o nnnn est l ti quette d une instr ction du programme analyser d finit alors le point d appel dans le programme analyser Les param tres d un instruction DEBUG peuvent tre indiqu s dans n importe quel ordre et doivent tre s par s par des virgules exemple DEBUG TRACE SUBCHK AT 150 TRACE N demande de la trace partir de l instruction 130 et Sisiyas des indices SUBCHK en s quence 5 5 1 Sous programme SUBTRACE Utilisation programme FARTRAN DEBUG SUBTRACE END Ce sous progranme provoque au fonen de l ex cution du programme FORTRAN l impression du message SUBTRACE XXXXXX o xxxxxx est le nom du programme FORTRAN et du message A Rene SUBTRACE RETURN au moment o Le contr le est renvoy une autre partie du programme ex cution de l instruction FZRTRAN RETURN C sous programme permet donc d afficher le nom du programme ou sous programme chaque fois que le contr le lui est transmis 3e52 Sous programme SUBCHK Utilisation Fo programme FARTRAN DEBUG SUBCHK X1 X2 o e Xn END gt Am Ce sous programme examine les valeurs prises par les indices des ta ble
40. cimal tendu partir de donn es pack es Option par d faut repr sentation alphanum ri quee CNTRL n indique Ll espacement ou le casier du perforateur pour la sortie n k s ns k 2 5 espacement simple impression ou casier 1 per foration c est l option par d faut espacement double impression ou casier 2 per foration espacement triple uniquement l impression STPPAFT n indique le nombre d enregistrements logiques devant tre imprim s ou perfor s Option par d faut tout le fichier STRTAFT n indique le nombre d enregistrements logiques sator avant impression ou perforation En format VS et VBS il s agit du nombre de blocs s sauter SKIP n indique une impression ou perforation s lective Un seul enregistrement sera trait tous les n enregis trementse Par d faut pas d chantillonnage MAXNAME n indique le nombre de cartes MEMBER sp cifi es dans Le cas de fichiers partitionn s MAXFLDS n indique le nombre total de param tres FIELD dans toutes les cartes REC RD La valeur par d faut est z ro MAXGPS n indique le nombre de param tres IDENT dans des cartes RECYRD successives MAXLITS n indique le nombre de caract res des zones sp cifi es dans les param tres IDENT des cartes RECYRD 4 29 Sous param tres valables avec PRINT seulement INITPG n indique la num rotation des pages n
41. correspondant une carte EXEC FIW unique Dans ce cas chaque travail comportera une carte JOB et une carte ENTRY et l ensemble de ces travaux se terminera par une seule carte STP RC Les param tres de la carte JOB sont Les suivantes valeur par d faut soulign es P 7e RS Re A eA KP 5 Code BCD 26 ou EBCDIC 29 dans lequel est perfor le pro gramme FORTRAN TIME 4 nombre entier de minutes 100 E Se jee nombre entier maximum de pages permises en dition PAGES i LINES nombre de lignes par page CHECK CHECK contr le l usage des variables non d finies RUN N CHECK NOCHECK ne le contr le pas FREE FREE permet l ex cution malgr des erreurs ventuel les la compilations 3 55 LIST listing du programme source NALIST suppression de ce listing LIBLIST listing des programmes recueillis dans des biblioth ques N LIBLIST suppression de ce listing WARN Edition des erreurs dites WARNING et EXTENSION N WARN Suppression de cette ditione Edition des messages dits EXTENSION NEXT Suppression de cette dition Tous ces param tres sont optionnels et mot cl c est dire que leur ordre est indiff rent Le compilateur WATFIV donne 3 sortes de diagnosties la compilation 4k ERROR erreur grave qui emp che l ex cution du programme WARNING erreur que le compilateur a pris sur Lui de corriger raisonnablement EXTE
42. demande son Re en m moire par le param tre PGM de ta cart EXEC De ee Il suffira de pr ciser dans une carte DD les caret et ques du fichier i pour lequel on d sire r server de la place et 4e nom du volume sur J quel se fera cette r servation exemple On d sire r server 5 pistes sur le disque RES304 pour y placer le fichier s quentiel dont le DSN est ne ROCHEMAR FICH2 y On proc dera de la fa on suivante carte JB JS TREXECHEGM TEFER 14 DDIBDDEUNIE 5330 1 DISP KEEP DELETE FAT VAL SER RES304 DSN WRR 1358 RECHEMAR FICH2 SPACE TRK 5 1 Dans ce cas on r servera 5 pistes d allocation primaire et une piste d allocation secondaire 1 1216 2 2 Compression d un fichier partitionn Au cours de remplacements successifs de membres existants d un fichier partitionn le syst me perd la place des anciens membres sur disque On est alors amen comprimer le fichier pour r cup rer toute la place inutilis e Pour r aliser cette op ration artei int ressante pour la gestion de biblioth ques de programmes on utilise la proc dure catalogu e CAMPRIME proc dure CIRCE L appel cette proc dure se fait par une seule carte EXEC CHEXECECPMPRIME FICHLER par 1 UNIT par2 V LUME par3 avec par 1 nom du fichier partitionn par 2 type d unit 3330 pour les unit s 3330 1 3330 1 pour les unit s 3330 11 par 3 nom du volume sur lequel r side
43. du fichier de sortie OUT Les messages donnant ces indications sont de la forme 00000 09020 IGHO7OI FILE SIZE 2000 SPECIFIED IGHOLSI END SORT PH IGHOLOI SKIP MERGE PH IGHOS4T RCD IN 1981 0UT 1981 IGHO52I END OF SORT MERGE j Dans cet exemple le nombre estim ARRET EREEMERLE trier gat de 2000 et le nombre exact est de 1981 e3e2 Orea arr a es Gun mn aree QU IRAN AT ED 208 QD En D DS Et DD meeen Gui CAN LS SED UE aN Dee DEE EE GR DEUX D S MON GRAS ne NS Supposons que pour effectuer une mise jour on d sire fusionner le 12 fichier amp PJ de l exemple pr c dent et un fichier identique de pluviom tries journali res d j cr dans un JOB pr c dent et mis sur bande magn tique et dont le DSN est PJFICH1 IL est donc n cessaire que le fichier PJFICH1 contienne des enregistrements identiques ceux de amp PJ et tri s selon le m me ordre Supposons que Le fichier PJFICH1soit constitu d environ 40000 enregistrements et que ses caract ristiques soient les suivantes DSN PJFICH1 RECEM FB LRECL 80 BLKSIZE 8000 num ro de la bande support SER 100000 On suppose que ce fichier est le 3 me de la bande qui poss de des labels standards IMM On aura en partant du fichier d origine carte JOB 2R1PEXECLSZRT lt tre tape voir exemple pr c dent JE FUS TOEXECbSPRT S RT S RTINO 1bDDUNIT 3330 DISP LD DSN RPI S RT S RTINO2bDDbUN
44. employ s jamais employ s LABEL DISP DCB Unit s acc s direct disques x gs a l ventuellement i Param tres toujours employ s employ s cr ation fichier DSN UNIT DISP DCB permanent V LL SPACE LABEL utilisation fi DSN UNIT DISP SPACE chier permanent VOL LABEL cr ation fichier DISP DCB utilisation fie DISP SPACE chier temporaire DSN UNIT LABEL V L DCB 7e2e 1e nom 3 27 poor ou DSN Ce param tre sp cifie Le nom d un fichier Sa forme g n rale est la suivante sen las as de Lanbre lee nom 8e nom Ce de membre lt ddnom nom d tape dd nom nom d tape nom d tape de proc dure ddnom DSNAME fichier sur bande i 1 17 caract res alphanum riques le premier tant obligatoirement une lettre fichier sur disque Au CIRCE le nom d un fichier permanent sur disque doit tre de la forme SIGLENUM NOMUTILESATEUR NOMFTCHTER eCt e es au choix de l utilisateur noms Lu facultatifs L8 caracte Nom de l utilisateur lt 8 caracte Sigle de L utilisateur 8 caract Au total le DSN ne doit pas d passer 4H caract res y compris les IL y a donc 22 niveaux de qualifications possibles exemple DSN WRR1358 R CHEMAR HYDROM JAUG PRSTOM nm prenne obligatoire Pour un fichier partitionn on aura DSN SIGLENUM NOMUTILISATEUR NOMFICHLER nom du membr
45. en chiffres d cima Longueur n octets Repr sentation interne _ Valeurs possibles s C mantisse z5 78 e 10 LI xT 7 chiffres d ci C caract ristique maux S si La mantisse occupe 7 octets 16 chiffres d ci La mantisse occupe 15 octets 1 6 D finition des variables en langage FORTRAN nb 0e ee fe Gun Ge QU Qu Ie Des eme UD AU OU Lu Eee Gras DRE AA En Eu QD ND QU DD DR QUE Wu QU DU LS MN QD D GE DO PE M DS VUS due Qu Qu Qu DR US MU Une variable FORTRAN est la repr sentation symbolique d une quanti t plac e dans une zone de m moire La valeur indiqu e par Le nom est toujours la valeur qui se trouve dans cette m moire ce moment l A1 8 Par convention en FZRTRAN toutes les variables sont de type REAL et de longueur 4 octets sauf si le nom de la variable commence par I J K LM ou N auquel cas ces variables sont consid r es comme tant de type INTEGER et de longueur 4 octets On peut cependant red finir la longueur et le type des variables soit par l instruction de sp cification IMPLICIT INTEGER a exemple IMPLICIT lt CONELEX Ve ET 1 soit par des instructions de sp cification explicites exemple REAL 16A 1B 8 10 3 1D0 5 0D0 nes ee eu ee ne meet que et plac e en t te du programme principal Dans un sous programme cette instruction doit tre unique et suivre la carte SUBROUTINE RP PRO DE CULIAT ES se NOR ES Acc s s lectif ou acc
46. en sortie sur imprimante Les renseigne ments suivants en t te le message EXAMEN DE LA BANDE nnnnnn y num ro de la bande ensuite si la bande contient des ee standard IM Le label de volume c est dire le num ro de la bande VYL SER nnnnnn Pour chaque fichier contenu sur la bande les labels de d but du fichier avec Les valeurs ses para m tres suivants une Tape Mark le contenu du fichier avec le nombre d blocs la longueur du bloc le plus grand en octets la longueur du bloc Le plus petit en octets une Tape Mark h 27 Les labels de fin de fichier avec le nombre de blocs la date de cr ation une Tape Mark En fin d analyse dernier fichier on a reproduction de la Tape Mark de fin d enregistrement et impression du message suivant FIN DE L EXAMEN DE LA BANDE nnnnnn Remarque importante Lorsque L on utilise la proc dure DUDUMP la bande n est pas rebo bin e en fin d ex cution IL est donc conseill d effectuer cette op ration en derni re tape d un JB 00200 TA O an 0 R D QE ORD a Sa D D Dr Pa Sn D 0 A REA OO Qu PT AG OAR PES GS UE GRR DON T SG RE OAR En D NA en A Ou P DS Gy Cette impression peut tre p e rapidement et simplement en uti lisant la proc dure DUMPBAND proc dure CIRCE La mise en oeuvre de cette proc dure se fait par appel l aide d une carte EXEC et avec la possibilit d avoir diff r
47. es est le format 9 canaux correspondant aux 9 bits d information et caract ri sant la bande comme une bande 9 canaux Ce format utilise 8 des 9 bits pour les donn es et le dernier comme bit de contr le ou bit de parit La parit est paire quand la somme des bits de valeur 1 d une m me verticale y compris le bit de parit est un nombre paire 1 2 Si ce nombre est impair la parit est impaire voir figure 1a Au CIRCE le nom g n rique d une bande 9 canaux d pend de la densit d enregistrement voir paragraphe b 2400 4 si l enregistrement est effectu avec une densit de 800 bpi BD16 si l enregistrement est effectu avec une densit de 1600 bpi BD60 si l enregistrement est effectu avec une densit de 6250 bpi De m me le format 7 canaux anciens la taide comme une bande 7 canaux et n utilise que 6 bits pour les donn es plus le bit de parit Au CIRCE le nom g n rique d une bande 7 canaux est BDE7 Suivant les constructeurs la parit est paire ou impaire IBM adopte une parit impaire pour les bandes 9 canaux et soit poire soit im paire pour les bandes 7 canaux b densit c est le nombre de caract res ou octets enregistr s par pouces Elle s exprime en bytes par inch bpi La densit peut tre 800 1600 ou 6250 bpi pour une bande 9 canaux 250 556 ou 800 bpi pour une bande 7 canaux 1 Au CIRCE la densit utilis e par d faut est 1600 bpi pour les bandes 9 cariaux
48. est gt 4 si le code retour de L tape LKED de la proc dure ins r e l tape HTAP5 est lt 12 Remarque importante concernant l utilisation des erani PARM REGI N et COND de la carte EXEC l Si plusieurs tapes sont touch es par les param tres PARM nep et ou REGI N nep et ou CAND nep ces param tres doivent tre donn es dans L ordre d occurrence des tapes qu ils concernent exemple i oy ETAP WEXECHFTXCLG REGI N GO 200K PARM F RT DECK est invalide car l tape G suit l tape F RT On doit crire ETAPIbEXECbFTXCLG PARM F RT DECK REGION GO 200K 3 25 7 CARTE DD La carte DD ou DATA DEFINITION identifie un data set fichier c est dire un ensemble de donn es class es selon un ordre prescrit et amp erit par des informations de contr le auxquelles le syst me peut acc der IL doit y avoir une carte DD pour chaque fichier utilis dans une tape de travail et l ensemble des cartes DD d une tape doivent suivre la carte EXEC indiquant le d but de cette tape 7 71 Formes restreintes de la carte DD Nous examinerons tout d abord 4 formes restreintes de la carte DD de Fichier diter adnombDDbSYS UT 8l i t l 2 Fichier lire dnombDDb DATA DiM de1imi teur 3e Fichier fictif anonbppppuar 4e Fichier ult rieurement d fini nom1bDDbDDNAME d nom2 DCB a d nom nom donn l
49. et non sur la fac turation Pour celle ci c est le temps r el d utilisation de la m moire cen trale temps CPU qui est pris en compte 3 12 Ce te ps CPU est donn sur la feuille comptable la restitution du travail et le d tail pour chaque tape est donn en t te du listing dans l tat SYSMSG par des messages de la forme IEF37kT STEP FORT STOP 760541340 CPU OMIN 01 465EC MAIN 248K LCS OK nes y ma Sy nom de date de la __ temps CPU encom L tape fin pour l tape F RT brement d ex cution compilation m moire Une demande insuffisante de temps entra ne L arr t de l ex cution lorsque le temps demand est coul et l impression en t te de listing d un message d erreur du type COMPLETION CODE SYSTEM 322 USER 0000 MSGLEVEL instructions messages instructions O liste de la carte JOB 1 liste de toutes les cartes e contr le y compris celles des proc dures catalogu es Valeur prise par d faut 2 liste des cartes de contr le de l utilisateur messages O messages d allocation seulement si fin anormale 1 liste des messages quelle que soit la fin valeur prise par d faut Pour l utilisation de fichiers sur bandes ou disques et pour la mise au point de programmes il est conseill de prendre l option MSGLEVEL 1 1 ou e qui revient au m me supprimer le param tre MSGLEVEL option 1 1 prise par d faut
50. fa on suivante 7 carte J B usuelle REXECHBPTUTI PARM par 1 V SER par2t U par3 D raini l Ni par 1 mot clef d finissant la fonction demand e FICSE donne la liste du fichier s quentiel en EBCDIC FICPE donne la liste du fichier partitionn en EBCDIC u oH par 2 nom du volume sur lequel r side le fichier par 3 type d unit sur laquelle est mont le volume 3330 pour les unit s 3330 1 3330 1 pour les unit s 3330 11 par 4 nom du fichier LL en ce ESERE A 200 un nan DS 20 mens Ju DS Qi Qu me D Que Guy Ab ME Vin dan Auf MN G opus Di LE DNS M e ANNE AG MON MAN LUS QU US DA DAS En MU carte J B usuelle 81bEXECbBPTUTI PARM VT CS V SER RES302 U 13330 11 82HEXECHBPTUUT PARM VT CD V SER RES302 U 1333011 D WRR1358 R CHEMAR HYDROM EZbEXEC B TUTI V SER PP3330 U 3330 1 D WRR1358 R CHEMAR FICH1 8HbEXECDBPTUTI PARM FICSE V nu 10 13330 11 D YWRR1358 R2CHEMAR FICH1 E ESbEXEChB TUTI PARM FICPE V SER RES302 U 3330 1 D WRR1358 R CHEMAR HYDR M e Dans cet exemple E1 donne la liste VI C simple du disque RESZO2 E2 donne la liste VI C avec le nom des membres du fichier partitionn WRR1358 RACHEMAR HYDROM E3 donne la liste hexad cimale du fichier s quentiel VER 1350 R CHENAR FIGE r sidant sur PP3330 E4 donne la liste EBCDIC du fichier s quentiel WRR1358 R CHEMAR FICH1
51. instruction DD 1 8 caract res alphanum riques le premier tant obligatoirement une lettre En COBPL c est le nom du trener qui suit ET ASSIGN 1 exemple SELECT FCAR ASSIGN TO UR S SYS005 cette instruction donnera lieu l utilisation du ddnom SYS005 Pour les programmes de traitement fournis par IBM compilateurs linkage editor utilitaires le ddnom est impos Ainsi pour la proc dure catalogu e FORTRAN H tendue FTXCLG les noms des cartes DD inclues dans la procedere sont lecture des donn es sur cartes FTO5F001 et SYSIN impression des r sultats FTOGF001 perforation des cartes FT07F0071 SYSQUT 3 24 Chaque ddnom doit tre unique dans une m me tape Le ddnom doit tre omis si le fichier d crit par cette carte est Mconcat ner au pr c dent La lconcat nation consiste reli s logiquement plusieurs fichiers en entr e d finis par des cartes DD successives Ils sont alors lus comme s ils ne constituaient qu un seul fichier Le ddnom doit tre compos en nom d tape de proc dure d nom pour pouvoir se ref rer une instruction DD pr cise lorsqu il en existe de m me nom dans des tapes diff rentes exemple dans une tape d ex cution d un programme FORTRAN JIE FTxxFyybDDbp aram tres XX repr sente le num ro logique du fichier utilis pour iden tifier Le fichier dans le programme yy repr sente le num ro de s
52. le fichier partitionn exemple On d sire comprimer la tebligh WRR1358 R CHEMAR HY DR M r sidant sur RES302 On proc de de la fa on Siren JJ carte J B 01REXECOCPMPRIME FICHIER WRR1358 R CHEMAR HYDR M _ UNIT 13330 1 V LUME RES302 1 2 55 Suppression de tout ou partie d un fichier 2 3 1 Suppression d un fichier s quentiel o partitionn r sidant sur disque Si on d sire supprimer un fichier s quentiel ou ee du dis que o il r side on peut utiliser la proc dur EFFACE proc dure CIRCE L appel se fait par une carte EXEC du type 81bEXECDETFACE FICHLER par 1 UNIT pare V LUME par3 avec par 1 nom du fichier a supprimer par 2 type d unit 5330 pour les unit s 3330 1 3330 1 pour les unit s 3330 11 per 3 nom du soie sur Lequel r side le fichier La ou valeur par d faut de ce param tre est PP3330 exemple On d sire supprimer le fichier WRR1358 RDCHEMAR FTCH1 r sidant sur RES304 1 17 On proc de de la fa on suivante carte J B GAMMELEXECLEFFACE FICHIER WRR 1358 R CHEMAR FICH1 VOLUME RES304 UNIT 1333011 i ARE o On obtient dans la liste dit e du fichier SYSMSG WRR1358 R CHEMAR FICHI coscosovesessssesose DENETED 23 2 Suppression d un membre d un fichier partitionn Si on d sire supprimer un membre d un fichier partitionn on utilise le programme utilitaire TEHPRYGM Ce programme a
53. le r sultat d une concat nation l uti lisateur doit appliqu r les r gles suivantes o RECM doit tre le m me pour tous les fichiers con cat n s e BLKSIZE peut varier mais le fichier ayant le plus grand param tre de Hlocage BLKSIZE doit ping nomm dans la premi re carte DD Les performancas du tri sont augrent es si les enregistrements sont bloqu s exemples d criture de la carte S RTIN S RT S RTINbDDb Le fichier d entr e est sur cartes et situ dans le flot d entr e Ager S RTINDDDLDSN WRR 1358 R CHEMAR FICH1 DISP LD UNIT 3330 1 VOL SER PP3330 Le fichier d entr e est sur disque 3330 Cartes SZRT SZRTINnn Ces cartes d crivent les caract ristiques de fichiers d entr e pour une fusion Elles ne sont pas utiles pour un tri o nn nombre compris entre 01 et 16 Ces num ros doivent tre don n s en ordre croissant On ne peut pas sauter d num ro Le fichier ayant le plus grand blocksize doit tre d fini par S RTINOT Le format d enregistrement doit tre le m me pour tous les fichiers d entr e La longueur de l enregistrement logique doit galement tre la m me pour tous les fichiers d entr e Si les enregistrements sont de longueur variable la taille la plus grande doit tre affect e au fichier SPRTINO 1 exemple de cartes SZRT SZRTINnn S RT S RTINOTWDDO cartes donn es 1er fichier sue yip S RT S
54. line en multiprogrammation m thode de travail permettant d ex cuter 1 ou plusieurs programmes de service ou annexes en m me temps qu un ou plusieurs programmes de traitement Table des mati res du Volume VTOC Volume Table of Contents fichier associ un volume de m moire acc s s lectif et contenant les labels des diff rents fichiers de ce volume Tache Task l ment de travail formant un tout pour des programmes de con tr le et consid r comme tel par l unit de traitement l ment de base de la multiprogrammation Tape mark marque de bande voir marque de bande Unit logique symbole utilis par le programmeur et d signant un type d unit physique i Volume d signation g n rale d une m moire externe identifi e d une fa on unique D signe toute la partie d une m moire accessible par un seul m canisme de lecture criture VTOC abr viation de Volume Table of Contents voir table des mati res du Volume 2 1 ANNEXE 2 UTILISATION PRATIQUE DU 370 168 168 Nous donnons ici quelques renseignements pratiques qui facifiteront l emploi de l ensemble mat riel logiciel actuellement disponible au CIRCE Rapellons que cet ensemble est pour l instant constitu d un ordinateur IBM 370 168 168 exploit sous les syst mes S MVT version 21 6 et ASP version 3 Nous indiquerons tout d abord quelques restrictions et contraintes diverses propres ce type d i
55. non initialis e indice w dans une variable indic e inversion d indices d une variable ose indices tableau d passant la place r serv e dans l ordre DIMENSION arguments de nature diff rente dans le sous programme et le programme principal exemple simple double pr cision A2 8 entier r el INTEGER 2 INTEGER os 2 boucles D avec m me num ro et m me indice 5 ect ses 222 Nombre de lignes ou de cartes demand insuffisante Les options par d faut au CIRCE sont de 2000 lignes et 200 cartes Pour augmenter ces valeurs utiliser une carte MAIN 222 Temps sp cifi insuffisant pour l ex c tion du JOB TT L option par d faut au CIRCE est de 30 secondes Pour augmenter cette valeur utiliser le param tre TIME de la carte JB h22 Nombre de cartes syst me trop lev LU RS ii t Ce nombre doit tre inf rieur 255 80A ou 80l Il n y a pas assez de plac en m moire pour e Augmenter le nombre de K dans le param tre REGION de la carte EXEC Option par d faut pour l tape G 6 K Ne pas oublier L encombrem nt des buffers d entr e sortie pour Les fichiers sur support magn tique avec un param tre BLKSIZE lev B37 Cette erreur apparait la cr ation atun fichier Ce fichier a besoin d utiliser l allocation secondaire pour s tendre et il n y a plus de place sur le volume solution recopier le fichier sur un disque qui poss de un espace lib
56. on peut ou non cr r les labels d identification Quand ces labels sont d finis par la gestion des donn es ils sont appel s STAN DARD LABELS IL faut savoir qu au moment du traitement 1 TOGS logique ne traitera que les tstandard labels Ces labels sont des enregistrements lisibles par l ordinateur en plus des fichiers qu ils Fe identifier 2 5 La figure 5 donne des exemples d organisation de fichiers sur bande magn tique avec ou sans labels standard dans le cas de volumes multifichiers et avec labels standard dans le cas d un fichier multivolume Le label de volume VOL 1 quand il existe est plac en t te de la bande IL est crit au moment o la bande est initialis e par l op rateur et n est en principe jamais chang Donc quand un fichier est chang on ne recouvre pas le label de volume Pour chaque fichier mis sur bande avec des labels standard IBM on a 2 labels d but HDR1 HDR2 plac s en t te et 2 labels de fin E9F1 EQF2 plac s en fin de fichier Ces labels contien nent des informations identiques relatives au fichier lui m me et en particulier son identificateur DSN Dans le cas d un fichier multivolume le label fin de la premi re bande utilis e E9V1 E V2 indique que le fichier continna sur un autre volume Les labels sont s par s des fichiers par des marques de bande individuelles appel es TAPE MARK Lorsque la mise sur bande a t faite sans labels les f
57. par d enregistrements enregistrement enregistrement physique par par sans cl piste par physique par cylindre sans cl piste cylindre 1 19 647 2 38 4253 53 57 3156 il 4 76 2858 5 9 2059 6 114 a Er Pt 2 13 1510 8 152 123 51 1327 9 171 118 52 958 1181 i 10 i 190 113 53 1007 1061 11 209 108 54 1026 962 i 12 228 104 55 1045 877 13 247 100 56 1064 l 805 14 266 95 57 1083 742 15 285 91 58 1102 687 16 304 88 59 1121 639 17 323 84 60 1140 596 48 342 80 61 1159 557 i 19 361 77 62 1178 523 20 380 73 63 1197 h91 i 24 399 70 6l 1216 463 22 48 67 65 1235 437 i 23 437 6h 66 1254 413 2 456 61 67 1273 391 loa X5 58 68 1292 371 26 494 55 69 1311 592 i 27 215 52 70 1330 335 28 532 50 71 1349 318 29 551 47 72 1368 303 li 30 570 45 73 1387 289 i 31 589 42 74 1406 276 32 608 LO 75 1425 263 33 62 38 76 14b 22 34 6 35 77 1463 241 j 35 665 33 78 1482 230 36 684 31 79 1501 220 37 78 29 80 1520 211 38 7e2 27 81 1539 202 39 7A 25 82 1558 194 4 760 23 83 1577 186 41 779 21 84 1596 178 ke 798 19 85 1615 E 4 86 165 i 20 PARTIE LES FICHIERS ET L ACCES A L INFORMATION aae mr DD que te ts mme DS ne At D dat un ma ent LOS que D ue Mn AS SU AS An DOS US DURS As DD St bon DE me D mn
58. plusieurs fonctions il permet de Supprimer un fichier s quentiel ou partitionn ou un membre d un fichier partitionn Renommer un fichier s quentiel ou partitionn ou un membre d un fichier partitionn Mettre dans le catalogue le nom d un fichier s quentiel ou partitionn R server de la place sur M A S pour un fichier s quentiel ou partitionn L emploi de ce programme n cessite 2 sortes d instructions a instructions du langage de contr le du syst me d exploitation TeCeLe 7 carte JB usuelle carte EXEC PE He etre j gt 2EXECHEGM LEHPRAGM carte d finissant le fichier des messages du programme IEHPRYGM SYSPRINTHDDESYSQUT A carte DD d finissant le type d unit et le nom du volume sur Lequel LEHPRYGM va travailler DD TODDbUNI T xxxx VOL SER 0000x DI SP LD b instructions de contr le sp cifiques l utilitaire IEHPR GM s Ces instructions sont annonc es par la carte SYSINbDDbe Elles sont dont p rfor es sur cartes Pour la suppression d un membre d un fichier partitionn ou d un Remarque UTILITY END 1 18 fichier s quentiel l instruction de contr le est la suivante b SCRATCHbDSNAME par 1 WL par2 par3 MEMBER park avec par 1 nom du fichier partitionn par 2 type d unit 3330 pour les unit s 3330 17 _ 33301 pour les unit s 3330 11 par 3 nom du volume sur Lequek r side le fichier par 4 nom du membre dans l
59. que T2 et T3 soient termin s On a pour le travail de no T4 NEL ID WRR13582 RL T2 T3 NET ID WRR1358Z2 RL T4 T2 NER ID WRR13582 RL Th HC 1 Th NET ID WRR13582 HC 2 On a 6 travaux d sign s sch matiquement par A B C D E F passant sous le sigle WRR1358 On d sire que si ou B se termine anormalement D soit sup prim du syst me ce qui mbrainem la suppression de son suc cesseur F On peut ainsi corriger et ou B les resoumettre Lorsqu ils se terminem correctement D et F s ex cuteront On a pour le travail de nom A NEI ID WRR1558Y RL C D NET ID MRR13587 RL C D E NBT TD WRR1358Y RI F H0 2 NEL IDWRR1358Y RLe F HG 2 AB F NET ID WRR1358Y RL F HC 1 NEI ID WRR1358Y HC 3 H H Q w Lorsque cette carte ESS elle se place derri re les cartes J B et MAIN Zali 1 CARTE CIRCE Cette carte de contr le ASP propre au CIRCE permet de pr ciser cer taines conditions d ex cution et de restitution priorit d lai d attente e Forme g n rale rene fnemenes pon pme 5 ee fer La sigmification des param tres est la suivante PASSW mot passe mot de passe de 8 caract res hexad cimaux Obligatoire pour certains num ros de calcul attribu s sur demande expresse de l utilisateur Il est alors li au num ro de calcul et une orthographe stricte du nom d utilisateur fourni dans
60. quence du fichier que l on veut traiter pour distinguer IRO utilisations successives en lec ture ou criture Certain ddnom ont une Re particuli re JABLIB d finit au niveau du J7B une biblioth que contenant un programme Load module appeler La carte J BLIBbDD doit tre plac e imm diatement apr s la carte JPB Elle ne doit pas appara tre dans une proc dure catalogu e STEPLIB d finit au niveau du STEP tape une biblioth que conte nant un programme load module appeler La carte STEPLIBbDD e doit tre ins r e parmi les cartes DD de l tape Elle peut appara tre dans une proc dure catalo gu e SYSABEND d finit un fichier dans lequel sera crit un dump des zones de m moire contenant le noyau du syst me et la r gion allou e au programme de l utilisateur SYSUDUMP d finit un fichier dans lequel sera crit un dump de la r gion d m moire allou e au programme de l utilisateur exemple I SYSUDMPODDOSYSUT A SYSQUT A d finit un fichier temporaire imprimer d s la fin du travail Au CIRCE Ies fichiers d impression d finie par le param tre SYS UT peuvent avoir des enregistrements logiques group s dans des blocs physiques de longueur inf rieure ou gale 2020 octets On a donc int r t augmenter le facteur de blocage des fi chiers d impression afin de diminuer le nombre d op rations d criture effectu es dessus On codera par exemp
61. s provisoire PP3330 exemple V L SER RES301 RETAIN Normalement un volume est d mont apr s sa derni re utili sation dans l tape Si une tape ult rieure du m me tra vail doit utiliser un fichier sur le m me volume il con vient d utiliser l option RETAIN pour viter un d montage et un remontage de volume manipulations qui sont fac tur es Avec l option RETAIN le volume reste mont en fin d tape IL sera d mont en fin d tape suivante ou de travail exemple VOL RETAIN SER 103278 Rangvol rang du volume monter parmi tous les volumes d un fichier multi volumes Nombre vol nombre de volumes utilis s par un fichier multi volumes REF le nom du volume doit tre retrouv dans une autre carte DD dans la m me tape ou dans une tape ant rieure La r f rence doit tre suffisamment pr cise pour ne pas oere anbi gu L option REF SSi particuli rement int ressante quand on d sire cr plusieurs fichiers mis s quentiellement sur une m me bande magn tique dont on ne conna t pas le num ro de volume num ro que sera attribu par le CIRCE exemple JET TIDEXEC ee Pen rre 1 unTn BD16 VOL RETAIN LABEL 1 SL ET2HEXEC a a i DDZPDDbDSN F T02 onreED16 v tanET lt ET1 DD1 LABEL 2 SL s0e 3 30 7e2ote LABEL Ce param tre donne le label d identification du volume et ventuellement les conditions d acc s lecture et ou c
62. situ sur n im porte quelle unit py NEETA Stil y a plusieurs fichiers traiter en entr e ils peuvent tre concat n s La longueur d un enregistrement ne doit pas d passer une piste les fichiers de travail tant situ s sur des unit s acc s direct 1 2 8 FUSION Les fichiers d entr e Here Stre au nombre de 2 16 Ils doivent tre organis s s quentiellement et contenir des enregistre ments de longueur fixe ou variable Les enregistrements des fichiers d entr e doit d j tre tri s selon l ordre d sir pour le fichier de sortie final Tous les enregistrements doivent tre du m me format les facteurs de blocage peuvent tre diff rents d un fichier l autre mais dans te cas le plus grand doit correspondre au fichier nomm le premier 1 3 Zones de contr le et s quence de classement Les enregistrements sont class s selon une ou plusieurs zone de con tr lett sp cifi es par l utilisateur La premi re zone sp cifi e est appel e la zone majeure Les autres zones sont appel es zones mineures hml IL peut y avoir un maximun de 64 zones de co tr le Elles peuvent se chevaucher ou tre contenues l int rieur d autres zones de contr le IL n est pas n cessaire qu elles soient contigu s mais elles doivent tre situ es dans Les 4092 premiers octets de l en registrement Chaque zone peut atteindre 256 octets de long mot de contr le La figure 9 dene TPE
63. sous programme compil on a un message donnant la place m moire non utilis e exem is exemple MAIN kkkk WND OF COMPILATION 108K BYTES OF CORE NOT USED SOUS PROGRAMME 4444 END OF COMPILATION TZ2K BYTES OF CORE NOT USED Dans cet exemple la place demand e tait 248K attribution par d faut pour L tape FORT Pour le MAIN 108K n ont pas t utilis s et 172K pour le sous programme Donc d une part 248 108 140K taient n cessaires et 248 172 76K d autre part La valeur minimale demander pour cette com pilation est donc 140K 10K pour tenir compte des fichiers tisse pendant la opipi tation 2 Edition de eus LKED Fichier SYSMSG l allocation demand e pour l diteur de liens est donn par le message IEF374T de l tape LKED exemple IEF374I STEP LKED ST P 76069 1905 CPU OMINOO 338EC RTE LCS OK Fichier SYSPRINT il fournit une estimation par d faut de la taille de la r gion n cessaire exprim e en hexad cimal gans le message MTOTAL LENGTH exemple TOTAL LENGTH 7030 La table de conversion donn e en annexe 1 donne POED en d cimal soit environ 29 K octets ces 29K il faut ajouter L encombrement dc burfets pour chaque Se fichier ouverte La r gion demander devra tre au minimum REGION TOTAL LENGTH n 2 BLKSIZE FICH1 BLKSIZE FICHn 10 2 tant au CIRCE la valeur par d faut du nombre de buffers attri bu s chaque fichier
64. suivant DATA SET UTILITY GENERATE GENERATE MAXGPS 1 MAXNAME 2 MEMBER NAME SS1 RECORD IDENT 3 END 7 MEMBER NAME SS2 PROCESSING ENDED AT EOD k 2 La proc dure CSPBDE Cette proc dure mise au point par le CIRCE permet la copie d un fichier s quentiel r sidant sur bande sur une autre bande Elle n est pas utilisable pour les autres supports Son emploi est tr s aie puisqu elle ne n cessite qu une carte de contr le EXEC carte JZB usuelle REXECLCPPEDE VAL 1 nnnnnn VPL2 nnnnnn N 1 DSN d avec exemple Les V L1I nnnnnn num ro de la bande sur laquelle r side le fichier copier V L2 nnnnnn num ro de la bande sur laquelle on d sire copier le fichier N 1 label du fichier rang sur la bande DSN d nom du fichier param tre DSN de la carte DD les fichiers copier doivent tre pr c d s de standard labels IBM Copie de 3 fichiers IDMAL ICMAL PJMAL plac s en s quence sur la bande 108024 sur la bande 110325 carte J B usuelle E TOEXECbC PBDE V L 1 108024 V L2 110325 N 1 DSN IDMAL E2bEXECbC PBDE VOL 1 108024 V L2 110325 N 2 DSN ICMAL E3bEXECECPPBDE V L 1 108024 V L2 110325 N 3 DSN PJMAL 124 ANNEXE 1 RAPPEL DE QUELQUES NOTIONS DE BASE ET DEFINITIONS 1 REPRESENTATION INTERNE DE L INFORMATION LE 1 Num ration binaire bit octete EU mai G
65. tr le r sidant dans l ordinateur et facilitant les L erenses phases des _ op rations programmes de traitement compilateurs utilitaires programmes de contr le gestion du travail et des donn es gestion des ordinateurs interconnect s 158 et 168 ex cution simultann e de plu sieurs programmes oee o Ce syst me d exploitation n cessite pour effectuer les travaux d sir s compilation ex cution utilisation et cr ation de fichiers ce des renseignements compl mentaires qui ne figurent pas dans le programme ou les donn es pr par es par l utilisateur An Ces informations indispensables constituent L s instructions de contr le qui ob isseht des r gles d criture tr s pr cises Une faute de syntaxe dans une instruction de contr le entra ne un message du type lt JCL ERROR et la non ex cution du travail Ces instructions peuvent tre 1nkoduites dans l ordinateur au moyen d unit s diverses Cependant l unit la plus couramment utilis e tant le lecteur de cartes on parlera de cartes de contr le On a donc un v ritable langage de contr le ou JL Job Control Langage qui permet de fournir des informations L ASP et T OS Les instructions commen ant par sont analys es par l ASP et ignor es par l S Ce sont des instructions ASP Les autres sont des instructions QS ASE a Certaines collections d instructions de contr le fr quemment em ploy es sont incl
66. verra attribuer 130Ke exemple 3 bEXECbFTXCLG REGION G9 130K seule l tape ex cution G se verra attribuer 130K les tapes de compilation F RT et d diteur de liens LKED se verront attribuer les yal urs sp cifi es par le syst me valeurspar d faut donn es i dessous Le param tre REGI N demande tre ajust sa valeur la plus basse possible car il intervient lors du calcul de la priorit de prise en compte dans la file d attente des travaux et surtout dans la fac turation du travail actuellement pour les travaux pass s au CIRCE l encombrement m moire intervient par son carr dans la formule de facturation Au CIRCE les valeurs par d faut sp cifi es Dar le Ber sont les suivantes pour la proc dure FTXCIG tape F RT 250K tape LIKED 42K tape G 6K L estimation du param tre REGI N peut tre faite pour chaque tape d apr s l examen des passages pr c dents en consultant les fichiers SYSPRINT contenant les listes de compilation t la liste de l di teur de liens et le fichier SYSMSG Ainsi pour un programme FARTRAN on a les indications suivantes 1 Compilation F RT Fichier SYSMSG messages en t te de listing L allocation de mand e pour la compilation est donn e par le message TEF574I de l tape F RT exemple IEF374I STEP FORT STOP 76069 1905 CPUOMIN 00 62SEC ICS OK 3 20 Fichier SYSPRINT Pour chaque programme ou
67. 1200 2400 proca d feet _ feet feet 1 0 05 22153 44307 0 10 41142 82285 3 0 15 0 75 57600 115800 4 0 20 0 80 72000 144000 pofa 0425 0 85 84705 169410 6 0 30 0 90 96000 192000 TA 0 35 0 95 106099 212205 me 0 40 700 115200 230400 9 OS 14 05 123426 246852 0 50 1 10 130900 261818 0 60 1 20 144000 288000 20 1600 1 00 1 60 180000 360000 30 2400 130 2 10 205710 411420 40 3200 2 00 R 221520 443040 50 4000 2e 50 3e 10 _ 232250 464500 60 4800 3 007 3 60 E 240000 480000 70 5600 LR 3542 702 245840 491680 8o 6400 4 00 4 60 3130 6260 250400 500800 90 7200 4 50 5 10 2823 5647 254070 508230 100 8000 5 00 5 60 2571 5442 257100 514200 j 110 8800 5 50 6 10 2360 4721 259600 519510 120 9600 6 00 6 60 2181 4363 261720 523440 430 i 10400 6 50 710 2028 1056 263640 527280 140 11200 7 00 7 60 1894 3789 265160 530460 150 1200 7 50 8 10 1777 3555 266550 533250 460 12800 8 00 8 60 167 3348 267840 535680 i 162 112960 8 10 8 70 1655 3310 268110 536220 Ces valeurs correspondent au nombre maximal d image carte que L on peut mettre sur 1 piste de disque 13030 octets de l unit 3330 2 24 Structure d une bande Un enregistrement est une suite conpig
68. 30 sauf si on utilise l option T dans le param tre RECIM auquel cas on peut coder jusqu 32760 octets La longueur minimale que lon peut coder est 18 octets Si RECFM F le BLKSIZE doit tre 2 longueur de l enre gistrement logique Si RECIM FB le BLKSIZE doit tre un multiple exact de la longueur de MERE logique Si RECFM V le BLKSIZE doit tre gt la longueur de L en registrement logique 4 octets TIRE Le compteur Si RECIM VB le BLKSIZE doit gte n fois le LRECL 4 octets pour le pompten l Di on code BLKSIZE dans le DCB d une carte DD pour un fi chier d j existant ce BLKSIZE recouvre le BLKSIZE crit dans le Le du fichier BUFN Sp cifie le nombre de buffers TE E au Die de ontr le DEN DS RG du fichier Le nombre maximum est 255 la valeur par d faut au CIRCE est 2 Sp cifie la densit d enregistrement pour une bande magn tique en ombre de bits par inch bpi DEN prend les valeurs 1 2 3 ou he bande 7 canaux DEN 1 pour 556 bpi 2 pour 800 bpi par d faut 2 bande 9 canaux DEN DEN 2 pour 800 bpi 3 pour 1600 bpi 4 pour 6250 bpi par d faut DEN 3 i N d finit l organisation du fichier On peut coder les valeurs suivantes i DA acc s direct IS s quentiel index 5 59 P PS fichier partitionn fichier s quentiel TRECI FPRBRONE r elle ou maximale d un TEE SR logique en octets
69. 8 caract res elphanum riques le ler tant obligatoirement alphab tique Actuellement pour le Service Hydrologique transmission par le navette de la rue du MAROC tous les Rio ont pour nom d utilisateur ROCHEMAR TIME Sep de calcul exprim en minutes et ou secondes et pr vu pour l ensemble du travail utilisation de L unit de caicul temps CPU pour passage sur le 168 SY1 La valeur sec doit tre inf rieure ou gale 59 La valeur par d faut est 30 secondes Ce temps de calcul pr vu doit tre estim par l utilisateur IL intervient dans la d termination par le syst me d une prio rit initiale d ex cution Cette priorit peut tre modifi e de 3 degr s au maximum en plus ou en moins sur demande de l u tilisateur l aide d une carte CIRCE voir chapitre 10 Une demande de majoration de priorit entra ne une majoration de facturation Le tableau 4 donne la priorit initiale en fonction du temps de calcul pr vu TABLEAU TV i Le priorit Pour un temps de calcul compris o Atala bo entre et vaut Qi 4 10 sec 11 sec a 20 sec 21 sec hO sec k1 sec 1 mn 20 sec 1 mn 21 sec gt gt 2 mn 40 sec 2 mn 1 sec 5 m 5 mi 1 sec 10 mm 10 m 1 sec 20 m 20 ma 1 sec 40 mn hO m 1 sec 11h20m 1h 20 mn 1 sec 24 h Oa NU EUAN Go O REMARQUE La valeur du param tre TIME de la carte JOB n intervient que pour L attribution d une priorit initiale de passage
70. 8 un f enregistrement logique dont la longueur est de 1600 octets la liste tant constitu e par un tableau B variables de longueur standard 4 octets on crira DIMENSI N B 400 READ 8 B Attention La lecture ou l criture sans format n est possible qu avec des enregistrements dont la forme est en variable SRE RECM VS ou RECFM VBS 1 Les caract res de la carte s parateur peuvent tre remplac s par un autre d limiteur qui devra alors tre sp cifi au niveau de la carte DD voir 3 me partie 2 7 voir la signification de L option ispann eti dans le paragraphe 1 5 3 de la 2 me partie de cette note Par d faut le syst me 370 du CIRCE op re en format VS avec une longueur maximale d enregistrement de 800 octets RECM VS LRECL 800 BLKSIZE 800 D autres instructions sont galement permises READ nf liste Cette instruction quivaut READ 5 nf liste E Lecture de cartes PRINT nf liste Cette instruction quivaut WRITE 6 nf liste sortie sur imprimante PUNCH nf liste Cette instruction quivaut WRITE 7 nf liste perforation de cartes en sortie On dispose aussi d instructions particuli res END FILE n1 ni num ro ions constante ou variable enti re de Lon gueur 4 d finissant le fichier r f rence la carte DD Cette instruction d finit la fin de l ensemble de donn es associ n1 en provoquant l criture d
71. ARTES PRgC et PEND Ces cartes compl mentaires permettent de d finir une s quence de cartes de contr le ou proc dure qui sera utilis e plusieurs fois dans le m me JB Forme g n rale de la carte PRA aomdeproc durebPR GE param 1 a faut q param2 a faut 21 paramn testa Cette carte peut tre utilis e lorsqu un travail reprend plusieurs fois un ensemble de cartes de contr le d finissant une ou plusieurs tapes carte EXEC et cartes DD sans changements dans le libell de ces cartes ou avec quelques changements d une utilisation l autre Cet ensemble de cartes peut tre pr par en 1 exemplaire qui sera ensuite in troduit dans le travail dans le flot d entr e avant les cartes d finissant les tapes du travail IL constitue alors ce que l on appelle une proc dure in stream proc dure utilisateur situ e dans le flot d entr e Il suffira ensuite de placer chaque tape o l on voudrait utiliser cette proc dure une carte EXEC nommant cette proc dure Les cartes JCL composant cette proc dure seront automatiquement ins r es la place de cette carte EXEC Les param tres symboliques de La proc dure pourront se voir attribuer une valeur diff rente chaque nouvel emploi de la proc dure Pour utiliser une proc dure in stream il faut inclure la proc dure commen ant par une carte PR C et se terminant par une carte PEND avec les cartes de contr le du travail apr s la
72. ASS CATLG M D CATLG UNCATLG o UNCATIG _ La fonction des 3 sous param tres est la suivante er sous param tre donne l tat du fichier lorsque l tape est initialis e 5 52 2 me sous param tre indique ce que doit devenir le fichier la fin de L tape si elle se termine normalement 3 me sous param tre indique ce qu doit devenir le fichier la fin de l tape si elle se termine anormalement La signification des valeune conventionnelles de ces sous paranes est la suivante NEW le fichier est cr par l tape en cours C est la valeur par S Ce Po 4 d faut du 1er param tre Lorsque ce param tre est cod il entra ne l ex cution des op rations suivantes sur bande cr ation du label suivant les options donn es dans le param tre LABEL sur disque 1 V rification dans la VI C du disque de l exis tence ou non du DSN du nouveau fichier Si le DSN existe d j apparition du message _ suivant UDUPLIC TE NAME N THE V LUME 2 Mise jour de la VI avec le nouveau DSN 3 V rification de la disponibilit d espace suffisant pour le fichier selon les indica tions du param tre SPACE Si la place disponible est insuffisante appa rition du message suivant MINSUFFICIENT SPACE N STORAGE Shared Le fichier existait avant l tape IL peut tre con sult par plusieurs utilisateurs En particulier les biblioth
73. BATUTT s permet B PERRE d une espace sur disque pour un fichier CIRCE permet la ne d un fichier partitionn CIRCE permet la suppression d un fichier Fee sur disque CIRCE permet l analyse des caract ristiques des fichiers con tenus sur une bande magn tique CIRCE permet l analyse et le listage des enregistrements contenus sur une bande magn tique CIRCE permet d obtenir la table des mati res VIZC d un dis que ou les caract ristiques d un fichier particulier ou la liste d un fichier s quentiel ou de tous les membres d un fichier partitionn Programmes utilitaires SYSTEM Ces programmes sont utilis s pour la main IEHLIST TEHPR GM IEHMOVE tenance et L exploitation du syst me permet le listage de la VIZC du DIRECTORY ou du CATAL GUE d une m moire acc s s lectif M A S permet de modifier ou d effacer un fichier s quentiel ou partitionn ou un membre d un fichier partitionn permet la sauvegarde d un fichier partitionn sur bande et son contraire Lu Programmes utilitaires MDONNEES Ces programmes servent cr r comparer changer dupliquer des fichiers IEBGENER permet la copie d un fichier s quentiel sur n importe quel support avec ou sans changement d organisation de tout ou partie du fichier IEBPTECH permet le listage sur imprimante ou la perfo ration sur cartes d un fichier s quentiel ou partitionn avec ou sans changement d or
74. DbSYSQUT A _ pour perforer des cartes SYSUT2bDDbSYSQUT B Remarques en entr e SYSUT1 on peut avoir des enregistrements de longueur fixe variable ind finie ou des enregis trements spann s L 27 en sortie SYSUT2 les enregistrements ne peuvent pas tre blom s 325 3 Instructions de contr le sp cifiques IEBPTPCH a Param tre PRINT et PUNCH PRINT indique que l on d sire imprimer le fichier PUNCH indique que l on d sire perforer le fichier Ces param tres sont plac s en t te et sont pr c d s d au moins un blanc et suivis ou non d op randes qui sont des sous param tres option Le format est le suivant bPRINTb op randes ou PPUNCHb op randes Param tres Op randes Sous Param tres option TYP RG yy C TPTCONV z2 CNTRI n ST PAFT n STRTAFT n SKIP n MAXNAME n MAXFLDS n LP MAXGPS n MAXLITS n applicables PRINT ou PUNCH applicables PRINT seulement CDSEQ n applicables CDINCR n PUNCH seulement 4 28 Sous Param tres applicables PRINT ou PUNCH TYPORG yy yy PS option prise par d faut indique que le fichier d entr e est en organisation s quentielle yy P indique que le fichier d entr e est en organisa tion partitionn e TYTCPNV 2z zz XE indique que l on d sire une sortie en hexad ci mal zz PZ indique que l on d sire une sortie en d
75. E FILE READ WRITE FIND Ces instructions dont nous allons pr ciser la fonction et l emploi per mettent de caract riser un fichier acc s direct et d effectuer sur ce fichier les op rations d entr e sortie et de recherche des enregistrements Signalons au pr alable une m thode particuli rement rapide permet tant d organiser en acc s direct sur disque un fichier originelle ment organis en s quentiel et dont les enregistrements sont obli gatoirement en format FIXE On se content dans ce cas de recopier le fichier d origine sur un disque l aide du programme utilitaire IEBGENER voir me partie en pr cisant ventuellement dans la carte de d finition du fichier de sortie carte SYSUT2 DD l attribut DS RG DA du param tre DCB exemple partir du fichier PJIVS organis en s quentiel sur la bande 104852 on d sire obtenir un fichier ACDIR orgas nis en acc s direct sur le disque SETOO8 RMDBOADIPBEURR 1358 ROCHEMAR 0 REXECHPGM LEBGENER REGI N 90K SXSPRINTHDDbSYSQUT A Z SYSUTMODDbUNIT BD16 DISP OLD KEEP KEEP DEN PJIV V L SER 104852 SXSUT2HDDEUNIT 3330 DISP NEW KEEP DSN ACDIR Z V L SER SETO08 DGB DSPRG DA RECFM F BLKSTZE 2604 SPACE TRK 656 1 RLSE SXSINbDDEDUMMY A Le fichier ainsi obtenu est utilisable en acc s direct condition d utiliser les instructions sp cifiques donn es ci dessus DEFINE FILE sn i 2
76. EF 1 DISP NEW PASS _SPACE TRK 10 5 dans cet exemple le fichier de sortie est sur ae il est tem poraire et pass l tape suivantes Carte SORT SYSIN Cette carte sert introduire les cartes directives du P S M dans le flot d entr e du travail exemple S RT SYSINbDDb BSPRTHFTELDS 1 13 cH A SIZE E2000 bEND J 410 1 4 3 Calcul de l encombrement des fichiers de travail tri Le nombre de pistes requises pour effectuer le tri des enregistre ments d un fichier est dom par la formule suivante CP NT SEE SES EE o T nombre de pistes requises pour l ensemble des fichiers _ de travail N nombre de fichiers de travail ce nombre doit tre compris entre 3 et 6 S nombre exact ou approch d enregistrements du fichier d entr e B K avec s B L 12000 pour les disques 3330 longueur en octets de chaque enregistrement du fichier d entr e Pour des enregistrements de longueur variable L est la longueur maxi male HW On ne conserve que la partie enti re de K si le calcul donne K O on prendra K 1 L utilisateur peut demander jusqu 6 fichiers de travail Le nom bre T de pistes calcul doit tre r parti d une mani re gale entre les fichiers 1 9 Exemples RME eRRLON du pros arime de TRI FUSTON Soit trier des nel ste de pr cipitations journali res sur cartes mod le PRSTAM CH 101 avant traitement par u
77. FICH2 PART cr sur ce disque j certe J B usuelle HEXECHPGM TEBGENER SXSPRINTHDDDSYSQUT A SXSUT ToDDbDATA cartes pouvant comporter des cartes en colonnes 1 et 2 pe SYSUT2bDDbUNIT 3330 V L SER SET002 DISP KEEP DELETE VF DSN WRR 1358 RCCHIMAR FICH2 PART SP1 SPACE TRK 1 1 1 J DCB RECFM FB LRECL 80 BLKSIZE 6400 SYSINbDDbDUMMY lI Copie du 3 me fichier label 3 dont le DSN est FICH3 et r sidant sur la bande n sur une nouvelle bande num ro non connu OUR Dee tn Ge cent ne eu QU 37 de l utilisateur en position de 1er fichier label 1 L op ration sera faite sans modification du blocage carte I usuelle REXECDEGM TEBGENER REGI N 90K SISPRINTbDDbSYS UT A SXSUT1bDDEUNIT BD 16 V L SER 102808 DISP LD KEEP 24 DSN FICH3 LABEL 3 8L DCB RECFM FB LRECL 80 BLKSIZE 12800 SYSUT2bDDbUNIT BD16 DISP NEW KEEP DELETE DSN NFIC 1 LABEL 1 8L DO GCREFS LRECL 80 BLKSIZE 12800 SYSINbDDbDUMMY Remarques Pour cet exemple de copie de b nde bande il est plus simple d utiliser la proc dure C PBDE qui sera d crite dans le paragraphe 4 2 Dans cet exemple il est n cessaire de demander 9OK pour le param tre REGION compte tenu des forts blocages 13K des fichiers SYSUTI et SYSUT2 On a environ 2X2X13 52K n cessaires pour les entr es sorties L 1 3 2 Copie avec changement de blocage
78. ISP NEW PASS Pour respecter les r gles de remplacement des cartes DD des proc dures catalogues il faut placer cette carte entre la carte EXEC et la carte C Ba SISIN DD exemple carte JB LEC OEXECbFTXCIG E RT SYSINbDDb programme FARTRAN sur cartes A2 6 1 68 e SYSINEDDb donn es sur cartes fichier 5 1 88 FTOBFOO 1bDDbUNIT 33301 ses EXT2bEXECbCBACLG C B SISLINbDDbDISP NEW PASS C B SISINbDDb programme C B L sur cartes LKED SYSIM DbDDbDSN amp amp EXT2 RUN DISP NEW PASS UNIT SYSDA SPACE CL 3 1 1 CONTIG G BYSOO5bDDbUNIT aee G SYS006bDDb Svo0sere torsetrececoesev Cr ation et r l ctire d un menbre d un fichier pertitionn axes un pro gramme F RTRAN nee an Pire La carte DD d crivant le fichier partitionn relire doit obligatoi rement contenir le param tre lt COO LABEL IN Si on oubliede sp cifier LABEL Ka on obtient dans le fichier SYSMSG un message de la forme Saa IEC225I O N MJ G FT10F001 254 PP3330 PEE E EN Code er Nom du fichier aa a Nom du volume sur Lequel Nom de la r side le fichier carte DD i Nom d tape Notons que la cr ation d membre d fichier partitionn avec un programme FORERAN exige la sp cifieation du param tre LABEL QUT dans la carte DD d crivant le fichier 2 ERREURS LES PLUS COURANTES
79. IT BD16 DISP LD KEEP V L SER 100000 LABEL 3 SL DSN PJFICH1 DOB RECFM FB LRECL 80 BLKSIZE 8000 S RT e S RT UTLDDbUNIT BD16 DISP NEW KEEP KEEP DSN PJFICH2 LABEL 1 5L ZA DCB RECFM FB LRECL 80 BuLZB 12800 SISARI SYSINbDDb PMERGEDFIELDS 1 13 CH A SIZE E42000 HEND O nan z Po mi Dans cet exemple le fichier r sultant de la fusion a pour DSN PJFICH2 et il congtitrele 1er fichier d une bande qui sera attribu e l utilisateur Ce nouveau fichier mis jour a un facteur de blocage de 160 au lieu de 100 pour le fichier PJFICH1 On remarquera dans cet exemple que le premier des 2 fichiers fusionner nomm par S RTINO1 est celui qui a le plus grand blocksize c est dire le fichier amp PJ BLKSIZE 12800 En sortie sur imprimante si l ex cution de la fusion a t correcte le sys t me r p te les sp cifications des cartes directives et donne le nombre exact d enregistrements du fichier de sortie Les messages donnant ces indications sont de la forme IGHOSHT ROD IN OUT 43628 IGHO52I END OF SORT MERGE 4 13 2 R servation Compression Suppression d espace sur disque Ces op rations peuvent tre r alis es l aide des proc dures catalo gu es RESER COMPRIME et EFFACE pr pres au CIRCE et des programmes utilitaires IEFBR1 et TEHPR GM de la biblioth que IBM 2 1 R servation de place sur disque tionn On utilise een pr
80. MP parage3 1 1 en utilisant une carte compl men taire G9 DDTAPE et en faisant r f rence la carte DD correspondant au fichier ayant donn lieu l attribution de la bande examiner On peut avoir d aubres sous param tres au niveau du param tre ID En particulier on peut donner des pr cisions sur le DCB conversion parit densit Dans ce cas ces parangeren sont mis entre quotes exemples d utilisation SRE carte J usuelle D1bEXECbDUMPBAND 1D 103345 gT i 100 HEXA 10 On analyse la bande 103345 en aan en sortie 100 blocs partir du 11 me et sous forme hexad cimale Tous les enregistrements sont imprim s saut dans le cas o il y au rait plus de 10 enregistrements incorrects cons cutifs carte J B usuelle DTbEXECHDUMPEAND UNIT BDE7 gpT 1 s132999 ID 1009761 DCB TRICH ET DEN 2 On analyse la bande 009761 bande 7 canaux on imprime ce qu il y a sur cette bande en repr sentation EBCDIC partir du 3000 me enre gistrement physique L23 carte J B usuelle DIbEXECbDUMPBAND PT HEXA BAD IB 103345 On imprime en hexad cimal les enregistrements physiquement incorrects 32 Analyse du contenu d un disque Un disque la diff rence d une bande est en g n ral utilis par plusieurs TRER l IL est donc int ressant de pouvoir imprimer la table en M ti res VIC d un disq
81. NORGE 4 idd 2147483648 SV 21474836147 igne positif igne n gatif i 32768 V lt 32768 INTEGER 2 Repr sentation des nombres en virgule flottante les nombres r els peuvent tre repr sent s en virgule flottante hexad cimale simple pr cision double pr cision ou quadruple pr cisions Le principe de la virgule flottante consiste repr senter un nombre r el R par le produit d un nombre M compris entre O et 1 et d une puissance de 10 C dans le syst me d cimal et une puissance de 16 dans le syst me hexad ci mal R Mxc A1 6 _par exemple 125 5540 0 125533 x 107 Un nombre flottant est donc repr sent par sa mantisse M sa caract ristique C En simple pr cision REAL 4 un nombre flottant est repr sent sur un mot de la fa on suivante Signe bit num ro O O pour les nombres positifs amp 1 pour les nombres n gatifs ii Caract ristique bits 1 7 Mantisse bits 8 31 Oo 1 78 31 La caract ristique C qui est exprim e sur les 7 bits 1 7 a donc pour valeurs minimales et maximales O et 127 Cet intervalle est diviser en deux pour repr senter des exposants positifs et n gatifs Par convention on a Caract ristique Bai 127 Exposant r el Donc l exposant r el E est compris entre 6k et 63 Pour l obtenir il suffit de More 64 la caract ristique 63 1 1 gt E par exemple c 63 gt E
82. NSION syntaxe permise propre WATFIV Cette syntaxe n est pas autoris e par les autres compilateurs FORTRAN FTG ou FTX Le compilateur WATFIV permet un certain nombre dre rtoneroni de langage par rap port au langage FORTRAN IV Par contre il comporte quelques restrictions et incompatibilit s par FRE au FORTRAN IVe Pour plus de d tails concernant l utilisation de ce de on se reportera la notice USER S GUIDE WATFIV publi e par le CIRCE 1505e2 ponp ateur F RTRANG1I et F RTRANH tendus Selon Les fonctions ex cuter les aE utilisant ces compila teurs comportent une deux ou trois tapese Ces tapes ont des noms impos s tape F RT compilation tape LKED diteur de liens tape G chargement et ex cution L appel de ces proc dures se fait l aide d une seule carte EXEC Proc dures FIG1 et FIX Ces proc dures permettent de compiler charger et ex cuter un poeeme F RTRAN Elles ne cHRORens que 2 tapes car elles utilisent le loader chargeur compilation CERT chargement et ex cution Gg 3 56 L emploi du loader n cessite d augmenter d environ 10K la place m moire r serv e pour l tape G Les noms des cartes DD valeurspar d faut incluses dans ces proc dures pour les fichiers usuels sont FTOS5F001 et SYSIN 1 FTO6F001 FT07F001 lecture des donn es sur cartes impression des r sultats perforation des cartes e vo oo Les autre
83. NTODDbSYS UT A SISUTIbDDbDSN WRR1358 a R CHEMAR FICH1 V L SER RES302 UNIT 3330 1 DISP LD SYSUT2bDDOSYS UT A SXSINbDDb BPRINTOTPTOPNV XE 1 exemple de impression du m me fichier avec dition s s les 2 blancs de s paration carte J B usuelle REXECbPGM TEBPTECH SXSPRINTbDDbSYSQUT A SYSUT 10DDbDSN WR 1358 RPCHEMAR FICH1 VOL SER RES302 UNIT 3330 1 DISP PLD SXSUT2bDDbSYSPUT A SYSINbDDb bPRINTEMAXFLDS 1 bREC RDbFIELD 80 On a indiqu MAXFLDS 1 car il existe 1 seul sous param tre FIELD Ce dernier vaut 80 LRECL 80 dans le DCB de SYSUT1 partir de la carte 1000 avec une incr mentation de 100 carte J B usuelle REXECHPGM TEBPTPCH SXSPRINTbDDbSYSAUT A 8YSUT1bDDbDSN WRR 1358 ROCHEMAR FICH 1 VAL SER RES302 UNIT 3330 1 DISP SLD 7 SXSUT2bDDbSYSQUT B h 32 SESINbDDb HPUNCHbCDSEQ 1000 CDINCR 100 j exemple 5 impression standard des membres S581 et S82 du fichier bo partitionn WRR1358 R2CHEMAR FIC PART r sidant sur SETOO2 et de DCB RECFM FB LRECL 600 BLKSIZE 8000 carte JB usuelle bEXECbPGM TEBPTPCH SXSPRINTbDDbSYSQUT A SXSUT1bDDbDSN WRR 1358 RACHEMAR FTC PART VAL SER SETOO2 UNIT 3330 DISP LD SESUT2bDDbSYSQUT A 8XSINbDDb PPRINTHTYPPRG PY MAXNAME 2 MEMBERDNAME SS 1 HMEMBERDNAME SS2 exemple 6 impression avec dition sans les 2 blancs de s paration des me
84. ROCEDURES CATALOGUEES o soso0evessecsssoeseccoesetcesee 127 A2 A2 7 42 11 A3 1 Alm L UTILISATION DES MEMOIRES AUXILIAIRES EN INFORMATIQUE AU SERVICE CENTRAL HYDROLOGIQUE DE L ORSTOM ARR RE Apr s la saisie de l information sur un support primaire qui g n ralement est la carte perfor e son traitement automatique n cessite sa m mo risation sous un faible volume de stockage et selon des crit res de regroupe ments logiques permettant son imm diate disponibilit Pour assurer un tel stockage on dispose de supports informatiques plus ou moins fiables et plus ou moins encombrants ce sont les m moires auxiliaires Ces m moires sont des supports magn ti guon qui doivent satisfaire des exigences assez contradictoires puisqu elles doivent permettre d enregis trer le maximum de donn es et les restituer dans un minimum de temps Le choix de la m moire auxiliaire et son utilisation pour un traite ment donn pose la fois des probl mes technologiques li s la nature du sup port et des probl tes d organisation m thode de rangement de lMnformation sur le support Ces deux probl mes sont en fait fortement li s et conduisent en pratique dis tinguer 2 types de m moires auxiliaires magn tiques en fonction du mode d acc s l information bandes magn tiques disques tambours magn tiques feuillets magn tiques oseo les m moires acc s s quentiel les m moire
85. S Due en OURS LUE MN OUT Er QUE QU LD UNS MS AD M PUS QU LAN UN BUS GDS AN QUE QD DAS ns UD AN ANS D AN PUIS Les ordinateurs utilisent la num ration binaire ou num ration base Le On a donc 2 chiffres O ou 1 correspondant 2 situations oui ou non Le courant passe ou ne passe paS eas L l ment constitutif d une donn e pouvant repr senter l une ou l autre de 2 valeurs ou tats distincts est appel bit Le bit abr viation de binary digit est le chiffre repr sentant l un ou l autre des nombres entiers Z ro et un en num ration binaire 1 bit permet de repr senter 2 nombres 21 4 bits permettent de repr senter 16 nombres 2 8 bits perneEtene de repr senter 256 nombres 28 ect s Un ensemble de bits cons cutifs trait s comme un tout constitue un mule tiplet ou byte L octet est un multiplet de 8 bits significatifs chacun PAR la valeur ou 1 ce qui donne 256 combinaisons possibles exemple 01010011 On emploie Le terme byte comme abr viation de 8 bit byte Le byte ou octet est la plus petite partie adressable de la m moire 1 adresse est un indicatif d signant l emplacement qu occupe une information mise en m moire Coded Decimal BCD IL s agit d une m thode de codage consistant transcrire un nombre d cimal non point en bloc comme on le fait en vrai binaire mais chiffre par chiffre chaque chiffre tant repr sent par l4 bits 7 Aie On garde do
86. S cec0e IEHPROGM UTILITY END 114 En cas d anomalie on obtient dans le SYSMSG soit SPACE NOT AVAILABLE il n y a pas assez de place dis ponible sur Le volume choisi soit DUPLICATED NAME ON THE VOLUME le nom choisi pour le fichier partitionn existe d j sur le volume consid r s 2 1 1 2 Cr ation d une biblioth que de programmes Supposons que L on d sire cr r une biblioth que de programmes FORTRAN ou COBOL sur disque On peut effectuer la compilation et Le link edit par utilisation des proc dures catalogu es FTXCL programmes FORTRAN ou CBACL programmes COBOL Ces proc dures donnent le Load module programme compil et link qui constitue un fichier d fini par la carte LKED SYSLMZD DD Ensuite chaque load module ainsi sauvegard constituera un MEMBRE d un fichier partitionn cr auparavant l aide de la proc dure RESER Ce fichier partitionn constitue alors une biblioth que de programmes directement ex cutables c est dire au niveau de L tape G Soit par exemple WRR1358 ROCHEMAR FICH 1 le DSN du fichier partitionn cr par la proc dure RESER dans un J B pr c dent voir parage 2 11 1 et devant constituerla biblioth que de programmes sur disque RES304 Soit P301 le nom de membre que l on attribue au load module du programme source rce FORTRAN P H301 que l on d sire placer dans cette bi blioth que On proc dera de la fa on suivante carte J
87. S d un mot ae contr le constitu de zones de contr le Les mots de contr le pour chaque enregistrement sont trait s selon la s quence EBCDIC 1 4 Mise en oeuvre du Programme SORT m MERGE P S Me Pour ex cuter le P S M l utilisateur doit crire 2 sortes de carte des cartes directives h des cartes J eCole Les cartes directives sont trait es par le P S M Les cartes J C L sont trait es par 1 Operating System 0 5 En g n ral l appel au P S M se fait l aide de la proc dure S RT D autres possibilit s d appel sont possibles mais elles ne seront pas d crites dans cette note deele Les cartes directives three Forme g n rale des cartes directives S RT MERGE END Les directives sont des informations qui permettent de d crire le fichier d entr e de fournir des renseignements concernant les zones de contr le sur TongueL en le tri ou la fusion naron r alis s Nous ta ici que les 3 Ai ohives Les plus im portantes fournit des informations concernant la zone de contr le et la taille du fichier traiter Cette directive est utie lis e pour un tri S RT elle ne doit pas tre utilis e pour une fusion fournit des informations au sujet de la zone de contr le et de la taille du fichier traiter Cette directive sert pour r aliser une fusion MERGE SE ne doit pas tre utilis e pour un tri signale la dde s de directives Fig 9
88. SO CONME CO D 080 sos o ORES EE ENE DD EREEREER Y Bande 9 canaux Bande 7 canaux m Bit 1 o Bit a0 ta PARITE DES BANDES MAGNETIQUES 1 pouce NES Enregistrement Gap Enregistrement Gap Enregistrement physique physique physique Bloc de 1600 octets Bloc de 1600 octets Bloc de 1600 octets EXEMPLE DE STRUCTURE D UNE BANDE MAGNETIQUE DENSITE 1600 bpi Enreg E E E E E E E logique L l L L L L L 1c STRUCTURE D UNE BANDE MAGNETIQUE FACTEUR D BLOCAGE 5 O R O R S T O M Service Hydrologique T O M Service O R S T O M Service Hydrologique ne ee 1 3 s nombre de caract res de contr le de polarit par bloc enregistr en g n ral 82 Or l q densit d enregistrement en bpi amp longueur d un gap en g n ral 0 6 pouces Le tableau 1 donne la capacit approximative des bandes magn tiques 9 canaux enregistr es en 1600 bpi en fonction du facteur de bloge des enregistrements avec un longueur d enregistrement logique de 80 octets c est dire correspondant 1 carte perfor e 80 colLonnes e TABLEAU I CAPACITE APPROXIMATIVE DES BANDES 9 CANAUX 1600 BPI EN EQUIVALENT CARTES 80 COLONNES nombre de i inombre de blocs nombre de cartes nombre de f i cartes A longueur longueur en par bloc caract res du bloc bloc band bande bande facteur inches gap aP ds de octets inches 1200
89. TION D 2e 2e 2e ane D ne ES D nee 200 pea aE D MR DOS me me ne ue Nous n examinerons dans ce chapitre que les 3 supports utilis s au Service de ele de K PERION pour la gestion et L utilisation des fichiers de donn es les ERA perfor es les bandes magn tiques les disques magn tiques 1 LES CARTES PERFOREES Il s agit de cartes dites 80 colonnes mesurant 19 x 8 cm norme AFNOR 55301 La carte pr sente L avantage d tre individuelle palpable de v ri fication facile et de stockage ais Elle convient parfaitement pour la saisie primaire de l information Ses inconv nients sont essentiellement sa capacit limit e 80 octets et surtout son encombrement volumineuxe En outre sa duplication est lente et co teuse Le poids des cartes est un facteur important pour leur stockage l 2 000 cartes contenu d une bo te standard IBM p sent environ 5 kg 300 000 cartes stock es p sent environ 1 tonne y compris le mat riel de stockage 2 LES BANDES MAGNETIQUE o Une bande est constitu e d un film souple mince oran de support la couche Teri Por nes fs Elle se presente comme uh ruban d un icii pouce FT larg 12 7 mm et d en g n ral 2400 pieds de long 730 m environ enroul sur une bobine 2 1 Caract ristiques a parit une bande magn tique supporte dans sa largeur 7 ou 9 bits d information figure a En g n ral le format d enregistrement des donn
90. ae Du SU 00 2 Qu D D 0 NE D Qu D 0 La repr sentation hexad cimale est surtout utile pour lister des donn es crites en binaire Cette liste peut tre obtenue l aide de la proc dure B UTI Elle se pr sente en sortie sous la forme de 120 caract res par ligne avec 2 blancs ins r s tous les 8 caract res il s agit en fait de la forme standard des sorties du programme IEBPTPCH Pour obtenir cette liste on Bpper1e la proesas B TUTI de la fa on suivante carte J B usuelle 2EXECbBPTUTI PARM par 1 H V SER par2 U par3 D par par 1 mot clef d finissant la fonction demand e PARM FICPH donne la liste hexad cimale du fichier parti tionn Option par d faut liste hexad cimale du fichier eee pas de phraserrs PARM nom du voline sur Lequet sesde Ja fichier f i aia D par 3 type d unit sur laquelle est mont le volume 3330 pour les unit s 3330 1 3330 71 pour les unit s 3330 11 par l nom du fichier aa mos Omp Tous eut EnG Qu A 1008 oap QU GA Da UD A QU oa ue 2 AAD DOG GAG GO OO SAG AO CS Gat PER HU RS VE CAES GE GE DOS us AE LE aAa An me Qu e aas amo aia Qu LR QUE JS OTR O A AA NA Pour obtenir cette liste on utilise galement la proc dure B LUTI Seuls Les 80 premiers caract res de chaque enregistrement logique sont imprim s en EBCDIC La pr sentation est de 80 caract res par ligne 4 25 L appel de la proc dure se fait de la
91. aisant ventuellement pour chaque enregistrement avec ou sans suppression d une partie de l enregistrement avec ou sans organisation des octets avec ou sans conversion des caract res avec ou sans rajout de caract res copier avec changement d organisation partir d un fichier s quentiel cr ation de 1 ou plusieurs membres d un fichier parti tionn H 122 Langage de contr le n cessaire Le programme TEBGENER est utilis avec des cartes de contr le syst me et des cartes param tres qui lui sont sp cifiques La structure g n rale est de la forme suivante carte J B usuelle REXECbEGM TEBGENER SISPRINTbDDbSYS UT A SISUTIbDDb sescoseeo SYSUT2bDDb sesososeo SYSINbDDb instructions de contr le sp cifiques l utilitaire TEBGENER 4 35 o SESPRINT d finit le fichier des messages de IEBGENER SYSUT1 d finit le fichier d entr e recopier SYSUT2 d finit le fichier de sortie sur lequel sera copi le fichier d entr e Zerue Pour la copie simple et la copie avec changement de i blocage des enregistrements il n y a pas besoin d ins tructions de contr le sp cifiques Dans ce cas on a donc SXSINEDDbDUMMY AE DD NE DS QUE MUR ner PS Ou MS EN DONS SNS D AS NY ROUE Du hele3ete Copie simple d un fichier Dans ce cas aucune instruction de con tr le sp cifique n est n cessaire TEBGENER permet alors tr s facile ment un changement de support Copie sur imp
92. apacit par cylindre 247570 octets 24570 octets Capacit par module 100 millions 200 millions octets octets Temps d acc s moyen 30 ms 30 ms 3600 t m 3600 t mn Vitesse de rotation D bit 806000 octets s 806000 octets s Actuellement 6 unit s de disques du CIRCE sont du type 3330 11 Il s agit deg volumes BAN101 ROR RES301 RES302 RES303 et RES304 Toutes les autres dites sont du types 33301 334 Organisation d un volume MeAeSe Le premier enregistrement contient le nom du volume IL est appel VOLUME LABEL ee de au CIRCE on aura selon le volume les noms suivants SETnnn pour un disque montage la demande Setup BANinn pour un disque banal ou disque scratch RESinn pour un disque priv en ligne r sident PP3nnn pour un disque priv provisoires avec nnn ou inn num ro d ordre Les enregistrements suivants contiennent la table des mati res des noms des fichiers qui r sident sur le volume Elle est appel e VTOC volume Table of Contents Elle fournit les caract ristiques de chaque fichier et la place encore disponible Le fait d enlever de la VIOC le nom d un fichier quivant effacer le fichier du volume sans pour autant r cup rer la place de ce fichier Cette op ration s appelle le SCRATCH du fichier Les noms des fichiers sur un m me volume doivent donc tre tous diff rents En plus des donn es
93. ar une carte ENDDATASET N indique que la premi re carte ee J Beo rencontr e marque la fin du fichier et le d but d un autre travail Le fichier peut galement dans ce cas se terminer par une carte ENDDATASET mais cela n est pas obligatoire F is La bee DD ventuellement miari pour le fichier cr par DATASET doit obligatoirement tre de la forme a nombDDbUNIT CTC DEFER VPL SER 123456 ZA DCB RECFM F LRECL 80 BLKSIZE 80 Il s agit en effet des r f rences correspondant au lecteur de cartes exemple nacre nEUM J VES fichier cartes contenant une ou des cartes 0 J Bee e ENDDATASET HEXECHPGM ALPHA TNEUTT bDDbUNTT CTC DEFER V L SER 123456 DCB RECFM F LRECL 80 BLKSIZE 80 ecaosoveococoeocossoceooo 3 42 9 CARTE NET La carte NET est une carte de contr le ASP qui permet de forcer l en chafnement de divers travaux dans un ordre pr d termin r seau du travaux net Forme g n rale NETbIDenon ES Lretravattt stravatin Qre pimir Qas oirir R netnom travai La signification des param tres est la suivante ne ID nom du r seau net auquel appartient Le travail qui contient cette carte NET Ce nom est obligatoirement de la forme SiglennnX 8 carac t res max Siglennn sigle et num ro de calcul de la carte J9B WRR1358 X 1 caract re alphanum rique au choix
94. aram tre SPACE de la carte d finissant le fichier voir 3 me partieinstructions de contr le carte DD i L organisation partitionn e est obligatoire pour la sauvegarde du r sultat du link edit Load module ex cutable d un programme que L on d sire conserver sur disque et utiliser ult rieurement Dans ce cas le nom du membre du fichier partitionn est uti lis dans l instruction d appel pour l ex cution EXEC ECM MEMBRE Dans une E partitionn e tous les l ments ont des propri t s analogues formats d enregistrement blocage options utilis es Chaque l ment a un nom simple form de 1 Fig 6 FICHIER PARTITIONNE Nom de l l ment emplacement physique 7777 CR RER Re membre D Espace libre ancien l ment supprim Directory Espace libre disponible ENTREE MEMBRE A ENTREE MEMBRE B ENTREE MEMBRE N ZONE LIBRE du DIRECTORY Longueur d un enregistrement Directory 254 octets 2 octets 6b Organisation d un enregistrement du r pertoire Directory Nom du MEMBRE Informations de l utilisateur ou ALIAS lt 8 octets 2430ctets 261 2e 0 62 octets gt 6c Organisation d une entr e du r pertoire ENTREE MEMBRE N TTR Pointeur sur le premier enregistrement du membre l C Indicateur si alias longu
95. arte MEMBER bMEMBERbNAME par 1 par 1 nom du membre cr r ordre RECORD annonce l identification du dernier enregistrement consid rer pour la cr ation du membre dont on vient de donner le nom Le param tre IDENT de l ordre RECORD a la m me signification que dans le cas de la copie avec dition voir paragraphe Le10323e En l absence de IDENT tout le fichier est pris en compte le nouvel ordre MEMBER siil existe annonce la constitution d un deuxi me membre dont le premier enregistrement sera celui qui suit imm diatement le dernier Se qui a servi cr r Le premier membre exemple On d sire cr r les 2 HoE S ss et 882 partir d un Fichier s quentiel sur carte fichier seguentiel sur comprenant deux SOUS programmes F RTRAN S61 sera compos du 1er sous programme et se termi nera par la carte END END perfor en colonnes 7 9 582 sera le 2 me sous programme ne Soit WRR1358 R2CHEMAR FICH PART le fichier choisi d j cr r sidant sur le disque BHFOBES On aura i carte J B usuelle REXECHPGM TEBGENER SXSPRINTbDDbSYSQUT A SXSUT1bDDbDATA sous programme 551 sur cartes P Lies SXSUT2bDDEUNIT 3330 VOL SER SETOO2 DISP M D KEEP _ DSN WRR1358 R CHEMAR FICH PART SYSINbDDb DGENERATEbMAXGPS 1 MAXNAME 2 MEMBERbNAME SS1 bRECPRDbIDENT 3 END 7 MEMBERpNAME SS2 On obtient dans la SYSPRINT Le r sultat
96. asasaoesrcoocogoeseonopooouo t 12e Carte DELTIMITEUR 7 000098020000 400 26000000080 13 Carte FIN de TRAVAIL NULL s ssssoosesosscoeso 14 Cartes PR C et PEND ssecesoooescosooososcesosesosoeo 15 Les proc dures catalogu es seosceeveocooosososoososse 4 me PARTIE LES PROGRAMMES UTILITAIRES escoococoacossevocaeoeccoo 4 Tri fusion SORT MERGE rec o0ocossoecoecesaeosae 2 R servation Compression Suppression d espace so sur disque 200000608690 0000 00490060068000 00 3 Analyse du contenu des supports magn tiques ssocecees le Copie des fichiers cs00020900505 069590020005 ANNEXE RAPPEL de QUELQUES NOTIONS de BASE et DEFINITIONS 60e 1 Repr sentation interne de l information coc00 0 0 2e D finition de quelques termes utilis s en infor oeoe matique 200000640060 0086e00090900696es5essesenses nes e PAGES 7 1 1 1 11 i l 2m1 Em ach 31 31 Zuly 3 10 3 15 314 3 16 3 23 3171 312 Zalh 3 h5 3 46 3 47 38 5 50 lym 1 43 4 13 419 E A1 1 A1 1 11 68 ANNEXE 2 UTILISATION PRATIQUE DU 370 168 168 e ooo0sese0000see 1 Restrictions et contraintes diverses secsesecseseeoee Le Erreurs Les plus courantes 6 00 0e00ve6a0 s0c0s8 08e 3 Outils de mise au point des programmes FORTRAN ce ANNEXE 3 RECAPITULATIF DESCRIPTIF DES PRINCIPAUX PARAMETRES DE LA CARTE DD PARA EMe me c e see ec severe enr ee ANNEXE 4 EXEMPLES D UTILISATION DES CARTES DE CONTROLE ET ve P
97. aux X1 X2 Xn au moment de l ex cution En cas de d passement de la dimension r s rv e pour le tableau X il provoque l impression du message S BCEK X nnn o X est le tableau contr l et nnn la valeur de l indice lin aire correspondant aux valeurs prises par les indices du tableau en d passement De la m me fa on si un indice du tableau X est trouv gal z ro on aura sortie du mossage SUBCHK X 0 Si aucun nom de tableau n est pr cis dans l option l examen a Aaen pour tous les tableaux du programme 33020 Sous programme INIT Utilisation programme F RTRAN DEBUG INIT X1 X2 Xn END Ce sous programme provoque chaque transfert d une valeur dans X1 X2 Xn l impression d un message du type X nn nnmn X1 X2 s Xn pouvant tre des variables simples ou des tableaux Si aucun nom de variable n est pr cis dans l instruction DEBUG INIT L examen et la sortie d s valeurs sont effectu s po r toutes les va riables du programmes 3 5 4 Sous programme TRACE L appel ce sous programme se fait sur commande l aide de l ins truction AT nan OO y sia O nnn d signe l tiquette d ue instruction d programme analyser Ltex cution des instructions qui suivent AT nnn a lieu imm diatement avant celle de l instruction r f renc e nnne Lorsque l option TRACE a t sp cifi e dans 1iipstiustion DEBUG l ex cution du a DE M correspondant e
98. buffer et la longueur de l enregistrement et ceci ne peut tre chang par les param tres du DCB de la carte DD exemple DEFINE FILE 8 40 200 U IC mon m Cet ordre caract rise un fichier de num ro logique 8 Ce fichier aura au maximum 40 enregistrements inf rieurs ou gaux 200 mots les enregistrements seront lus ou crits sans format la variable associ e tant IC 215 La variable associ e peut tre utilis e dans des sous programmes a ue Su am a READ n1t r nf liste WRITE n1t r nf liste he n1 num ro logique de r f rence du fichier r expression arithm tique enti re repr sentant le num ro de l en registrement lire ou crire nf num ro de format facultatif liste liste des variables simples ou indic es La variable associ e ne doit pas figurer dans la liste Ces instructions permettent de lire ou d crire 1 ou plusieurs enregis trements sur un fichier acc s direct ayant t pr alablement caract ris par un ordre DEFINE FILE La Lesture et l criture se font avec ou sans format exemple DEFINE FILE 8 500 10 L ID1 10 100 28 1L ID2 exempl A M 20 ff os ss ID2 21 10 F RMAT 5I2 9 READ 8116 10 M K K 1 10 13 WRITE 10 ID2 5 A B C D E F G ST P END Les fichi rs acc s direct r f renc s 8 et 10 tant suppos s mis sur Le disque r sident RES302 Les cartes de contr le d finissant ces fic
99. carte J9B bEXECECBAb REGIN G 2O0K C B SYSINbDDo programme C B L sur cartes id 80 SXSINbDDE donn essur cartes A Proc dure CBAC Cette proc dure permet la simple compilation d un programme C B L et comporte donc une seule tape C B exemple d utilisation carte J B REXECECBAC 08BSYSINbDDb programme C B L sur cartes 3 60 Proc dure CBACL Cette proc dure permet de compiler et d effectuer le link edit d un programme source CYBPL 2 tapes C B compilation et LKED eee exemple d utilisation programme source COBOL et donn es sur cartes carte J B REXECECEACL 088 SYSINbDDb programme C BgL sur cartes Proc dure CBACLG Cette proc dure permet de compiler d effectuer le link edit et L ex cution d un programie source CHEPL en 3 tapes CYB KP ag Les noms des cartes DD dede la proc dure et Certes dHlenE des fichiers usuels sont lecture de cartes SYSIN impression de r sultats SYSQUT Pour les autres fichiers le DDNAME est le nom du fichier qui suit L expression ASSIGN T dans le programme C B L exemple SYS00k SYS005 SYS007 see exemple d utilisation s programme source C B L et donn es sur cartes fichiers SYSIN SYS006 SYS007 carte J B REXECPOBACLG REGI ZN 90K C B SYSINbDDb nee C B L sur cartes Ce U asistibpbe donn es sur cartes fic
100. chaque piste contient un certain nombre d infor mations suppl mentaires n cessaires au syst me d exploitation IL s agit notamment de l adresse de la piste de l adresse et de la position de chaque enregistrement de la marque de d but de piste index point et ventuellement des marques de secteurs La piste contient galement des espaces entre enregistrements Gap qui comme dans le cas des bandes magn tiques influeront fortement sur la capacit r elle d information de cette piste Chaque enregistrement de donn es contient sa propre description ee une zone de comptage IL poss de galement e marque d adresse et ventuel lement une zone cl La marque d adresse zone 2 octets permet au syst me de Localiser le d but de l enregistrement La zone de comptage donne la longueur de l enregistrement et celle du bloc La zone cl permet de reconna tre les donn es lors d une seule r volution d un disque Elle contient l indicatif ou cl de l enregistrement Sa longueur est comprise DISQUES NOTION DE CYLINDRE Un cylindre est constitu par les pistes ayant le m me num ro sur toutes les faces date D1V 261 848 ___ _ _ entre 1 et 255 octets et elle est nulle si les donn es n ont pas d indicatif dans ce cas la ose n existe pas L acc s aux enregistrements est te par un bras de lecture criture qui s ins re entre les disques et qui est appel pe
101. chiers distincts S paration des donn es d entr e en un fichier de donn es fixes mises sur un disque et lues partir de ce disque Cet un fichier de donn es variables lues sur cartes par exemple pour l exploitation d un mod le de simulation etc a 2 LES CARTES DE CONTROLE 2 1 Objet des cartes de contr le 2 1 1 Les cartes principales Ces cartes ont pour objet Soit de fournir les renseignements g n raux et de d finir les options principales int ressant l ensemble du travail i 3 Ce sont les cartes L J B et MAIN Soit de fournir pour chaque tape les renseignements qui n int ressent que cette tape carte EXC Soit de fournir pour chaque fichier utilis dans une tape la description de ce fichier et de son support d finition de donn e Data Definition carte Soit de poser l encha nement de divers travaux dans un ordre pr d termin R seau de travaux net H carte NET Lorsque des r sultats doivent tre dit s list s ou perfor s dans des conditions particuli res plusieurs exemplaires im prim particulier os de donner les directives correspon dantes format d dition format carte FORMAT i 2a 1e2e Les cartes secondaires Elles ont pour objet D finir une s quence de cartes de contr le ou proc dure qui sera utilis e plusieurs fois dans le m me JOB ca
102. cipale soit suffisamment grande pour contenir _l enregis trement le plus long SUN Cette sp cification sera effectu e l aide des param tres de la carte DD et sera examin e dans la 3 me partie de cette note Dans un Hoor on ne doit pas m langer des enrogistrenente de formes diff rentes Des aeea rene group s Grame moins de Sacs sur le ri et assurent une efficacit accrue au cours des traitements en diminuant les temps de lecture ou criture Le groupage peut cependant tre limit par Pi ue accru dans les zones d Entr e Sortie capacit des bui fers 15 3 Options suppl mentaires Il existe d autres formes particuli res possi bles d enregistrements Option S SPANNED OPTION Cette option indique que les enregistrements logiques sont tendus c est dire contenus sur plusieurs enregistre ments physiques Ceci n est possible qu avec des enregistrements de longueur variable et on d finit ainsi 2 formats suppl mentaires le Format variable spann VS e le Format variable bloqu spann VBS 2 t Option T TRACK OVERFLOW Cette option indique que les enregis trements peuvent avoir une longueur Re une prete de m moire acc s s lectif En effet sur bande la Jongen maximale aetorisn d un enregistre ment physique est de 32760 octets mais pour les enregistrements sur m moire acc s s lectif elle ne peut en principe d passer la longueur d une piste de l unit co
103. ct re stock est tr s faible le prix de vente actuel des bandes est de l ordre de 100 100 Fe EE essentiel de la bande est qu elle ne permet pas l acc s direct l information D autre part la gestion des fichiers sur bande n cessite la recopie sur une nouvelle bande toutes les fois qu il y a des insertions suppressions ou corrections effectuer Cette proc dure pr sente par ailleurs l avantage d assurer automatiquement la s curit des fichiers 3 LES MEMOIRES A ee SELECTIF MAS heqnes ram tiquee Zole G n ralit s Une unit de disques est compos e de disques m talliques enfil s sur n axe commun et enferm s dans un container a O O 1 5 L unit de disques est appel e VOLUME On appelle MODULE l ensemble constitu par les surfaces de disques empil s L inscription se fait sur les faces des disques une des faces ext rieures aux extr mit s de la pile n tant pas utilis e pour les donn es Chaque face comporte un certain nombre de PISTES concentriques utilisables plus quelques pistes de r serves formant des cercles concentriques Les pistes correspondantes de l ensemble des faces constituent un CYLINDRE figure 2 Les unit s de disques l usage des utilisateurs du CIRCE sont du type 3530 compactes et amovibles d sign es sous le nom de DISPAC Certains disques sont toujours mont s et sont dits ON LINE ou r sident
104. ction WRITE IL est donc fortement d conseill d utiliser dans une instruction FORMAT le caract re de contr le de saut pas d interlign car avec cette option la ligne dit e correspond deux instructions WRITE Par contre l option O double interli gne entra ne l dition d une ligne blanche entre 2 Pense imprim es qui n est pas comptabilis s Notons enfin qu une page de listing comprend environ 60 lignes d ditione a La carte MAIN est facultative Quand elle EA elle se place dera ri re la carte JOB Exemple d d utilisation d de la _carte MAIN MAINDLINES 10 CARDS 5 Demande de 10000 lignes en impression et de 500 cartes en perforation 3 14 gt 5 CARTE FYRMAT Forme g n rale P f PR ST 2 Y texte 2 PR pour un fichier lister PRINT PU pour un fichier perforer sur carte PUNCH Cette carte sert indiquer la destination des fichiers diter de type SYSQUT et donner les directives correspondantes voir signification de SYSQUT chapitre 7 paragraphe 7 1 a LE Texte 1 DDNAME aanon DEST LOCAL unit d impression Sean imprimante associ e au lieu d au d origine O PTES nn ogumegt SINGLE DOUBLE fr s type 1 exemplaire saut programm formulaire usuel VFL der TRAIN 2 saut de page N mer DEST ANYLYCAL unit de exte 2 DRAM adnon Pre associ au lieu d origine capres nn 1 exem
105. e Le nom du membre tant compos de 8 caract res e phanvneriques au RU le pronen tant alphab tique exemple DSN WRR1358 R CHEMAR roi E36 Si amp amp pr c de le non le fichier est temporaire Si un seul amp pr c de le nom Le nom du fichier est modifiable param tre sym bolique S il n est pas modifi Le fichier est consid r comme tenpora r nom conserv en fin de JB o i exemple DSN amp PLU Si pr c de le nom on d finit le DSN du fichier dans une carte DD d une autre tape dont on donne la r f rence en la pr cisant suffisamment pour qu elle ne soit pas ambig es exemple ET1bEXECbPGM PR G DDbDDRUNIT 3330 SPACE TRK 10 see F2bEXECDEGM PRPG2 DD2bDDbDSN ET1 DD 1 oe 3 28 7e2 2 UNIT Ce param tre permet de d signer l unit physique utilis e disque bande see Forme g n rale fnom g n rique UNIT nom g n rique n LS AFF ddnom nom g n rique BDE7 pour les bandes 7 canaux CIRCE 2400 pour Les bandes 9 canaux avec densit 800 bpi BD16 pour les bandes 9 canaux avec densit 1600 bpi BD60 pour les bandes 9 canaux avec densit 6250 bpi 3330 pour les disques 3330 mod le 1 _3330 1 pour les disques 3330 mod le 11 Actuellement au CIRCE 6 unit s de disques 3330 sont du type 11 BAN101 PP3330 RES301 RES302 RES503 et Eu Tous les autres DEGE sont des 3330 mod le 1 n nombre d u
106. e 10 mots L ordre WRITE crit l enregistrement n 6 qui comprend le tableau A et les 6 premi res valeurs du tableau B et l enregistrement n 7 qui comprend les 4 derni res valeurs du tableau Be FIND atr num ro logique de r f rence du fichier constants ou variable a enti re r expression arithm tique enti re dont la valeur indique le nu m ro de l enregistrement du fichier sur lequel on d sire se positionner Cet ordre permet de lancer la recherche d un enregistrement qui sera lu par la suite per un ordre READ Ceci permet de faire un traitement en m me temps qu une recherche donc de diminuer le temps d ex cution IL n y a aucun avantage utiliser un ordre FIND avant un ordre WRITE exemple DEFINE FILE 8 500 80 L IVAR Fe 10 FIND 8150 15 READ 8 50 A E L enregistrement 50 est localis sur le fichier r f renc 8 pendant que les ordres compris entre les tiquettes 10 et 15 s ex cutent Apr s L or dre FIND la variable associ e IVAR a pour valeur 50 apr s le READ elle a pour valeur 51 l 2 15 Exemple g n ral d utilisation de la m thode d entr e sortie avec acc s direct DEFINE FILE 8 1000 72 L ID8 DIMENSION A 100 B 100 C 100 D 100 E 100 F 100 15 FORMAT 6F12 k4 FIND 85 D 100 I 1 100 READ 8 ID8 15 A T B I C I D I E I F T FIND 8 ID8 4 100 CONTINUE DO 200 I 1 100 200 WRITE 8 ID8 4 15 A T B I C I D I E T F I
107. e DISP et pass une tape ult rieure de ce m me travail le sys t me ne conserve pas ce fichier si on code Les param tres UNIE SE WE denc la carte DD de L tape o 11 oet r utilie Tm me si la Le tron finale est KEEP emple carte J B STbEXECHEGM TRUC DDbDDbDSN NRR 1358 R CHEMAR FICH1 UNIT 3330 1 V LESER PP3330 SPACE TRK 2 1 DISP NEW PASS 7 DOB RECFM FB BLKSIZE 800 LRECL 80 BT2bEXECbPGM CHYSE DD2bDDbDSN WRR1358 ROCHEMAR FICH1 UNIT 3330 1 1 N L SER PP3330 DISP OLD KEEP 17 Le fichier Her RACHEMAR FICHE n existe plus la fin du travail Pour i conserver il faut ne coder que les EE E DSN et DISP dans les cartes DD r utilisant e fichier i faut done crire carte JOB BTTbEXECHPGM TRUC i DDIODDbDSN WRR1358 R CHEMAR FICH1 UNIT 3330 1 V L SER PP3330 SPACE TRK 2 1 DISP NEW PASS DCB RECEM FB BLKSIZE 800 LRECL 80 Dee e DD2bDDODSN WRR 1358 R CHEMAR FICH1 DISP LD KEEP EEE EEKEEKEZZEFZEEZZIESEESFSEEEE 3 55 CATIG Le fichier sera catalogu en fin d tape c est dire que Les valeurs des param tres DSN UNIT VAL SER seront ins crites dans le catalogue du disque syst me Le catalogue des fichiers utilisateurs du CIRCE r side sur Le disque RES300 Pour l utilisation d un fichier catalogu il suffit dans la carte DD de coder le DSN et DISP LD UNCATLG Le nom du fic
108. e cas d un fichier partitionn exemple aa On d sire effacer le membre SP1 du fichier WRR1358 R CHEMAR FICH1 r sidant sur SETO02 On proc de de la fa on suivante carte J B 8REXECbPGM TEEPRZGM SXSPRINTHDDbSYSQUT A _ DD1DDEUNIT 3330 VPL SER SETOO2 DISP PLD SYSINbDDb bSCRATCHDDSNAME WRR 1358 e R CHEMAR FICH1 WL 3330 SET002 MEMBER SP 1 1 E On obtient sur Le fichier SYSPRINT le r sultat suivant SYSTEM SUPP RT UTILITIES ssseesesssoe IEHPR GM SCRATCH DSNAME WRR1358 e R CHEMAR FECH 1 V L 3330 SE M02 MEMBER SP1 N RMAL END F TASK RETURNED FR M SCRATCH w Pour effacer un fichier en fin de J B il est pr f rable d utiliser le param tre DISP OLD DELETE dans la carte DD qui d finit le fichier Le scratch prendra effet la fin de l tape contenant la carte DD 4 19 5e Analyse du contenu des supports magn tiques IL est tr s important de pouvoir analyser Le contenu d un support ma gn tique pour conna tre Le nom Les caract ristiques et l organisation des fi chiers qu il contient et ventuellement de pouvoir lister sur imprimante les enregistrements Pour ces op rations l utilisateur du CIRCE dispose des proc dures catalogu es DUDUMP et DUMPBAND CIRCE pour l analyse des bandes magn tiques et de la proc dure B TUTI et du programme utilitair TEBPTECH pour les disques A ces utilitaires il convient d ajouter le programme IEBGENER qui
109. e lire des donn es Lu On v rifiera qu il ne manque pas de cartes donn es _ Sur bande on v rifiera que l on ne se borne pas lire le label Ex cution termin e due un trop grand nombre d erreurs 2071 ou 208I ou 2091 Cette liste n est pas limitative les v rifications indiqu es ne sont donn es que pour une premi re investigation mais ne sont pas absolues IL ne faut pas oublier qu un m me diagnostic peut tre provoqu par N erreurs 3 OUTILS DE MISE AU POINT DES PROGRAMMES F RTRAN RE RE died ep nn 0 une 008 am Vus Eu Qu Dee EU es Gun D er Dan Re Bt Pour la mise au point des programmes FARTRAN nous conseillons d utiliser de pr f rence les compilateurs FARTRANG1 et WATFIV Ces compilateurs fournissent en effet des diagnostics beaucoup plus pr cis que le compilateur H tendu qui tant plus performant sera ensuite utilis avec les programmes op rationnels On remarquera toutefois que le compilateur WATFIV fait l objet d un grand nombre de restrictions et d incompatibilit s par rapport au F RTRAN IV G ou H dont il faudra tenir compte voir 3 me partie chapitre 1531 Le compilateur FARTRANG1 est particuli rement adapt la mise au point des programmes puisqu il permet l utilisation d instructions sp ciales pour localiser les erreurs ventuelles voir paragr 3 3 ler cn msn A0 200 US RS Gun Due a_a Lorsqu il y a interruption l ex cution le code d
110. e param tre ne peut tre sp cifi que pour des R SLS TEMQNCE de longueur variable les enregistrements peuvent avoir une longueur sup rieure une piste dispositif TRACK OVERFLOW voir param tre BLKSIZE indique des enregistrements de longueur ind finie indique des enregistrements de longueur variable TRICH Indique la technique d enregistrement pour les bandes 7 pistes ET D TRTCH C E T ET pour l utilisation du convertisseur indique une parit paire EVEN parity exemple TRICH E pour l utilisation du traducteur avec parit paire Tra duction code BCD en EBCDIC ou inversement pour l utilisation du traducteur avec parit impaire On trouvera en annexe3 ir capitulati descriptif d es principaux para m tres de la carte DD t 8 CARTES DATASET et ENDDATASET Ces cartes permettent de d finir le d but et la fin d un fichier qui sera utilis par une tape du travail Forme g n rale de la carte DATASET YES DATASETbDDNAME ddnom J No Forme g n rale de la carte ENDDATASET ENDDATASET La signification des param tres est la suivante d nom nom de la carte DD utilis e pour se r f rer au fichier d fini par la carte DATASET J pr cise comment se termine le fichier qui suit la carte DATASET J YES pr cise que le fichier peut contenir des cartes So oe IDBu oo Dans ce cas sa fin doit obligatoirement tre indiqu e p
111. ectory RLSE Release Restitution de place allou e Ce cinqui me sous param tre indique s il est cod que lton restitue la place allou e et non utilis e la fin de l tape exemple SPACE TRK 50 2 RLSE Il est vident qu il ne faut pas coder le sous param tre RLSE lorsque L on a l intention d augmenter la longueur du fichier par la suite dans un autre travail DISP M D DCE Data Control Block Ce param tre d finit les caract ristiques des PEro EE yonon a d un fichier Forme g n rale Caste ETENE a DOB a i Vans a za 1iste j FOURS Les attributs normaux du DCB sont BLKSIZE longueur maximale d un bloc BUFNS nombre de buffers utiliser pour les op rations d entr e sortie DEN densit d enregistrement de l information sur bande magn tique denane enom nom d tape ddnom 3 38 DS RG organisation du fichier LRECL longueur r elle ou maximale d un Pee ETUS logique RE FM format et caract ristiques des enregistrements TRICH mode d criture sur les bandes 7 pistes donne la r f rence d un fichier ou d une carte f DD pour lequel les attributs du DCB sont d fi nis et doivent tre reprise Examinons les attributs du param tre DCB BLKSIZE Bloc size sp cifie en octets la longueur maximale du bloc enregistrement physique La longueur maximale que L on peut coder est 32760 octets sur bande et 13030 octets sur Les disques 33
112. els choisis pour le langage de contr le de i System JOB EXEC DD eaa Cette zone est obligatoirement pr c d e et suivie d au moins un blanc exemple TRAVAILDDJOB eo REXEC 0e le ou les op randes s par s par des virgules contiennent des para m tres optionnels ou obligatoires pour pr ciser L op ra tion demand e Cette zone est obligatoirement pr c d e et suivie d au moins un blanc Elle ne doit pas d passer la colonne 71 d une carte Si une carte ne suffit pas une ou plusieurs cartes suite peuvent tre utilis s en appliquant les r gles d crites plus loina exemple RMD76bJOBbWRR1358 ROCHEMAR TIME 0 10 le commentaire est optionnel et n est soumis aucune restriction quant aux c ract res ose ou la colonne de d but ou de fine Cette zone doit ist tre s par e de la pr c dente peona op are te par un O Por blancs gailis Les E 3 74 Daven tre Igos pour perforation des noms op ration et op randes d une instruction de contr le OS ASP Si cet espace n est pas suffisant on applique les r gles suivantes 1 Un param tre doit tre perfor au complet sur une carte y compris la virgule qui Le suit imm diatement 2 Si sur une carte une virgule est suivie de un ou plusieurs blancs le reste de la carte est consid r comme un commentaire 5 Chaque carte suite aura la syntaxe suivante 1 D P1 Penos colonnes param tres 1 et 2 1 ou pl
113. entaire en cours doit d buter dans les colonnes 16 nombre maximal de cartes t s pour les directive S RT et MERGE est de 19 colonnes 73 80 zone identificatric au choix de l utilisateur Restrictions importantes Ou done mc que on mu ne san 0008 mea mes se vu D L inclusion de blanes est interdite dans les op randes les valeurs ne peuvent pas d passer 8 caract res Les virgules et blancs servent de d limiteurs chaque type de directive ne doit appara tre qu une fois dans une ex cution de SORT MERGE le nombre de cartes directives y SRE Les cartes suites ne doit pas RER 33e G lym 1 4 1 2 Directives S RT ou MERGE La forme simplifi e la plus courante est L bS RT FIELDS ou bs say l DMERGE FIELDS p1 m1 51 p2 m S2 so p6 m6 s6 FORMAT plmt 1 s1 p2m2s f2 52 o e e p6l m6l 264 564 s1zE y sereen 0 z 1 Le param tre SKIPREC ne peut tre utilis que pour un tri S RT FIELDS Signification et codage des param tres description des zones de contr le 1 64 Les zones doivent tre d crites en ordre d croissant d importance majeures mi Neuros ses Quatre informations doivent tre fournies pour d crire une zone de contr le des enregistrements d entr e d but de la zone de contr le de l enregistrement IL s agit de la position de la zone l int rieur de l enregistrement log ue te
114. entes options carte JB usuelle DWEXECbDUMPBAND UNI T par 1 PT par2t ID pars PE autres param tres ventuels avec par 1 type ur bande 7 er d faut Pan par 2 E PEER N HEXA I PAD 5 N oibre inf rieur ou gal 999999 indiquant Le nombre enregistrements physiques blocs Senne Option par d faut tout le fichier HEXA indique que la repr sentation sera hexad cimalee ption par d faut caract res I nombre inf rieur ou gal 999 indiquant le nombre maxi mum dtenregistrements incorrects cons cutifs que L on tol re avant l arr t du programmes Option par d faut 10 BAD on liste les seuls enregistrements incorrects ption par d faut tous les enregistrements corrects ou incor rectSe l he2 S nombre inf rieur ou gal 999999 indiquant le bloc partir duquel commence le listage Option par d faut 1 Attention les 2 labels de d but et les 2 labels de fin d un fi chier sont consid r s chacun comme un bloc Par contre Le label de volume n est pas pris en consi d ration Tous Les param tres contenus dans PT sont rep r s par leur position donc toute op ration par d faut doit tre mentionn e par la virgule de s paration par 3 num ro de la bande Lorsque l on ne con na t pas ce num ro fichier cr dans une tape pr c dente et mis sur une bande nouvellement attribu e on peut op rer comme pour la proc dure DUDU
115. es valeurs par d faut des tapes suivantes sont alors celles sp cifi s la g n ration du syst me On peut mettre Les options du param tre PARM soit entre parenth ses soit entre apostrophes Ces options sont des param tres mot cl pou vant donc appara tre dans n importe quel ordre 3 18 LIST SAURCE NYDECK Exemple on crira PABM SSURCE NYDECK LIST PARM U H Ces 2 formes sont valides et identiques Cependant si le par ram tre PARM comporte des cartes suite la totalit des options doit tre mise entre parenth ses chaque option contenant un caract re sp cial devant tre mis entre apostrophes Exemple 1 re carte PARM LIST LINECQUNT 50 SZURCE suite 2 me carte __ NYDECK A titre d exemple nous donnons dans le tableau 5 la liste des prin cipales options modifiables du param tre PARM pour le compilateur F RTRAN H H tendu La valeur par d faut perse par le syst me est la valeur soulign e TABLEAU 5 SIGNIFICATION OPTIONS SARA ee due mes Dee OPD NAME MATN nom du programme principal BCD BCDIC code de perforation du programme ANSF NGANSE d finit les biblioth ques FORTRAN utilis es MAP NOMAP implantation des variables en m moire tableau des noms et instructions labell es DECK NSDECK obtention sur cartes du module objet corres pondant au programme source compil BJECT N BJECT sauvegarde sur disque du module
116. eur de zone information etc ORSTOM sno me EE DLV 261 852 O U 1 O g u lt O id I lt o o a 2 c MASTER INDEX CYLINDRE INDE X 1000 1200 CYLINDRE 11 CYLINDRE 12 EXEMPLE SCHEMATIQUE D ORGANISATION SEQUENTIELLE INDEXEE ASSEMBLEUR PL 1 COBOL 2 9 caract res voir 3 me partie param tre DSN de la carte DD Une telle Seaain permet de nt un l ment du fichier sans se pr og cuper des autres Remarques Le suppression d un membre d un fichier partitionn l aide du pro gramme utilitaire TEHPROGM s effectue par effacement du nom du membre de la directory Par contre la place de ce membre sur ie di disque n est pas restitu e On peut cependant r cup rer cet espace libre en utilisant la proc dure COMPRIME voir me partas emploi des programmes utilitaires On ne rat pas er r simulten esnt plusieurs membres d un fichier par titionn On peut par contre lire simultan ment plusieurs membres 2 2 2 Organisation toire index e Ge 7 Ce type d organisation ne peut pas tre obtenu en langage FORTRAN Dans cette organisation les enregistrements sont rang s s quentiellement Chaque enregistrement poss de une zone de contr le ou cl KEY et les donn es d identification des cl s sont class es par ordre croissant Au cours de la cr ation du fichier le syst me cr des index bas s sur Zla cl afin de rendre po
117. gani sation de tout ou partie du fichier LEBCOPY permet la copie de tout ou partie d un fichier partitionn e TEBUPDTE permet de cr r et de mettre jour des fichiers s quentiels ou partitionn s TEFBR14 permet de r server de la place sur un disque pour un fichier s quentiel Permet galement d effacer un fichier sur disque Dans cette note nous nous limiterons la description sommaire et l emploi pratique des utilitaires qui pr sentent le plus d in t r t pour les besoins des utilisateurs du Service Hydrologique i3 de TRI FUSIZN SYRT MERGE z TETEN E E EEE 1 1 Fonction IL s agit de la proc dure catalogu e S RT mise au point par IM per mettant l utilisation du programme PeS M programme Sort Merge dont Les principales fonctions sont les suivantes trier des enregistrements S RT c est dire les ARS selon un ordre donn fusionner de 2 16 s quences d enregistrements MERGE Les s quences traiter doivent avoir t tri6osau pr alable dans le m me ordre que celui d sir pour le fichier final de sortie et selon des zones de contr le identiques Les ordres de tri possibleSsont l ordre ascendant et l ordre descen dant exemple ordre ascendant en EBCDIC blanc R ABCe XY20123456789 1e2 Contraintes Tools TRI Le fichier d entr e doit tre s quentiel bloqu ou non com pos d enregistrements de longueur fixe ou variable
118. geur toutes les fois que le module chargeable ex cuter ne n cessite pas d tre g n r avec des param tres ou des ordres sp cifiques l diteur de liens Le chargeur pr sente l avantage de r duire le nombre d tapes du travail de r duire le temps d dition de liens et de chargement environ 2 fois de r duire Le nombre de fichiers temporaires allouer pour le travail de r duire le nombre des op rations d entr e sortie et le nombre de lignes diter pour le travail Pour la mise au point de programmes FZRTRAN on utilisera de pr f rence les compilateurs WATFIV et FORTRANG1 qui fournissent des dia gnostics tr s pr cis Signalons en particulier que seul le compilateur FORTRANG1 permet l utilisation d instructionsparticuli res du type DEBUG pour loca liser des erreurs ventuelles en faisant appel la fonction de mise au point voir Annexe II Enfin quand on passe la phase d exploitation d un programme FARTRAN on a int r t utiliser le compilateur F RTRAN H tendu qui augmente les performances l ex cution w 3 52 Lorsque L on utilise une proc dure catalogu e le syst me g n re les instruc tions de contr le contenues implicitement dans cette proc dure L utilisateur peut cependant op rer des remplacementssur ces instructions l aide de cartes de contr le En particulier il peut modifier les param tres d une carte DD g n r e par l appel de la proc dure IL peut
119. grammeur Lorsque l on cr un fichier il ss au syst me e le type de support et le nom du volume sur D on veut le placer o ventuellement la place r server au fichier sur 1e volume cas des disques e le nom sous lequel il doit tre identifi e la disposition apr s cr ation conservation ou suppression les attributs du fichier informations relatives la taille et l organisation des enregistrements logiques et physiques 2 2 Tous ces renseignements sont indiquer au niveau d une carte de contr le appel e carte DD DATA DEFINITION dont la description et l utilisation seront donn es dans la 3 me partie de cette note 1 3 Sp cification des fichiers La sp cification des fichiers a t standardis e pour la gestion des donn es Elle comprend des l ments tels que le format de l enregistre ment logique la m thode d acc s l emplacement et RARAHENEOR du fichier L identification du fichier est PRECRME par AASRERES de 1A DELE de volume et de fichier Un LABEL est un enregistrement pr form lisible par la machine et uti lis pour identifier un volume ou un fichier Chaque volume poss de un label de volume et peut contenir un ou plusieurs fichiers Par ailleurs un fichier peut tre suffisamment grand pour n cessiter plusieurs volumes afin de contenir tous ses enregistrements Chaque fichier peut donc avoir un ou plusieurs labels 1 4 Gestion des donn es
120. gueur standard Ce r sultat sera par prudence multipli par 1 5 pour tenir compte de la place n cessaire pour les constantes et les instructions On obtiendra ainsi une valeur n1 en K octets cette valeur n1 il convient d ajouter l encombrement des buffers pour les op rations d entr e sortie partir des fichiers utilis s Au CIRCE l ouverture d un fichier lecture ou criture n cessite 2 buffers valeur par d faut modifiable par le param tre BUFNY de la carte DD IL faut donc pr voir pour chaque fichier une place m moire gale 2 fois la taille d un enregistrement physique qui est donn e par de param tre BLKSIZE de la carte DD correspondante voir chapitre Je 2s param tre DCB d la carte DD Il TANG done pr voir en plus pour ies fichiers cartes lecture ou perforation moins de 1K octets AE pour les fichiersd inpression Caveo BIKSIZE 1922 LK octets pour les autres noies 2 x BLKSTZE K octets 71000 Soit n2 n ah ombrenen des buffers le param tre REGI N G n cessaire pour ce premier passage sera ptis gal n1 n2 K Par la suite il sera ajust Une estimation insuffisante du param tre REGION G entraine un arr t de l ex cution et l apparition dans le fichier SYSMSG d un message d erreur du type C MPLETI N C DE 804 chargement non effectu ou C MPLETT N CADE 804 chargement effectu mais ouverture des fichiers impossible 3 22
121. hier SYSIN 1 68 SYS006bDDb donn es sur cartes fichier syso06 88 8Y8007bDDb donn es sur cartes fichier SYS007 De 155 3 61 Proc dure CBALG Cette proc dure permet d effectuer le link edit et l ex cution d un module objet obtenu par compilation d un programme source C B L L aide du compilateur C B L ANS Cette proc dure ne comporte donc que 2 tapes tape LKED link edit tape G ex cution exemple d utilisation utilisation d un DECK COBOL module objet binaire carte JgB REXECECBALG LKED SYSINbDDb programme binaire sur cartes DECK f 1 88 SYS008DDb donn es sur cartes fichier SYS008 On trouvera cn annexe des exemples vari s d utilisation de l ensemble de ces proc dures catalogu es En particulier avec des donn es cons tituant des fichiers sur bandes magn tiques ou sur disques Autres proc dures catalogu es IL existe de nombreuses proc dures catalo gu es autres que celles li es aux compilateurs et d crites dans les para graphes pr c dents Parmi ces proc dures mises la disposition des utilisateurs certaines sont sp cifiques au syst me IBM 370 et d autres sp cifiques au Centre de Calcul proc dures CIRCE Nous n examinerons que les plus utiles la gestion des fichiers qui sont en fait des proc dures utilitaires et qui seront donc d crites dans la 4 me partie de cette note avec Les programmes u
122. hier sera enlev au catalogue du syst me Ceci ne veut pas dire qu il enl ve en plus le DSN de la VIKC Le fichier existe toujours mais son utilisation ult rieure demande tous les param tres de la carte DD R capitulatif des options du param tre DISP L option par d faut est soulign e DELETE DELETE PASS DELETE KEEP KEEP CATLG CATLG DELETE DELETE nuin Te2 6 SPACE Ce param tre permet d indiquer la quantit et les caract ristiques de l espace attribu sur m moire acc s direct Forme g n rale directory 3 non pea L quantit riner ment Fi Ce param tre n est utiliser que pour les fichierssur m moire acc s direct nee leur cr ation ou l ur extension DISP MOD La signification des sous param tres est la suivante TRK track piste Lallocation demand e est sp cifi e en nombre de pistes CYL Cylindre lt L allocation demand e est sp cifi e en nombre de cylindres blocs longueur du bloc en octets IL s agit de la longueur moyenne pr vue pour les enregistrements physiques exprim e en octets 3 36 Les performances soht meilleures si on utilise CYL ou TRK L allocation par bloc est d conseill e L allocation par TRK est fortement recommand e disponibilit plus grande Rappelons que pour une unit de disque 3330 la capacit d une piste est de 13030 octets et qu un cylindre comprend 19
123. hiers seront du type G9 FT08F001 DD DSNWRR 1328 R CHEMAR FICH1 UNIT 3330 1 V L S8ER RES302 DISP OLD KEEP SR E PAORO DD DSN WRR 1328 R CHEMAR FICH2 UNIT 3330 1 H VOL SERS RES302 DISP NEW KEEP SPAO EECAG due je a DCB RHCIM F LRECL 28 BLRSI2E 28 Dans cet exemple l ordre 9 READ as transmet apr s conversion suivant le format 10 10 fois 2 caract res soit 2 enregistrements du fichier r f renc 8 dans le tableau M Et ceci partir de l enregistrement num ro 16 Apr s la lecture la variable associ e ID1 aura pour valeur 18 2 14 L instruction 13 WRITE transmet sans conversion criture sans format l enregistrement num ro 26 soit 7 valeurs 28 octets sur le fichier r f renc 10 Apr s l criture de cet Hurt la variable associ e ID2 a pour valeur 27 Si dans un ordre READ ou WRITE la liste d passe la longueur de l enregis trement logique taille maximum de l enregistrement donn e par le para m tre 1 de l ordre DEFINE FILE une erreur est signal e quand on fait une lecture ou criture avec format l enregistrement est tendu quand on fait une lecture ou cri ture sans format c est dire qu un nouveau bloc est lu ou crit Si ce dernier est plus court que la longueur de l enre gistrement il est compl t par des z rose exemple DEFINE FILE 8 400O 1O0 U IC DIMENSI N A 4 B 10 WRITE 816 A B r La longueur de l enregistrement est d
124. ichiers sont directement s par s par une tape mark La fin des enregistrements sur la bande est galement indiqu e par une tape mark qui est l quivalent de la carte d limiteur marquent la fin des fichiers cartes On a donc 2 tape mark en fin du dernier fichier enregistr Les labels sur bande permettent de nombreux contr les effectu s automatiquement par le syst me au cours du traitement v rification du num ro de volume mont par l op rateur avec le lab i de volume v rification de l id ntification du fichier compati b lit avec le DSN de la carte DD o V rification de l ordre correct de traitement dans le cas de fichiers multivolumes La 1020 Op rations d Entr e Sortie en acc s s quentiel Si les enregistrements ne sont pas group s le syst me de contr le d entr e sortie ISCS provoquera la commande une lecture et une seule la fois vers une zone d entr e d termin e Stils sont group s L IGCS rrommquera chaque fois la lecture ou l cri ture d un bloc entier Dans les deux cas gr ce L ISCS tout se passe comme si le programme demandait la lecture d un seul enregistrement logique la fois En langage FORTRAN les instructions d entr e sortie en acc s s quen tiel sont les suivantes READ n1 nf ERR e1 END 2 liste WRITE n1 nf liste i i 2 6 ni num ro Logique constante ou variable enti re de longueur L d finissan
125. ie de donn es sous TORES de 8 ou 6 bits L enregistrement est l unit de base pour le programme de terne Un fichier est une collection E La fin d un Pohier est marqu e physiquement sur la bande par un en registrement sp cial appel TAPEMARK marque de bande On peut mettre plusieurs fichiers sur une m me bande On parle alors de volume multifichiers voir figure 5 Un seul fichier peut s tendre sur plusieurs bandes On parle alors de fichier multivolume figure 5 Chaque bande utilis e doit tre identifi e Pour cette identification on utilise un enregistrement sp cial crit au d but de 1 bande appel LABEL VOLUME Sur une bande L organisation des donn es est s quentielle c est dire qu un enregistrement n est accessible qu apr s avoir lu tous ceux gar le pr c dent Tous les fichiers sur une m me bande doivent tre enregistr s avec la m me densit La zone situ e entre 2 gaps est nomm e bloc ou SRE Sn phy sique Elle se IPRA en plusieurs secteurs qui sont ceux des enregis trements logiques le nombre d enregistrements logiques contenus dans un bloc est appel facteur de blocage Les avantages de la bande magn tique sont vidents elle permet l enregistrement de fichiers m me tr s mportanti sous un faible encombrement elle peut tre effac e et r utilis e gt elle peut tre facilement et rapidement dupliqu e le co t d cara
126. iens voir diteur de liens Linkage loader chargeur diteur de liens voir chargeur diteur de liens Lister imprimer tout ou partie des informations trait es article par ar ticle Load and go chargement et ex cution technique d exploitation permettant de convertir directement un langage sp cifique en langage machine et d en assurer l ex cution imm diate Load module module de chargement r sultat du traitement de L diteur de liens Le programme peut alors tre charg en m moire pRa pour tre ex cut Loader programme de chargement permettant le chargement automatique d au tres programmes Marque de bande Tape mark l caract re conventionnel repr sent par le symbole TM Signale la fin de la portion de bande consid r e gt gt Ea Module ce qui est trait comme en tout par un assembleur un compilateur ou un diteur de liens ou le r sultat de ce traitement exemple Load module object module Module de chargement load module voir load module Module r sultant object module voir object module Mot plus petit groupe de positions de m moire airetik dans son en semble Multiplet byte ensemble de bits cons cutifs trait comme un tout MVT abr viation de Multiprogramming With a Variable number of Tasks Multiprogrammation avec un nombre variable de taches Ex cution simultan e de plusieurs travaux avec affectation de la m moire chage travai
127. igne Pour une position donn e de ce dispositif on acc de simultan ment la quantit d information contenue dans un CYLINDRE voir figure 2 Suivant Le volume Le cylindre a un nombre fixe de PISTES ou TRACK La piste est l unit de capacit l mentaire 3 4 Organisation des fichiers sur le volume Sur les m moires acc s s lectif on peut avoir diff rents types d organisation organisation s quentielle il s agit alors d une simulation de fichier bande organisation partitionn e le fichier est divis en sous fichiers appel s membreso Chaque membre est organis s quentiellement et poss de un nom Le r pertoire des noms des membres et leur adresse est appel DIRECTORY Il est plac en d but de fichier organisation directe elle permet d acc der un enregistrement Sans avoir lire les enregistremonts pr c dant celui ci sur le support organisation s quentielle index e elle permet la s lection d enregistrements oin fichier gr ce un cheminement travers le fichier Ces diff rents modes d organisation seront xamin s dans la 2 me partie avec la notion de fichier et les diff rentes possibilit s d acc s l information Les avantages essentiels des m moires acc s s lectif sont donc leur tr s grande capacit et la possibilit d acc der directement et tr s rapi dement l information traiter Les inconv nients sont surtout leur co
128. il en binaire DECK et mis sur cartes avec donn es galement sur cartes dans cet exemple la compilation est suppos e avoir t effectu e l aide du compilateur H tendu carte J B _ REXECDETXLG REGION G 100K LKED SYSINbDDbo programme binaire sur cartes DECK 69 SXSENbDDb SE donn es sur sait es fichier SYSIN PA ete proc dures catalogu es C B L Utilisation des Au CIRCE ces proc dures utilisent le compilateur C B L ANS Comme pour les proc dures FPRTRAN elles comportent soit une soit deux soit trois tapes selon les fonctions x cuter et l emploi ou non du loader 3 59 Ces tapes ont des noms impos s tape C B compilation tape LKED diteur de liens te da tape G chargement et ex cution L appel de ces proc dures se fait l aide d une seule carte EXEC Proc dure CBA alias CABAL Cette proc dure utilise le loader et ne comporte donc que Joe tapes de compilation C B et de chargement et ex cution G se Les noms des cartes DD inclwsdans la proc dure et correspondant des fichiers usuels sont Lecture de cartes SYSIN impression de r sultats SYSQUT Pour les autres fichiers le DDNAME est le nom du fichier qui suit l expression ASSIGN T dans le programme C B L exemple PIRO SYS006 ese ereite d utilisation programme source C B L et donn es sur cartes
129. ilisateur TIME Leo p REGION nnnnK nom de travail 1 8 caract res alphanum riques le premier tant obli nr pRERStIQue Des host s sp ciales doivent tre appliqu es au Service Hydrologique Pour les passages utilisant la navette de la rue du MAROC les 2 premiers caract res du nom de travail sont obliga toirement RM colonnes 3 et 4 Ces 2 caract res dispa raissent pour un passage sur place au CIRCE Les autres caract res sont utilis s selon certaines r gles permettant de faciliter la comptabilit des frais de calcul Si le travail correspond une convention EDF lettre X en colonne 5 navette de la rue du MAROC ou en colonne 3 sur place Aucune lettre particu li re s il s agit d un travail ORSTOM o Ensuite un caract re permettant d identifier L uti lisateur e 2 chiffres correspondant au num ro d affaire te Les erni res colonnes disponibles le total ne devant pas exc der 8 sont laiss es au choix de l utilisateur en aa de FREE ii caract res au choix num ro d affaire passage par la navette le de l utilisateur yen caract res aux choix num ro d affaire travail EDF pass sur place au CIRCE 3 11 siglenum sigle 3 lettres et num ro de calcul 4 chiffres attribu s a par le CIRCE Actuellement pour le Service Hydrologique le sigle est WRR le num ro de calcul est 7358 utilisateur nom de tien 1
130. l en fonction de la ARS demand e r gion A1 13 Multitraitement multiprocessing technique dans laquelle plusieurs organes d ex cution travaillent si multan ment sur un ou plusieurs programmes en ayant acc s des m moires ou des organes communs Object module module r sultant r sultat d un seul assemblage ou d une seule compilation qui constitue une entr e de l diteur de liens Octet 8 bit byte multiplet de 8 bits byte Offline non connect l unit de traitement ou l ordinateur central On line connect L unit de traitement ou l ordinateur central Op rande toute quantit entrant dans une op ration math matique Op rateur symbole d finissant un traitement math matique effectuer sur les quantit s qu il associe Piste track partie lin aire d un support mobile d information accessible par une station de lecture ou d criture R gion i la m moire centrale d un ordinateur g r e par un syst me d exploi tation avec un nombre variable de taches MVT est d coup e d une fa on dynamique en plusieurs r gions dont la taille a t choisie par l utilisateur Routine suite ordonn e d instruction qui peut avoir un emploi g n ral ou r p t Software logiciel ensemble des programmes proc d s et r gles destin s commander le fonctionnement d un ordinateur Spool abr viation de Simultaneous Peripheral Operations On
131. la carte J B HEADER YES Une page s paratrice indiquant en caract res g ants le nom de l utilisateur et celui de la carte DD d crivant ce fichier pr c dera chaque fichier list L dition en sera factur e HEADER N option par d faut Cette page ne sera dit e qu au d but du 1er Fichier list La valeur wg est forc e pour les travaux list s sur un terminal NEWS YES Donne en fin de liste les informations r centes int ressant les utilisateurs du CIRCEsl dition n en est pas factur e option par d faut NEWS Ng pas d dition de ces informations WAIT Ce param tre n est consid r que pour un travail lu en libre ser vice IL donne le temps maximum d attente consenti par l utilisa teur entre La lecture de son travail et le d but d dition de ses r sultats sur une imprimante en libre service IL est exprim en minutes Si ce d lai est d pass l impression se fait en salle ma chine Si WAIT est sup rieur un maximum actuellement fix 45 minutes il est ramen ce maximum PRTY incr ment compris entre 15 et 3 Donne un incr ment qui sera ajout la priorit calcul e par Le syst me Un incr ment gt O entra ne une tarification plus lev e exemple d utilisation de la carte CIRCE 7 CIRCEDHEADER YES PRTY 3 On demande d introduire une page s paratrice entre chaque fichier di t et d augmenter de 2 degr s la priorit du t
132. le le param tre DCB voir paragr 2e7e de la Tagon suivante ETOBEOO TDDDSYSUT A DCB RECFM VBA LRECL 157 BLKSIZE 1922 Lx DATA 3 25 SYSAUT B d finit un fichier temporaire perforer d s la fin du travail SYSQUT I d finit un fichier temporaire perforer et interpr ter d s la fin du travail Son utilisation est impos sible pour une sortie de cartes objet d une compila tion DECK en binaire Au CIRCE il n est pas possible de bloquer les fichiers d finis par SYSQUT B ou SYSQUT Les donn es qui constituent ce fichier sont sur des cartes perfor es qui suivent cette carte DD et cela jusqu la proohipo carte de con tr le caract ris e par en colonnes 1 et 2 jusqu une carte d li miteur exemple F RT SYSINbDDb programme source FZRTRAN compiler sur cartes est utilis au lieu de si les donn es qui composent ce fichier con tiennent des instructions du langage de contr le Les donn es ne doivent cependant pas contenir les caract res en colonnes 1 et 2 ou Le d limiteur indiqu par le param tre DIM Au CIRCE il n est pas possible de bloquer les fichiers d finis par DATA ou permet d indiquer un d limiteur de 2 caract res quelconques indiquant la fin du fichier Ce d limiteur devra tre en colonnes 1 et 2 Si le param tre DLM est omis sera pris comme d limiteur d limiteur 2 caract res EBCDIC DUMMY DDNAME e
133. mbres 5S1 et 8S2 du fichier partitionn pr c dent carte JB usuelle REXECbPGM TEBPTPCH SYSPRINTbDDbSYS UT A SYSUT 1bDDhDSN WRR 1358 R CHEMAR FIC PART P EER UNIT 3330 DISP PLD SYSUT2bDDPSYSQUT A SYSENRDDb DPRINTHTYP RG P MAXNAME 2 MAXFLDS 2 RMEMBERDNAME SS 1 PRECPRDEFIELD 80 EMEMBERDNAME SS52 BRECPRDbFTELD 80 f h 33 3e2e9e9e Remarque H Si au cours d un m me JB on demande 2 tapes de IEBPTPCH l une pour la liste sur imprimante l autre pour la perforation de cartes on doit ajouter les cartes F RMAT suivantes EPRMATbPREDDNAME SYSUT2 avant l tape d impression de la liste et F RMATHPUbDDNAME SYSUT2 avant l tape de perforation h34 amp ei 4e Copie des Fichiers La copie d un fichier sur un autre support peut tre facilement ob tenue l aide du programme utilitaire IMM JIEBGENER Pour les fichiers r sidant sur bande magn tique il existe en outre une proc dure CIRCE tr s simple permettant Leur copie sur une autre bande s agit de la proc dure CYPBDE k 1 Le programme utilitaire TEBGENER he To Le G n ralit s Ce programe permet les op rations suivantes copier un fichier s quentiel ou un membre d un fichier partitionn copier avec changement de blocage des enregistrements des fichiers cr sen format V ou Fa copier avec dition de tout ou d une partie seulement d un fichier cette copie se f
134. mme on pourra avoir en entr e des donn es d un fichier f1 sur cartes perfor es des donn es d un fichier f2 sur cartes perfor es 3 4 des donn es d un fichier f3 sur une bande magn tique m1 des donn es d un fichier f4 sur un disque magn tique des donn es d un fichier f5 sur une bande magn tique m2 en sortie des r sultats constituant un fichier f6 sur cartes per for es des r sultats constituant un fichier f7 sur imprimante des r sultats constituant un fichier f8 mis sur disque magn tique des r sultats constituant un fichier f9 sur imprimante Nous reviendrons dans cette note sur la proc dure suivre pour l utilisation de plusieurs fichiers en entr e ou en sortie Signa lons en cependant quelques applications int ressantes titre d exem ples lecture de donn es de nature diff rentes sur cartes per for es chaque type de donn es constituera un fichier distinct On aura alors plusieurs paquets de cartes ce qui vitera de les m langer ou de les stocker en m moire apr s lecture sortie sur cartes perfor es de donn es de nature diff rente on cr ra simultan ment autant de fichiers dis tincts que de type de donn es ce qui vitera d avoir le s parer manuellement f sortie sur imprimante de r sultats interm diaires ou i r capitulatifs sans avoir les stocker en m moire cen trale avant impression L impression sera obtenue sur des fi
135. mpiler FORTRAN Uo exemple d addition d une carte DD dans une proc dure catalogu e On d sire cr r en sortie sur imprimante un autre fichier que le i lt i I N 100 O1 h Li i 4 t Etape F RT LOADER lt chargeur COMPILATION Biblioth que des r f rences externes et EXECUTION PROGRAMME SOURCE OBJECT module o hs N diteur de lien Re et l i EXECUTION l I i g A LOAD module Etape F RT Etape LKED Etape G S ou ls ei eus Serre me Er ee 2 I Fichier SEQENTIEL J Fichier SEQENTIEL l l i ou membre du ou Fichier PARTITIONNE CHARGEMENT NVALHO1 394NOS IWNWNVHOO d NN Q INIWN3INIW HI 8 614 3 53 fichier affect l unit 6 valeur par d faut de l unit correspondant l imprimante Soit 8 ce num ro d unit pour laquelle on aura programm des instructions du type WRITE 8 il faudra donc ajouter la proc dure une carte DD d finissant l unit d criture 8 Cette carte d addition sera plac e apr s Les cartes normales de la proc dure exemple PZA carte JB RREXECHETICLE F RT SYSINSDDb programme FORTRAN 88 SYSINbDDb donn es sur cartes z RCE 69 FTOBFOO1bDDbSYSPUT A DCB RECFM VBA LRECL 137 BLKSIZE 1922 Dans cet exemple les cartes GD SYSIN et Gf FTOBFO01 __ tant toute
136. mu en nm Pom ne me ee 0 mm 1 NOTION DE FICHIER lole G n ralit s Un fichier est un FH d informations de m me nature rang es sur un support Ce support peut tre des ee perfor es des bandes magn tiques des disques s Un fichier peut avoir une dur e de vie tr s variable selon qu il contient des informations de base des donn es de caract res p rio dique ou de simples regroupements transitoires On parlera ainsi de fichiers permanents semi permanents de fichiers de mouvement ou de fichiers temporaires 1 2 Les informations du fichier Un fichier est constitu par une s rie d enregistrements logiques Un enregistrement logique est une unit d information de base pour un programme IL est d fini par les zones donn es qu til contient et par son utilisation logique mais non par la forme physique Un progranme de traitement traite les donn es sous la forme d un enre gistrement logique Un enregistrement physique est une unit de donn es relatives un _ support et une organisation de fichier particuli re Un enregis trement physique peut contenir 1 ou plusieurs enregistrements logi ques Quand un enregistrement physique est constitu de pi enregistrements logiques on dit que ces enregistrements sont grou p s ou encore bloqu s Le nombre d enregistrements logiques con tenus dans l enregistrement physique est appel facteur de grou page Il est d termin par le pro
137. n es 3 51 Ainsi pour se positionner au premier fichier il faudra coder LABEL 2 BLP Pour atteindre le second fichier LABEL 5 BLP Et pour atteindre le 3 me fichier LABEL 8 BLP et ainsi de suite Au CIRCE il est fortement d conseill de cr r une bande no label et pour les disques seulel option standard label est autoris e D autre part les sous param tres IN QUT et INQUT ne doivent tre utilis s que pour des fichiers s quentiels ou un membre d un fichier partitionn La cr ation d un membre de fichier partitionn avec un programme FORTRAN exige la sp cification du param tre LABEL QUT dans la carte DD d crivant le fichier De m me la carte DD d crivant Le fichier partitionn relire avec un programme F RTRAN doit obligatoirement contenir le para Si on oublie de sp cifier le param tre LABEL IN il y a appa rition dans le fichier SYSMSG l tape traitant le fichier d un message de la forme IEC2251 Ok NMJ G FT10F001 254 PP3330 WRR1358 R CHEMAR FICH e n a Neeem peenaa code d er nom de ia nom du nom du fichier reur carte DD gt volume nom du travail PUE Lequel r side nom d tape le fichier adresse physique de 1 Het o Ve 2 5 DISP Ce SE donne L tat au fichier au d but de he et les dispositions prendre en fin d tape Forme g n rale SHR DELETE DELETE NEW KEEP KEEP i DISP LD P
138. n octets et en tenant compte ventuellement du compteur d en registrement longueur de la zone de contr le en octets lt 256 octets format des enregistrements dans la zone de contr le Ce para m tre est cod de la fa on suivante CH caract res EBCDIC non sign s FL flottant sign FI entier sign s quence d sir e A s quence ascendante D s quence descendante FORMAT f Ce param tre optionnel peut tre utilis si toutes les zones SIZE y de co tr le ont le m me format f est alors cod comme dans le param tre FIELDS voir ci dessus Pour un tri SZRT nombre d enregistrements du fichier trier Pour une fusion MERGE nombre total d enregistrements pour tous les fichiers d entr e fusionner Si y est un nombre estim la valeur doit tre pr c d e du caract re E SIZE Ey H 7 SKIPREC z Ce param tre ne peut tre utilis que pour un tri Il donne le nombre z d enregistrements du fichier d entr e que l utilisateur veut ignorer avant de commencer le trai tement Exemples d criture Que en nn que Gen Den aus mu ou Due EEE EU que une me mu me ne Que b es 73 6 A 79 2 A FORMAT CH SIZE 270 if ou b SPRTHFIELDS 73 6 0H 4A 79 2 CH A SIZE 270 Directive S RT il s agit d un tri Op randes FIELDS et SIZE Pour ces 2 cartes on a 2 zones de contr le d crites la pre mi re ou zone majeure commence au 73 me octet de l e
139. n programme dans une tape ult rieure calcul de l encombrement des fichiers de travail supposohs que Le nombre estim de cartes trier soit de 2000 On d sire utiliser 3 fichiers de travail d La formule du paragraphe 1 4 3 donne comme nombre de pistes requises T pour les fichiers de travail _ 2000 x 3 T o 6 2 On prendra donc 9 pistes pour chaque fichier de travail zones de contr le On d sire effectuer le tri sur les 13 premi res colonnes num ro de station ann e mois quinzaine en ordre ascendant 411 On aura donc carte J B TR1bEXECHSPRT S RT S RTINbDDb series GE 101a trier S RT S RT UTODDLUNI T3330 DSN amp PJ DISP NEW PASS SPACE CYL 1 1 RLSE DCB RECFM FB LRECL 80 BLKSIZE 12800 S RT S RTWKO 1bDDbUNIT 3330 SPACE TRK 9 1 S RT S RTWKO2bDDbUNIT 3330 SPACE TRK 9 1 S RT S RTWKOZbDDbUNIT 3330 SPACE TRK 9 1 S RT SYSINKDDY bSPRTHFTELDS 1 13 CH A SIZE E2000 bEND tapes suivantes Dans cet exemple les cartes tri es constituent le fichier temporaire amp PJ qui est mis sur disque avec un facteur de blocage de 160 et qui sera repris dans une tape ult rieure du J B US En sortie sur imprimante si l ex cution du tri t correcte le syst me r p te les sp cifications des cartes directives et donne les nombres exacts d en registrements du fichier d entr e IN et
140. n y a pas de saut de page auto A matique e TRAIN type de cha ne d impression TRS La cha ne TN con tient D minuscule et majuscule Signalons que l emploi des param tres FORMS et TRAIN implique que les op rateurs doivent changer de formulaire cartes ou papier et ou de cha ne d impression sur l imprimante IlL est donc conseill de n utiliserces param tres que de fa on exceptionnelle apr s avoir contacter le service d exploitation pour conna tre les noms des formulaires et les caract ristiques des cha nes d impression Exemples d utilisation de la carte F RMAT Exemple 1 E RMATRER DDNAME FTO6F001 C PIES 2 VFL N Liste du fichier FTO6F001 en 2 exemplaires avec saut en fin de page Exemple _2 F RMATHEU DDNAME SYSPUNCH CYPIES 2 Perforation en 2 exemplaires du programme compil en biais DECK La sortie du DECK sur cartes perfor es n cessite galement l utili sation du param tre PARM FORT DECK dans la carte EXEC voir chapitre 6 Exemple 3 ES RMATHEU DDNAME FTO7F001 C PIES 3 Perforation en 3 exemplaires du fichier FI07F001 sur cartes perfor es Exemple B RMATHPU DDNAME CARTES DEST L CAL Perfore au CIRCE un fichier cr par un travail qui avait t trans mis par un terminal sans carte FYRMAT le fichier serait reparti destination du terminal metteur La carte FORMAT est facultative Quand elle existe elle se place derri re la carte MAIN
141. nc la structure du nombre d cimal mais on code individuel lement chacun de ses chiffres par son quivalent binaire On utilise 4 bits afin de pouvoir coder les chiffres de O 9 exemple Soit coder Le nombre d cimal 19 On code 1 par 0001 Le et 9 par 1001 E On aura donc en DCB 10 00011001 On aurait en binaire 19 0 10011 1 2 Le code DCB permet galement de repr senter l alphabet et d autres signes conventionnels gr ce une table de correspondance Ainsi par exemple A 1101 B 1110 ect eoa Pour avoir une repr sentation plus compl te on utilise un DCB 6 bits qui permet de repr senter 64 symboles Cependant si on d sire une repr sentation des minuscules et des ma juscules on doit utiliser un code 8 bits Code EBCDIC Extended Binary Coded Decimal Interchange Code IL s agit d un code bits de principe analogue au code DCB mais per mettant 256 combinaisons Ce code comporte 64 caract res Le 370 IEM utilise comme code de perforation et code interne 1 EBCDIC KESZ e Repr sentation T E La num ration hexad cimale est une num ration base 16 Pour exprimer les valeurs 10 15 on utilise les symboles F 01234k567B9ABCDEF Cette repr sentation facilite la lecture ou l criture de lL octet qui est alors repr sent par 2 chiffres hexad cimaux A1 3 On aura donc la correspondance suivante TABLEAU A1 7 Hexad cimal Binaire 0 E 2 5
142. ne directory ou r pertoire est r serv e au d but de l allocation primaire et se compose d enregistrements d une longueur fixe de 256 octets Dans le 4 me sous param tre du SPACE on indique combien de ces enregistrements sont n ces saires pour le directory Voir figure 6 exemple 1 SPACE CYL 20 2 10 Le fichier partitionn aura une zone primaire de 20 cylindres plus ventuellement 1 ou plusieurs fois 2 cylindres jusqu 15 fois et une zone directory ou r pertoire de 10 enre gistrements de 256 octets au d but du premier des 20 cylindres exemple 2 SPACE TRK 500 5 Dans ce cas il n y a qu une seule allocation primaire de 500 pistes pour un fichier et le directory comprendra 5 enregis trements de 256 octets en t te de La r gion de 500 pistes En s quentiel index le 4 me sous param tre est utilis pour indiquer le nombre d unit s choisies dans Je Ter sous para m tre allouer pour la zone INDEX exemple DD TbDDbDSN WRR1358 ROCHEMAR FICH UNI T 3330 1 V L SER PP3330 DCB DSORG IS SPACE CYL 20 2 1 DISP CATLG Le fichier d fini dans la carte DD1 occupera une place de 20 cylindres plus ventuellement 1 15 fois 2 cylindres et une zone d un cylindre r serv pour la zone INDEX Remarque importante 1105 fait la diff rence entre directory et index au vu du DCB Si DS RG IS ou ISU il s agit d index si non il s agit de dir
143. nit s utilis es pour monter en parall le Les diff rents volumes d un m me fichier dans le cas d un fichier multivolumes AFF demande que l unit employ e pour acc der ce fichier soit la m me que celle utilis e pour le fichier d fini dans la carte DD de nom ddno Cette carte doit appara tre dans la m me tape et avant la carte DD contenant le sous param tre AFF V L Ce param tre donne Les caract ristiques et l identi fication du ou des volumes utilis s TaB3e Forme g n rale SER nm 19 ae e numn REF dsname num ro de volume wa Eremax h rengvoi nonbrevor REF ddnom VOL REF nomd tape ddnom REF nomd tape nom d tape de proc dure ddnom Fr SER num ro de volume SERI L NUMBER IL s agit du num ro de m rangement du volu e compos de 6 caract res alphanum riques 3 29 Au CIRCE pour les bandes il s agit d un nombre attribu par le ser vice d exploitation au laboratoire utilisateur are VAL SER 103278 103278 est le num ro de rangement attribu par le CIRCE une bande magn tique Pour les disques les param tres SER des volumes utilisables au CIRCE pour la cr ation de fichier permanents sont les suivants voir 1 re partie parag 3 3 disques en SETUP montage la demande SETOO1 SETOO02 581011 SETO12 disques priv s en ligne r sident RES301 RES302 RES303 et RES304 disques priv
144. nregistrement et s tend sur 6 octets elle contient descaract res EBCDIC La deuxi me ou zone mineure commence au 79 me octet de l enregistre ment s tend sur 2 octets contient des caract res EBCDIC Le tri sera effectu en ordre ascendant Le nombre d enregistre ments du fichier d entr e est de 270 b MERGELFIELDS 73 8 CH A SIZE E80 Directive MERGE il s agit d une fusion Op randes FIELDS et SIZE Une zone de contr le est d crite elle commence au 73 me octet des enregistrements et s tend sur 8 octets contient des caract res EBCDIC La fusion est r aliser en ordre asc ndant Le nombre d enregistrements des fichiers d entr e est estim 60 Toto 1230 Directive END Cette directive doit tre utilis e quand les prom grammes utilisateurs sont dans le flot d entr es Elle ne contient aucun op rande et doit tre plac e apr s toutes les autres cartes directives saw 1 4 2 Les cartes JCL 124 2 Les ca en mek eue ue EPa ous me Une tape faisant appel au P S M contient g n ralement une carte EXEC et des cartes DD relatives aux fichiers utilis s 1 422 171 Carte EXEC Elle fait l appel au P S M et est de la forme nomd tapebEXECbSPRT 1 4 2 2 Cartes DD Les cartes DD suivantes sont fournir Sous carte S RT S RTIN 26 Cette carte d finit le fichier d entr e pour un tri Elle n est pas n cessaire pour une fusion seule 4 8 Si le fichier d entr e est
145. nregistrements logiques ont un nombres va riable de caract res qui n est pas d fini 1e5o2e Enregistrements bloqu s L enregistrement physique ou bloc est consti tu de plusieurs SU logiques On d finit alors 3 autres formats Format Fixe Bloqu FB Plusieurs enregistrements logiques de longueur fixe sont plac s sur le support de fa on contig e et forment un seul enregistrement physique Tous les enregistrements physiques ont alors la m me longueur Format Variable Bloqu VB Plusieurs enregistrements logiques de lon gueur variable sont plac s sur le support et forment 1 seul enregis trement physique Les enregistrements physiques n ont donc pas tous la m me longueur cf figure Une zone standard CB est r serv e en d but de bloc et indique la longueur de l enregistrement physique en plus de la zone CE r serv e en d but de chaque enregistrement logique pour en indiquer la longueure Format Ind fini Bloqu UB Les enregistrements logiques de forme U peuvent tre group s mais la longueur de l enregistrement tant in d finie 1 IfCS logique ne r alise par le groupage et le d groupage Ces op rations sont alors sous la responsabilit du programmeur Pour les enregistrements de forme V ou U les enregistrements physiques peuvent ne pas avoir tous la m me Longueur et le programmeur devra donc sp cifier la longueur maximale de telle sorte que la zone r serv e dans la m moire prin
146. nsid r e soit 13030 octets pour une unit de disque 3330 sauf si on demande le dispositif TRACK OVERFLOW qui permet une longueur maximale de 32760 octets Option A ASA Elle signifie que les enregistrements contienn nt un caract re de saut ASA Par exemple pour les fichiers en sortie sur imprimante on aura des enregistrements de format VBA variable bloqu avec caract re de saut ASA 2 ORGANISATION DES FICHIERS ET ACCES A L INFORMATION Les enregistrements logiques sont rang s et retrouv s sur le support suivant une organisation s quentielle ou directe qui d pend du traitement que l on d sire effectuer E Cette organisation d termine donc le choix au support ainsi que le mode d acc s l information acc s s quentiel acc s s lectif ou direct Le le Organisation et acc s s quentiel C est Le seul mode d acc s possible pour les fichiers contenus sur bande GAEREIQUe et bien entendu pour les FOMSRE sur cartes pers for es Dans cette Tugonon les EE EAE st plac s les uns derri re les autres et pour lire un RE en il est n cessaire ae lire tous ceux qui 1E pr c dent 2e 1 Tle Organisation des fichiers sur bande magn tique Nous avons vu que sur bande magn tique les fichiers sont identifi s par les LABELS de fichier le volume lui m me c est dire la bande magn tique tant identifi e par le LABEL de volume LR Au cours de la cr ation d un fichier sur bande magn tique
147. nstallation et nous donnerons ensuite quelques recettes permettant de rechercher et de corriger quelques unes des erreurs les plus courantes partir des messages fournis par le syst me Enfin nous signalerons quelques ressources suppl mentaires mises la dispo sition de l utilisateur pour la mise au point des programmes 1 RESTRICTIONS ET CONTRAINTES ieis Programmation F RTRAN sur ordinateur IBM Codage du Format Dans le codage du format de lecture ou criture d en AROBRPEFEMERCS on ne doit pas utiliser de termes sup rieures 255 sn Ainsi par exemple FORMAT IS F7 2 45015 n est pas autoris IL faut crire FORMAT I8 F7 2 2 22515 Sp cification Iw de L instruction FORMAT Pour les ordinateurs IBM une variable enti re a une longueur standard de 4 octets et doit donc tre comprise entre 291 2147483648 et 251 m 1 2147483647 voir Annexe 1 En cons quence pour un format de lecture seuls sont autoris s les sp cifications I1 I9 et ventuellement 110 dans la mesure o l entier lu ne d passe pas les valeurs limites indiqu es ci dessus Constante r elle Une constante r elle ne faisant l objet d aucun ordre de d finition explicite en double ou quadruple pr cision est consid r e comme REAL 4 quel que goit le nombre de chiffres apr s la virgule A2 2 exemple T 1 gt 1i 21 98753829457168 est en fait quivalent D i 21 987538 et nioccupe que
148. objet dans le fichier d crit par la carte DD SYSLIN LIST NALIST liste en langage assembleur du programme compil SAURCE N SOURCE Liste des images de carte du programme source XREF NOKREF r f rences crois es tableau indiquant quelles instructions des variables et les labels sont f employ s LINECNT 60 nombre maximum de lignes pa page pour le listing source i TABSTZE 220K a place maximum allouer pour la PAE Aen niveau d optimisation PORMAT ARMAT en plus du listing normal on obtient un listing structur Exemples d utilisation du param tre PARM exemple 1 Demande du modulLe obiet programme binaire sur nante Sesc0sescos0ceszs REXECETXCLG P ARM F RT DECK REGI N a 120K N exemple 2 Suppression de l impression du programme source des tableaux MAP tape FORT LIST et XREF tape LKED HEXECHFTxOLE PARM o FORT NZSQURCE NOMAP PARM IKED NALIST NAXREF REGION 3 19 encombrement maximal en m moire centrale exprim en K octets 1 K 1024 et pr vu pour l tape ou toutes les tapes s il s agit d une proc dure catalogu e et que nep n est pas pr cis exemple 1 CHPTEREXECEPGM TEBGENER REGI N 90K l tape COPIE d ex cution du programme utilitaire TEBGENER se verra attribuer une piace m moire de JOK exemple 2 bEXECbPIXCIG REGI N 130K chacune des tapes de compilation diteur de liens et ex cution se
149. oc dure RESER 2 1 1 1 Proc dure RESER Cette proc dure r serve sur le volume d sir la place du fichier partitionn n cessaire au stockage ult rieur des membres de ce fichier Son emploi est tr s simple puisqu il suffit d une seule carte EXEC RTREXECHRESER FICHIER par1 UNIT pare V LUME par3 i PLAGE part avec par 1 nom u fichier gatirioiie i EPER ee conventions CIRCE voir 3 me partie chapitre 7 paragraphe 7 2 1 3330 pour les unit s 33301 3330 1 pour les unit s 3330 11 il par 2 type d unit par 3 nom du volume choisi ex RES301 par 4 nombre de pistes r server allocation primaire l allocation secondaire sera 15 fois 1 piste cette allocation se fera lorsque toute l allocation primaire sera puis e dans la mesure de la place encore disponible sur Le volume En plus 16 emplacements de 256 octets seront r serv s pour le DIRECTORY permettant le stoc kage d environ 128 noms de membres y exemple On d sire r server 10 pistes sur le volume RES304 pour le fichier partitionn dont le DSN est WRR1358 R CHEMAR FICH1 carte J B E1OEXECbRESER PICHTER WRR1358 O T 7 VALUME RES304 UNIT 1333011 PLACE 10 I Dans cet exemple on r serve 10 pistes d allocation pri maire 1 piste d allocation secondaire et 16 blocs e 256 octets pour le directorye On obtient sur le fichier d dition SYSPRINT le message suivant SYSTEM UTILITIE
150. oit dans la biblioth que syst me soit dans une biblioth que priv e fichier utilisateur Dans ce cas l utilisateur doit fournir une carte DD d finissant cette biblioth que dont le nom dname sera JOBLIB si la biblioth que est utilis e par plusieurs tapes du tra vail et STEPLIB si elle n est utilis e que dans l tape en question Exemple ETTbEXECbPGM SPRT ET2bEXECHPGEM P301 STEPLIBbDDEUNTT 3330 1 DISP LD VOL SER RES302 PRDSN URR1 358 ROCHEMAR HYDROM QGessoceseocoecevasecosvescos 3 17 Ex cution dans la premi re tape ET1 du programme utilitaire S RT programme de TRI de la biblioth que syst me ex cution dans la deuxi me tape ET2 du programme P301 module char geable appartenant la biblioth que HYDROM de l utilisateur dont Le sigle est WRR1358 ROCHEMAR et plac e sur le disque RES302 nom d tape ddname D signe un programme enregistr dans un fichier partitionn np d fini par une carte DD de nom ddname situ e dans une tape ant rieure nom d tape du travail en cours Ce fichier est en g n ral temporaire et souvent le r sultat d une tape d dition de liens situ e dans le m me travail exemple LKEDbEXECbPGM IEWL programme diteur de liens SISLM DODDbDSN amp C SET MAIN e e fichier contenant le pro gramme ex cutable ssobovedeessossso0vocesence SSbEXECHPGM LKED SYSLMPD tape d ex cution nom d
151. ou derri re la carte JOB quand il n y a pas de carte MAIN On peut utiliser plusieurs cartes FORMAT dans l m me JOB 3 16 6 CARTE EXEC Forme g n rale nn PGM nomdeprogramme nond tapebEXECD d PGM nomd tape ddname PARM valeur PGM nomd tape nep ddname l j nomdeproc durecatalogu e PARM nepl val1 valn REGION nnnnk TIME mn y 4 mn sec REGION nep GLK TIME nep sec tempsrestantpourletravail COND EVEN ONLYK condition condition EVEN ONLY La carte EXEC identifie chaque nouvelle tape d un travail et d signe selon les cas a COND nep condit1 conditn LE se le module chargeable programme ex cuter dans cette tape Me la proc dure catalogu e utiliser L apparition d une carte EXEC marque donc la fin d une tape et le d but d une autre nom d tape 1 8 caract res alphanum riques le premier tant obligatoire ment une lettre Ce param tre est optionnel mais recommand sp cialement lorsque le travail comporte plusieurs tapes IL permet en particulier de faire r f rence l tape consid r e dans la suite du travail EXEC mot obligatoire pr c d et suivi d au moins une zone blanche PGM param tre obligatoire pour un programme ex cutable nom de programme 1 8 caract res alphanum rique le premier devant tre une lettre Il d signe un programme imm diatement ex cutable r sidant s
152. our chaque enregistrement copie des 72 premiers octets et conversion BCD gt EBCDIC rajout du mot MAIN octet 73 76 i carte J B usuelle i f F RMATOPRbDDNAME SYSUT2 OPNTRAL SINGLE REXECbPGM TEBGENER SYSPRINTHDDbSYSPUT A SYSUT1bDDbDATA Cartes diter code BCD pouvant comporter des Lo 7 en colonnes 1 et 2 A StsTeppoerEqUTs DCB BLKSIZE 80 SISINbDDb POENERATEbMAXFLDS 2 MALTE SN bRECPRDFTELD 72 HE FIELD 4 MAIN 373 en On obtient sur la SYSPRINT le r sultat suivant en plus de la liste demand e DATA SET UTILITY GENERATE GENERATE MAXFLDS 2 MAXLITS 4 RE ORD FIELD 72 HE FIELD 4 MATN 373 PROCESSING ENDED AT EOD hml k 1 3 4 Copie avec changement d organisation IEBGENER permet partir d un fichier s quentiel de cr r un ou plusieurs membre d un fichier partitionn Les instructions de contr le sp cifiques sont dans ce cas bGENERATERMAXNAMEn 1 MAXGPS n3 DMEMBERDNAME par 1 DRECPRDE IDENT part pare par3 D MEMBER ee b RECgRD eee ordre GENERATE ler ordre d IEBGENER et doit tre unique MAXNAME n1 nombre de cartes MEMBER sp ci fi es nombre de membres cr r MAXGPS n3 nombre de param tres IDENT de la carte REC RD en l absence de MAXGPS tout Le fichier s quentiel formera un membre d un fichier partitionn ordre MEMBER annonce le nom du membre cr r Forme g n rale de la c
153. out dans le directory pour inscrire ce nouveau membre Si cela est impossible pour insuffisance de place apparition du message NINSUFFICIENT SPACE IN THE DIRECT RY dans ces deux cas on peut demander une nouvelle alloca tion d espace suppl mentaire par le param tre SPACE DELETE Le fichier sera supprim en fin an C est la valeur par d faut du KEEP Le PASS Le second param tre lorsque DISP n est pas cod e Stil s agit d un fichier sur disque il y a suppression du nom du fichier de la VIZC et la place utilis e par ce DSN est rendue dispo nible S il s agit d un fichier sur bande DEL TE n a pour effet que de posi tionner la bande au point de chargement fichier est conserv pour une utilisation ult rieure dans un autre JB C est la du second param tre si le fichier existait d j en d but d ta e c est dire si le premier param tre cod est BED Pour les bandes ce param tre entra ne 1e d montage en fin d tape sauf si on a cod RETAIN dans le param tre VAL a fichier est conserv en fin d tape pour un usage ult rieur dans une des tapes du m me J9B La d cision de conservation ou de suppression est donc remise une tape ult rieuredu travail 3 34 Attention 1 utilisation du param tre PASS se fait selon des r gles bien pr cises Si un fichier est cr au cours d une tape d un travail avec l option PASS cod comme 2 me sous param tre d
154. pel une proc dure catalogu e La pr sence de param tres symboliques permet le changement de certaines options d finies dans les proc dures Au CIRCE il existe des proc dures catalogu es sp cifiques au syst me regroupant des instructions de contr le JCL et permettant l emploi facile des compilateurs usuels disponibles ALGOL ASSEM BLEUR COBOL FORTRAN PL1 D autres proc dures particuli res ont t catalogu es pour faciliter l emploi de certains programmes utilitaires ou op r des fonctions de gestion pr presau Centre de Calcul Nous ne parlerons ici que des proc dures catalogu es les plus couramment utilis es pour les besoins actuels du Service Hydrologique de 1 ORSTOM 15 2 Proc dures pareto u es des compilateurs sieis u CIRCE ces proosiures ont des noms impos s donn s dans Le tableau ci dessous Proc dure utilisant le linkage Proc dure utilisant ditor R gion Langage le toader a SEE de noms g l tape T jcompil ilink sompil ET camp link Linkeieg Exeo 77 FORTRANG m FTEICL FIG CIE pee 110K EOLO D RESESEMESE 5 51 Si on excepte la proc dure WATFIV F RTRAN le cheminement d un pro gramme source jusqu son chargement et son ex cution peut se faire selon 2 voies diff rentes Soit en 2 tapes avec compilation et chargeur loader puis ex cution EN Soit en 3 tapes avec compilation puis diteur de lien
155. permet la copie simple sur imprimante de tout fichier s quentiel ou d un membre d un fichier partitionn Ce programme TEBGENER sera d crit dans le chapitre relatif aux copies de fichiers 3 1 Analyse d une bande magn tique 2 121 Caract ristiques et organisation des fichiers contenus sur la bande DUDUMP o Les caract ristiques et l organisation des fichiers contenus sur une bande sont obtenuss L aide de la proc dure DUDUMP mise au point par le CIRCE La mise en oeuvre de cette proc dure se fait de la fa on suivante cas g n ral appel par une seule carte EXEC carte J B usuelle RE E A DIREXECHDUDUMP ID nnnnnn 7 RE avec nnnnnn num ro de la bande analyser Dans le cas particulier o l on ne conna t pas le num ro de la bande par exemple lorsque celle ci est attribu e dans le m me JOB au cours d une tape pr c dente on proc de alors de la fa on suivante On ajoute une carte DD compl mentaire GY DDTAPE DD Dans laquelle on utilise le param tre REF pour faire r f rence la carte DD qui d finit le fichier qui a donn lieu l attribution de la bande que l on d sire analyser a 4 20 exemple g carte J B usuelle EWEXECKFTXCLG _ tape E1 ecusoeusesaee G9 FTO8FO00 1RDDbUNIT BD 16 DISP NEW KEEP KEEP VPL RETAIN DSN FTCH1 DCB oo ja mecspuDune Jag DDTAPEEDDE VIRE 21 09 PTO8rO01 Cette proc dure donne
156. pie avec dition Le prograrime JEBGENER permet d copier tout ou partie d un fichier s quenti l avec ou sans modification des enregistrements i copie de tout partie de chaque enregistrement copie avec sans r organisation des octets copie avec sans conversion des caract res copie avec sans rajout de caract res Dans ce cas on utilise Les instructions sp cifiques de IEBGENER ces instructions sont constitu es de 3 cartes param tres qui doivent tre mises si n cessaire dans l ordre suivant GENERATE MEMBER REC RD 4 39 ordre GENERATE Forme g n rale bGENERATEb MAXNAME n1 MAXFLDS n2 MAXGPS n3 MAXLITS n MAXNAME n1 nombre de cartes MEMBER sp cifi es copie avec change ment d organisation voir paragraphe 4 1 3 4 MAXFLDS n2 nombre total de param tre FIELD rencontr s dans les cartes RECPRD MAXGPS n3 nombre de param tres IDENT rencontr s dans les cartes REC RD nombre de caract res litt raux contenus dans les para m tres FIELD MAXLITS n4 L ordre GENERATE est unique et le premier ordre d IEBGENER ordre MEMBER voir paragraphe 4 1 3 4 inutile dans le cas d une copie avec dition ordre RECORD la neta REC RD d finit Les informations d ditions Forme g n rale par1 par2 par3 park par5 par6 par7 par8 DREC RDo fer par par2 parS rm IDENT identifie le dernier enregistrement
157. pis tes Voir Ire partie chapitre 3 parag 5 et tableau 3 Ce sous param tre sp cifie l allocation primaire en nombre d unit s choisies TRK CYL o blocs exemple SPACE CYL 20 incr ient L utilisateur demande 20 cylindres qui seront r serv s avant que s ex cute le programme de cr ation Remarque Lorsqu on demande une quantit d passant la capa cit d un disque par exemple d passant 404 cylindres pour un disque 3330 1 on provoque une attente du syst me afin de trouver L espace demand e et le montage inutile de volumes alors que la requ te ne peut tre satisfaite 4 Ce sous param tre sp cifie l allocation secondaire que l on d sire si n cessaire Ce sous param tre st positionnel mais optionnel Cette allocation secondaire sera allou e dans la mesure de la place disponible et ceci concurence de 15 fois exemple SPACE CYL 20 2 L utilisateur demande 20 cylindres au d part allocation pri maire auxquels s ajouteront 2 cylindres en cours d ex cu tion en cas de saturation des 20 cylindres initiaux puis encore ventuellement 2 cylindres suppl mentaires et ainsi e suite jusqu 15 fois o directory index Ce quatri me sous param tre donne l amplitude d une zone incluse dans l allocation primaire et particuli re soit l organisation partitionn e directory soit l organi sation s quentielle index e index Fichier partitionn La zo
158. plaire Le PLRRRAPANISS des peran tr s est la eee ddnom nom de la carte DD d finissant le fichier auquel se r f re cette carte F RMAT si n cessaire ce noin peut tre de la forme nom ai tape nom d tape fe proc dure ddnom Si DDNAME n est suivi d aucun d nom cette carte FYRMAT sera uti lis e pour tous les fichiers diter qui n ont pas Leur propre carte 4 FYRMAT Si le niveau de qualification donn pour le ddnom est insuf fisant tous les fichiers portant ce nom seront dit s suivant les H ci i ations de la carte FARMAT unit d impression lt ou de perforation nom de l unit sur laquelle on d sire diter le fichier PR1 PR2 ase LOCAL unit du site central CIRCE ayant les caract ristiques ventuellement exig s nn nombre d exemplaires d sir s 1 99 Attention la demande de plusieurs exemplaires multiplie le nombre de lignes diter ou de cartes per forer et peut donc n cessiter l utilisation d une carte MAIN s il y a d passement de l attribution forfaitaire pr vue par le syst me 2000 lignes et 200 cartes type type de papier ou de cartes utiliser Nom de 1 8 caract res fix par le CIRCE SINGLE espacement simple interligne DJUBLE espacement double interligne o OUEL FF entra ne par le saut de page en fin de page L option par d faut est saut en fin de page S il n y a pas de carte FORMAT il
159. ques doivent tre utilis es en SIR sauf dans le cas de mise jour Le fichier existait avant l tape L utilisation par le J B de ce fichier est exclusive un autre utilisateur ne peut avoir acc s ce Tioiep pendant tout le JB Si ce ran tse est cod Le veste effectue les op rations suivantes sur bande Si LABEL SL L S v rifie le DSN Au cas o cette v rification n est pas satisfaisante il y a arr t de l ex cution et apparition du message COMPLETIQN CODE 613 3 55 sur disque 1 S v rifie que 1e DSN figure bien dans la VIC Si non apparition du message UDATA SET N L F UND L S interdit galement l acc s de ce fichier durant toute l tape un autre utilisateur en m moire en m me temps que lui et utilisant ce fichier M D Le fichier existait d j avant L tape au cours de laquelle il sera mis jour Le m canisme de Lecture est alors positionn apr s le dernier enre gistrement du fichier Le contr le de ce fichier est exclusif il ne peut y avoir d autres utilisateurs Si le fichier est vide le sous param tre M D est alors quivalent NEW Sur bande le fichier sera augment d un certain nombre d enregis trements Sur disque si le fichier est s quentiel il y a rajout d enregis trements au fichier existant si le fichier est partitionn le sous param tre M D est alors quivalent LD et un membre va tre raj
160. r e qui permet la suppression d un fichier dont on donne le nom et ventuellement Le volume de r sidence valeur par d faut PP3330 Cette proc dure est appel e 2 fois dans le travail ci dessus La premi re fois pour un fichier sur le volume PP3330 la 2 me fois pour un fichier sur RES302 Remarque il ne doit pas y avoir de carte rempart ou feDDb dans une pro c dure in stream o i Au CIRCE il est conseill d utiliser la facilit de la proc dure in strean lorsque l usage de la proc dure sera momentan Si la mise en proc dure catalogu e se justifie par un emploi fr quent et prolong il pomii sn de s adresser au GROUPE SYSTEME du Centre de BCE 4 15 LES PROCEDURES CATALOGUERES 15 1 G n ralit s Une proc dure est une instruction symbolique qui regroupe en une seule carte plusieurs instructions de contr le Nous avons vu dans le chapitre pr c dent que l utilisateur peut cr r des proc dures qu il introduit dans le flot d entr e du travail proc dure in stream Lorsque de telles proc dures ont t test es elles peuvent tre plac es dans un fichier sp cial biblioth que d o elles pourront tre utilis es par simple appel l aide d une carte EXEC On parle alors de proc dures catalogu es Une m thode simple pour soumettre un programme crit en langage volu La compilation ou l assemblage au chargement ou l ex cution est de faire ap
161. r sidant sur PP3330 4 26 E5 donne la liste en EBCDIC 80 caract res de chaque enregistrement logique du fichier partitionn WRR1358 RZCHEMAR HYDRIM 3 250 1e SERTA s Ce programme utilitaire IBM est employ pour imprimer ou perforer le contenu d un fichier s quentiel ou partitionn d un ou plusieurs membres d un fichier partitionn de certains enregistrements d un fichier s quentiel ou partitionn du directory r pertoire du disque Remarque chaque enregistrement est imprim par groupe de 8 caract res s par s par 2 blancs au maximum on a 12 groupes soit 96 ca ract res par ligne Cette option standard d impression peut tre modifi e par emploi de l option RECYRD La fin d un enregistrement logique est signal e l impression par La fin d un enregistrement physique est signal e par La perforation standard est sur 80 colonnes Dele5e e Structure g n rale de L IEBPTECH Elle est de la forme carte J B usuelle REXECbPGM TEBPTPCH SXSPRINTHDDSYSPUT A J SISUT 1bDDD eeso SYSUT2DDDD oes SISINbDDb instructions de contr le sp cifiques l utilitaire TEBPTPCH 17 O SYSPRINT d finit le fichier des messages g n r s par IEBPTPCH SYSUT1 d finit le fichier imprimer ou perforer fichier sur disque ou sur bande 4 SYSUT2 d finit soit l imprimante soit la perforatrice de cartes pour Lister sur imprimante SYSUT2bD
162. r une pr sentation satisfaisante Editeur de liens linkage editor programme qui produit un module de chargement Pour ie il trans forme des modules r sultants en un format tel qu ils puissent tre recherch s et mis en place IL cr un seul module de chargement en reliant les modules r sultants produits s parement et les modules de chargement d j obtenus Enregistrement record groupe d informations constituant une unit pourle traitement Dans le cas d informations inscrites sur un support continu on distingue A1 11 l enregistrement logique ensemble des informations ayant trait un l ment du fichier et constituant L unit logique de traitement pour le programme l enregistrement physique ou bloc ensemble des into tone com prises entre 2 limites et constituant L unit technologique de transmission entre m moire externe et m moire internes Ex cuter to PONERTE P accomplir la fonction demand e par une instruction ou une routine Facteur de groupage blocking factor nombre d enregistrements logiques par enregistrement physique d fini ou choisi par l utilisateur Fichier ensemble d enregistrements apparent s trait s comme un tout i ensemble organis de documents diff rents ayant un objet commun Format sur un support d informations d crit la repr sentation mat rielle des informations et leur juxtaposition ind pendamment de leur repr sentation cod e
163. ravail 11 CARTE COMMENTATRE 3 Cette carte de contr le ASP permet d introduire pour plus de clart des cartes de commentaires entre les instructions de contr le Forme g n rale CONMENTAIRE Commentaire zone libre contenant des caract res quelconques en colonnes 4 exemple f F CETTE ETAPE LISTE LES FICHIERS CREES PAR LA PRECEDENTE Remarque tr s importante Les cartes de contr le propres ASP se caract risent gale ment par en colonnes 1 3 suivi d un mot convention nel pr cisant L op ration attendue par exemple FZRMAT MAIN il ne faut donc pas utiliser l un de ces mots partir de la colonne 4 d une carte commentaire elle serait alors prise comme une carte de contr le ASP La carte commentaire peut tre plac e n importe o dans le flot des cartes de contr le JOL d un travail entre la carte J9B la premi re et la carte null la derni re du travail En particulier elle peut tre incorpor e entre 2 cartes suite d une carte JOL On peut coder plusieurs cartes commentaire en s quence 3 46 12 CARTE DELIMITEUR Cette carte de contr le OS ASP sert de marqueur dans la suite des cartes JCL donn es constituant Le flot d entr e du travail Forme g n rale Commentaire zone libre pr c d e d au moins un blanc exemple bFIN DU FICHIER NUMERO 2 Cette carte marque la fin de donn es fournies la suite d une ca
164. re suffisant E37 Toute la blace allou e pour l fichier est puis e y compris RE l allocation secondaire Solution recopier le fichier en demandant plus de place pour le nouveau fichier eee TEB COPY 213 o 2315 Erreur qui se produit s ion essaie de lire un fichier sur disque non cr ou mal Cr pi FI Erreur L ex cution d ouverture d un fichier En cas de cr ation de ichiers partitionn s sur disque cette err ur se produit lorsque le fichier a t cr par un J B ant rieur mais le membre n a pas t cr Dans c A DISP M D KEEP Ze e2 Autres messages dieu AD mO G VU Ou GEER dns VOD M ae AUS DA US A US AG ES MN VEUT QU VS em AN IL s agit des messages de diagnostic E T des erreurs se pro duisent soit au niveau de la compilation IFExxxI en F RTRAN H soit au niveau du link dit IEWxxxx en FARTRAN H soit au niveau de l ex cution IHSxxxT en FARTRAN H Pour la plupart des erreurs appara ssant au niveau de l ex cution le sys t me effectue une correction standard avec apparition du message suivant STANDARD FIXUP TAKEN EXECUTI N C NTINUING Cette correction standard est rep t e ventuellement un certain nombre de fois Quand le nombre limite de corrections pr vu est atteint le syst me abandonne l ex cution du programme et il y a impression syst matique dans le fichier SYSMSG au niveau de l tape G du message suivant
165. rimante d un paquet de cartes exemple 1 carte J B usuelle F RMATOPR DDNAME SYSUT2 C NTR L SINGLE REXECbPGM TEBGENER SXSPRINTHDDbSYSQUT A SYSUTTbDDEDATA c rtes li ter NE contenir des cartes VA en clone 1 et 2 a SYSUT2bDDbSYS UT A DCB BLKSIZE 80 SYSINbDDbDUMMY A Dans cet exemple on utilise une carte FORMAT avec le param tre CONTRE SINGLE pour viter d avoir le saut programm et pour obtenir un Godi simple interligne en sortie Copie sur perforateur d un paquet de cartes carte de usuelle bEXECbPOM IEBGENER S8XSPRINEbDDbSYSQUT A S8XSUT 1bDDbDATA cartes dupliquer pouvant contenir des cartes en colonnes 1 et 2 Ni l i 4 36 SXSUT2bDDbSYSQUT B DCB BLKSTZE 80 SYSINbDDbDUMMY pie sur le disque PP3 30 du paguet de crise pr c dent et cr un fichier s quentiel WRR1 go RECT are exemple 3 Co ation d u carte J B usuelle HEXECHPGM TERGENER SYSPRINTbDDbSYS UT A SXSUE HDDbDATA cartes crire sur le disque pouvant RARE des cartes s en colonnes 1 et 2 f SISUT2bDDbUNIT 3330 1 V L SER PP3330 DISP KEEP DELETE DSN WRR1358 R CHEMAR FICH1 SPACE TRK 1 1 DCB BLKSIZE 6400 LRECL 80 RECFM FB 8XSINbDDbDUMMY exemple He Copie sur le disque SETO02 du paquet de cartes pr c dent et cr D ation du membre SP1 du fichier partitionne WRR 1358 RYCHEMAR
166. riture Forme g n rale La signification des sous param tres est la suivante rang sp cifie la position relative du fichier sur le volume partir du d but du volume Nombre de 1 4 chiffres La valeur par d faut est 1 NL no label sp cifie qu il y n y a pas de label sur ce volume BLP bypasslabel processing le syst me ne doit pas traiter Le label dont l examen est la charge de l utilisateur SL standard label IBM sp cifie qu il y a un Label conforme aux normes S trait par le syst me IN les op rations autoris es sur ce fichier sont uniquement la lecture QUE les op rations autoris es sur ce fichier sont uniquement l criture INQUT les op rations autoris es sur ce fichier sont la lecture et l criture Remarques importantes pour L utilisation du param tre LABEL Tous ces sous param tres sont ponios s ils sont omis on doit donc coder Ch patot Tenk une Hrane leur place Si L on veut sp cifier uniquement le num ro de s quence on peut omettre les parenth ses exemple LABEL 3 Quand on emploie l option BLP dans le second sous param tre pour ne pas tenir compte des labels il faudra faire attention bien calculer le num ro de s quence rang car le syst me consid re dans ce cas Les labels comme des fichiers compris entre 2 tapemarks et il ne faut pas oublier qu il existe un label de t te et un label de queue pour chaque fichier de don
167. rte bDDb ou bDDbDATA voir chapitre 7 1 Si l on a utilis le param tre DIM dans la carte DD qui d finit ce fichier les caract res de la carte s parateur devront tre rem plac s par le d limiteur choisi Cette carte est obligatoire pour marquer la fin d un fichier situ dans le flot d entr e et contenant des cartes donn es de type JCL que l on ne veut pas confondre avec les cartes JCL du travail Elle est facultative mais recommand e pour 1o fichiers qui ne con tient pas de cartes J be Pour des raisons videntes les fichiers de donn es plac s dans Lle flot d entr e ne peuvent comporter des cartes commen ant par en colonnes 1 et 2 dans ce cas on utilisera le param tre DIM de la carte DD d finissant le fichier pour sp cifier 2 autres caract res comme d limiteur Une tape d un travail peut comporter plusieurs fichiers situ s dans le flot d entr e d finis par des cartes DD diff rentes la fin de chacun pouvant tre marqu e par une carte 13 CARTE FIN DE TRAVAIL NULL Cette carte sert marquer la fin d un travail Forme g n rale O M en colonnes 1 et 2 Cette carte est plac e derri re la derni re carte JCL d un travail ou la derni re carte des donn es situ es dans le flot d entr e Si elle est omise toutes les cartes JCL qui suivent feront partie du travail et ce jusqu la prochaine carte J B entr e au lecteur de cartes 3 48 14 C
168. rtes PRG et ra lanean emo eee Indiquer les d buts et fin de fichier particuliers fournis sur cartes cartes DATASET et ENDDATASET RME si ci Introduire pour plus de clart des cartes de commentaires entre les instructions de contr le carte 7 k Pr ciser certaines conditions d ex cution et de restitution prio rit d lai d attente oee E L T carte CIRCE amanece Pr ciser la fin d un travail mmpeanes carte ZI 4 Le 2 29 Syntaxe des cartes de contr le BaZe lo Recommandations importantes La perforation doit imp rativement tre effectu e en code EBCDIC 029 Existence de blancs significatifs Les param tres sont s par s par des virgules Certains param tres ont des sous param trese 3 7 IL y a diff rents types de param tres et de sous param tres _ mot cl forme PARM sso position indiff rente positionnel position imp ratives Certains param tres ou sous param tres peuvent avoir des valeurs par d faut Dans cette note no us utiliserons Les conventions de notation suivantes b au moins un blanc obligatoire param tre param tre optionnel S il est omis la valeur soulign e sera param tre optionnel H d faut celle donn e Sn ianen par le syst me valeur dite par d faut ee _ l un des param tres ou L une des repr sentations doit tre choix 3 choisi e
169. rtir du deuxi me programme Ceci permet au syst me de distinguer les fichiers constitu s par les dif f rente LOAD MODULE programmes compil s et lanke m me si ceux ci se trouvent sur le m me support disque L instruction DD ajouter est de la forme LKED SYSLM DODDbDSN amp REL1 RUN DISP NEW PASS gt UNIT SYSDA SPACE CYL 5 1 1 y C NTIG ET1 tant le nom de l tape DDNAME Cette carte doit tre plac e avant 1ER cartes DD relatives l tape G fonple x cution en s rie de 3 progr deg dans le m me J B carte JOB ER1REXECOCBACLG 098 SYSINbDDb programme C B L n 1 sur cartes Z f Ge SYSOOHbDDEUNIT eee PR2bEXECbCBACLG REGI N 90K C B SYSINbDDb programme C B L n 2 sur cartes LKED SYSLM DbDDbDSN amp amp PR2 RUN DISP NEW PASS UNIT SYSDA SPACE CYL 3 1 1 C NTIG 1 88 SYS003bDDDUNIT ee PR3bEXECLCBACLG 288 SYSINbDDb programme C B L n 3 sur cartes LKED SYSLM DbDDbDSN amp amp PR3 RUN DISP NEW PASS UNIT SYSDA SPACE CYL 3 1 1 C NTIG G8 S007bDDbUNIT e e Si dans la cha ne de programmes du m me JOB un programme C B L suit un programme FPRTRAN il faut galement pr ciser le param tre DISP New PASS du fichier SYSLIN de la proc dure CBACIG On ajoute donc dans ce cas une carte de la forme M C B SYSLINbDDbD
170. s acc s s lectif ou direct sa ar Nous nous limiterons dans cette note aux seuls supports informatiques actuellement utilis s au Service Central Hydrologique savoir les cartes per for es employ es comme support provisoire et Les bandes et disques magn tiques employ s comme support permanent L utilisation efficace de ces m moires n cessite d avoir quelques connaissances sommaires sur la technologie des principaux supports employ s et sur les diff rentes possibilit s d organiser l information sur ces supports Nous aborderons donc les notions de fichier et de structure des enregistrements et examinerons les principales m thodes d acc s l information en insistant plus sp cialement sur les proc d s utilisables en langage FORTRAN Nous donnerons ensuite les proc dures de contr le permettant la liaison entre le syst me d exploitation et l information ainsi m moris e c est dire les instructions de cont le propre au Centre de Calcul dont nous uti lisons actuellement Les services 1 1 T1 s agit du CIRCE Centre Inter R gional de Calcul Electronique CNRS ORSAY actuellement quip d un ordinateur IBM 370 168 1168 O 2 Enfin nous compl terons ce guide pratique en donnant le mode d emploi d un certain nombre de programmes utilitaires mis la disposition des pro grammeurs pour faciliter l exploitation des fichiers 1 1 PREMIERE PARTIE LES SUPPORTS D INFORMA
171. s link edit puis ex cution La figure 8 sch matise ces 2 possibilit s pour un prograrime FARTRAN Le compilateur est un programme qui permet la traduction d un pro amme source crit en langage volu en langage machine appel module objet Le link edit ou diteur de liens est un programme qui permet de r soudre les r f rences externes c est dire qu il permet en parti culier de regrouper le programme principal les sous programmes crits par l utilisateur et les sous programmes de la biblioth que en un seul module chargeable Load module Quand on utilise l link edit le module chargeable est stock dans un fichier sur disque carte SYSLMPD du LINK EDIT IL ne sera charg en m moire et ex cut qu l tape d ex cution G Le loader ou chargeur est un programme permettant d effectuer un link edit et une ex cution en une seule tape Quand on utilise le Loader Le r sultat de l dition est directement charg en m moire Cela n cessite de pr voir environ 10 15 K sup pl mentaires pour la place en m moire de L tape d ex cution G On utilisera l diteur de liens si le module chargeable doit tre mis en librairie ou si il n cessite l utilisation de param tres au tres que MAP LET NCAL SIZE En particulier on utilisera le LINK EDIT si l on d sire en sortie le DECK module objet sur cartes per for es es Par contre il est pr f rable d utiliser le char
172. s fichiers doivent tre d finis par des cartes DD Exemple d utilisation compilation et ex cution d un progremme source FORTRAN avec donn es sur cartes carte dB REXECHETX REGION G9 150K S RE SYSINbDDb programe source FORTRAN sur cartes o 68 SYSINbDDb aonn es sur cartes f Remarque Au CIRCE la proc dure FIG1 peut galement tre soe FORTRANG L appel se fera donc soit par REXECRFIG 1 soit par bEXECHFORTRANG Proc dures EEE et FTXC Ces proc dures permettent de compiler un epr EME TRAN On a donc une seule tape E RI e 1 Remarque Les proc dures catalogu es ne peuvent pas contenir de cartes 77777 DDb ou DDbDATA Lors de L appel de ces proc dures on rajoute une carte DD rempla ant la carte DD de la proc dure et d finissant le flot d entr e exemple Si dans une proc dure on a la carte 8T05F00 1bDDbDENAME SYSIN pour lire les donn es 1ors de l ex cution on crira SXSINbDDb exemple compilation simple d un programme source FARTRAN L aide du compilateur H tendu avec demande en sortie du DECK module objet programme compil mis sur cartes perfor es carte JZB REXECDETXC PARM F RT DECK E RT e SYSINbDD programme FPRTRAN sur cartes Proc dures FIG1CL et FTXCL Ces proc dures permettent de compiler et effec tuer le Tincedit diteur de liens d un programme FYRTRAN en 2 tapes
173. s les deux des cartes d addition leur ordre est indiff rent 15 3 Utilisation des proc dures catalogu es FORIRAN 19 5 1 Compilateur WATFIV IL s agit d un compilateur de mise au point tr s rapide en compilation et qui d tecte les erreurs en four nissant des diagnostics pr cis Cette proc dure dite CODE AND G effectue la traduction et l ex cution d un programme FORTRAN en une seule tape Le nom de cette tape unique est G ADD de la proc dure se fait par une carte EXEC du type aom d tapebEXECDETW ermerphenmnt L utilisation de ce compilateur n cessite en plus des cartes de con tr le OS 3 cartes propres WATFIV 5978 SENTRY ESTAP 3 54 Pour ces 3 cartes le signe est perfor en colonne 1e Un travail utilisant le proc dure WATFIV se pr sentera donc de la fa on suivante carte J B usuelle nom d tape bEXECbFTW REGION nnnK 88 SYSINbDDb JB IDENT 1 PARAMETRES soso colonne 16 Travail programme et sous programme SENTRY donn es amp STAP Remarques importantes pour l utilisation du compilateur WATFIVe le param tre REGI N de la carte EXEC aura pour valeur la r gion n cessaire pour l ex cution du programme augnentse de 95K pour la place du compilateur la valeur par d faut est 150 K i SENTRY est obligatoire m me s il n y a pas de donn es On peut ex cuter plusieurs travaux dans la m me tape 0 5 c est hdire
174. ssible la Localisation ult rieure de tout enregi s tremente L emplacement d un enregistrement sur la m moire est donn e au moyen d une cascade d index index de cylindre sur le cylindre index index de piste sur chaque cylindre Une entr e dans un index de cylindres contient l identification d un cylindre particulier et la reproduction de cl la plus haute qui se trouve sur c cylindre la e Une entr e dans un index de pistes contient l identification d une piste particuli re et la reproduction de la cl la pine faute qui se trouve sur cette piste La recherche d un enregistrement se fait donc de la fa on suivante La cl de L enregistrement tant donn e 1 ce dans l index de cylindre de L entr e qui contient la cl la plus proche de et sup rieure la cl fournie Le syst me trouve alors un pointeur qui donne l emplacement du cylindre qui contient l enregistrement cherch 2 Dans le cylindre ainsi d sign consultation de l index de piste _Le syst me cherche l entr e qui contient la cl la plus proche de et sup rieure la cl fournie IL trouve alors un pointeur qui donne l emplacement de la piste qui contient l enregistrenent cherch 3 Sur la piste ainsi d sign e recherche de la cl Lorsqu elle est trouv e L enregistrement qui la suit imm diatement est transmis 2 10 Une telle organisation permet donc d utiliser un fichier en lec
175. st alors command e par l instruction i TRACE N 42 15 A l ex cution de chaque instruction du programme analyser r f renc e ppp corresponde la sortie du message TRACE ppp ceci partir de l instruction r f renc e nnn de l instruction AT et y compris nnn Cette analyse peut tre arr t e au moyen d une instruction TRACE OFF pr c d e d une instruction AT pr cisant l tiquette partir de la quelle cette interruption doit prendre effet exemple 1 READ 5 2 X produit 2 FORMAT 5X F5 2 TRACE 1 J 5 TRACE 3 3 J J 2 TRACE 3 IF J 13 3 4 k TRACE 3 L STgP TRACE 3 DEBUG TRACE AT 1 TRACE N AT 4 TRACE QFF END Remarque Un module de mise au point peut contenir toute Les instructions d un programme FARTRAN ordinaire l exception des instructions suivantes IMPLICIT BL CK DATA ENTRY ou une d finition arithm tique de fonction RECAPITULATTF DESCRIPTIF DES PRINCIPAUX PARAMETRES DE LA CARTE DD DSNAME ou DEN nom du fichier UNIT type d unit VALUME ou V LL SER num ro RETAIN SER tant une lettre BDE bandes 7 canaux la bande en fin d tape 131 a BANDES MAGNETIQUES quelconque 17 caract res le Teri ue 3530 WRR1358 San non du fichier lt 8 caract 8 caract 8 caract LB caract total lt tl caract amp nom fichiers temporaires 24004 i 9 canaux BD16 bandes A canauxa BD20 bandes
176. t Inutilis
177. t lev et les risques de d t riorations beaucoup plus grands que pour les bandes la s curit d un disque n cessite des recopies fr quentes de son contenu sur bande magn tique 3 5 Utilisation pratique des unit s 3330 En pratique la constitution physique de l unit 3330 impose un nombre d enregistrements par piste qui est fonction de taille des enregistrements On over dus Le tebl an les possibilit s de stockage de l information sur les unit s 3330 Cette table de capacit permet d obtenir la taille de l espace r ser ver pour un ensemble de donn es crire sur un disque 3330 estimation du pacem etme SPACE o E la longueur de E nt logique para m tre LRECL du DCB on pourra ajuster le meilleur facteur de blocage param tre BLKSIZE du DCB pour occuper au maximum une piste du disque La formule utilis e pour cr r cette table est 13165 LE 135 C KL DL avec FE N nombre d enregistrements physiques ou blocs par piste C 0 si KL O C 56 si KL Z longueur de la cl organisation s quentielle KL index e DL longueur en octets du bloc crire Exemple Si les blocs crire sont de 1000 octets sans cl s le nombre maximal de blocs par piste sera 13165 1135 7 11 59 soit 11 blocs 1 9 TABLEAU 3 TABLE DE CAPACITE DES DISQUES 3330 i 7 i Nombre Nombre f Nombre Nombre d octets pari d enregistrements d octets
178. t Le fichier sur teque on lit ou on crit r f rence la carte DD nf num ro de format facultatif ed tiquette de transfert en cas d erreur de lecture facul tatif e2 tiquette de transfert en cas de fin de fichier en lecture facultatif liste liste de variables simples ou indic es facultatif Rappelons que pour les fichiers cartes la fin de fichier est indiqu e par une carte de contr le appel e carte d limiteur ou carte s parateur qui comporte en principe 1 les caract res en colonnes 1 et 2 L u tilisation du param tre END e2 dans l instruction READ est donc conseill e pour viter un contr le de fin de donn es effectu par exemple sur une carte vierge Pour les fichiers sur bande Le contr le de fin de fichier sera effectu sur la TAPE MARK de fin de fichier Cas particulier des instructions de lecture ou criture sans FORMAT READ n1 liste gt ie a d SEE WRITE n1 liste n1 num ro de 1 unit logique Ces instructions permettent d changer des informations entre m moire centrale et p riph riques en particulier disque et bande magn tique et cela sans conversion transfert direct des bits de la m moire centrale vers le support et inversement La lecture sans format provoque la lecture d un enregistrement logi que dont la Tonguaur doit es a celles des variables de la liste Exemple Si on d sire lire sans format sur l unit
179. tape d une proc dure catalogu e exemple FZRT LKED G9 nom de proc dure catalogu e 1 8 caract res alphanum riques le premier tant PAM obligatoirement une lettre Rappelons qu une proc dure catalogu e re groupe plusieurs cartes de contr le en une seule carte avec des carac t res symboliques optionnels permettant le changement de certaines options d finies dans La proc dure Nous examinerons dans le chapitre 15 les proc dures catalogu es uti lisables sur l installation 370 IBM du CIRCE exemple ET1bEXECbFTXCLG ex cution dans l tape ET1 de la proc dure catalogu e FTXCLG compilation C d un programme source crit en FORTRAN niveau H tendu FTX puis appel de l diteur de liens L et ex cution G le param tre PARM permet de pr ciser l s options appliquer durant l ex cution d un programme Chaque programme syst me compilateur diteur e liens chargeur comporte un ensemble d options partic li respour lesquelles des valeurs pr cises peuvent tre choisies par l utilisateur selon le programme utilis Si certaines de ces valeurs ne sont pas sp cifi es par l uti lisateur le programme ex cuter prend les valeurs par d faut ne param tre PARM annule tous les param tres par d faut de toutes les tapes de la proc dure catalogue et transmet de nouveaux param tres dans l tape nomm e ou de la 1 re tape si nep n est pas pr cis l
180. tation conventionnelle d une information sous une forme physique convenant son traitement par des moyens automatiques A1 10 Data set ensemble de donn es Debug to mettre au point un programmes DCB code Abr viation de D cimal Cod Binaire codage en bits d un chiffre d cimal voir paragr 1 de l annexe 1 D cimal condens packed decimal m thode de repr sentation dans laquelle plusieurs chiffres d cimaux sont enregistr s dans un seul multiplet par exemple 2 chiffres d cimaux dans un octet Deck of cards jeu de cartes formant un tout D limiteur caract re qui limit une suite de caract res et qui n est pas membre de cette suite Densit d enregistrement packing density nombre d unit s d information enregistr es par unit de dimension sur un support donn Dispac disk pack marque d pos e IM d signant le chargeur de disques SSD SES Dummy factice qualifie une adresse une instruction ou un enregistrement sans valeur op ratoire r elle Dump image m moire To dump faire une analyse m moire Enregistrer imprimer sur un support le contenu d une m moire et ventuellement les informations compl mentaires associ es exemple Pmp Aune bande gagnerais analyse du contenu de la bande o tt EBCDIC contraction de Extended Binary Coded Decimal Interchange Code voir paragraphe 1 de l annexe 1 Editer pr parer l impression afin d obteni
181. te une zone standard de octets CE qui indique la longueur de l enregistrement logique et une zone standard de octets RECAPITULATION DES DIFFERENTES ORGANISATIONS Formats d enregistrements Fixe F Variable V EE Ind fini U Enr 3 LD Fixe bloqu FB O A o i O S o z I lt 3 G 2 3 Variable bloqu VB Variable spann VS su Enr 1 C RAS PARA OR ARE i R T ca Variable bloqu VBS spann Fe ENREGISTREMENTS DE LONGUEUR VARIABLE UN ENREGISTREMENT LOGIQUE CTR E xxbb Teang 4 octets N Octets e a E NON GROUPES DE LONGUEUR VARIABLE 80 t DONNEES 76 ENRG PHYSIQUEs 84 OUPES DE LONGEUR VARIABLE r Bloc 1 ENREG LOGIQUE LE DONNEES 104 DONNEES DONNEES 100 50 xxbb xxbb CTR B CTR E CTR E ENREGISTREMENT PHYSIQUE RIV 261 850 O E U E O S 4 lt I lt a o o o S J ORGANISATION DES FICHIERS SUR BANDES MAGNETIQUES Standard label Standard label Standard label No label Initialisation pour un DUMP NN VOLUMES MULTI FICHIERS SR HDR 2 NN NN FICHIER 1 NN N TM TM TM i le TM Tape Mark N FICHIER MULTIVOLUME 2 5 CB qui indique la longueur du bloc ou enregistrement physique qui dans ce cas est gale celle de D Ados L0B QE enregistre ments non Phogiesia _ Format Tnd fini U Les e
182. tilitaires IL s agit essentiellement des proc dures suivantes SORT MERGE permet Le tri et la fusion d enregistrements proc dure ITEM COMPRIME permet la compression d un fichier partitionn DUDUMP appel du programme d analyse de bande DUDUMP DUMPBAND appel du programme d analyse de bande DUMPBAND EFFACE suppression d un fichier r sidant sur disque magn tique RESER r servation de la place d un fichier sur un disque magn tique 4 me PARTIE LES PROGRAMMES UTILITATRES AS te nnmnnn nn ut me n e ne a Da ARE Oo DS DA Do AS um mm me A SE SSSR SET ET Nous avons rassembl sous le terme de programmes utilitaires un certain nombre de proc dures et de programmes de servitude dont l emploi par ticuli rement facilepermet d effectuer tr s rapidement la plupart des op ra tions courantes en gestion de fichiers tri pam oi copie analyse des fi chiers suppression des fichiers on Parmi ces utilitaires nous avons retenu les plus couramment em ploy s dont nous donnons la liste ci dessous en distinguant d une part les pro c dures catalogu es biblioth que IBM ou CIRCE et d autre part les programmes de servitude de l Operating System 0S propres l ordinateur 370 IMM Proc dures catalogu es utilitaires Elles sont appel es par une seule carte SBRT MERGE A pornot Le Li ou la fusion d enregistrements IBM RESER CSMPRIME EFFACE DUDUMP DUMPBAND
183. tion permet l acc s direct l aide d instructions FORTRAN FORTRAN IV H tendu Cet acc s direct a pour norme re d tre heaucoup plus rapide que l acc s s quentiele Ce gain de temps ds s op rations d entr e sortie en programmation FORTRAN peut encore tre am lior par l utilisation dos instructions READ et WRITE sans FORMAT E Dans l organisation directe la forme des raie est_ obligatoire ment fixe On sp cifiera donc RECM F dans le param tre DCB de la carte DD d finissant le fichier voir 3 me partie chapitre 7 L espace r serv e pour le fichier acc s direct est fig et SHERSLUES d s sa cr ation et ne peut donc tre tendu Dans l utilisation d un fichier bosser les enregistrements sont rep r s par leur adresse physique La recherche d un enregistrement se fait par d placement relatif de l adresse par incr menitation successive la longueur de l enregistrement tant fixe Chaque enregistrement porte donc un num ro d enregistrement qui lui est particulier et le programmeur doit sp cifier dans les instructions READ ou WRITE ce num ro Pour cela il lui est n cessaire d avoir l inventaire du fichier qui lui permet de conna tre l emplacement de l enregistrement traiter 2 11 En FORTRAN IV H tendu on dispose de instructions sp cifiques pour la cr ation et l utilisation de fichiers acc s direct sur disques il s a git des instructions suivantes is DEFIN
184. ture ou criture d enregistrements dont les cl s sont en ordre ascendant en lecture ou criture d enregistrements dont les cl s sont don n es dans un ordre quelconque utilisation des syst mes d index en criture d enregistrements avec de nouvelles cl s Le syst me prend en charge le choix de l emplacement des nouveaux enregis trements et la mise jour des index Pour la proc dure suivre en langage COBOL pour cr r et exploiter un fichier organis en s quentiel index on se reportera la notice IBM GRF2 4030 0 Tome 9 ANS COBOL le on 18 21 2e2e3o Organisation al atoire Ce type IPE EATARRPOR ne peut pas tre obtenu en langage FORDRAN Dans cette organisation les enregistrements sont rang s au hasard cest dire qu ils sont dispers s l int rieur du support chacun d eux tant dot d une adresse cl calcul epar l utilisateur au moment de la cr ation du fichier Par exemple si l enregistrement poss de un indicatif ex num ro d iden tification s on passera de cet indicatif l adresse par un algorithme de transformation En effet si en th orie rien ne s oppose ce que indi catif et adresse ne fassent qu un en pratique il s av re que l indica tif ne peut g n ralement pas servir directement d adresse celle ci ayant une structure command e par la nature et la capacit de l a m moire auxi liaire utilis e 2e 2olte Organisation directe Ce type d organisa
185. ue et galement les listes des fichiers qu contient e La liste VI est r alis e L aide de la proc dure CIRCE BZTUTI les listes des fichiers sont r alis es par le programme utilitaire standard IBM IEBPTECH On utilise la proc dure B TUTI qui est appel e l aide d une carte EXEC carte J B usuelle HEXECDBPTUTI PARM par 1 V SER par2 U par3 D park d par 1 mot clef d finissant la fonction demand e PARM VT CS donne la liste simple c est dire sans la liste des membres des fichiers partitionn s Pour chaque fichier du volume on obtient en clair le DS RG le RECFM Le BLKSIZE le LRECL i le nombre d EXTENTS extensions allocation secondaire la date de cr ation l emplacement physique du fichier sur le volume l allocation faite pour ce fichier la place r ellement utilis e Se VT CD donne la m m liste avec en plus pour les fichiers partitionn s le nom des membres apparte nant ce fichier PARM ii L 2h par 2 nom du volume pour lequel on demande la liste VTC exemple V SER SETOO2 par 3 type d unit sur laquelle est mont le volume 3330 unit s 3330 1 3330 17 unit s 3330 11 par 4 nom du fichier pour lequel on demande la liste VIS Attention Si ce param tre est omis toute la VIC est imprim e a a ahan ann mam 00 6 ar man paa D 00 som Le Ou ma US ENS oee EU a OU eg 0 aa mera MUR ara 0 Mn 280 AE 0 SA D 00 O
186. un enregistrement de fin de fichier REWIND n1 weeman ni num ro A constante ou Sariable enti re de lon gueur i d finissant le fichier r f rence la carte DD Cette instruction entraine le positionnement du dispositif de lecture ou d criture sur le premier enregistrement logique du fichier d fini par ni BACKSPACE n1 p ni num ro So coase ou variable enti re de lon gueur 4 d finissant le fichier r f rence la carte DD Cette instruction positionne le dispositif de lecture ou d criture sur l enregistrement logique pr c dent Les instructions REWIND et BACKSPACE ne sont utilisables qu avec des ensembles de donn es acc s s quentiel sur bande ou sur disque En particulier elles ne sont pas utilisables avec les fichiers sur cartes perfor es 2 8 2 2 Organisation sur m moires acc s s lectif acc s direct Les m moires acc s s lectif disques magn tiques permet tent d adresser un enregistrement et donc de l retrouver tr s rapidement sans avoir lire ceux qui le pr c dent sur le support Cette m thode d acc s L information est appel e acc s s lectif ou acc s direct L adresse peut donner 2 types aiimtormation l adresse physique qui d crit l emplacement de l enregis trement Cette information permet L acc s aux enregistrements en ordre physique c est dire en se basant sur la position de l enregistrement sur disque
187. un m me JOB se fait selon certaines conditions o lorsqu une tape se termine le syst me fournit un code code de retour qui correspond au r sultat de l ex cution de l tapes _ Ainsi en compilation ou assemblage on a le code de retour suivant F h 8 42 46 aucune erreur n a t d tect e il ya des erreurs mineures l ex cution peut avoir lieu il y a des erreurs et l ex cution risque d tre incorrecte la compilation se poursuit jusqu au bout L ex cution n aura pas lien sauf demande expresse du programmeur il y a des erreurs importantes L ex cution ne peut avoir lies les erreurs sont telles que le traitement est imm diatement arr t au d but de chaque tape figure une instruction de contr le comportant un param tre C ND condition qui est une expres sion logique form e d op rateurs logiques 1233 KL lt Z et d op randes nombre de O 4095 L valuation de cette expression donne le d tail des valeurs que doivent avoir les codes de retour des tapes pr c dentes pour que L tape consid r e soit ex cut e Si les codes de retour ne satisfont pas aux conditions du param tre COND l tape n est pas ex cut e Les donn es n cessaires l ex cution d un programme ainsi que les donn es r sultant de cette ex cution peuvent appartenir diff rents fichiers plac s sur des supports diff rents Ainsi par exemple pour un m me progra
188. ur d enre 1 octet pour le caract re de contr le de saut ASA 4 octets pour Le compteur de bloc 137 14 4 157 BLKSIZE RECM VBA ERECL _ Nombre maximal de cartes de Lrtr le C nombre est limit th oriq em nt 255 par tapes Nombre maximal d unit s logi 99 en F RTRAN IBM 20 en WATFIV Nombre maximal de lignes en sortie sur imprimante option par d faut 2000 lignes avec carte MAIN pas de limite th orique Nombre maximal de cartes en sortie option par d faut avec carte MAIN pas de limite th orique quesutilisables pour les fichiers A2 Entr e sortie de fichiers cartes Ces fichiers ne Taa pas tre bloqu s Ils sont donc obligatoir ment du PP B RECM F DRECL 80 gt Rappelons gu ii est inutile de coder le DCB pour les fichiers du type SYSOUT B sortie sur rrretnie ou du type DD entr e de fichiers cartes Concat nation la limite maximale de fichiers que l on peut concat mer est de 255 pour les fichiers s quentiels 16 pour les fichiers partitionn s le nie FORTRAN H n admet pas la concat uation de fichiers r sidant sur des supports diff rents Cha ne de programmes dans un m me JOB Lorsqu un JOB contient diff rentes tapes avec ex cution de plusieurs pro grammes au cours de ces tapes il est n cessaire de pr ciser le fichier LKED SYSIM D par adjonction d une carte DD suppl mentaire pa
189. uses dans une biblioth que accessible en permanence Elles forment alors une proc dure catalogu e e IL suffit pour la mettre en oeu vre de SSSR par le nom qui lui est associ Les cartes de contr le et les proc dures catalogu es d crites dans cette note sont celles que n cessite L installation 370 IEM du CIRCE a date de r daction Cependant nous ne parlerons ni des options pr pres au TS Time Sharing fption ni des proc dures suppl mentaires qu entra ne le traitement partir de terminaux Nous mettons en garde le lecteur contre les l g res mais fr quentes modi fications apport es au langage de contr le par suite de L volution cons tante des installations du Centre de Calcul 12 Notions fondamentales L utilisation du langage de contr le n cessite au pr alable de bien pr ciser les quelques notions d finies ci apr s On appelle ETAPE ou 8 USTEP le chargement et L ex cution de tout programme syst me ou programme utilisateur Une tape est d finie par une instruction de contr le EXEC 1 L ensemble des tapes group es en un m me passage machine s appelle un TRAVAIL ou ou Jp Un travail peut ne tats qu une seule TREN Un travail est d fini par une instruction de contr le JOB On appelle FICHIER ou DATA SET un ensemble de donn es d un programme Un fichier est d fini par une instruction de contr le DD DATA DEFINITION Un programme cod
190. usieurs blancs Les blancs comprennent dans ce cas au moins la colonne 3 au plus Les colonnes 3 15 Lole3e Format des cartes de contr le pr pres ASP po a aa a operationbop randes est perfor de la colonne 1 la colonne 3 IL n y a pas de zone commentaire autoris e dans ces cartes de contr le Le d tail des zones est le suivant l op ration pr cise le type d instruction de contr le dont il s agit C est obligatoirement l un des mots conventionnels choisis pour le langage de con tr le ASP CIRCE DATASET FORMAT MAIN see le ou les op randes sont s par s par des virgules et con tiennent des param tres optionnelsou obliga toires pour pr ciser l op ration demand e Cette zone est obligatoirement pr c d e et suivie d un blanc au moins Elle ne doit pas d passer la zone 71 d une carte Si une carte ne suffit pas une ou plu sieurs cartes suite peuvent tre utilis es en appliquant les r gles suivantes 1 Perforer un caract re quelconque en colonne 72 de la carte qui doit avoir une carte suites 2 Dans la carte suivante perforer en colonne 1 3 et la suite du texte par tir de la colonne he 3 Un op rande et les param tres qu il con tient doit tre contenu tout entier sur une m me cartes 3 10 3 CARTE JOB Forme g n rale 30 En de MSGL VEL ST A Sue mn sec nomdetravai1b3Bbsi glenum ut
191. xemple ENTC RbDDbDATA DIM FN cartes donn es y compris N x les op rations d entr e sortie d li cation d espace sur m moire acc s direct ese portant sur ce fichier seront ignor es exemple d utilisation du param tre DUMMY Un programme F RTRAN contient des tes d criture sur cartes du type WRITE 7 1000 s o 1000 FARMAT On supprimera l effet de ces instructions perforation de cartes en sortie en associant une carte DD de la forme 88eFT07F00 1bDDbDUMMY ddnom2 permet de suspendre la d finition du fichier le syst me at tendra de trouver plus loin dans le flot d entr e ou la proc dure ca talogu e utilis e une carte DD portant le nom ddnom2 Les caract ristiques du fichier d crit dans ddnom2 seront alors uti lis es pour d finir le fichier cit dans dd nom1 3 26 7e Forme g n rale de la carte DD a nombDDb ose onre VLEs LAB p DISP e DCB s p sPacE La carte DD peut comporter jusqu 7 param tres mots cl s Parmi ces param tres 2 peuvent tre abr g s DSNAME en DSN et VOLUME en Vle Ces param tres ne sont pas toujours utilis s On retiendra les combinaisons g n rales suivantes Bandes magn tiques Param tres cr ation fichier permanent utilisation fi chier permanent DSN UNIT Var toujours employ s DSN UNIT LABEL DISP DCB VOL ventuellement

L`utilisation des mémoires auxiliaires en informatique au

Contents

Download Pdf Manuals

Related Search

Related Contents

L`utilisation des m&eacute;moires auxiliaires en informatique au

Contents

Download Pdf Manuals

Related Search

Related Contents

L`utilisation des mémoires auxiliaires en informatique au