création de procédures

• Les commandes du Gestionnaire de dialogue doivent toujours commencer à la première position de la ligne.
• Un espace au minimum doit être inséré entre la commande du gestionnaire de dialogue et un autre texte.
• Si la commande gestionnaire de dialogue dépasse une ligne, la ligne suivante doit obligatoirement commencer avec un tiret (-) à la première position. La ligne qui suit doit obligatoirement comporter un espace entre le tiret et le reste de la ligne.
• Les noms de procédure ne peuvent pas contenir de caractères spéciaux.

En particulier, il est recommandé d'utiliser des commentaires dans un en-tête de procédure pour fournir la date, la version, et toute autre information importante. Un tiret suivi d'un astérisque (-*) marquent le début d'un commentaire.

Ils ne sont visibles que lors de la visualisation des contenus de la procédure via l'éditeur et sont strictement réservés aux développeurs.

.
.
.
-*Version 2 06/10/00
-RUN

-RUN -*Version 2 06/10/00

-* Version 1  08/26/02  HRINFO  Procedure
TABLE FILE CENTHR
   .
   .
   .

Vous pouvez utiliser la commande -TYPE pour envoyer un message à l'affichage pendant le traitement d'une procédure. Typiquement, le message remplit les besoins suivants :

• Explique le but de la procédure.
• Afficher les résultats d'une procédure ou de calculs pendant le test d'une procédure.
• Présent d'autres informations utiles.
• Indique quel type d'informations à fournir en réponse à l'invite.

-TYPE[+|0|1] text						

-label TYPE text						

-* Version 1  06/26/00  SLRPT  Procedure
-* Component of Retail Sales Reporting Module
-TYPE This report calculates percentage of returns.
TABLE FILE SALES
 .
 .
 .
END

Vous pouvez fournir et contrôler les mots de passe avec la commande –PASS. Ceci est particulièrement utile pour spécifier un fichier en particulier ou un jeu de fichier qu'un utilisateur donné peut lire ou écrire en l'utilisant. Les mots de passe ont des jeux de fonctions associés via l'utilitaire DBA.

La procédure qui renseigne les mots de passe peut être cryptée de façon à ce que les mots de passe et cette procédure ne puisse pas être entrés et révélés.

Une variable peut aussi être associée avec -PASS de façon à ce que vous soyez invités à renseigner une valeur de mot de passe. Vous pouvez aussi vérifier la valeur du mot de passe et passé ou exécuter une portion de la procédure en fonction de la valeur.

-PASS password						

Vous pouvez effectuer un branchement sans condition qui va transférer le contrôle à un label avec la commande -GOTO.

La première fois via une procédure, le gestionnaire de dialogue note les adresses de tous les labels qu'ils rencontrent de façon à ce qu'ils puissent être trouvé immédiatement si nécessaire. Si le Gestionnaire de dialogue n'a pas stocké l'adresse de l'étiquette dans la commande -GOTO, il continue la recherche de l'étiquette cible dans la procédure. Si aucune étiquette n'est trouvée, il commence la recherche au début de la procédure.

Gestionnaire de dialogue n'effectue aucune action sur le label n'ayant pas un -GOTO correspondant. Si un -GOTO n'a pas un label correspondant, l'exécution s'arrête et un message d'erreur est affiché.

-GOTO label 
  .
  .
  .
-label [TYPE text]

-GOTO DONE
TABLE FILE SALES
PRINT UNIT_SOLD RETURNS
BY PROD_CODE,CITY
END 
-RUN 
-DONE

Un branchement conditionnel effectué un test des valeurs de variables et en fonction du test, transfert le contrôle à un label dans la procédure avec la commande -IF... GOTO. Ceci aide le contrôle de l'exécution des requêtes et construites une procédure dynamique en choisissant d'exécuter ou pas des parties de la procédure.

Par exemple, vous pouvez vérifier si un fichier d'extraction a été créé à partir d'une source de données en production. Si un tel fichier d'extraction existe, le programme exécute un jeu de rapports vers le processus d'extraction. Signe existe pas, le programme effectuait un branchement autour des rapports et écrit un message dans le fichier journal.

Note: un test IF ne requiert pas que chaque test spécifie un label cible. Cependant, dans un test IF composé, ou une série de tests sont incorporés les uns dans les autres, une étiquette cible spécifiée est requise pour chaque test.

-IF expression [THEN] {GOTO label1|CONTINUE} [ELSE IF...] [ELSE {GOTO label2|CONTINUE}] ;

1. -IF &PROC EQ 'EMPLOYEE' GOTO EMPLOYEE; 
2. -SALES
   TABLE FILE SALES
   SUM UNIT_SOLD
    BY PROD_CODE
   END 
3. -EXIT
   -EMPLOYEE
   TABLE FILE EMPLOYEE
   PRINT PLANT_NAME
    BY DEPARTMENT
   END

Vous pouvez exécuter une fonction la répétition en utilisant cette répétition dans votre procédure via la commande -REPEAT. L'utilisation des boucles peut servir plusieurs tâches. Par exemple, vous pouvez remplir une variable indexée en utilisant une boucle ou bien vous pouvez utiliser la sortie de la requête dans une seconde.

Un processus en boucle peut être exécuté un certain nombre de fois où jusqu'à ce qu'une condition soit vérifiée. Une boucle s'achève quand l'un des événements suivants survient :

• Elle a été exécutée entièrement.
• Une commande -EXIT est émise.
• Un -GOTO est renseigné pour un label à l'extérieur de la boucle.

  Remarque : si vous indiquez un autre -GOTO plus tard dans la procédure pour revenir à la boucle, la boucle redémarre à partir du point auquel elle a quitté.

Remarquez que la commande -SET fournit une autre méthode implémentation des boucles.

Conseil : pendant le traitement de la boucle, la recherche d'étiquette qui indique la cible d'une commande -GOTO ou -REPEAT dure plus longtemps dans une procédure avec variable qu'avec des longueurs d'enregistrements fixés (80 caractères). Pour accélérer l'exécution dans cette situation, considéré le remplacement des boucles par des commandes EX ou -INCLUDE.

-REPEAT label n TIMES

-REPEAT label WHILE condition;

-REPEAT label FOR &variable [FROM fromval] [TO toval] [STEP s]

-REPEAT label n TIMES

-REPEAT LAB1 2 TIMES
-TYPE INSIDE
-LAB1 TYPE OUTSIDE

INSIDE
INSIDE
OUTSIDE

-REPEAT label WHILE condition;

-SET &A = 1;
-REPEAT LABEL WHILE &A LE 2;
-TYPE &A
-SET &A = &A + 1;
-LABEL TYPE END: &A

1
2
END: 3

-REPEAT label FOR &variable FROM fromval TO toval STEP s						

-REPEAT LABEL FOR &A STEP 2 TO 4
-TYPE INSIDE &A
-LABEL TYPE OUTSIDE &A

INSIDE 1
INSIDE 3
OUTSIDE 5

1. -DEFAULT &N=0 
2. -START 
3. -SET &N=&N+1; 
4.   EX SLRPT
   -RUN 
5. -IF &N GT 5 GOTO NOMORE; 
6. -GOTO START 
5. -NOMORE TYPE EXCEEDING REPETITION LIMIT
   -EXIT

Vous pouvez insérer une procédure partielle ou totale dans une autre grâce à la commande -INCLUDE. Une procédure partielle peut contenir un texte d'en-tête, ou du code devrait être inclus au moment de l'exécution en fonction d'un test dans la procédure appelante. Elle s'exécute immédiatement quand elle rencontrée.

Une procédure appelante ne peut pas effectuer de branchement sur un label dans une procédure appelée, et vice versa. Quand une procédure est incluse en utilisant la commande -INCLUDE, la procédure qui est incluse (appelée) à un accès total aux variables définies dans la procédure appelante.

La commande -INCLUDE peut être utilisée des façons suivantes :

• Contrôler l'environnement. Par exemple, la procédure appelée pourrait renseigner des variables telles qu'un nom de serveur ou un nom d'utilisateur avant que la procédure appelante continue son exécution.
• En tant que mécanisme de sécurité. La procédure incluse peut être chiffrée et un mot de passe direct peut être renseigné.
• Raccourcir la longueur du code quand il existe plusieurs procédures pouvant être appelées. Par exemple, la commande -INCLUDE &NEWLINES pourrait être utilisé pour déterminer la procédure appelée, réduisant ainsi le nombre de commandes GOTO.
• Des sections continues du code utilisées au travers de l'application, par exemple les en-têtes et pieds de page standards. Ceci permet des changements effectués dans un module unique affectant l'ensemble de l'application.

-INCLUDE filename [filetype]

-IF &OPTION EQ 'S' GOTO PRODSALES ELSE GOTO PRODRETURNS;
   .
   .
   .
-PRODRETURNS
-INCLUDE DATERPT
-RUN 
   .
   .
   .

TABLE FILE SALES
PRINT PROD_CODE UNIT_SOLD
WHERE PROD_CODE EQ '&PRODUCT';
END

TABLE FILE SALES
-INCLUDE SALEHEAD
SUM UNIT_SOLD AND RETURNS AND COMPUTE
   .
   .
   .

HEADING
"THE ABC CORPORATION"
"RETAIL SALES DIVISION"
"MONTHLY SALES REPORT"

-INCLUDE DEFRATIO
   TABLE FILE SALES
-INCLUDE SALEHEAD
   SUM UNIT_SOLD AND RETURNS AND RATIO
   BY CITY
   .
   .
   .

DEFINE FILE SALES
RATIO/D5.2=(RETURNS/UNIT_SOLD);
END

Tout nombre de différentes procédures peut être invoqué à partir d'une seule procédure appelante.

Vous pouvez aussi imbriquer une procédure au sein d'elle-même, ou d'une manière récursive. Les commandes récursives -INCLUDE ne peuvent excéder quatre niveaux. Pour les commandes non récursives -INCLUDE, le niveau d'imbrication n'est limité que par la mémoire disponible.

