Re: PASS PARAMETER from form to report

From: Dagoberto Navea Alfaro <dago_at_cec.unap.cl>
Date: Thu, 24 Aug 2000 11:21:47 -0300
Message-ID: <8o3e0d$t3r$1_at_manutara.inf.utfsm.cl>

Define Parameter List
Example
in trigger When-Buttom-pressed

declare

       lv_count number(9);
       list_id Paramlist;

begin

           list_id:=Get_Parameter_List('f_emibol'); -- Get name list parameter

           if NOT id_null(list_id) then
              Destroy_Parameter_LIst('f_emibol'); -- when data in list then
detroy this
           end if;
          list_id:=create_parameter_list('f_emibol');  -- create param list

-- add parameter Warning : Names equal to report

Add_parameter(list_id,'anho',text_parameter,to_char(:aceptante.anhoproc));

Add_parameter(list_id,'seme',text_parameter,to_char(:aceptante.semestre));

Add_parameter(list_id,'nrut',text_parameter,to_char(:aceptante.knumemat));

Add_parameter(list_id,'carr',text_parameter,to_char(:aceptante.kcodcarr));

Add_parameter(list_id,'fech',text_parameter,to_char(:aceptante.fechaemi,'DD/ MM/YYYY'));

• call report run_product(REPORTS,'c:sicca\Letras\rw\c_letraemi',SYNCHRONOUS,RUNTIME,FILES YSTEM,list_id,NULL);

end;
bye

--
        Dagoberto Navea Alfaro
Ingeniero en Computación e Informática
          Analista de Sistemas
Unidad de Informática y Comunicaciones
          Universidad Arturo Prat
I               quique - Chile
"Solo pido a Dios fortaleza para cambiar las cosas
  que puedo, resignación para aquellas que no puedo
  y sabiduria para diferenciarlas"

peter escribió en mensaje <8n5mgg$k22_at_netnews.hinet.net>...


>hi..

>       I wnat to pass a parameter from form to report..

>      I set query of my report  as following...


>

>     SELECT A , B  FROM T_AVC

>    WHERE  CUST_NAME IN ( &A)......

>     I WISH A COULD BE "     'CUST1','CUST2'      "

>    SO..  IN FORM ,I SET  the parameter like this....

>  A:=CHR(39)||CUST1||CHR(39)|| ' , '||CHR(39)||CUST2||CHR(39)

>BUT THERE COMES AN ERROR" REPORT CANNT PARSE ......."

>HOW TO DO

>

>

>

Received on Thu Aug 24 2000 - 16:21:47 CEST