| 
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD
--------------------------------------------
1/ Rappel sur la définition d'un fichier logique
* fichier physique
A R FORMAT TEXT('FORMAT DU FICHIER')
A ZONE1 5S 0 TEXT('ZONE n° 1')
A ZONE2 25 TEXT('ZONE N° 2')
A ZONE3 7P 2 TEXT('ZONE N° 3')
A ZONE4 2S 0 TEXT('ZONE N° 4')
A ZONE5 3S 0 TEXT('ZONE N° 5')
A ZONE6 3 TEXT('ZONE N° 6')
* fichier logique
A R FORMAT PFILE(FICPF)
A K ZONE1
Cette écriture suppose que le format du fichier logique est identique
au format du fichier physique
(meme liste de zones, dans le même ordre, meme définition de zones)
|
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 2/ Redéfinition de format simple A R FORMAT2 PFILE(FICPF) A ZONE1 A ZONE3 A ZONE5 A ZONE4 A K ZONE3 Cette écriture signifie que le format du fichier logique est différent du format du fichier physique. Liste des zones différente (ne pas considerer toutes les variables ET/OU ne pas les considerer dans le même ordre) |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 3/ Redéfinition de format simple avec restriction sur l'usage de la variable A R FORMAT2 PFILE(FICPF) A ZONE1 A ZONE3 A ZONE5 A ZONE4 I A K ZONE3 Cette écriture signifie que la variable ZONE4 ne peut pas être modifiée (I= Input / entrée pure). |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 4/ Redéfinition de format avec utilisation d'un format existant A R FORMAT2 PFILE(FICPF) A FORMAT(FICL2) A K ZONE4 A K ZONE5 Cette écriture signifie que le format pour ce fichier logique sera le même que le format du fichier logique FICL2 (le C.A étant différent) |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A Cette écriture signifie que l'on redéfini le type de la variable ZONE1 Pour ce format elle sera considérée comme 5 caracteres alpha. |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A Cette écriture signifie que l'on redéfini le type de la variable ZONE1 Pour ce format elle sera considérée comme 5 caracteres alpha. LES REDEFINITION SUIVANTES SONT POSSIBLES: Numerique étendu <--> Alpha (si même nombre de positions) Numerique étendu <--> Packé (si sans déc.) NUm éténdu,packé <--> Binaire Date et Heure --> Numérique étendu (n'indiquez pas de lg) |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A A ZONE3 5P 0 Cette écriture signifie que l'on redéfini le nombre de décimales pour la variable ZONE3 (elle était 7,2) |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A A ZONE3 5P 0 A VAR6 RENAME(ZONE6) Cette écriture signifie que l'on renome la variable ZONE6. Pour ce format elle s'appelle VAR6 |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A A ZONE3 5P 0 A VAR6 RENAME(ZONE6) A V2 SST(ZONE2 1 10) Cette écriture signifie que l'on ne considere que les 10 premiers caracteres de la variable ZONE2.le résultat s'appelle V2. |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A A ZONE3 5P 0 A VAR6 RENAME(ZONE6) A V2 I SST(ZONE2 1 10) Un I en colone usage est obligatoire. (Cette variable ne peut pas être modifiée). |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A A ZONE3 5P 0 A VAR6 RENAME(ZONE6) A V2 I SST(ZONE2 1 10) A V45 CONCAT(ZONE4 ZONE5) Cette écriture signifie que l'on considere (regroupe) l'ensemble des caracteres des variables ZONE4 et ZONE5. Le résultat s'appelle V45. |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A A ZONE3 5P 0 A VAR6 RENAME(ZONE6) A V2 I SST(ZONE2 1 10) A V45 CONCAT(ZONE4 ZONE5) A ZONE7 TRNTBL(*LIBL/QSYSTRNTBL) Cette écriture signifie que l'on converti le contenu de la variable par l'intermédiaire de la table QSYSTRNTBL |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A A ZONE3 5P 0 A VAR6 RENAME(ZONE6) A V2 I SST(ZONE2 1 10) A V45 CONCAT(ZONE4 ZONE5) A ZONE7 TRNTBL(*LIBL/QSYSTRNTBL) Les tables intéressantes sont: QSYSTRNTBL minuscule/MAJUSCULE (les lettres sans accent) QCASE256 minuscule/MAJUSCULE (y compris les accentuées) QASCII EBCDIC/ASCII QEBCDIC ASCII/EBCDIC + les tables que vous pourriez créer. |
|
REDEFINITION DE FORMAT AVEC LE LANGAGE SDD -------------------------------------------- 5/ Redéfinition de format avec redéfinition de zone. A R FORMAT3 PFILE(FICPF) A ZONE1 5A A ZONE3 5P 0 A VAR6 RENAME(ZONE6) A V2 I SST(ZONE2 1 10) A V45 CONCAT(ZONE4 ZONE5) A ZONE7 I TRNTBL(*LIBL/QSYSTRNTBL) La variable ZONE7 doit être en lecture seule Elle peut être utilisée comme clé . |