Les fichiers de un à quatre sont incorporés dans la procédure originale. Tous les fichiers inclus sont vus comme une partie de la procédure originale.

Une procédure ne peut pas se brancher à un label dans un fichier inclus.

Vous pouvez invoquer une procédure via une autre avec la commande EXEC. La procédure appelée doit être complètement exécutable. Elle agit comme une procédure complètement séparée, avec son propre contenu. Elle ne peut pas utiliser de variables locales (&variables) définies par la procédure appelante (à moins qu'elle ne soit explicitement transmise à la procédure appelée sur la ligne de commande). Cependant, la procédure exécutée (appelée) peuvent utiliser des variables globales (&&variables) qui ont été définies dans la procédure appelante.

Quand une commande EXEC est rencontrée, elle est empilée est exécutée lorsque la commande appropriée du gestionnaire de dialogue est rencontrée.

EX[EC] procedure						

-IF &OPTION EQ 'S' GOTO PRODSALES ELSE GOTO PRODRETURNS;
    .
    .
    .
-PRODRETURNS
    EX DATERPT
    .
    .
    .
-RUN

Les noms de variable globale et locale sont définis par l'utilisateur ; les variables statistiques et système ont des noms prédéfinis. Les règles suivantes s'appliquent aux dommages des variables globales et locales :

• Un nom de variable locale est toujours précédé par un symbole amper (&). La variable peut être nommée ou positionnelle.

  Une variable positionnelle consiste en un sigle esperluette unique suivi d'une chaîne numérique (par exemple, &1). La valeur d'une variable positionnelle est transmise à la procédure quand elle est exécutée.

• Un nom de variable globale est toujours précédé par un symbole amper double (&&).
• Un nom de variable à une longueur maximale de 100 caractères.
• Les espaces vides intégrés ne sont pas permis non plus dans un nom de variable.
• Si il est possible qu'une valeur pour une variable contienne un espace vide intégré, une virgule, ou un signe égal, entourez la variable avec des guillemets simples quand vous y faites référence.
• Un nom de variable peut consister en n'importe quelle combinaison de caractères entre A et Z, 0 et 9, et le trait de soulignement. Le premier caractère du nom devrait être une lettre.
• Vous pouvez affecter un nombre à la valeur à la place d'un nom pour créer une variable de positionnement.
• Le trait de soulignement peut être inclus dans un nom de variable, mais les caractères spéciaux suivants ne sont pas permis : signe plus, signe moins, astérisque, slash, virgule, point, symbole amper, et point-virgule.

&[&]name

où :

&

Dénote une variable locale. Un symbole amper simple suivie d'une chaîne numérique indique une variable de position.

&&

Dénote une variable globale.

nom

est le nom de la variable. Le nom que vous affectez doit respecter les règles indiquées dans le Gestionnaire de dialogue.

Les variables locales sont identifiées par un cycle esperluette unique (&) précédant le nom de la variable. Elles restent effectivement tout au long de la procédure unique.

Considérez la procédure suivantes, SALESREPORT, dans laquelle &CITY, &CODE1, et &CODE2 sont des variables locales:

TABLE FILE SALES
HEADING CENTER
"MONTHLY REPORT FOR &CITY"
"PRODUCT CODES FROM &CODE1 TO &CODE2"
" "
SUM UNIT_SOLD AND RETURNS AND COMPUTE
RATIO/D5.2 = 100 * (RETURNS/UNIT_SOLD);
BY CITY
IF CITY EQ &CITY
BY PROD_CODE
IF PROD_CODE IS-FROM &CODE1 TO &CODE2
END

Supposea une application des valeurs suivantes quand vous appelez une procédure :

EX SLRPT CITY = STAMFORD, CODE1=B10, CODE2=B20

Le Gestionnaire de Dialogue substitue les valeurs pour les variables suivantes :

TABLE FILE SALES
HEADING CENTER
"MONTHLY REPORT FOR STAMFORD"
"PRODUCT CODES FROM B10 TO B20"
" "
SUM UNIT_SOLD AND RETURNS AND COMPUTE
RATIO/D5.2 = 100 * (RETURNS/UNIT_SOLD);
BY CITY
IF CITY EQ STAMFORD
BY PROD_CODE
IF PROD_CODE IS-FROM B10 TO B20
END

Quand la procédure est exécutée est terminée : les valeurs STAMFORD, B10, et B20 sont perdues

Les variables globales sont différentes des variables locales car lorsqu'une valeur est fournie, elle restent effectives tout au long de la session WebFOCUS, à moins qu'elles ne soient transformées en une autre valeur via la commande -SET ou effacées par la commande LET CLEAR. Les variables globales sont utiles pour rassembler des valeurs au début de la session de travail pour utilisation par plusieurs procédures ultérieures. Toutes les procédures qui utilisent une variable globale particulière reçoivent la valeur en cours jusqu'à ce que vous quittiez WebFOCUS.

Les variables globales sont spécifiées via l'utilisation d'un sigle esperluette double (&&) précédant le nom de la variable. Il est possible d'avoir une variable globale et une variable locale ayant le même nom. Elles sont distinctes et peuvent avoir des valeurs différentes.

L'exemple suivant illustre l'utilisation de trois variables globales : &&CITY, &&CODE1, &&CODE2. Les valeurs sont substituées dans la première procédure, PROC1, et des valeurs sont retenues est transmises à la seconde procédure, PROC2.

TABLE FILE SALES
HEADING CENTER
"MONTHLY REPORT FOR &&CITY"
SUM UNIT_SOLD AND RETURNS AND COMPUTE
RATIO/D5.2 = 100 * (RETURNS/UNIT_SOLD);
BY CITY
IF CITY EQ &&CITY
BY PROD_CODE
IF PROD_CODE IS-FROM &&CODE1 TO &&CODE2
END
EX PROC2

TABLE FILE SALES
HEADING CENTER
"MONTHLY REPORT FOR &&CITY AND PRODUCT &&CODE1"
PRINT UNIT_SOLD AND RETURNS AND COMPUTE
RATIO/D5.2 = 100 * (RETURNS/UNIT_SOLD);
BY CITY
IF CITY EQ &&CITY
IF PROD_CODE EQ &&CODE1
END

WebFOCUS substitue automatiquement les valeurs pour variable système rencontrées dans les requêtes du gestionnaire de dialogue. Par exemple, vous pouvez utiliser la variable système &DATE pour inclure automatiquement la date système dans votre requête.

Les variables fournies par le système ne devraient pas être remplacées. Pour éviter cette possibilité, les variables fournies par les utilisateurs ne doivent pas être affectées avec des noms de variables fournies par le système.

&DATE

MM/DD/YY

&DATEfmt											

&DATXfmt											

&DMY

DDMMYY

&DMYY

DDMMCCYY

&FOCCODEPAGE

&FOCCPU

milliseconds

&FOCEXTTRM

ON
OFF

&FOCFEXNAME

&FOCFIELDNAME

NEW
OLD
NOTRUNC

&FOCFOCEXEC

&FOCINCLUDE

&FICLANGCODE

&FOCMODE

CRJE
MSO
OS
TSO

&FOCNEXTPAGE

&FOCPRINT

ONLINE
OFFLINE

&FOCPUTLVL

WebFOCUS PUT level number.

&FOCQUALCHAR

.
:
!
%
|
\

&FOCREL

release number

&FOCSBORDER

ON
OFF

&FOCTRMSD

24
27
32
43

&FOCTRMSW

80
132

&FOCTRMTYP

3270
TTY
UNKNOWN

&FOCUSER

&HIPERFOCUS

ON
OFF

&IORETURN

&MDY

MMDDYY

&MDYY

MMDDCCYY

&RETCODE

numeric

&SETFILE

alphanumeric

&TOD

HH.MM.SS

&YMD

YYMMDD

&YYMD

CCYYMMDD

TABLE FILE SALES
SUM UNIT_SOLD
BY PROD_CODE
FOOTING 
"CALCULATED AS OF &DATE"
END

TABLE FILE EMPLOYEE
"REPORT: &FOCFOCEXEC -- EMPLOYEE SALARIES"
PRINT CURR_SAL BY EMP_ID
END

REPORT: SALPRINT -- EMPLOYEE SALARIES
EMP_ID            CURR_SAL
------            --------
071382660       $11,000.00
112847612       $13,200.00
117593129       $18,480.00
119265415        $9,500.00
119329144       $29,700.00
123764317       $26,862.00
126724188       $21,120.00
219984371       $18,480.00
326179357       $21,780.00
451123478       $16,100.00
543729165        $9,000.00
818692173       $27,062.00

-TYPE &|FOCFOCEXEC is: &FOCFOCEXEC

&FOCFOCEXEC IS: EMPNAME

TABLE FILE EMPLOYEE
HEADING
"SALARY REPORT RUN ON DATE &YYMD"
"  "
PRINT DEPARTMENT CURR_SAL
BY LAST_NAME BY FIRST_NAME
END

WebFOCUS poste beaucoup de statistiques concernant l'ensemble des opérations pendant l'exécution d'une procédure, sous la forme de variables statistiques. Tout comme avec les variables système, WebFOCUS fournit automatiquement des valeurs pour ces variables, à la demande.

&ACCEPTS

&BASEIO

&CHNGD

&DELTD

&DUPLS

&FOCDISORG

&FOCERRNUM

&FORMAT

&INPUT

&INVALID

&LINES

&NOMATCH

&READS

&RECORDS

&REJECTS

&TRANS

TABLE FILE SALES
HEADING CENTER
"MONTHLY REPORT FOR &CITY"
SUM UNIT_SOLD AND RETURNS AND COMPUTE
RATIO/D5.2 = 100 * (RETURNS/UNIT_SOLD);
BY CITY
IF CITY EQ &CITY
BY PROD_CODE
IF PROD_CODE IS-FROM &CODE1 TO &CODE2
END
-RUN 
-IF &LINES EQ 0 GOTO RPT2 ELSE GOTO REPTDONE;
-RPT2
TABLE FILE EMPLOYEE
   .
   .
   .
END
-RUN 
-REPTDONE
-EXIT

FOCUS fournit des variables spéciales s'appliquant au curseur de la souris, les raccourcis clavier, les fenêtres, et d'autres fonctionnalités.

&ECHO

&STACK

Deux commandes du Gestionnaire de dialogue vous permettent de :

• Afficher les valeurs de n'importe quel type pour les variables locales, globales, et système.
• Affecter la valeur d'un paramètre à une variable. La valeur stockée peut alors faire l'objet d'une requête avec le ? commande SET.

De plus, vous pouvez émettre deux QUERY (?) commandes depuis l'invite WebFOCUS pour afficher les valeurs de :

• variables globales. Les valeurs de variables globales restant courantes au long de la session WebFOCUS, il est utile de pouvoir afficher les valeurs à volonté. La syntaxe est :

  ? &&

• Statistiques stockées dans des variables. vous pouvez effectuer une requête sur la valeur en cours de toutes les variables statistiques (à l'exception de &FOCDISORG et de &FOCERRNUM). La syntaxe est :

  ? STAT

-? &[&variablename]

CURRENTLY DEFINED & VARIABLES:

-? SET parameter &[&]variablename						

-? SET ASNAMES &ABC
-TYPE &ABC

Les règles suivantes s'appliquent aux valeurs pour variable :

• Si une valeur contient une virgule intégré, un signe égal, ou un espace vide, vous devez entourer le nom de la variable avec des guillemets simples quand vous l'utilisez dans une expression. Par exemple, si la valeur pour &CITY est NY, NY, vous devez faire référence à la variable en écrivant '&CITY' dans toute expression.
• Après avoir fourni une valeur pour une variable locale, elle est utilisée au cours de la procédure à moins qu'elle ne soit changée via une commande -, -READ, -, ou -WINDOW.
• Quand une valeur est fournie une variable globale, elle est utilisée dans la session FOCUS dans toutes les procédures, à moins qu'elle ne soit changée par -, -READ, -, ou -WINDOW, ou effacée par LET CLEAR.
• Le gestionnaire de dialogue appelle automatiquement le terminal si une valeur n'a pas été fournie pour une variable.
• Les longueurs des variables stockées dans le Gestionnaire de Dialogue (amper) varient en fonction du contexte :
  • Quand elle est utilisée avec les commandes -READ, -TYPE, et WRITE, la longueur maximale d'une variable est d'environ 32000 caractères (32K).
  • Quand elle est utilisée avec d'autres commandes du Gestionnaire de Dialogue ou la commande EX, une valeur de variable ne peut dépasser 4096 caractères (4K).

  Dans tous les contextes, les noms de variable du Gestionnaire de Dialogue sont limités à 100 caractères.

Cet exemple illustre l'utilisation des commandes -DEFAULT et -SET pour fournir des valeurs pour les variables. L'utilisateur final devra fournir la valeur B10 pour &CODE1, B20 pour &CODE2, et SMITH pour &REGIONMGR à l'invitation du formulaire HTML.

Les nombres à gauche de l'exemple s'appliquent aux annotations qui suivent :

1. -DEFAULT &VERB=SUM 
2. -SET &CITY=IF &CODE1 GT 'B09' THEN 'STAMFORD' ELSE 'UNIONDALE'; 
3. -TYPE REGIONAL MANAGER FOR &CITY
    SET PAGE=OFF 
5.     TABLE FILE SALES
       HEADING CENTER
       "MONTHLY REPORT FOR &CITY"
       "PRODUCT CODES FROM &CODE1 TO &CODE2"
       " "
       &VERB UNIT_SOLD AND RETURNS AND COMPUTE
       RATIO/D5.1 = 100 * (RETURNS/UNIT_SOLD);
       BY PROD_CODE
       IF PROD_CODE IS-FROM &CODE1 TO &CODE2
       FOOTING CENTER 
4.     "REGION MANAGER: &REGIONMGR"
       "CALCULATED AS OF &DATE"
       END 
6. -RUN

La procédure s'exécute de la manière suivante :

1. La commande -DEFAULT applique la valeur de &VERB à SUM.
2. La commande-SET fournit la valeur pour &CITY en fonction de la valeur saisie par l'utilisateur final dans le formulaire pour &CODE1. L'utilisateur final ayant entré B10 en tant que valeur pour &CODE1, &CITY devient STAMFORD.
3. Quand l'utilisateur final exécute le rapport, WebFOCUS écrit un message qui incorpore la valeur pour &CITY :

   REGIONAL MANAGER FOR STAMFORD

4. L'utilisateur fournit la valeur pour &REGIONMGR en réponse à une invite implicite. FOCUS fournit les données en cours au moment de l'exécution.
5. L'empilement contient les lignes suivantes :

   TABLE FILE SALES
   HEADING CENTER
   "MONTHLY REPORT FOR STAMFORD"
   "PRODUCT CODES FROM B10 TO B20"
   " "
   SUM UNIT_SOLD AND RETURNS AND COMPUTE
   RATIO/D5.1 = 100 * (RETURNS/UNIT_SOLD);
   BY PROD_CODE
   IF PROD_CODE IS-FROM B10 TO B20
   FOOTING CENTER
   "REGION MANAGER: SMITH"
   "CALCULATED AS OF 06/11/03"
   END

6. La commande -RUN provoque l'exécution de toutes les commandes dans l'empilement. La sortie de la requête du rapport est la suivante :

       MONTHLY REPORT FOR STAMFORD
      PRODUCT CODES FROM B10 TO B20
    
   PROD_CODE  UNIT_SOLD  RETURNS  RATIO
   ---------  ---------  -------  -----
   B10              103       13   12.6
   B12               69        4    5.8
   B17               49        4    8.2
   B20               40        1    2.5
    
          REGION MANAGER: SMITH
        CALCULATED AS OF 06/11/03

Les commandes -DEFAULT indiquent les valeurs par défaut pour les variable globales et locales. Cette technique assure que la valeur est bien transmise à la variable de façon à ce que l'utilisateur ne soit pas invité à renseigner cette valeur.

Vous pouvez lancer plusieurs commandes -DEFAULT pour une variable. Si la variable globale, ces commandes -DEFAULT peuvent être entrées dans des FOCEXECs séparés. À tout moment avant qu'une autre méthode ne soit utilisée pour établir une valeur pour une variable, la commande -DEFAULT la plus récente sera prise en compte.

Cependant, dès lors qu'une valeur pour une variable est établie en utilisant une autre méthode (par exemple en entrant une commande -SET, qui récupère une entrée de valeur par l'utilisateur, ou qu'il y une valeur à partir d'un fichier), les commandes -DEFAULT suivantes pour cette variable seront ignorées.

Remarquez que -DEFAULTS et -DEFAULTH sont synonymes de -DEFAULT.

-DEFAULT[S|H] &[&]name=value [...] [;]

-DEFAULT &PLANT=BOS
TABLE FILE CENTHR
     .
     .
     .

Vous pouvez affecter une valeur à la valeur en calculant la valeur dans une expression ou en affectant une valeur litérale à la variable avec la commande -SET. Vous pouvez aussi utiliser la phrase IN FILE pour tester si la valeur de ce caractère existe dans un fichier et affecter une variable avec le résultat. La valeur de la variable prend la valeur 1 dans le cas où la valeur testée dans le fichier existe ou la valeur 0 si elle n'existe pas.

Vous pouvez utiliser cette technique pour fournir des dates au Gestionnaire de Dialogue en tant que valeurs de variables.. Une date fournie au Gestionnaire de Dialogue dans une variable ne peut pas avoir une longueur supérieure à 20 caractères, les espaces inclus. Les variables du Gestionnaire de Dialogue n'acceptent des dates à format complet (c'est-à-dire, MDY ou MDYY, dans l'ordre de votre choix).

Si vous travaillez avec des dates à cheval entre deux siècles qui n'incluent pas une année sur quatre chiffres, vous pouvez utiliser les paramètres SET DEFCENT et YRTHRESH.

Si vous souhaitez appliquer une valeur de variable à un nombre, les caractères pris en charge que vous pouvez utiliser sont des chiffres numériques, par exemple le signe -, et une virgule pour représenter les emplacements de décimales suivant. Ces derniers sont les seuls caractères valides que le Gestionnaire de Dialogue prend en charge en tant que nombre, et ce quels que soient les options EDIT ou la valeur du CDN.

-SET &[&]name= {expression|value};

-SET &[&]var3= &var1 IN FILE filename1 [OR &var2 IN FILE filename2 ...];

SET DMPRECISION = {OFF|n}

-SET &STORECODE = IF &CODE GT C2 THEN '14Z' ELSE '14B';
   TABLE FILE SALES
   SUM UNIT_SOLD AND RETURNS
   BY PROD_CODE
   IF PROD_CODE GE &CODE
   BY STORE_CODE
   IF STORE_CODE IS &STORECODE
   END

-SET &NAME='JOHN DOE';

-SET &NOW = 'JUN 30 2002';
-SET &LATER = '2002 25 AUG';
-SET &DELAY = &LATER - &NOW;
-TYPE &DELAY

TABLE FILE CAR                                   
PRINT COUNTRY                                    
ON TABLE HOLD AS COUNTRY1 FORMAT ALPHA           
END                                              
-RUN                                             
-SET &C = 'FRANCE';                              
-SET &IN1 = &C IN FILE COUNTRY1;                
-TYPE THE VALUE IS &IN1                     

THE VALUE IS 1 

-SET &LONG = 'THIS IS A LONG AMPER VARIABLE. NOTE THAT IN ORDER '
-  |'TO SET ITS VALUE USING -SET, YOU MUST CONCATENATE SHORTER STRINGS, '
-  |'EACH OF WHICH MUST FIT ON ONE LINE.';
-TYPE &LONG
END

THIS IS A LONG AMPER VARIABLE.NOTE THAT IN ORDER TO SET ITS VALUE USING 
-SET, YOU MUST CONCATENATE SHORTER STRINGS, EACH OF WHICH MUST FIT ON ONE 
LINE.

Vous pouvez lire les valeurs de variables depuis un fichier externe, ou les écrire dans un fichier externe avec les commandes -READ et -WRITE respectivement.

• Vous pouvez fournir des valeurs de variables avec la commande -READ. Par exemple : afficher externe peut contenir les dates de début et de fin concernant une période de reporting. Le gestionnaire de dialogue peut lire ces valeurs à partir d'un fichier externe et les utiliser en tant que variable dans une commande WHERE qui limite la longueur de données sélectionnées dans la requête du rapport.
• Vous pouvez enregistrer des valeurs de variables dans un fichier externe avec la commande -WRITE. Par exemple, une requête peut stocker la somme totale des ventes pour un jour donné dans un fichier externe de façon à ce qu'il soit comparé avec les ventes totales pour le jour suivant.

Le fichier externe peut-être un fichier à format fixe (dans lequel les données sont stockées dans des colonnes fixées) ou bien dans un fichier à format libre (dans lequel des données sont stockées à l'aide d'un format délimité par virgule).

Vous pouvez aussi lire un fichier en utilisant la commande -READ. La commande -READFILE lit un fichier en commençant par effectuer la lecture de son fichier Maître et crée des variables d'invite de saisie pour le Gestionnaire de Dialogue basées sur les formats ACTUAL pour chaque champ du fichier maître. Puis cette commande lit le fichier puis, si nécessaire, convertit les champs de valeurs numériques en chaîne de caractères alphanumériques retournées vers les variables qui ont été créées. L'affichage des options aux formats USAGE ne sont pas transmises aux variables. Les noms des variables d'invite sont les noms des champs préfixés avec un signe amper (&).

-READ ddname[,] [NOCLOSE] &name[.format.][,] ...

STAMFORDB10B20

-READ EXTFILE &CITY.A8. &CODE1.A3. &CODE2.A3.
-IF &IORETURN NE 0 GOTO RESUME;
    TABLE FILE SALES
    SUM UNIT_SOLD
    BY CITY
    IF CITY IS &CITY
    BY PROD_CODE
    IF PROD_CODE IS-FROM &CODE1 TO &CODE2
    END
-RESUME
 .
 .
 .

-WRITE ddname [NOCLOSE] text						

DYNAM ALLOC DD PASS DA USER1.PASS.DATA MOD
-WRITE PASS &DIV &RED &TEST RESULT IS,
- &RECORDS AT END OF RUN

-READFILE [app/]mastername

TABLE FILE EMPLOYEE                           
PRINT LAST_NAME FIRST_NAME DEPARTMENT CURR_SAL
BY EMP_ID                                     
ON TABLE HOLD AS READF1 FORMAT BINARY         
END                                           
-RUN                                          
-READFILE READF1                              
-TYPE LAST_NAME  IS &LAST_NAME                
-TYPE FIRST_NAME IS &FIRST_NAME               
-TYPE DEPARTMENT IS &DEPARTMENT               
-TYPE CURR_SAL   IS &CURR_SAL                 
-TYPE EMP_ID     IS &EMP_ID

>   NUMBER OF RECORDS IN TABLE=       12  LINES=     12 
                                                        
 HOLDING BINARY FILE...                                             
LAST_NAME  IS STEVENS                                   
FIRST_NAME IS ALFRED                                    
DEPARTMENT IS PRODUCTION                                
CURR_SAL   IS     11000.00                              
EMP_ID     IS 071382660

-CLOSE {ddname|*}

Quand un utilisateur connaît les valeurs qui sont requises par une procédure, certaines valeurs (ou toutes) peuvent être entrées via la ligne de commande en utilisant EXEC suivi du nom de la procédure. Ceci permet de gagner du temps puisque WebFOCUS a maintenant les valeurs qu'il doit transmettre à toutes les variables locales ou globales, de façon à ce que l'utilisateur ne soit pas invité à les fournir lui-même.

EX[EC] procedure [[&&][variable=]value, ...]

TABLE FILE SALES
HEADING CENTER
"MONTHLY REPORT FOR &CITY"
SUM UNIT_SOLD AND RETURNS AND COMPUTE
RATIO/D5.2 = 100 * (RETURNS/UNIT_SOLD);
BY PROD_CODE
IF PROD_CODE IS-FROM &CODE1 TO &CODE2
BY CITY
IF CITY EQ &CITY
END

EX SLRPT CITY=STAMFORD, CODE1=B10, CODE2=B20

TABLE FILE SALES
HEADING CENTER
"MONTHLY REPORT FOR &1"
SUM UNIT_SOLD AND RETURNS AND COMPUTE
RATIO/D5.2 = 100 * (RETURNS/UNIT_SOLD);
BY PROD_CODE
IF PROD_CODE IS-FROM &2 TO &3
BY CITY
IF CITY EQ &1
END

EX SLRPT STAMFORD, B10, B20

TABLE FILE SALES
HEADING CENTER
"MONTHLY REPORT FOR &CITY"
&VERB UNIT_SOLD AND RETURNS AND COMPUTE
RATIO/D5.2 = 100 * (RETURNS/UNIT_SOLD);
BY PROD_CODE
IF PROD_CODE IS-FROM &1 TO &2
BY CITY
IF CITY EQ &CITY
END

EX SLRPT CITY=STAMFORD, B10, B20, VERB=COUNT

Vous pouvez spécifier les variables avec des conditions de format qui seront comparées aux valeurs entrées. Si les valeurs entrées n'ont pas le format spécifié, WebFOCUS génère des messages d'erreur et invite l'utilisateur à renseigner à nouveau les valeurs.

&STORECODE.A3.

Pour vous assurer qu'une valeur fournie et valide et qu'elle est utilisée correctement dans la procédure, vous pouvez tester sa présence, son type, et sa longueur. Par exemple, il se peut que vous ne souhaitiez pas effectuer un calcul numérique sur une variable pour laquelle des données alphanumériques ont été fournies.

-IF &name{.LENGTH|.TYPE} rest_of_expression GOTO label...;

-IF &OPTION.LENGTH GT 1 GOTO FORMAT ELSE
-GOTO PRODSALES;
      .
      .
      .
-PRODSALES
    TABLE FILE SALES
      .
      .
      .
    END
-EXIT
-FORMAT
-TYPE ONLY A SINGLE CHARACTER IS ALLOWED.

&WORD.ENTER WORD.
-SET &WORDLEN = &WORD.LENGTH;

-IF &OPTION.TYPE NE A GOTO NOALPHA ELSE
- GOTO PRODSALES;
       .
       .
       .
-PRODSALES
    TABLE FILE SALES
       .
       .
       .
    END
-EXIT
-NOALPHA
-TYPE ENTER A LETTER ONLY.

-IF &name.EXIST GOTO label...;

-IF &OPTION.EXIST GOTO PRODSALES ELSE GOTO CANTRUN;
      .
      .
      .
-PRODSALES
    TABLE FILE SALES
      .
      .
      .

    END
-EXIT
-CANTRUN
-TYPE TOTAL REPORT CAN'T BE RUN WITHOUT AN OPTION.
-EXIT

L'opérateur .EVAL vous permet de remplacer une variable avec sa valeur immédiatement, rendant possible la modification d'une procédure dynamiquement. L'opérateur .EVAL s'avère particulièrement utile pour modifier le code au moment de l'exécution.

[&]&variable.EVAL

1. -SET &R='IF SALARY GT 100000'; 
2. -IF &Y EQ 'YES' THEN GOTO START; 
3. -SET &R = '-*';
   -START 
4.   TABLE FILE CENTHR
     SUM SALARY 
     BY PLANT 
5.   &R.EVAL
     END

-SET &A='-TYPE';
&A HELLO

UNKNOWN WebFOCUS COMMAND -TYPE

-SET &A='-TYPE';
&A.EVAL HELLO

HELLO
>>

Vous pouvez ajouter une variable à une chaîne de caractères ou combiner deux variable ou plus et/ou des littéraux. Consultez le manuel Création de rapports avec le langage WebFOCUS pour toutes les informations concernant la concaténation.

Remarque : lorsque vous utilisez des variables, séparez chacune d'entre elles du symbole de concaténation (||) avec un espace.

-SET &name3 = &name1 || &name2;

Vous pouvez ajouter la valeur d'une variable à la valeur d'une autre variable, en créant une variable indexée. Cette fonctionnalité s'applique autant aux variables locales qu'aux variables globales.

Si la valeur indexée est numérique, l'effet est similaire à un tableau (array) utilisé dans les langages de programmation traditionnels. Par exemple, si la valeur de l'index &K varie de 1 à 10, la variable &AMOUNT.&K fait référence à l'une des dix variables, de &AMOUNT1 à &AMOUNT10.

Un index numérique peut être utilisé comme un compteur, il peut être renseigné, incrémenté, et testé dans une procédure.

-SET &name.&index[.&index...] = expression;

-SET &N = 0;
-LOOP
-SET &N = &N+1;
-IF &N GT 12 GOTO OUT;
-SET &MONTH.&N=&N;
-TYPE &MONTH.&N 
-GOTO LOOP
-OUT

Les chaînes de caractères doivent être entourées par des guillemets simples avant d'être utilisés par la plupart des moteurs de base de données. De plus, les guillemets simples incorporés sont indiqués par deux guillemets simples contigus. WebFOCUS et iWay requiert des guillemets autour des variables qui contiennent des délimiteurs, qui incluent des espaces et des virgules.

Le suffixe QUOTEDSTRING d'une variable du Gestionnaire de dialogue applique les de conversion suivante aux contenus de la variable :

• Tout guillemet simple dans la chaîne est converti en deux guillemets simples.
• Des guillemets simples sont ajoutés autour de la chaîne.

Les commandes du Gestionnaire de Dialogue diffèrent dans la possibilité qu'ils offrent de gérer les chaînes de caractère qui ne sont pas entourés par des guillemets simples et qui contiennent des espaces vides incorporés. Une commande -PROMPT explicite ou implicite peut lire une telle chaîne. La chaîne d'entrée en entier est ensuite entourée par des guillemets simples quand elles sont manipulées par .QUOTEDSTRING.

Remarque : lors de l'utilisation de la commande -SET pour référencer une chaîne de caractères, assurez-vous que cette chaîne est entourée de guillemets simples pour éviter des erreurs.

&var.QUOTEDSTRING

-SET &A = ABC;
-SET &B = 'ABC';
-SET &C = O'BRIEN;
-SET &D = 'O'BRIEN';
-SET &E = 'O''BRIEN';
-SET &F = O''BRIEN;
-SET &G = OBRIEN';
-TYPE  ORIGINAL = &A QUOTED = &A.QUOTEDSTRING
-TYPE  ORIGINAL = &B QUOTED = &B.QUOTEDSTRING
-TYPE  ORIGINAL = &C QUOTED = &C.QUOTEDSTRING
-TYPE  ORIGINAL = &D QUOTED = &D.QUOTEDSTRING
-TYPE  ORIGINAL = &E QUOTED = &E.QUOTEDSTRING
-TYPE  ORIGINAL = &F QUOTED = &F.QUOTEDSTRING
-TYPE  ORIGINAL = &G QUOTED = &G.QUOTEDSTRING

ORIGINAL = ABC        QUOTED = 'ABC'
ORIGINAL = ABC        QUOTED = 'ABC'
ORIGINAL = O'BRIEN    QUOTED = 'O''BRIEN'
ORIGINAL = O'BRIEN    QUOTED = 'O''BRIEN'
ORIGINAL = O'BRIEN    QUOTED = 'O''BRIEN'
ORIGINAL = O''BRIEN   QUOTED = 'O''''BRIEN'
ORIGINAL = OBRIEN'    QUOTED = 'OBRIEN'''

ORIGINAL = ABC        QUOTED = 'ABC'
ORIGINAL = ABC        QUOTED = 'ABC'
ORIGINAL = O'BRIEN    QUOTED = 'O''BRIEN'
ORIGINAL = O'BRIEN    QUOTED = 'O''BRIEN'
ORIGINAL = O'BRIEN    QUOTED = 'O''BRIEN'
ORIGINAL = O''BRIEN   QUOTED = 'O''''BRIEN'
ORIGINAL = OBRIEN'    QUOTED = 'OBRIEN''' 

Vous pouvez utiliser -SET pour définir une valeur pour une variable substituée en fonction des résultats d'une expression ou d'une combinaison arithmétique ou logique.

-SET &name = expression;

Vous pouvez utiliser l'option de masque de la fonction EDIT avec des variables amper. Vous pouvez insérer des caractères dans une valeur alphanumérique, ou extraire certains caractères d'une valeur.

La fonction TRUNCATE du Gestionnaire de dialogue retire tous les espaces de fin des variables amper du gestionnaire de dialogue et en ajuste la longueur.

La fonction TRUNCATE du gestionnaire de dialogue ne possède qu'un seul argument, la chaîne ou la variable qui doit être tronquée. Si vous essayez d'utiliser la fonction TRUNCATE du gestionnaire de dialogue avec plus d'un argument, le message d'erreur suivant sera généré :

(FOC03665) Error loading external function 'TRUNCATE'

Cette fonction ne peut être utilisée que dans les commandes du gestionnaire de dialogue qui supporte les appels à fonction, telles que -SET et -IF. Il ne peut pas être utilisé dans une commande -TYPE ou en tant qu'argument passé à la procédure.

Remarque : une fonction écrite par l'utilisateur ayant le même nom peut exister sans créer de conflit dans l'application.

-SET &var2 = TRUNCATE(&var1);

-SET &LONG = 'ABC   ' ;
-SET &RESULT =  TRUNCATE(&LONG);
-SET &LL = &LONG.LENGTH;
-SET &RL = &RESULT.LENGTH;
-TYPE LONG   =  &LONG  LENGTH =  &LL
-TYPE RESULT =  &RESULT LENGTH =  &RL

LONG   =  ABC     LENGTH =  06
RESULT =  ABC LENGTH =  03

-SET &LONG = '      ' ;
-SET &RESULT =  TRUNCATE(&LONG);
-SET &LL = &LONG.LENGTH;
-SET &RL = &RESULT.LENGTH;
-TYPE LONG   =  &LONG  LENGTH =  &LL
-TYPE RESULT =  &RESULT LENGTH =  &RL

LONG   =          LENGTH =  06
RESULT =    LENGTH =  01

-SET &LONG = 'ABC   ' ;
-SET &RESULT =  EDIT(TRUNCATE(&LONG)|'Z','9999');
-SET &LL = &LONG.LENGTH;
-SET &RL = &RESULT.LENGTH;
-TYPE LONG   =  &LONG  LENGTH =  &LL
-TYPE RESULT =  &RESULT LENGTH =  &RL

LONG   =  ABC     LENGTH =  06
RESULT =  ABCZ LENGTH =  04

Tout nom de fonction rencontrée dans une expression du gestionnaire de dialogue qui n'est pas reconnu en tant que non standard du système ou de fonction WebFOCUS est considéré par défaut comme une fonction. Ces fonctions sont programmées en externe par les utilisateurs, puis stockés dans bibliothèques mise à disposition au moment référencé. Un ou plusieurs arguments sont passés au programme utilisateur, qui effectue une opération ou un calcul et renvoie une valeur unique ou une chaîne de caractères.

Les variables du gestionnaire de dialogue peuvent recevoir les valeurs de fonction via la commande -SET.

Remarque :

• Si la fonction renvoie une valeur qui n'est pas alphanumérique, le gestionnaire de dialogue n'est pas capable d'afficher ou d'interpréter la valeur correctement.
• Vous devez obligatoirement convertir tous les arguments numériques en double précision avant de les transmettre à la fonction. (Vous pouvez utiliser la fonction ATODBL pour les convertir.) Cependant, si une portion du nombre double précision peut être interprétée comme une virgule EBCDIC, le Gestionnaire de dialogue interprète incorrectement cet argument comme étant deux arguments.
• Une fonction écrite par utilisateur peut employer le même argument pour l'entrée la sortie. C'est le programme utilisateur qui est responsable de placer le nombre correct de caractères dans les variables de sortie.

-SET &name = routine(argument,...,'format');

Une variable peut faire référence à une commande WebFOCUS ou à un champ particulier. Cependant, la structure de la commande d'une procédure peut être déterminée par la valeur de la variable.

Dans cet exemple, la variable &FIELD détermine le champ à imprimer dans la requête TABLE.

Dans le fichier nommé SALES, la variable &FIELD peut afficher les valeurs RETURNS, DAMAGED, ou UNIT_SOLD.

TABLE FILE SALES
 .
 .
 .
PRINT &FIELD
BY PROD_CODE
 .
 .
 .

Les données saisies pour les variables amper sont déterminées pour des contenus de données seulement. Par conséquent, l'utilisation de guillemets simples autour de valeurs numériques dans une commande –SET n'a aucun effet sur le type de données de la variable amper.

Par exemple, la requête suivante stocke des données numériques dans les variables &A, &B, and &C :

-SET &A=12345;
-SET &B='12345';
-SET &C=123.45
-TYPE &A &B &C
-TYPE &A.TYPE &B.TYPE &C.TYPE

La sortie montre que &A, &B, et &C en toute le type de données numérique :

12345 12345 123.45
N  N  N

Lorsqu'une variable amper est affichée, substituée, concaténée, ou rajoutée, il n'y a pas de transformation de la valeur contenue dans la variable amper.

Substitution

-SET &C=123.45
IF RETAIL_COST EQ &C  

devient

IF RETAIL_COST EQ 123.45

Aussi, considérez la considération suivante :

-SET &D= &C;
-TYPE &D &D.TYPE

La sortie montre que &D à la même valeur que &C et est aussi numérique :

123.45  N

Concaténation

La variable amper &F est créée par concaténation de &A et &C :

-SET &F =  &A | &C;
-TYPE &F &F.TYPE

La sortie montre que la valeur de &F est la valeur de &A suivie par la valeur de &C, et que le type est numérique :

12345123.45  N

L'exemple suivant crée la variable amper &E en incorporant une esperluette dans la chaîne. L'esperluette n'est pas reconnue en tant que début d'un nom de variable et est traité en tant que symbole alphanumérique dans la chaîne :

-SET &E = 1234&C;
-TYPE &E &E.TYPE

La sortie montre que la variable est de type alphanumérique, pas numérique. Il ne s'agit pas de la concaténation de la chaîne '1234' avec la variable &C :

1234&C  A

Le même comportement peut être obtenu avec concaténation :

-SET &G = AT&|T;
-TYPE &G &G.TYPE

La sortie est :

AT&T  A

Quand une variable amper est utilisé dans une expression, il peut s'avérer nécessaire d'opérer une conversion de façon à traiter l'expression. La variable amper utilisée dans l'expression est généralement considérée comme étant littérale, et sa valeur est substituée avant que l'expression ne soit traitée. Par conséquent, la conversion de données nécessaire pour traiter l'expression est accomplie. Les valeurs numériques contenues dans des variables amper sont traitées comme des valeurs entières. Si l'expression peut être évaluée en tant qu'entier, tel sera le cas.

Dans l'exemple suivant, &C a la valeur 123.55. Puis une expression crée &D en ajoutant 100 à &C :

-SET &C=123.55;
-SET &D=&C + 100;
-TYPE &D &D.TYPE

La sortie montre que &D et numérique et que sa valeur est égale à 123.55+100 tronquée en tant qu'entier de valeur 223 par ce que l'arithmétique entière est utilisée :

223  N

L'expression suivante requière une conversion à double précision, car le littéral numérique (100.49) dans l'expression n'est pas un nombre entier :

-SET &C=123.55;
-SET &D=&C + 100.49;
-TYPE &D &D.TYPE

La sortie montre que le résultat est tronqué avant que &D ne soit retourné, pendant que l'arithmétique été faite en convertissant la valeur de &C en double précision.

224  N

Si vous souhaitez que le résultat retienne les emplacements des décimales, vous pouvez renseigner le paramètre DMPRECISION en lui affectant la valeur égale au nombre d'emplacements décimaux que vous souhaitez retourner à la variable amper résultante.

Par exemple :

SET DMPRECISION=2
-RUN
-SET &C=123.55;
-SET &D=&C + 100.49;

Maintenant, le résultat retient les emplacements des décimales :

224.04 N

La façon dont vous traitez les variables numériques amper quand vous les transmettez à une fonction dépend du type de données du paramètre de la fonction.

FTOA (number_to_convert, '(format)', 'alpha_output_format' )

-SET &C=123.55;
-SET &G=FTOA(&C,'(D7.2M)','A11');  
-TYPE &G &G.TYPE

$123.55    A

-SET &A=12345;                       
-SET  &G=FTOA(&A/100,'(D7.2)','A11');
-TYPE &G &G.TYPE                     

123.45    N

-SET &A=123456;                       
-SET  &G=FTOA(&A/100,'(D7.2)','A11');
-TYPE &G &G.TYPE                     

1,234.56    A

-SET &C=123.55;                   
-SET  &G=FTOA(&C,'(D7.2M)','A11');
-SET &H = RJUST(11,&G,'A11');    
-TYPE &G &G.TYPE                  
-TYPE &H &H.TYPE                  

$123.55   A
  $123.55 A

{-DEFAULT|-SET|EX} &ECHO = {ON|ALL|OFF|NONE}

où :

ON

Affiche les commandes WebFOCUS qui sont étendues et empilées pour exécution.

ALL

Affiche les commandes du gestionnaire de dialogue et les commandes WebFOCUS qui sont étendues et empilées pour exécution.

OFF

Annule l'affichage des commandes empilées et des commandes du Gestionnaire de Dialogue. Il s'agit de la valeur par défaut.

NONE

Empèche l'affichage du code de procédure (renvoyé en écho). À partir du moment où la valeur de &ECHO a été renseignée avec NONE, elle ne peut pas être changée pendant la session ou la connexion.

Par défaut, toute procédure qui ne renseigne pas explicitement la variable &ECHO s'exécute avec la valeur OFF. Vous pouvez changer cette valeur par défaut pour &ECHO avec la commande SET DEFECHO.

SET DEFECHO = {OFF|ON|ALL|NONE}

où :

OFF

Établit OFF en tant que valeur par défaut pour &ECHO. OFF est la valeur par défaut.

ON

Établit ON en tant que valeur par défaut pour &ECHO. Affiche les commandes WebFOCUS qui sont étendues et empilées pour exécution.

ALL

Établit ALL en tant que valeur par défaut pour &ECHO. ALL affiche les commandes du gestionnaire de dialogue et les commandes WebFOCUS qui sont étendues et empilées pour exécution.

NONE

Empèche l'affichage du code de procédure (renvoyé en écho). À partir du moment où la valeur de DEFECHO ou de &ECHO a été renseignée avec NONE, elle ne peut pas être changée pendant la session ou la connexion.

• Si vous lancez la commande SET DEFECHO=NONE dans un FOCEXEC, la configuration n'affecte pas &ECHO dans cette routine. Elle prend effet en tant que valeur de &ECHO dans la procédure exécutée suivante (EX) après quoi elle ne devrait pas être modifiée.
• Si vous essayez de réinitialiser &ECHO au sein de la durée de sa valeur NONE, la valeur que vous essayez de renseigner s'affichera si vous lancez une commande -TYPE mais la valeur de sera pas modifié.

La procédure suivante effectue une requête sur la valeur du paramètre DEFECHO et lance une requête TABLE avec la source de données EMPLOYEE :

? SET DEFECHO 
-RUN   
-TYPE ECHO = &ECHO         
TABLE FILE EMPLOYEE        
PRINT CURR_SAL CURR_JOBCODE
BY LAST_NAME BY FIRST_NAME 
END                        
-RUN

La sortie de la commande requête montre que DEFECHO est sur OFF (la valeur par défaut) :

 DEFECHO                  OFF

La commande -TYPE montre que la valeur de &ECHO est OFF (la valeur par défaut) :

ECHO = OFF

Vu que &ECHO est sur OFF, les commandes TABLE ne s'affichent pas au moment de l'exécution de la procédure :

 NUMBER OF RECORDS IN TABLE=       12  LINES=     12
                                                    
 PAUSE.. PLEASE ISSUE CARRIAGE RETURN WHEN READY    
PAGE     1                                                
                                                          
LAST_NAME        FIRST_NAME         CURR_SAL  CURR_JOBCODE
---------        ----------         --------  ------------
BANNING          JOHN             $29,700.00  A17         
BLACKWOOD        ROSEMARIE        $21,780.00  B04         
CROSS            BARBARA          $27,062.00  A17         
GREENSPAN        MARY              $9,000.00  A07         
IRVING           JOAN             $26,862.00  A15         
JONES            DIANE            $18,480.00  B03         
MCCOY            JOHN             $18,480.00  B02         
MCKNIGHT         ROGER            $16,100.00  B02         
ROMANS           ANTHONY          $21,120.00  B04         
SMITH            MARY             $13,200.00  B14         
                 RICHARD           $9,500.00  A01         
STEVENS          ALFRED           $11,000.00  A07         
                                                          
                                                          
                                                          
                                                          
                                                          
                                                          
                               END OF REPORT

Maintenant, renseignez DEFECHO=ON et ré-exécutez la procédure.

La sortie de la commande requête montre que DEFECHO est sur ON :

 DEFECHO                  ON

La commande -TYPE montre que la valeur de &ECHO a été change sur ON :

ECHO = ON

Vu que &ECHO est sur ON, les commandes TABLE s'affichent au moment de l'exécution de la procédure :

TABLE FILE EMPLOYEE                                 
PRINT CURR_SAL CURR_JOBCODE                         
BY LAST_NAME BY FIRST_NAME                          
END

Puis la sortie affiche :

 NUMBER OF RECORDS IN TABLE=       12  LINES=     12
                                                    
 PAUSE.. PLEASE ISSUE CARRIAGE RETURN WHEN READY    
PAGE     1                                                
                                                          
                                                          
LAST_NAME        FIRST_NAME         CURR_SAL  CURR_JOBCODE
---------        ----------         --------  ------------
BANNING          JOHN             $29,700.00  A17         
BLACKWOOD        ROSEMARIE        $21,780.00  B04         
CROSS            BARBARA          $27,062.00  A17         
GREENSPAN        MARY              $9,000.00  A07         
IRVING           JOAN             $26,862.00  A15         
JONES            DIANE            $18,480.00  B03         
MCCOY            JOHN             $18,480.00  B02         
MCKNIGHT         ROGER            $16,100.00  B02         
ROMANS           ANTHONY          $21,120.00  B04         
SMITH            MARY             $13,200.00  B14         
                 RICHARD           $9,500.00  A01         
STEVENS          ALFRED           $11,000.00  A07         
                                                          
                                                          
                                                          
                                                          
                                                          
                                                          
                               END OF REPORT

Maintenant, lancez la commande SET DEFECHO = NONE et ré-exécutez la procédure :

SET DEFECHO = NONE

La sortie de la commande requête montre que la valeur de DEFECHO a été changée en NONE :

 DEFECHO                 NONE

La commande -TYPE montre que la valeur de &ECHO est NONE :

ECHO = NONE

DEFECHO ayant la valeur NONE, les commandes TABLE ne s'afficher pas au moment de l'exécution de la procédure. La sortie est :

 NUMBER OF RECORDS IN TABLE=       12  LINES=     12
                                                    
 PAUSE.. PLEASE ISSUE CARRIAGE RETURN WHEN READY    
PAGE     1                                                
                                                          
                                                          
LAST_NAME        FIRST_NAME         CURR_SAL  CURR_JOBCODE
---------        ----------         --------  ------------
BANNING          JOHN             $29,700.00  A17         
BLACKWOOD        ROSEMARIE        $21,780.00  B04         
CROSS            BARBARA          $27,062.00  A17         
GREENSPAN        MARY              $9,000.00  A07         
IRVING           JOAN             $26,862.00  A15         
JONES            DIANE            $18,480.00  B03         
MCCOY            JOHN             $18,480.00  B02         
MCKNIGHT         ROGER            $16,100.00  B02         
ROMANS           ANTHONY          $21,120.00  B04         
SMITH            MARY             $13,200.00  B14         
                 RICHARD           $9,500.00  A01         
STEVENS          ALFRED           $11,000.00  A07         
                                                          
                                                          
                                                          
                                                          
                                                          
                                                          
                               END OF REPORT

Une fois que la valeur de DEFECHO a été renseignée avec NONE, elle ne peut pas être changée. La commande SET suivante essaie de changer la valeur sur ON, mais la sortie de la commande requête montre qu'elle a toujours la valeur NONE :

SET DEFECHO=ON          
? SET DEFECHO           
 DEFECHO                 NONE

{-DEFAULT|-SET|EX procname} &STACK = {ON|OFF}

où :

procname

est la procédure à exécutée.

ON

Exécute des commandes empilées normalement. Il s'agit de la valeur par défaut.

OFF

Empêche l'exécution des commandes empilées. De plus, les variables système (par exemple, &RECORDS ou &LINES) ne sont pas renseignées. Les commandes du Gestionnaire de Dialogue sont exécutées de façon à ce que vous puissiez tester la logique de la procédure.

Remarque : &STACK est généralement utilisé avec &ECHO = ALL à des fins de débogage. L'affichage affiche les commandes du gestionnaire de dialogue en même temps que celles de WebFOCUS avec les valeurs fournies. Vous pouvez visualiser la logique de la procédure.

Si vous utilisez Usage Simultané (Simultaneous Usage - SU), vous devez obligatoirement savoir si le serveur de base de données WebFOCUS est disponible avant de commencer une procédure particulière. La procédure suivante test si SINK1 est disponible avant de lancer PROC1.

? SU SINK1
-RUN
-IF &RETCODE EQ 16 GOTO BAD;
-INCLUDE PROC1
-BAD
-EXIT

La variable système &RETCODE renvoie un code après l'exécution d'une requête. Si la requête résulte en un affichage normal, la valeur de &RETCODE est 0. En cas d'erreur d'affichage, ou si aucun affichage n'est rendu (ce qui peut arriver si la requête ne trouve aucune donnée), la valeur de &RETCODE est 8. (Si l'erreur a lieu sur un ? SU, la valeur de &RETCODE est 16.)

