// redirige l'imression de ETAT_Etat1 vers un fichier
iDestination(iFichier, fRépertoireTemp()+"etat_impr.prn")
iImprimeEtat(ETAT_Etat1)
// exemple 1
SI PAS ASCreeSpool(fRépertoireTemp()+"etat_impr.prn", MaConnexion1,0, "QPGMR", "DOC0099", "Facture client XYZ") ALORS
Erreur(ErreurInfo(errComplet))
FIN
// exemple 2
SI PAS ASCreeSpool(fRépertoireTemp()+"etat_impr.prn", MaConnexion1,ASsplHold+ASsplSave, "*CURRENT", "DOC0099", "Facture client XYZ",2, "MONSPOOL","PRT_EAC", 1, "FRM01") ALORS
Erreur(ErreurInfo(errComplet))
FIN