PowerBuilder à Donf ! / [RESOLU] Export au format PDF avec AMYUNI PDF CONVERTER

Sebastouche · 17-07-2008 12:53:37

Bonjour,

Je travaille actuellement sous PB 10.2 et je dois exporter des datawindows au format PDF à l'aide de AMYUNI PDF Converter 3.0 (license ok).
Le code initial fonctionnait très bien avec la version 2.

Code: pb

// Selection de l'imprimante
PrintSetPrinter( PrinterName )

// Enchainement d'instructions propres à PDF Converter (External Functions)
al_PDF_Printer = DriverInit( PrinterName )
SetResolution ( al_PDF_Printer, 600 )
SetDefaultConfig ( al_PDF_Printer )        // set 600 DPI as default for all printouts
SetDefaultPrinter ( al_PDF_Printer )       //set this printer as default

SetDefaultFileName (al_PDF_Printer, as_PDF_File )

J'ai maintenant un superbe message "Printer not activated, error code -30", pourtant l'imprimante virtuelle existe bien dans la liste des imprimantes.

Si vous avez des idées, je suis preneur ...

Merci d'avance
Sébastouche

NB :

Dernière modification par Sebastouche (18-07-2008 13:16:24)

erasorz · 17-07-2008 13:33:07

Bonjour, pb d'activation ? desinstall full ancienne/réinstall nouvelle ?

regarde plutôt du coté de l'éditeur, genre un "error code -30" site:amyuni.com

Sebastouche · 17-07-2008 13:41:06

erasorz a écrit:
Bonjour, pb d'activation ? desinstall full ancienne/réinstall nouvelle ?

regarde plutôt du coté de l'éditeur, genre un "error code -30" site:amyuni.com

J'ai contacté amyuni. J'attends un retour. J'ai regardé sur différents sites, les solutions proposées n'ont pas été concluantes
Dans la foulée, j'ai posé la question sur notre site préféré. Des fois que quelqu'un soit déjà tombé sur le souci ...

Sebastouche

erasorz · 17-07-2008 13:50:47

ok, tu posteras la solution

Sebastouche · 18-07-2008 13:06:00

Miraaacle ! J'ai trouvé la solution !

Toutes les déclarations des fonctions externes doivent faire référence au numéro de version (ce n'était pas le cas en 2).
Exemples :

Code: pb

Function long DriverInit (string Printer ) Library "cdintf300.dll" alias for "DriverInit;Ansi"
Function long PDFDriverInit (string Printer ) Library "cdintf300.dll" alias for "PDFDriverInit;Ansi"
Subroutine DriverEnd (long hPrinter) Library "cdintf300.dll"
Function long SetDefaultDirectory (long hPrinter, long Directory) library "cdintf300.dll"
Function long SetDefaultFileName (long hPrinter, string FileName) library "cdintf300.dll" alias for "SetDefaultFileName;Ansi"
Function long SetFileNameOptions (long hPrinter, int Options) library "cdintf300.dll"
Function long SetResolution (long hPrinter, long Resolution) library "cdintf300.dll"
Function long GetResolution (long hPrinter) library "cdintf300.dll"
Function long SetDefaultConfig (long hPrinter) library "cdintf300.dll"
Function long SetDefaultPrinter (long hPrinter) library "cdintf300.dll"
Function long SendMail(String Toadd, String CCadd, String BCCadd, String Subject, String Mess, String FileNames, Long Options) library "cdintf300.dll" alias for "SendMail;Ansi" 
Function long EnablePrinter(long hPrinter, string szCompany, string szCode) library "cdintf300.dll" alias for "EnablePrinter;Ansi"

// Lors de l'installation, une version est installée sous : C:\WINDOWS\system32\spool\drivers\W32X86

// Déclaration des variables :
string PrinterName = "Amyuni PDF Converter"
String LicensedTo = <LicenceAmyuni>
String ActivationCode = <CleActivationAmyuni>


// Sur l'évènement adéquat :
PDFPrinter = PDFDriverInit(PrinterName)
SetResolution (PDFPrinter, 600) 
SetDefaultConfig (PDFPrinter)        // set 600 DPI as default for all printouts
SetDefaultPrinter (PDFPrinter)       //set this printer as default
SetDefaultFileName (PDFPrinter, "C\temp\toto.pdf" )
SetFileNameOptions (PDFPrinter, NoPrompt + UseFileName )

// Nouveauté 3.0
EnablePrinter(pdfPrinter,LicensedTo,ActivationCode)

// Impression
<MaDW>.print()
 
SetFileNameOptions (PDFPrinter, 0)
DriverEnd (PDFPrinter)