La valeur de &RETCODE est renseignée à la suite de l'exécution de l'une de ses requêtes :

? HOLD

? SU* 

? JOIN

? COMBINE

? DEFINE

? USE

? LOAD

op_system command

où :

op_system

Spécifie le système d'exploitation.

command

Est une commande du système d'exploitation.

signale le début d'une ligne de commentaires.

N'importe quel nombre de lignes de commentaires peuvent se suivre les unes les autres, mais chacune doit commencer avec -*. Un commentaire peut être inséré au début ou à la fin d'une procédure, ou encore entre deux commandes. Cependant, il ne peut pas être placé sur la même ligne que une commande.

Utilisez les lignes de commentaires pour documenter une procédure de façon à ce que son but et son historique soit clair pour les autres.

La syntaxe est :

-* text				

où :

texte

Est un commentaire. Un espace n'est pas obligatoire entre -* et text.

LA commande ? affiche la valeur en cours d'une variable locale.

La syntaxe est :

-? &[variablename]

où :

variablename

Est un nom jusqu'à 12 caractères de long. Si ce paramètre n'est pas spécifié, les valeurs en cours de toutes les variables locales et globales, ainsi que les variables système et statistiques définies sont affichées.

-CLOSE ferme affiche externe ouvert avec la commande -READ ou la commande -WRITE avec l'option NOCLOSE. L'option NOCLOSE garde un fichier ouvert jusqu'à ce que l'opération -READ ou -WRITE soit complétée.

