chamar report no 9i

Dicas e truques sobre Oracle Reports Builder - modo gráfico ou modo caractere, ascii, arquivo .PRT, etc
Responder
JLM
Rank: Estagiário Sênior
Rank: Estagiário Sênior
Mensagens: 11
Registrado em: Ter, 23 Mar 2010 5:15 pm
Localização: Araraquara-SP

tenho a seguinte procedure no meu forms para executar o report e exibir resultado no browser, porém não estou conseguindo executar pois para erro FRM-41219 na linha report_id := Find_Report_Object('XXX'), alguém pode me dar alguma dica :
versão bd Oracle: 9.2.0.7.0 64 bits
versão forms : 9.0.2.9.0 32 bits

Selecionar tudo

PROCEDURE REPORT_WEB IS
    report_id						Report_Object;
    report_job_id				VARCHAR2(200);
    rep_status          VARCHAR2(200);
    vcfile							VARCHAR2(255);
    
  BEGIN
  	VCFILE := 'XXX.pdf';
  	report_id := Find_Report_Object('XXX');
    SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_EXECUTION_MODE,BATCH);
    SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESTYPE,Screen);
    SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESFORMAT,'pdf');
    set_report_object_property(report_id,REPORT_DESNAME,vcfile);
    set_report_object_property(report_id,REPORT_SERVER,'Rep60verdi');
    SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_COMM_MODE,SYNCHRONOUS); 


    set_report_object_property(report_id,REPORT_OTHER,'P_CODEMP' || TO_CHAR(:B1.CODEMP)  ||
                                                      ' P_CODFUN' || TO_CHAR(:B1.CODFUN)  ||
                                                      ' P_SEQDEP' || TO_CHAR(:B1.SEQDEP)  ||
                                                      ' P_CODEVE' || TO_CHAR(:B1.F_CODEVE)||
                                                      ' PARAMFORM=no');
                                                      
    report_job_id := RUN_REPORT_OBJECT(report_id);
    rep_status := REPORT_OBJECT_STATUS(report_job_id);
    
    WHILE rep_status in ('RUNNING','OPENING_REPORT','ENQUEUED') LOOP
          rep_status := REPORT_OBJECT_STATUS(report_job_id);
    END LOOP;

    IF rep_status='FINISHED' THEN
       web.SHow_document('http://9107-inf.lupocorp.com:8888/webcache/'||vcfile,'_blank');
    ELSE
       message ('Ocorreu o erro '|| rep_status);
    END IF;
  END;
grato
:(
debby_acacio
Rank: Programador Sênior
Rank: Programador Sênior
Mensagens: 51
Registrado em: Ter, 22 Jan 2008 11:38 am
Localização: Salvador - BA
Contato:

Olá...

Comigo estava acontecendo a mesma coisa e aqui fiquei sabendo que você tem que atachar o report no object navigator.

Depois que atachei funcinou.

Sds

Debby
JLM
Rank: Estagiário Sênior
Rank: Estagiário Sênior
Mensagens: 11
Registrado em: Ter, 23 Mar 2010 5:15 pm
Localização: Araraquara-SP

grato pela dica, estarei testando ...
Responder
  • Informação
  • Quem está online

    Usuários navegando neste fórum: Nenhum usuário registrado e 6 visitantes