Geração de PDF travando

Olá pessoal, tudo bem?

Estou com um problema no emissor de pedidos de compras que desenvolvi, a opção de saída em PDF trava de vez em quando e não consigo localizar onde esta a falha. Quando trava, eu re-instalo o leitor de PDF Acrobat Reader e o programa volta a gerar normalmente mas, algum tempo depois trava novamente. E as vezes ele volta a funcionar sem que re-instale o leitor de PDF. Abaixo esta o pedaço do código que estou usando, seria um problema de segurança do PDF? Ou o problema esta no código do programa?

Podem me ajudar? Obrigado!

/* Envia email */
IF tt-param.l-email THEN
RUN pi-envia-email.
/* Imprime */

IF tt-param.cDestinoLayout = 'IMPRESSORA' THEN
OS-COMMAND SILENT START acrord32 /h /p VALUE(c-arq-pdf-server).
/*

/* Abre no Adobe */
IF tt-param.cDestinoLayout = 'VIDEO' THEN DO:
IF SEARCH (c-arq-pdf-local) <> ? THEN OS-DELETE VALUE(c-arq-pdf-local) NO-ERROR. /* Lucio 16/10/2008 */
OS-COPY VALUE(c-arq-pdf-server) VALUE(c-arq-pdf-local).
OS-DELETE VALUE(c-arq-pdf-server) NO-ERROR.
OS-COMMAND SILENT VALUE(c-arq-pdf-local) NO-ERROR.
END.
*/

/* Abre no Aplicativo Associado … ExtensÆo */
IF SEARCH (c-arq-pdf-local) <> ? THEN OS-DELETE VALUE(c-arq-pdf-local) NO-ERROR. /* Lucio 16/10/2008 */
OS-COPY VALUE(c-arq-pdf-server) VALUE(c-arq-pdf-local).
OS-DELETE VALUE(c-arq-pdf-server) NO-ERROR.
CREATE "Wscript.Shell":U objAppWScript.
objAppWScript:Run(QUOTER(c-arq-pdf-local)).
RELEASE OBJECT objAppWScript NO-ERROR.