La syntaxe est :

-CLOSE {ddname|*}

où :

ddname

est le ddname du fichier ouvert décrit dans WebFOCUS utilisant une allocation.

*

Ferme tous les fichiers -READ et -WRITE ouverts.

Les commandes -DEFAULT indiquent les valeurs par défaut pour les variable globales et locales. ‑DEFAULT garantit que des valeurs sont toujours fournies aux variables et aide à s'assurer qu'elles s'exécutent correctement.

Vous pouvez lancer plusieurs commandes -DEFAULT pour une variable. Si la variable globale, ces commandes -DEFAULT peuvent être entrées dans des FOCEXECs séparés. À tout moment avant qu'une autre méthode ne soit utilisée pour établir une valeur pour une variable, la commande -DEFAULT la plus récente sera prise en compte.

Cependant, dès qu'une valeur pour la variable est établie en utilisant une autre méthode, les commandes ultérieures -DEFAULT effectuées pour cette variable seront ignorées.

Vous pouvez remplacer les valeurs de -DEFAULT en fournissant des valeurs pour les variables sur la ligne de commande, ou encore en fournissant une valeur avec un -SET ultérieur sur -DEFAULT.

Les valeurs par défaut sont fournies dans d'autres modules WebFOCUS pour anticiper les besoins d'utilisateurs et réduire le nombre d'actions dans des situations où la plupart des utilisateurs désirent un résultat prédéfini.

