Re: input parameters

[Antonio Guiza <aguiza@PCC.EDU>]

Lorraine, try this instead hope it helps.  -ag
Your code:
=========
'dbaprod.cid_eq_crct_cmplx_tb.ecc_desc like '|| '(%$eccname%)'
Proposed:
=========
'dbaprod.cid_eq_crct_cmplx_tb.ecc_desc like '||'(%'||$eccname||'%)'

At 04:36 PM 6/29/01 -0800, you wrote:
>I've made some modifications but I am getting the following error.
>thanks again,
>Lorraine
>
>(SQR 5528) ORACLE OPARSE error -911 in cursor 1:
>   ORA-00911: invalid character
>SQL:  select distinct dbaprod.cid_eq_crct_cmplx_tb.ecc_desc,
>      dbaprod.cid_eq_crct_cmplx_status_tb.ecc_stts_desc,
>      dbaprod.cid_eq_crct_cmplx_notes_tb.effctv_dt,
>      dbaprod.cid_eq_crct_cmplx_notes_tb.ecc_cmmnt  from
>      dbaprod.cid_eq_crct_cmplx_tb, dbaprod.cid_eq_crct_cmplx_status_tb,
>      dbaprod.cid_eq_crct_cmplx_notes_tb where
>      dbaprod.cid_eq_crct_cmplx_tb.ecc_id =
>      dbaprod.cid_eq_crct_cmplx_notes_tb.ecc_id and
>      dbaprod.cid_eq_crct_cmplx_notes_tb.effctv_dt >= :1 and
>      dbaprod.cid_eq_crct_cmplx_notes_tb.effctv_dt <= :2 and
>      dbaprod.cid_eq_crct_cmplx_tb.ecc_stts_cd =
>      dbaprod.cid_eq_crct_cmplx_status_tb.ecc_stts_cd and
>      dbaprod.cid_eq_crct_cmplx_tb.ecc_desc like (%$eccname%) order by
>      dbaprod.cid_eq_crct_cmplx_tb.ecc_desc asc
>Error at:  %$eccname%)
>
>Error on line 37:
>   (SQR 3722) Could not set up cursor.
>++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
>++++++++++++++++++++++++++++
>begin-program
>        input $eccname 'Enter CCE Name(press <Enter> to select all):'
>type=char
>                IF $eccname <> ''
>                        let $whereclause =
>'dbaprod.cid_eq_crct_cmplx_tb.ecc_desc like '|| '(%$eccname%)'
>                end-if
>        input $startdate 'Enter Start Date:(DD-MON-YYYY)' type=date
>format='DD-MON-YYYY'
>                let #diff =datediff (datenow (), $startdate, 'day')
>        input $enddate 'Enter End Date:(DD-MON-YYYY)' type=date
>format='DD-MON-YYYY'
>                let #diff =datediff (datenow (), $enddate, 'day')
>
>                do cce_memo
>end-program
>
>begin-procedure cce_memo
>begin-select distinct
>dbaprod.cid_eq_crct_cmplx_tb.ecc_desc !(+1,{c1},
>dbaprod.cid_eq_crct_cmplx_status_tb.ecc_stts_desc !(,{c2}) ,
>dbaprod.cid_eq_crct_cmplx_notes_tb.effctv_dt !(+1,{c3}),
>dbaprod.cid_eq_crct_cmplx_notes_tb.ecc_cmmnt !(,{c4})
>        from    dbaprod.cid_eq_crct_cmplx_tb,
>                        dbaprod.cid_eq_crct_cmplx_status_tb,
>                        dbaprod.cid_eq_crct_cmplx_notes_tb
>        where dbaprod.cid_eq_crct_cmplx_tb.ecc_id =
>dbaprod.cid_eq_crct_cmplx_notes_tb.ecc_id
>                and             dbaprod.cid_eq_crct_cmplx_notes_tb.effctv_dt
>>= $startdate
>                and     dbaprod.cid_eq_crct_cmplx_notes_tb.effctv_dt <=
>$enddate
>                and     dbaprod.cid_eq_crct_cmplx_tb.ecc_stts_cd =
>dbaprod.cid_eq_crct_cmplx_status_tb.ecc_stts_cd
>                and [$whereclause]
>order by dbaprod.cid_eq_crct_cmplx_tb.ecc_desc asc
>end-select
>end-procedure
>
>