Lit un spool AS/400 vers un fichier PC local PCL ou texte.
Syntaxe
bResult = ASGetSpool(NomFichier_local, Connexion , Nom_Spool [, job [, spl_number [, spl_format [, paper_size [, supprLF ]]]]] )
bResult
Booléen - Vrai si la commande a réussi, Faux en cas d'erreur.
NomFichier_Local
Nom du fichier à créer sur le PC
Connexion
Connexion - nom de la connexion
Nom_Spool (10 caractères)
Nom du fichier spool à lire. Valeurs possibles : *LAST ou nom
Job
Identifie le job ayant créé le fichier spool. Les valeurs possibles sont :
* : job en cours
nnnn/USER/NOM_JOB : job numéro nnn utilisateur USER job NOM_JOB
spl_number
numéro du spool. Les valeurs possibles sont :
· de 0 à 999999 : numéro du spool
· ASsplOnly (*ONLY)
· ASsplLast (*LAST)
Spl_format
Format à utiliser pour le résultat. Les possibles sont :
· *TXT si le spool est au fomat texte
· *PCL si le spool est au format PCL
Paper_size
Taille du papier. Les valeurs possibles sont :
*NONE *MFRTYPMDL *LETTER *LEGAL *EXECUTIVE *A3 *A4 *A5 *B4 *B5 *CONT80 *CONT132
supprLF (booléen)
Suprimer le dernier saut de page du résultat (par défaut : faux)
Exemple
SI PAS ASGetSpool("c:\temp\spl_test_wd.spl", MaConnexion1, "QPJOBLOG", "108755/MARTIN/PRTXJK", 1, ASsplPCL, "", False)
Erreur(ErreurInfo(errComplet))
FIN