La syntaxe est :

-DEFAULT[S|H] &[&]name=value [...]

où :

&name

est le nom de la variable.

value

Est la valeur par défaut affectée à la variable.

-EXIT force une procédure à se terminer. Toutes les commandes empilées sont exécutées et la procédure quitte. Si la procédure était appelée par une autre, la procédure appelante continuerait le traitement.

Utilisez -EXIT pour terminer une procédure après le traitement d'une branche finale qui complète la tâche désirée. La dernière ligne d'une procédure est une commande -EXIT implicite.

La syntaxe est :

-EXIT

Les Transfert -GOTO contrôlent un label spécifié.

Si le Gestionnaire de Dialogue trouve le label, le traitement continu avec la ligne qui le suit. Si le Gestionnaire de Dialogue trouve aucun label, le traitement s'arrête et un message d'erreur est affiché.

La syntaxe est :

-GOTO label				

    .
    .
    .
-label [TYPE text]

où :

label

Le label dans la commande -label est un nom défini par utilisateur pouvant aller jusque 12 caractères pour spécifier la cible -GOTO.

N'utilisez pas d'espaces insérés, ni le nom d'une autre commande gestionnaire de dialogue, à l'exception de -QUIT ou -EXIT. N'utilisez pas de mots qui sont susceptibles d'être confondus avec une fonction, des opérations arithmétiques et logiques, etc.

