,<-I> CHAMP 7,12,32,+D05,,<-I> LIBEL ,14,01, CHAMP 8,14,21,+D02,,<-I> LIBEL ,14,23,<-> CHAMP 9,14,24,+D02,,<-I> LIBEL ,14,26,<-> CHAMP 10,14,27,+D02,,<-I> DATE ,2,10 HEURE ,2,25 ERREUR 1,

ERREUR 2, ERREUR 3, ERREUR 4, QSTION 5, FIN .EL .PG .FIG5 .LM-5 .LT NOM DE L'ECRAN : FRM1.FRM NUMERO : 1 1 2 3 4 5 6 7 8 12345678901234567890123456789012345678901234567890123456789012345678901234567890 1\ *** C R E A T I O N *** \1 2\ JJ-MMM-AA HH:MM \2 3\ NUMERO DE BADGE : ----- \3 4\ \4 5\NOM : --------------- \5 6\ \6 7\PRENOM : ------------ \7 8\ \8 9\ADRESSE : -------------------------- \9 10\ -------------------------- \10 11\ -------------------------- \11 12\ ##### \12 13\ \13 14\DATE DE NAISSANCE : ##-##-## \14 15\ \15 16\ \16 17\ \17 18\ \18 19\ \19 20\ \20 21\ \21 22\ \22 23\ \23 24\ \24 12345678901234567890123456789012345678901234567890123456789012345678901234567890 1 2 3 4 5 6 7 8 .EL .LM+5 .S .HL2 ^*#^&LIBRAIRIE_ D'ECRANS_ FORM/VAX\*\& Les modules "OBJET" d'écrans FORM/VAX résultant de la compilation peuvent être regroupés par application dans des librairies d'écrans. Ces librairies sont créées et gérées par l'utilitaire LIBRARIAN (LIB) du moniteur VAX/VMS. Il permet d'insérer de nouveaux écrans, de supprimer ou de remplacer des écrans, de lister l'ensemble des écrans contenus dans une librairie, etc... .HL2 ^*#^&MESSAGES_ D'ERREUR_ DE_ COMPILATION\*\& Ces messages correspondent à des erreurs détectées dans le programme source FORM/VAX lors de la compilation. Ils apparaissent dans le listing de compilation sous la ligne de la clause en erreur (seul le numéro de l'erreur apparaît). .PG .FIG5 .I0;^*01 ERREUR DE SEQUENCE\* .S La position de la clause dans le programme ne respecte pas la séquence normale#: .S .LT (DEBUT, clauses globales, FORMAT, clauses d'élément, FIN) .EL .S2 .I0;^*02 PARAMETRE OBLIGATOIRE MANQUANT\* .S Un paramètre obligatoire n'est pas spécifié dans la liste des paramètres de la clause. .S2 .I0;^*03 NUMERO D'ELEMENT ILLEGAL\* .S2 .I0;^*04 NUMERO DE LIGNE ILLEGAL\* .S Le numéro de ligne n'est pas compris entre 1 et 23. .S2 .I0;^*05 NUMERO DE COLONNE ILLEGAL\* .S Le numéro de colonne n'est pas compris entre 1 et 80. .S2 .I0;^*06 CODAGE DE CHAMP ILLEGAL\* .S2 .I0;^*07 ATTRIBUT DE SAISIE INCONNU\* .S2 .I0;^*08 ATTRIBUT DE VISUALISATION INCONNU\* .S2 .I0;^*09 ERREUR DE SYNTAXE\* .S2 .I0;^*10 FORMAT ILLEGAL\* .S2 .I0;^*11 NUMERO D'ECRAN ILLEGAL\* .HL2 ^*#^&MESSAGES_ D'ERREUR_ DU_ COMPILATEUR-GENERATEUR\*\& Ces messages sont les messages standards du moniteur VAX/VMS (voir le manuel#: SYSTEM MESSAGES). .PG .FIG5 .HL1 ^*#^&LIBRAIRIE_ DE_ SAISIE_ D'ECRANS_ FORM/VAX\*\& .HL2 ^*#^&INTRODUCTION\*\& Les programmes d'application contrôlent les écrans de saisie par l'intermédiaire d'appels à un ensemble de routines regroupées dans une librairie (FRMLIB.OLB). Les programmes d'application peuvent être écrits en langages COBOL, BASIC, FORTRAN, et assembleur. .HL2 ^*#^&SYNTAXE_ DES_ APPELS\*\& Les différents langages évolués supportant FORM/VAX utilisent la syntaxe CALL pour accéder aux routines de la librairie FRMLIB. Dans ces langages, la syntaxe CALL génère le code suivant#: .S .LT CALLG ARDLIST, ADRROT .EL .S ARDLIST contient l'adresse d'une liste de n+1 double mots (n étant le nombre de paramètres de la routine). Lors de l'appel cette adresse est stockée dans un registre AP. .S .LT AP ----------------> nombre de paramètres (n) ad. param. 1 ad. param. n .EL .S Cette syntaxe peut être utilisée en assembleur pour accéder à la librairie FRMLIB. .S .I0;Syntaxe COBOL#: .S .LT CALL routine USING paramètre 1, ..., paramètre n .EL .S2 .I0;Syntaxe BASIC#: .S .LT CALL routine BY REF (paramètre 1, ..., paramètre n) .EL .S2 .I0;Syntaxe FORTRAN#: .S .LT CALL routine (paramètre 1, ..., paramètre n) .EL .PG .FIG2 .HL2 ^*#^&DEFINITION_ DES_ PARAMETRES_ DES_ ROUTINES\*\& .HL3 ^*#^&Paramètres_ entiers_ (E,_ -E)\*\& Ce sont des paramètres définis dans les programmes d'application sur un mot entier positif ou signé. .S .LT ex : status (-E) mode de saisie (E) n°écran (E) n°élément (E) etc... .EL .S .I0;Définition COBOL#: .S .LT E : variable PIC 9(4) COMP. - E : variable PIC S9(4) COMP. Exemple : 01 NUMERO-ECRAN PIC 9(4) COMP. 01 MOT-ETAT PIC S9(4) COMP VALUE 0. MOVE 123 TO NUMERO-ECRAN CALL INIECR USING NUMERO-ECRAN, MOT-ETAT .EL .S2 .I0;Définition BASIC#: .S .LT E : variable% ou chiffre% - E : variable% ou chiffre% Exemple : 10 STAT% = 0% 20 CALL INIECR BY REF (123%, STAT%) .EL .S2 .I0;Définition FORTRAN#: .S .LT E : variable entière ou chiffre entier - E : variable entière ou chiffre entier Exemple : INTEGER STATUS DATA STATUS/0/ . . . NOECR = 123 CALL INIECR (NOECR, STATUS) .EL .PG .FIG5 .HL3 ^*#^&Paramètres_ buffer_ (B)\*\& Ce sont des paramètres constitués de chaînes de caractères dans le programme d'application. .S .LT Ex : buffer de saisie .EL .S2 .I0;^*Définition COBOL\* : .S .LT 01 nom du buffer Exemple : 01 BUF-SAISIE 02 NOM PIC x (15) . 02 PRENOM PIC x (15) . . . . CALL SAIECR USING NO-ECRAN, BUF-SAISIE, MODE, MOT-ETAT .EL .S2 .I0;^*Définition BASIC\* : .S .LT nom du buffer $ = n nom du buffer $ = "chaîne de caractères" .EL .S Le "statement" MAP peut être utilisé pour découper le buffer en zones. .S .LT Exemple : 10 MAP (BUF) BUF-SAISIE $ = 120 & MAP (BUF) & NOM $ = 15 & PRENOM $ = 15 & . . . 1020 CALL SAIECR BY REF (NOECR%, BUF-SAISIE$, MODE%, STAT%) .EL .S2 .I0;^*Définition FORTRAN\*\& : .S .LT LOGICAL * 1 nom du buffer (n) .EL .S Le "statement" EQUIVALENCE peut être utilisé pour découper le buffer en zones. .PG .FIG5 .LT Exemple : LOGICAL * 1 BUF (120), NOM (15), PRENOM (15) ... EQUIVALENCE (BUF (1), NOM (1) ), (BUF (16), PRENOM (1) ) . . . CALL SAIECR (123, BUF, MODE, STATUS) .EL .S .HL2 ^*#^&DEFINITION_ DU_ BUFFER_ DE_ SAISIE\*\& Le buffer de saisie est défini dans le programme d'application. Il est composé d'une suite de zones correspondant aux champs de saisie de l'écran FORM/VAX rangés par numéros d'ordre croissant. La longueur de chacune des zones et sa position dans le buffer de saisie sont fournies par le listing de compilation de l'écran FORM/VAX. Elles sont dépendantes du paramètre de la clause FORMAT dans l'écran FORM/VAX. Ce paramètre associe un écran au langage dans lequel le programme d'application est écrit (voir chapitre II, II.3.6). Le tableau 4.1. indique la nature des zones à définir en fonction de la nature du champ et du langage. .S3 .C;^*#^&Tableau_ 4.1\*\& .S2 .LT ___________________________________________________ | | | FORMAT | _______|___________________________________________________| | CODAGE| COBOL | BASIC | FORTRAN | |_______|________________|_____________|____________________| | | | | | | An | PIC x (n) | BUF $ = n | LOGICAL * 1 I(n) | | +Dn | PIC 9(n) | BUF $ = n | LOGICAL * 1 I(n) | | Dn | PIC S9(n) | BUF $ = n+1 | LOGICAL * 1 I(n+1) | | +Dn.p | PIC 9(n)V9(p) | BUF $ = n+1 | LOGICAL * 1 I(n+1) | | Dn.p | PIS S9(n)V9(p) | BUF $ = n+2 | LOGICAL * 1 I(n+2) | |_______|________________|_____________|____________________| .EL .PG .FIG5 .I0;^*Exemple en COBOL\* : .S2 .LT 01 BUF-SAISIE 02 NOM PIC x(15). 02 PRENOM PIC x(15). 02 NUMERO PIC x9(5). 02 DEBIT PIC S9(5)V99. 03 CREDIT PIC 9(5)V99. .EL .S La longueur totale de ce buffer de saisie est de 49 octets. .S3 .I0;^*Exemple en BASIC\* : .S2 .LT 10 MAP (BUF) & BUF-SAISIE$ = 52 & \ MAP (BUF) & NOM$ = 15 & , PRENOM$ = 15 & , NUMERO$ = 5 & , DEBIT$ = 9 & , CREDIT$ = 8 & .EL .S La longueur totale de ce buffer de saisie est de 52 octets. .S3 .I0;^*Exemple en FORTRAN\* : .S2 .LT LOGICAL * 1 BUF (52), NOM (15), PRENOM (15), NUMERO (5), DEBIT (9), CREDIT (8) EQUIVALENCE (BUF (1), NOM (1)), (BUF (16), PRENOM (1)), (BUF (31), NUMERO (1)), (BUF (36), DEBIT (1)), (BUF (41), CREDIT (1)) .EL La longueur totale de ce buffer de saisie est de 52 octets. .HL2 ^*#^&ROUTINES_ DE_ CONTROLE_ GLOBAL_ D'ECRANS\*\& Nécessitant le minimum de programmation dans les programmes d'application, elles permettent de résoudre la plupart des problèmes de saisie. .PG .FIG5 .HL3 ^*#^&Routine_ INIFRM\*\& .S .I0;^*#^&Description\*\& : La routine INIFRM est ^*#^&obligatoire\*\&#; elle doit être appelée en début des programmes accédant à la librairie FRMLIB. Elle permet d'identifier le type de terminal sur lequel a lieu la saisie. .S2 .I0;^*#^&Format\*\& : .S .LT nom : INIFRM paramètres : status status (- E) = status global en sortie de la routine : > 0 terminal supporté 1 = VT50 2 = VT52 3 = VT100 < 0 -1 terminal non supporté (ex : LA36) -4 nombre d'arguments illégal .EL .S .HL3 ^*#^&Routine_ INIECR\*\& .S .I0;^*#^&Description\*\& : La routine INIECR permet de spécifier le numéro de l'écran FORM/VAX auquel le programme veut accéder. Elle ^*#^&doit\*\& être appelée précédemment à toute autre routine faisant référence à un écran ou à des éléments de cet écran. .S2 .I0;^*#^&Format\*\& : .S .LT nom : INIECR paramètres : n°écran, status n°écran (E) = numéro de l'écran status (- E) = status global en entrée de la routine : = 0 effacement de l'écran du terminal non 0 pas effacement de l'écran du terminal en sortie de la routine : = 0 écran correctement initialisé < 0 erreur .EL .PG .FIG5 .LT = - 1 écran non connu du programme = - 2 numéro d'écran illégal (< 0 ou > 255) = - 4 nombre de paramètres illégal .EL .S .I0;^*#^&Remarques\*\& : .S .LS1 .LE;En retour de la routine, les attributs de saisie et de visualisation de tous les éléments de l'écran ont leur valeur initiale (celle définie dans la source de l'écran FORM/VAX). .LE;Dans le cas d'écrans définis en structure segmentée dans l'espace tâche, l'appel à la routine INIECR charge le segment correspondant de l'écran. .LE;En entrée de la routine, une valeur différente de zéro dans le status n'efface pas l'écran sur le terminal. Cette option permet d'enchaîner la saisie de plusieurs écrans différents en gardant sur le terminal l'image des saisies précédentes. Les différents écrans de saisie peuvent représenter des parties distinctes de l'écran ou être en recouvrement total sur le terminal. Les champs des écrans précédemment saisis ne sont plus modifiables (les buffers de saisie peuvent cependant être en recouvrement). .ELS .HL3 ^*#^&Routine_ SAIECR\*\& .S .I0;^*#^&Description\*\& : La routine SAIECR contrôle la saisie complète d'un écran FORM/VAX. .S2 .I0;^*#^&Format\*\& : .S .LT nom : SAIECR paramètres : n°écran, BUF, mode, status n°écran (E) = numéro de l'écran (pour contrôle) BUF (B) = buffer de saisie dans le programme mode (E) = mode de saisie 1,2 = CREATION 3,4,5 = MODIFICATION 1 affichage des libellés affichage des champs vides saisie interactive .EL .PG .FIG5 .LT 2 affichage des champs vides saisie interactive 3 affichage des libellés affichage du contenu du buffer de saisie saisie interactive 4 affichage du contenu du buffer de saisie saisie interactive 5 saisie de l'écran global sans tenir compte du réaffichage des libellés et des champs status (- E) = status global en entrée de la routine : = 0 début de saisie (premier appel) > 0 en cours de saisie (après contrôle spécifique associé à un champ), peut être initialisé et contenir le numéro du champ sur lequel le cur- seur se positionnera. en sortie de la routine : = 0 écran saisi > 0 en cours de saisie (numéro du champ sur lequel un contrôle spécifique est à exécuter) - 1 fin de saisie (touche "FIN DE SAISIE") <-1 erreur - 2 numéro d'écran illégal (écran non initialisé par INIECR ou numéro illégal) - 3 erreur sur mode de saisie (différent de 1, 2, 3, 4, 5) - 4 nombre de paramètres illégal .EL .S2 .I0;^*#^&Remarques\*\& : .S .LS1 .LE;Les modes saisie (création/modification) sont définis au chapitre II, II.3.4.5. Les modes pairs (2, 4) permettent de ne pas réafficher les libellés en cas de saisie répétitive sur le même écran. .PG .FIG5 .LE;Contrôles spécifiques liés aux attributs de saisie S et I (voir chapitre II, II.3.7). La saisie d'un champ défini avec l'attribut S ou I entraîne le retour au programme d'application avec dans le status le numéro d'ordre du champ. Le programme d'application peut alors réaliser toutes sortes de contrôle sur le champ saisi (test aux limites, existence d'enregistrement dans le fichier, cohérence avec champs précédemment saisis, protection des champs suivants en fonction d'une certaine valeur, etc...). Il peut afficher un message d'erreur (routines AFFMSL ou AFFMSG) en cas de contrôle négatif ou afficher une question qui orientera la suite de la saisie. Il peut abandonner la saisie ou la poursuivre par un retour sur l'appel de la routine SAIECR#; la saisie se poursuit sur les champs suivants ou reprend sur le champ saisi en cas d'affichage d'un message d'erreur. .LE;Le status 0 signifie que l'écran est saisi. Au minimum, les champs obligatoires sont saisis. .LE;Le status -1 est rendu lorsque l'utilisateur a frappé la touche "FIN DE SAISIE". Cette touche fonctionnelle est généralement utilisée pour indiquer l'abandon d'une saisie répétitive sur le même écran. Le programme peut, par exemple, demander la confirmation de cet abandon par l'affichage d'une question (routine AFFMSL ou AFFMSG). .ELS .HL3 ^*#^&Routine_ AFFECR\*\& .S .I0;^*#^&Description\*\& : La routine AFFECR permet l'affichage de l'écran sans entrer dans la saisie interactive. .S .I0;^*#^&Format\*\& : .S .LT nom : AFFECR paramètres : n°écran, BUF, mode, status n°écran (E) : numéro de l'écran (pour contrôle) BUF (B) : buffer de saisie dans le programme mode (E) : mode de saisie 1,2 = CREATION 3,4 = MODIFICATION .EL .PG .FIG5 .LT 1 affichage des libellés affichage des champs vides 2 affichage des champs vides 3 affichage des libellés affichage du contenu du buffer de saisie 4 affichage du contenu du buffer de saisie 5 saisie sans réaffichage des libellés et des champs status (- E) = status global en sortie de la routine : = 0 écran affiché < 0 erreur - 2 numéro d'écran illégal - 3 mode de saisie illégale (différent de 1,2,3,4,5) - 4 nombre de paramètres illégal .EL .S .I0;^*#^&Remarques\*\& : .S .LS1 .LE;La routine AFFECR est principalement utilisée en mode MODIFICATION (3,4,5) pour réaliser des fonctions de consultation. .LE;Le mode CREATION (1,2) peut être utilisé lorsque le programme veut afficher l'écran et réaliser ensuite la saisie champ par champ en utilisant les routines AFFCHA et SAICHA (même chapitre, V.6.1 et V.6.2). Cette méthode revient à atteindre la fonctionnalité de la routine SAIECR au prix d'une programmation très lourde. .ELS .HL2 ^*#^&ROUTINES_ DE_ CONTROLE_ DES_ ELEMENTS_ D'ECRANS\*\& Ces routines donnent aux programmes d'application un contrôle total sur chacun des éléments d'un écran (champs, libellés, messages). Le programme peut demander l'affichage d'un élément quelconque et modifier ses attributs de visualisation. Il peut également demander la saisie d'un champ ou modifier ses attributs de saisie. .PG .FIG5 .HL3 ^*#^&Routine_ SAICHA\*\& .S .I0;^*#^&Description\*\& : La routine SAICHA permet la saisie d'un champ unique. .S2 .I0;^*#^&Format\*\& : .S .LT nom : SAICHA paramètres : n°champ, BUF, mode, status n° champ (E) = numéro du champ de l'écran BUF (B) = buffer de saisie mode (E) = mode de saisie 1,2 = CREATION 3,4 = MODIFICATION 1,2 affichage du champ vide saisie du champ 3,4 affichage du contenu du champ et saisie status (- E) = status élémentaire en sortie de la routine : 0 champ saisi et rempli 1 validation par "CHAMP SUIVANT" (flèche en bas) 2 validation par "RETOUR CHARIOT" (RC) 3 validation par "CHAMP PRECEDENT" (flèche en haut) 4 validation par "ESCAPE" (ESC) 5 validation par "FIN D'ECRAN" (PF3) 6 validation par "DEBUT D'ECRAN" (PF2) 7 validation par "FIN DE SAISIE" (PF1) 8 raz du champ par "LINE FEED" (LF) 9 validation du champ par "TABULATION" (TAB) 11 validation par CTRLX .EL .PG .FIG5 .LT <0 erreur -3 mode de saisie illégal -4 nombre de paramètres illégal -5 numéro d'élément illégal ou inexistant .EL .S .I0;^*#^&Remarques\*\& : .S .LS1 .LE;Le paramètre BUF est le buffer de saisie et non pas la zone correspondant au champ dans le buffer de saisie. .LE;Cette routine ne gère pas les touches fonctionnelles de validation du champ#; l'information est retournée dans le status pour être prise en compte par le programme d'application. .ELS .HL3 ^*#^&Routine_ AFFCHA\*\& .S .I0;^*#^&Description\*\& : La routine AFFCHA permet l'affichage sur l'écran d'un champ unique initialisé ou vide. .S2 .I0;^*#^&Format\*\& : .S .LT nom : AFFCHA paramètres : n°champ, BUF, mode, status n° champ (E) = numéro du champ dans l'écran BUF (B) = buffer de saisie dans le programme mode (E) = mode de saisie 1,2 = CREATION 3,4 = MODIFICATION 1,2 affichage du champ vide 3,4 affichage du champ initialisé avec le contenu de la zone correspondante dans le buffer de saisie status (- E) = status élémentaire en sortie de la routine : 0 champ affiché .EL .PG .FIG5 .LT < 0 erreur - 3 mode de saisie illégal - 4 nombre de paramètres illégal - 5 numéro d'élément illégal ou inexistant .EL .S .I0;^*#^&Remarques\*\& : .S .LS1 .LE;Le paramètre BUF est le buffer de saisie et non pas la zone correspondant au champ dans le buffer de saisie. .LE;Cette routine peut être utilisée pour afficher un champ protégé dont le contenu est le résultat d'un calcul paramétré par d'autres champs précédemment saisis. .LE;Elle peut être utilisée pour réafficher un champ lorsque ses attributs de visualisation ont été modifiés. .LE;L'affichage d'un champ en mode "CREATION" (1,2) remet à blanc le champs dans le buffer de saisie. .ELS .HL3 ^*#^&Routine_ AFFLIB\*\& .S .I0;^*#^&Description\*\& : La routine AFFLIB permet l'affichage d'un libellé (libellé, date ou heure). .S .I0;^*^&Format\*\& : .S .LT nom : AFFLIB paramètres : n° libellé, status n° libellé = numéro de libellé dans l'écran status (- E) = status élémentaire en sortie de la routine : = 0 libellé affiché < 0 erreur - 4 nombre de paramètres illégal - 5 numéro d'élément illégal ou inexistant .EL .PG .FIG5 .I0;^*#^&Remarque\*\& : La routine AFFLIB peut être utilisée pour réafficher un libellé lorsque ses attributs de visualisation ont été modifiés. .HL3 ^*#^&Routine_ AFFMSL\*\& .S .I0;^*#^&Description\*\& : La routine AFFMSL permet l'affichage sur la 24ème ligne d'un message LOCAL et sa validation. Un message LOCAL peut être une ERREUR ou une QUESTION définies dans l'écran FORM/VAX (voir chapitre II, II.5.3). .S2 .I0;^*#^&Format\*\& : .S .LT nom : AFFMSL paramètres : n°message, status n°message (E) = numéro du message dans l'écran status (- E) = status élémentaire en sortie de la routine : = 0 erreur affichée et validée question affichée et validée par O = 1 question affichée et validée par N < 0 erreur - 4 nombre de paramètres illégal - 5 numéro d'élément illégal ou inexistant .EL .S .I0;^*#^&Remarques\*\& : .S .LS1 .LE;Une erreur doit être validée par la touche "DELETE". L'affichage d'une erreur entraîne la reprise de la saisie sur le champ en cours. .LE;Une question peut être validée par les caractères "O" ou "N". .LE;La validation d'un message LOCAL efface ce message. .ELS .PG .FIG5 .HL3 ^*#^&Routine_ AFFMSG\*\& .S .I0;^*#^&Description\*\& : La routine AFFMSG permet l'affichage sur la 24ème ligne de l'écran d'un message GLOBAL et sa validation. Un message GLOBAL peut être une ERREUR ou une QUESTION définies dans le fichier source MESSAG.MAR (voir chapitre VIII, VIII.2). Un message GLOBAL est généralement commun à un grand nombre d'écrans. .S2 .I0;^*#^&Format\*\& : .S .LT nom : AFFMSG paramètres : n°message, status n°message (E) = numéro du message global status (- E) = status élémentaire en sortie de la routine : = 0 erreur affichée et validée question affichée et validée par O = 1 question validée par N < 0 erreur - 4 nombre de paramètres illégal - 5 numéro d'élément illégal ou inexistant .EL .S .I0;^*#^&Remarques\*\& : Voir routine AFFMSL. .HL3 ^*#^&Routine_ CHGVIS\*\& .S .I0;^*#^&Description\*\& : La routine CHGVIS permet de modifier les attributs de visualisation d'un élément (champ, libellé ou message). .S2 .I0;^*#^&Format\*\& : .S .LT nom : CHGVIS paramètres : type, n°élément, indic, masque, status .EL .PG .FIG5 .LT type (E) = type d'élément 1 champ 2 libellé 3 erreur n°élément (E) = numéro de l'élément dans l'écran indic (E) = indicateur de changement 0 = supprimer les attributs de visualisation 1 = positionner les attributs de visualisation masque (E) = masque de bits représentant les attributs de visualisation à modifier 1 = caractère gras (G) 2 = clignotement (C) 4 = soulignement (S) 8 = inversion de contraste (I) status (- E) = status élémentaire en sortie de la routine : 0 modification prise en compte < 0 erreur - 4 nombre de paramètres illégal - 5 numéro d'élément illégal ou inexistant - 6 type d'élément illégal .EL .S .I0;^*#^&Remarque\*\& : Les éléments dont les attributs de visualisation ont été modifiés doivent être réaffichés pour matérialiser le changement. .HL3 ^*#^&Routine_ CHGSAI\*\& .S .I0;^*#^&Description\*\& : La routine CHGSAI permet de modifier les attributs de saisie d'un champ. .PG .FIG5 .I0;^*#^&Format\*\& : .S .LT nom : CHGSAI paramètres : n°champ, indic, masque, status n°champ (E) = numéro du champ dans l'écran indic (E) = indicateur de changement 0 = supprimer les attributs de saisie 1 = positionner les attributs de saisie masque (E) = masque de bits représentant les attributs de saisie à modifier 1 = protégé (P) 2 = obligatoire (O) 4 = rempli (R) 8 = tabulation (T) 16 = sous-programme (S) 32 = alphabétique (A) 64 = numérique (N) 128 = zéros non significatifs (Z) 256 = tête de chapitre (C) 512 = sous-programme inconditionnel (I) status (- E) = status élémentaire en sortie de la routine : 0 modification prise en compte < 0 erreur - 4 nombre de paramètres illégal - 5 nombre d'élément illégal ou inexistant .EL .HL2 ^*#^&ROUTINES_ ANNEXES\*\& Ces routines permettent des fonctions indépendantes de l'écran visualisé sur le terminal. .HL3 ^*#^&Routine_ SAITXT\*\& .S .I0;^*#^&Description\*\& : La routine SAITXT permet de saisir une chaîne de caractères à partir d'une position sur l'écran. .PG .FIG5 .I0;^*#^&Format\*\& : .S .LT nom : SAITXT paramètres : L, C, BUFL, status L (E) = ligne de l'écran (1 à 24) C (E) = colonne de l'écran (1 à 80) BUF (B) = buffer recevant la chaîne de caractères saisis BUFL (E) = longueur du buffer en octets status (- E) = status annexe en sortie de la routine : 0 saisie complète < 0 erreur - 4 nombre de paramètres illégal .EL .S .I0;^*#^&Remarques\*\& : .S .LS1 .LE;Les caractères sont saisis sans attribut de saisie et visualisés sans attribut de visualisation. .LE;Cette routine remplace les fonctions de lecture sur terminal dans les programmes d'application#: .ELS .S2 .LT COBOL ACCEPT BASIC FORTRAN READ, ACCEPT .EL .HL3 ^*#^&Routine_ AFFTXT\*\& .S .I0;^*#^&Description\*\& : La routine AFFTXT permet d'afficher un texte à partir d'une position de l'écran. .S2 .I0;^*#^&Format\*\& : .S .LT nom : AFFTXT paramètres : L, C, BUF, BUFL, status .EL .PG .FIG5 .LT L (E) = ligne de l'écran (1 à 24) C (E) = colonne de l'écran (1 à 80) BUF (B) = buffer à afficher BUFL (E) = longueur en octets du buffer à afficher status (- E) = status annexe en sortie de la routine : = 0 affichage complet < 0 erreur - 4 nombre de paramètres illégal .EL .S .I0;^*#^&Remarque\*\& : Le texte est affiché sans attribut de visualisation. .HL3 ^*#^&Routine_ VALERR\*\& .S .I0;^*#^&Description\*\& : La routine VALERR demande la frappe de la touche DELETE. .S2 .I0;^*#^&Format\*\& : .S .LT nom : VALERR paramètres : aucun .EL .S2 .I0;^*#^&Remarques\*\& : .S .LS1 "-" .LE;Cette touche peut être appelée suite à la routine AFFTXT pour simuler les routines AFFMSL ou AFFMSG. Elle permet donc d'afficher sur l'écran des messages définis dans le programme d'application et non dans la description de l'écran de saisie. La position de ces messages sur l'écran n'est alors pas limitée à la 24ème ligne mais précisée dans les paramètres de la routine AFFTXT. .LE;Appelée en cours de saisie, cette routine permet de reprendre la saisie sur le champ courant. .ELS .PG .FIG5 .HL3 ^*#^&Routine_ EFFECR\*\& .S .I0;^*#^&Description\*\& : La routine EFFECR efface l'écran du terminal. .S2 .I0;^*#^&Format\*\& : .S .LT nom : EFFECR paramètres : aucun .EL .S .I0;^*#^&Remarque\*\&#: L'effacement est implicité dans routine INIECR avec status égal à 0 en entrée. .HL3 ^*#^&Routine_ SONNE\*\& .S .I0;^*#^&Description\*\& : La routine SONNE permet de faire entendre la sonnerie du terminal (caractère "BELL"). .S2 .I0;^*#^&Format\*\& : .S .LT nom : SONNE paramètres : aucun .EL .HL3 ^*#^&Routine_ POSCUR\*\& .S .I0;^*#^&Description\*\& : La routine POSCUR positionne le curseur sur une position de l'écran. .S2 .I0;^*#^&Format\*\& : .S .LT nom : POSCUR paramètres : L, C L = ligne sur l'écran (1 à 24) C = colonne de l'écran (1 à 80) .EL .PG .FIG5 .HL1 ^*#^&EDITION_ DE_ LIEN_ DU_ PROGRAMME_ D'APPLICATION\*\& .HL2 ^*#^&INTRODUCTION\*\& L'édition de lien du programme se fait avec la librairie FRMLIB qui doit se trouver sous un numéro de compte différent de celui de l'utilisateur. Ce directory créé au moment de l'installation contient tous les modules nécessaires à la création, la génération et l'utilisation d'écran de saisie. A l'édition de lien l'utilisateur devra rentrer sous forme de réponse les numéros d'écran utilisés dans son programme d'application. Notons enfin que l'ensemble a une structure non segmentée. Que que soit le langage de son application, l'utilisateur exécute son édition de lien en invoquant la procédure de commande#: .S .LT $@VAXFORM_DIR:VAXFORM.COM ACTION (1, 2, 3, 4, 5) ? ! Frapper 3 pour indiquer une édition de lien. NOM DE LA LIBRAIRIE EXISTANTE ! Frapper le nom de votre librairie. FRAPPER LE NUMERO DE L'ECRAN (O CE CHAMP DOIT ETRE NUMERIQUE CHAMP OBLIGATOIRE ----------> REQUIRED FIELD .EL .S Il est impératif de ne pas modifier l'ordre des messages internes, ni de supprimer des entrées (20 messages). .HL3 ^*#^&Définition_ des_ messages_ globaux\*\& Les messages globaux définis sont numérotés à partir de 1 dans l'ordre de leur définition dans le fichier MESSAG.MAR. .HL3 ^*#^&Exemple_ de_ fichier_ MESSAGE\*\& .S .LT .PAGE ;MESSAG.MAR .TITLE MESSAG .SBTTL FICHIER DES MESSAGES .PSECT XXPURE,RO,I,LCL,REL,CON ; ; DEFINITION DES MESSAGES INTERNES ; ; ; NE PAS CHANGER L'ORDRE DES MESSAGES INTERNES ENTRE "DEBUT INTERNES" ; ET "FIN INTERNES" ET NE PAS SUPPRIMER DE MESSAGES (20 ENTREES) ; DEBUT INTERNES TMSG:: MSG ,1 MSG MSG MSG MSG MSG MSG MSG <> MSG <> MSG <> MSG <> MSG <> MSG <> MSG <> MSG <> MSG <> MSG <> MSG <> MSG <> MSG <> ;FIN INTERNES .EL .PG .FIG5 .LT ; ; ; DEFINITION DES MESSAGES GLOBAUX ; ; ; ; LES MESSAGES GLOBAUX SONT DES MESSAGES COMMUNS A DE NOMBREUX ECRANS ; ILS PEUVENT ETRE DECLARES DANS CE MODULE ET SONT AFFICHES PAR LA ; ROUTINE "AFFMSG". ; LE FORMAT EST LE SUIVANT: ; -ERREUR ; MSG ; ; -QUESTION MSG ,1 ; ; DEBUT GLOBAUX MSG ; FIN GLOBAUX .END .EL .S .I0;^*#^&Utilisation_ de_ la_ procédure_ cataloguée_ VAXFORM\*\& Cette procédure est invoquée en frappant#: .S .LT @VAXFORM_DIR:VAXFORM .EL .S .I0;^*#^&Exemple\*\& : .S .LT VOUS ETES SOUS LE CATALOGUE : DEV:[DIR...] VOUS POUVEZ : ----------- 1) AJOUTER OU CHANGER DES ECRANS A UNE LIBRAIRIE EXISTANTE 2) CREER UNE NOUVELLE LIBRAIRIE D'ECRANS 3) CONSTRUIRE UN PROGRAMME LIE A UNE LIBRAIRIE D'ECRANS 4) MODIFIER LES MESSAGES DE LA ROUTINE MESSAG.MAR 5) SORTIE ACTION (1,2,3,4,5) : .EL .PG .FIG5 En fonction de l'option, vous devez répondre aux questions par O/N, soit en donnant le nom d'un fichier. .S .I0;^*#^&Exemple\*\& : .S .I0;ACTION (1, 2, 3, 4, 5, 6)#: 5 (génération d'écran) .S .I0;FRAPPER LE NOM DU FICHIER ECRAN#: TOTO S'il n'y a pas d'erreur, vous pouvez soit sortir, soit générer un autre écran. En cas d'erreur, (nom de fichier inconnu), vous pouvez soit sortir, soit revenir à la question pour continuer. L'utilitaire VAXFORM permet de reboucler pour exécuter d'autres fonctions.