POO - Instanciar um Objeto tipo Lista em Progress

Pesquisando a respeito descobri que é possível usar o PDF CREATOR , consegui concatenar os arquivos PDF porém o Pdf Creator abre para cada arquivo PDF e é preciso fechar manualmente e não consegui nenhum comando que faça isso. Algué já passou por isso ??

Abaixo Codigo Usado:


/*matar qualquer processo referente ao PDFCreator*/
DOS Silent VALUE("taskkill /F /IM PDFCreator.exe /T").

/*Variáveis de instancia*/
DEFINE VARIABLE pdf AS COM-HANDLE NO-UNDO.
DEFINE VARIABLE pdfop AS COM-HANDLE NO-UNDO.
CREATE "PDFCreator.clsPDFCreator" pdf NO-ERROR.
CREATE "PDFCreator.PDFCreatorOptions" pdfop NO-ERROR.

/*configuração do PDFCreator*/
PDF:cStart(,).
ASSIGN
pdfop = PDF:cOptions
PDFop:AutosaveDirectory = "c:\temp\"
PDFop:AutosaveFilename = "testando.pdf"
PDFop:UseAutosave = 1
PDFop:UseAutosaveDirectory = 1
PDFop:AutosaveFormat = 0
PDF:cOptions = PDFop
PDF:cDefaultPrinter = "PDFCreator"
PDF:cPrinterStop = TRUE.


PDF:cPrintFile ('c:\temp\arquivo1.pdf').


PDF:cPrintFile ('c:\temp\arquivo2.pdf').

PDF:cCombineAll ().

PDF:cPrinterStop = FALSE.

/*comando para imprimir*/

/*é possível imprimir do Excel, Word, etc.
basta substituir a linha acima pelo comando
de impressão desejado */

/*encerrar processo*/
PDF:cClose.
RELEASE OBJECT pdf.
RELEASE OBJECT pdfop.
DOS Silent VALUE("taskkill /F /IM PDFCreator.exe /T").

Bom dia ,

Baixei o programa PDFTK e stou tentando utuliza-lo . Diretamente pelo DOS funcionou perfeitamente usando os comando necessários para a união dos arquivos pdf

Já via comandos progress apresentou os seguintes erros: "Error: Unable to find file" "Error: Failed to open PDF file:" "Done. Input errors, so no outout created"

Alguém sabe o que pode estar ocorrendo ?? Abaixo o codigo que estou usando



DEFINE VARIABLE c-arquivo AS CHARACTER NO-UNDO.
DEFINE VARIABLE cCommandline AS CHARACTER NO-UNDO.

ASSIGN c-arquivo = 'c:/temp/teste.bat'.

ASSIGN cCommandline = "pdftk 123.pdf 222.pdf cat output teste.pdf".

OUTPUT TO value(c-arquivo).

PUT 'c:' SKIP.
PUT 'cd temp/teste2' SKIP. /* Diretorio dos arquivos PDF */
PUT cCommandline. /* Comando Uniao de arquivos */

OUTPUT CLOSE.


OS-COMMAND VALUE(c-arquivo).

Funcionou , verifiquei que faltava um FORMAT na linha de comando . Com isso resolveu o problema !!

Agradeço aos colegas pela ajuda e pelas dicas !!! Muito obrigado !!