TYPE text

Envoie un message à l'application cliente.

-IF redirige le flux d'exécution d'une procédure basée sur l'évaluation d'une expression.

Une commande -IF sans un ELSE spécifié explicitement dont l'expression est fausse continue le traitement avec la ligne la suivant immédiatement.

La syntaxe est :

-IF expression [THEN] GOTO label1 
[- ELSE GOTO label2]
[- ELSE IF...];

où :

label

Est un nom défini par utilisateur jusqu'à 12 caractères spécifiant la cible de l'action GOTO.

N'utilisez pas d'espaces insérés, ni le nom d'une autre commande gestionnaire de dialogue, à l'exception de -QUIT ou -EXIT. N'utilisez pas de mots qui sont susceptibles d'être confondus avec une fonction, des opérations arithmétiques ou logiques, etc.

expression

est une expression valide. Les littéraux n'ont pas besoin d'être entourés avec des guillemets simples à moins qu'ils ne contiennent des virgules espaces vides incorporés.

THEN

Est une commande optionnelle qui améliore la lisibilité d'une commande.

ELSE GOTO

Passe le contrôle sur label2 quand le test -IF échoue.

ELSE IF

Spécifie un test composé -IF

Le point-virgule est requis à la fin de la commande, il est ligne de continuation doive obligatoirement commencer par un trait d'union.

