ADXIFS |
adxifscontient le séparateur de champ utilisé pour la lecture ou l'écriture sur un fichier texte.
Char [S]adxifs(1)
# Lecture des utilisateurs du groupe Adonix à partir du fichier
# Unix /etc/passwd
# dont la structure est LOGIN:PWD:UID:GID:NOM:HOM:SHELL
Local Char LOGIN(15),PWD(15),UID(5),GID(5),NOM(80),HOM(80),SHELL(80)
Openi "/etc/passwd"
Iomode adxifs ':'
Iomode adxirs chr$(10)
Repeat
Rdseq LOGIN,PWD,UID,GID,NOM,HOM,SHELL
If GID = num$([L]GROUP_ADONIX)
## suite du traitment
Until fstat
Openi
# Ecriture d'un fichier où les champs sont séparés par ', '
adxifs = ','
adxirs = chr$(10 )
# Ouverture pour ajout
Openo "FICHIER", -1
Iomode adxifs ','
Iomode adxirs chr$(10)
Wrseq CHAMP1, CHAMP2, CHAMP3, CHAMP4
adxifsest utilisée en conjonction avec les instructions Rdseq et Wrseq. Ces instructions lisent et écrivent des données sous forme ascii, UCS2 ou UTF8, structurées en champs et en enregistrements :
- Rdseq lit un enregistrement, chaque variable donnée en argument de l'instruction correspondant à un champ (ou un ensemble de champs dans le cas d'un tableau d'éléments) séparé du suivant par le caractère défini dans adxifs,
- Wrseq écrit un enregistrement, chaque variable donnée en argument de l'instruction correspondant à un champ (ou un ensemble de champs dans le cas d'un tableau d'éléments) séparé du suivant par le caractère défini dans adxifs.
adxifsadmet chr$(32) (l'espace) comme valeur par défaut.
Si le séparateur de champs est l'espace, alors Rdseq considère plusieurs espaces jointifs comme un seul séparateur.
adxifsest à positionner par l'instruction Iomode juste après l'ouverture du fichier texte. Cela permet de définir le séparateur de champ pour un fichier donné et non plus globalement comme cela était le cas pour les versions antérieures à la version 140.
Pas d'erreur associée.
Adonix X3(r) L4G |