pautPDFcreator est un objet Automation dynamique
SI pautPDFcreator <> Null ALORS // on libère la resource si déjà utilisée. Je repars à zèro à chaque fois
	libérer pautPDFcreator
FIN

QUAND EXCEPTION DANS
	pautPDFcreator = allouer un objet Automation "pdfcreator.clsPDFCreator"
FAIRE
	Erreur("L'imprimante PDFCreator n'est pas installée sur votre poste!")         
	//  message si PDFCReator n'est pas installé
	RENVOYER Faux
FIN

SI pautPDFcreator = Null ALORS
	Erreur("L'imprimante PDFCreator n'est pas installée sur votre poste!")         
	//  message si PDFCReator n'a pas pu s'initialiser
	RENVOYER Faux
FIN

pautPDFcreator>>cClearcache // supprime tous les fichiers temporaires de PDFcreator
pautPDFcreator>>cPrinterStop( Faux )

pautPDFcreator>>cStart()
           // sauvegarde automatique du PDF généré

pautPDFcreator>>cOption("UseAutoSave",1) 
pautPDFcreator>>cOption("UseAutosaveDirectory", 1)    // utilise le répertoire indiqué plus loin
pautPDFcreator>>cOption("AutosaveFormat", 0 )         // 0 = PDF
pautPDFcreator>>cOption("AutosaveDirectory",rep_fichier ) // rèpertoire de la sauvegarde automatique (nom complet)
pautPDFcreator>>cOption("AutosaveFilename",fExtraitChemin(nom_fichier,fFichier)) // nom du fichier PDF généré (sans le .PDF)


iConfigure("PDFCreator",Vrai)    // fixe temporairement l'imprimante PDFcreator par défaut

LanceAppliAssociée(nom_fichier,"print")