-INCLUDE spécifit une autre procédure à incorporer et à exécuter à l'exécution, comme si elle faisait partie de la procédure appelante. La procédure spécifiée peut comprendre une procédure partielle ou complètement développée. Notez qu'une procédure partielle ne s'exécute pas si elle est appelée à l'extérieur de la procédure contenant -INCLUDE.

Lorsque vous utilisez -INCLUDE, vous ne devriez pas effectuer de branchement sur le label à l'extérieur de la procédure spécifiée.

Une procédure peut contenir plus d'un -INCLUDE. Vous pouvez imbriquer autant de -INCLUDEs que nécessaire, mais l'appel à des -INCLUDEs récursifs est limité à quatre niveaux.

Vous pouvez utiliser n'importe quelle commande valide dans un -INCLUDE.

EXEC peut aussi être utilisé pour exécuter une procédure à l'intérieur d'une autre.

La syntaxe est :

-INCLUDE filename [filetype]

où :

filename

Est la procédure à incorporer dans la procédure appelante.

filetype

Est le DDNAME de la procédure. Si rien n'est inclus, c'est FOCEXEC qui est supposé.

Le label spécifié dans la commande -label est la cible de la commande -GOTO ou du critère -IF.

La syntaxe est :

-label [TYPE message]

où :

label

Est un nom fourni par utilisateur jusqu'à 12 caractères identifiant la cible pour une branche.

N'utilisez pas d'espaces insérés, ni le nom d'une autre commande gestionnaire de dialogue, à l'exception de -QUIT ou -EXIT. N'utilisez pas de mots qui sont susceptibles d'être confondus avec une fonction, des opérations arithmétiques ou logiques, etc.

TYPE message

Envoie un message à l'application cliente.

-PASS transmet directement la commande et contrôle les mots de passe. Cette fonctionnalité est particulièrement utile pour spécifier un fichier en particulier ou un jeu de fichier qu'un utilisateur peut lire ou écrire. Les mots de passe ont des jeux de fonctions associés via l'utilitaire DBA.

La procédure qui renseigne les mots de passe peut être cryptée de façon à ce que les mots de passe et cette procédure ne puisse pas être entrés et révélés.

Une variable peut être associée avec -PASS de façon à ce que vous soyez invités à renseigner une valeur de mot de passe.

La commande PASS fournit la même fonction au niveau de commande, tout comme le paramètre PASS de la commande SET.

La syntaxe est :

-PASS password				

où :

password

Est un mot de passe litéral FOCUS ou une variable contenant un mot de passe.

Lit des valeurs depuis un fichier externe. -READ peut accéder aux données sous une forme fixée ou libre.

La syntaxe est :

-READ ddname[,] [NOCLOSE] &name[.format.][,] ...

où :

ddname

est le nom logique du fichier tel que défini dans WebFOCUS en utilisant ALLOCATE ou DYNAM ALLOCATE. Un espace après le ddname dénote un fichier à format fixé alors que la virgule dénote un fichier délimité par virgule.

NOCLOSE

Indique que le ddname devrait être gardé ouvert même si un -RUN est exécuté. Le ddname est fermé lorsque la procédure est terminée ou lorsqu'une commande -CLOSE ou une commande -WRITE suivante est rencontrée.

nom

est le nom de la variable. Vous pouvez spécifier plus d'une variable. L'utilisation d'une virgule pour séparer les variables est optionnel.

Si la liste des variables est plus longue qu'une seule ligne, finissez la première ligne avec une virgule et débutez la ligne qui suit avec un tiret suivi d'un espace (-) pour les fichiers délimités par virgule ou un tiret suivi d'une virgule puis d'un espace (-,) pour les fichiers à format fixe. Par exemple :

fichiers délimités par des virgules

-READ EXTFILE, &CITY,&CODE1,- &CODE2

Fichiers à format fixé

-READ EXTFILE &CITY.A8. &CODE1.A3.,-, &CODE2.A3

format

