Permet
de tester la présence d’un fichier ou d’un répertoire sur le PC et
les droits sur un fichier.
Utilisez CHKDIR pour tester un
répertoire réseau.
Syntaxe
CHGVAR |
VAR(&CMD) VALUE('CHKFILE') |
CHGVAR |
VAR(&PARM1) VALUE(' "Fichier" [;Read] [;Write] [;Wait=nombre de secondes] [;GetInfo] ') |
CHGVAR |
VAR(&PARM2) VALUE(' ') |
CALL |
PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 &PARM2 &RESULT) |
Paramètres
Paramètres |
|
Parm1 |
Chemin complet du fichier ou du répertoire. Read : L’option "Read" est spécifiée pour tester si on a le droit de lire le fichier. Write : L’option "Write" est spécifiée pour tester si on a le droit d’écrire dans le fichier. Wait=nnn; nnn est un nombre de secondes. Délai d’attente pour que le fichier soit présent et disponible. GetInfo=True; Pour
recevoir dans RESULT les informations sur le fichier. Position 16 : HHMMSS.mmm : Heure dernière modification. Position 27 : TTTTTTTTTTTT : Taille en octet (12 chiffres). Position 40 : D Si le chemin désigne un répertoire.
|
RESULT |
En retour, le paramètre &RESULT contient une des valeurs suivantes : Position 1 : TRUE / FALSE / DENIED / SHV Position 7 : Informations sur le fichier si l’option GetInfo est choisie.
TRUE : Le fichier existe, et on a les droits demandés. FALSE : Le fichier n’existe pas. DENIED : Le fichier existe, mais on n’a pas les droits de lecture ou d’écriture demandés. SHV : Le fichier existe, mais il est en cours d’utilisation.
|
|
|
Exemple
CHGVAR VAR(&CMD) VALUE('CHKFILE')
CHGVAR VAR(&PARM1) VALUE('"%LNCDIR%\SAMPLES\LNCMENU.DOC";READ;+
WRITE')
CHGVAR VAR(&PARM2) VALUE(' ')
CALL PGM(LNCCMD) PARM(&HANDLE &CMD &OPT &PARM1 +
&PARM2 &RESULT)
Autre exemple
LNCCMDR CMD(CHKFILE) PARM1('"' *TCAT &OUTDIR *TCAT +
'\' *TCAT &NOMLOT *TCAT +
'.pdf";Getinfo=true') RESULT(&RESULT)