SALVAR REPORTS EM DIRETÓRIO

[rcd_tech@hotmail.com]

Boa Tarde pessoal,

Gostaria da ajuda de vocês se possível.

Preciso gerar o meu reports em PDF e salva-lo em um diretório pré-determinado, preciso que o usuário clique no botão na tela chamado "Gerar PDF" e ele gere e salve no diretório que eu definir, não precisa nem abrir o relatório para visualização, preciso somente que o Reports gere em PDF e salve em um diretório.

Se puderem ajudar eu agradeço, um grande abraço.

att,
Ricardo Miranda

[rcd_tech@hotmail.com]

Detalhe importante: Forms e Reports versão 6I DESKTOP rodando em Windows.

[JLMANA]

vê se ajuda o codigo abaixo:

Selecionar tudo

PROCEDURE REPORT_GERA_PDF IS
PL_ID  	PARAMLIST;
BEGIN
  PL_ID := GET_PARAMETER_LIST('TMPDATA');
  IF NOT ID_NULL(PL_ID) THEN 
     DESTROY_PARAMETER_LIST(PL_ID);
  END IF;
  PL_ID := CREATE_PARAMETER_LIST('TMPDATA');
  SYNCHRONIZE;
  PL_ID := GET_PARAMETER_LIST('TMPDATA');
  IF NOT ID_NULL(PL_ID) THEN 
     DESTROY_PARAMETER_LIST(PL_ID);
  END IF;
  PL_ID := CREATE_PARAMETER_LIST('TMPDATA');
  ADD_PARAMETER(PL_ID,'PARAMFORM',TEXT_PARAMETER,'No'); 
  ADD_PARAMETER(PL_ID,'DESTYPE',TEXT_PARAMETER,'File');
  ADD_PARAMETER(PL_ID,'DESFORMAT',TEXT_PARAMETER,'pdf');
  ADD_PARAMETER(PL_ID,'P_DATINI',TEXT_PARAMETER,TO_CHAR(:B1.F_DATINI,'DDMMYYYY'));
  ADD_PARAMETER(PL_ID,'P_DATFIN',TEXT_PARAMETER,TO_CHAR(:B1.F_DATFIM,'DDMMYYYY'));
  ADD_PARAMETER(PL_ID,'DESNAME',TEXT_PARAMETER,'\\diretorio_gravar_pdf\nome_report.pdf'); 
  RUN_PRODUCT(REPORTS,'nome_report', synchronous, runtime, filesystem,PL_ID,NULL);
END;

[rcd_tech@hotmail.com]

Legal ,
Como faço para mandar imprimir esse PDF que esta em um diretório?
Será que da para fazer via comando HOST ?
A impressora esta na rede, mapeada como impressora padrão.

Obrigado.