est le format de la variable. Il peut être alphanumérique (A) ou numérique (N) Notez que ce format doit être délimité avec des points. Le format est ignoré pour des fichiers délimités par des virgules.

-READFILE liens fichier Maître, puis lit les valeurs dans un fichier dans des variables basées sur les champs qui sont listés dans le fichier Maître.

-READFILE [app/]mastername

où :

app

Est le répertoire d'application dans lequel se trouve le fichier.

mastername

Est le nom du fichier maître à lire.

-REMOTE transmet au serveur l'exécution des commandes au sein des commandes -REMOTE BEGIN et -REMOTE END.

La syntaxe est :

-REMOTE BEGIN
commands
-REMOTE END

-REPEAT permet les boucles dans une procédure stockée.

Une boucle s'achève quand l'un des événements suivants survient :

• Elle a été exécutée entièrement.
• -EXIT est émise.
• Un -GOTO est renseigné pour un label à l'extérieur de la boucle. Si un -GOTO est lancé ultérieurement pour revenir à la boucle, la boucle continue à partir du point où elle s'est arrêtée.

La syntaxe est :

-REPEAT label n TIMES
-REPEAT label WHILE condition; 
-REPEAT label FOR &variable 
     [FROM fromval] [TO toval] [STEP s]

où :

label

Identifie le code qui doit être répété (la boucle). Annabelle peut inclure une autre boucle si le label pour la seconde boucle a un nom différent que le premier.

n TIMES

Spécifie le nombre d'exécutions de la boucle. La valeur de n peut être une variable locale, une variable globale, ou une constante. S'il s'agit d'une variable, elle n'est évaluée qu'une seule fois, vous n'avez donc pas à changer le nombre d'exécutions de la boucle. La boucle ne peut être arrêtée qu'en utilisant -QUIT ou -EXIT.

condition WHILE;

Spécifie la condition qui doit être vérifiée pour l'exécution de la boucle. Cette condition peut consister en n'importe quelle expression logique, qui peut être vrai ou faux. La boucle est exécutée si la condition est vraie (true).

Remarque : la condition doit obligatoirement être suivie par un point-virgule.

&variable

Est la variable qui est testée au démarrage de chaque exécution de la boucle et incrémentée de s à chaque exécution. Elle est comparée aux valeurs fromval et toval, si elles ont été fournies. La boucle est exécutée seulement si &variable est supérieure ou égale à fromval ou inférieure ou égale à toval.

fromval

Est une constante qui est comparée avec &variable au départ de chaque exécution de la boucle. La valeur par défaut est 1.

toval

Est une valeur qui est comparée avec &variable au départ de chaque exécution de la boucle. La valeur par défaut est 1,000,000.

STEP s

Est une constante utiliser pour incrémenté &variable à la fin de chaque exécution de la boucle. Elle peut être positive ou négative. L'incrément par défaut est 1.

Remarque : les paramètres FROM, TO, et STEP peuvent apparaître dans n'importe quel ordre.

-RUN provoque l'exécution immédiate de toutes les WebFOCUS commandes empilées.

À la suite de l'exécution, le traitement de la procédure stockée continue suivant -RUN.

-RUN est généralement utilisé pour effectuer les tâches suivantes :

• Générer des résultats à partir d'une requête qui peut alors être utilisée à des fins de test ou de branchement.
• Fermer un fichier externe qui a été ouvert avec -READ ou -WRITE. Quand un fichier est fermé, le pointeur de lignes est placé au début du fichier pour un -READ. Le pointeur de lignes pour -WRITE et positionner en fonction de l'allocation et de la définition du fichier.

La syntaxe est :

-RUN

-SET affecte une valeur littérale, ou une valeur calculée dans une expression logique ou arithmétique, à une variable.

Des guillemets simples autour d'une valeur littérale sont optionnels à moins qu'elle contienne un espace vide incorporé, une virgule, ou un signe égal, dans quel cas vous devrez obligatoirement les inclure.

La syntaxe est :

-SET &[&]name= {expression|value};

où :

&name

est le nom de la variable.

expression

est une expression valide. Des expressions peuvent occuper plusieurs lignes, il est donc conseillé de terminer la commande avec un point-virgule.

value

Est une valeur litérale ou une expression logique ou arithmétique affectée à la variable. Si la valeur littérale contient des virgules ou des espaces vides incorporés, vous devez entourer la valeur avec des guillemets simples.

Transmet des messages informatifs à l'utilisateur à l'affichage. N'importe quel nombre de commandes -TYPE peuvent se suivre les unes les autres, mais chacune d'elle doit commencer par -TYPE.

Les variables substituables peuvent être incorporées en texte. Les valeurs affectées en cours à chaque variable sont affichées dans leur position d'affectation dans le texte.

-TYPE1 et TYPE+ ne sont pas pris en charge par les types d'affichage d'IBM 3270.

TYPE est utilisé de plusieurs façons dans WebFOCUS pour envoyer des messages informatifs vers l'écran. Une commande TYPE est susceptible d'apparaître sur la même ligne en tant que label dans le Gestionnaire de dialogue. Dans MODIFY, TYPE est utilisé pour générer des messages au début et à la fin des processus, à des emplacements sélectionnés dans MATCH ou NOMATCH, NEXT ou NONEXT, et pour envoyer un message à la suite d'une condition de données INVALID.

La syntaxe est :

-TYPE[+] text 
-TYPE[0] text 
-TYPE[1] text				

où :

-TYPE1

Envoie le texte après l'émission d'une éjection de page.

-TYPE

Envoie le texte après le saut d'une ligne.

-TYPE+

Envoie le texte mais n'ajoute pas de flux de ligne.

text

Est une chaîne de caractères qui peut être écrite dans une ligne.

-WRITE écrit des données dans un fichier séquentiel.

Si la commande continue sur un grand nombre de lignes, placez une virgule à la fin de la ligne et un tiret au début de chaque ligne subséquente.

À moins que vous ne spécifiez l'option NOCLOSE, afficher ouvert et fermé quand une procédure se termine avec -RUN, -, ou -QUIT.

Dans TABLE, WRITE est synonyme de SUM; la fonctionnalité est relativement différente de ‑WRITE.

La syntaxe est :

-WRITE ddname [NOCLOSE] text				

où :

ddname

est le nom logique du fichier tel que défini dans WebFOCUS en utilisant ALLOCATE ou DYNAM ALLOCATE.

NOCLOSE

Indique que le fichier devrait être gardé ouvert même si un -RUN est rencontré. Le fichier est fermé lorsque la procédure est terminée ou lorsqu'une commande -CLOSE ou une commande -READ suivante est rencontrée.

text

Est n'importe quelle combinaison de variables et de texte. Pour écrire plus d'une ligne, terminez la première ligne avec une virgule (,) et commencer la ligne suivante avec un trait d'union suivi d'un espace (- ).

Cette rubrique vous fournit une méthode plus simple pour localiser les variables par défaut, les limites du système d'exploitation et de WebFOCUS, les tables de résumé, les règles générales, et les astuces associées.

Règles générales à suivre pour la création de procédures :

• Si la commande gestionnaire de dialogue dépasse une ligne, la ligne suivante doit obligatoirement commencer avec un tiret (-) à la première position.
• Le trait d'union (-) doit être placé en première position de la ligne de commande.
• La commande est généralement attachée au trait d'union (-), mais il se peut que vous ayez à laisser un espace entre le trait d'union et la commande du gestionnaire de dialogue.
• Un espace au minimum doit être inséré entre la commande du gestionnaire de dialogue et un autre texte.

Règles générales concernant la fourniture de valeurs pour les variables :

• Les longueurs des variables stockées dans le Gestionnaire de Dialogue (amper) varient en fonction du contexte :
  • Quand elle est utilisée avec les commandes -READ, -TYPE, et WRITE, la longueur maximale d'une variable est d'environ 32000 caractères (32K).
  • Quand elle est utilisée avec d'autres commandes du Gestionnaire de Dialogue ou la commande EX, une valeur de variable ne peut dépasser 4096 caractères (4K).
• Si une valeur contient une virgule incorporée (,) ou un signe égal incorporé (=), la valeur doit être entourée de guillemets simples. Par exemple :

  EX SLRPT AREA=S, LOCATION='NY, NY'

• Après avoir fourni une valeur pour une variable locale, elle est utilisée au cours de la procédure à moins qu'elle ne soit changée via une commande -, -READ, -, ou -WINDOW.
• Après avoir fourni une valeur pour une variable globale, elle est utilisée au cours de la procédure pendant la session WebFOCUS dans toutes les procédures, à moins qu'elle ne soit changée via une commande -SET ou -READ.
• Le gestionnaire de dialogue appelle automatiquement le terminal si une valeur n'a pas été fournie pour une variable.

Valeurs par défaut du système d'opération, limites et spécifications format.

• La valeur par défaut pour la valeur du code retour du système d'opération est 8.
• Les littéraux doivent être entourés avec des guillemets simples s'ils contiennent des virgules ou des espaces vides incorporés. Pour produire littérale qui commence ou se termine avec un guillemet simple, place de guillemet simple à l'emplacement où vous souhaitez en voir apparaître un.
• Les formats alphanumériques sont décrits par la lettre A, suivi par le nombre de caractères. Le nombre de caractères doit être entre un et 3968.
• Les formats numériques sont décrits par la lettre I, suivi par le nombre de chiffres à entrer. Le nombre peut avoir une longueur de 1 à 10, la valeur doit être inférieure à 2³¹-1.
• Est un nom défini par utilisateur jusqu'à une longueur de 12 caractères. Vous pouvez utiliser des espaces vides et vous ne devriez pas utiliser le nom de toute commande du gestionnaire de dialogue, à l'exception de QUIT et EXIT. Le texte label peut précéder ou suivre la commande -GOTO dans la procédure.
• Une date fournie par le Gestionnaire de dialogue ne peut excéder 20 caractères, y compris les espaces.
• Le niveau des fichiers -INCLUDE intégrés n'est limité que par la mémoire disponible. Cependant, les commandes -INCLUDE récursives sont limitées à quatre niveaux.