Compile Error in D2K : function may not be used in SQL - help!

From: <yonglove_at_usa.net>
Date: 1998/06/30
Message-ID: <6nb89d$ete$1_at_nnrp1.dejanews.com>#1/1

I am using Oracle RDBMS 7.3 with Win95 D2K rel 2.0 and I know this *should* work but it does not. Any help would be greatly appreciated! Thanks!

Here is the function:

FUNCTION date_transform (v_chardate in CHAR) RETURN CHAR IS v_result VARCHAR2(10) ; BEGIN v_result := ( SUBSTR(v_chardate,5,2) || '/' || SUBSTR(v_chardate,7,2) || '/' || SUBSTR(v_chardate,1,4) ) ; if v_result = '//' then v_result := ' '; end if; RETURN v_result ; EXCEPTION WHEN OTHERS THEN RETURN '-1'; END; Here is the procedure which calls the function:

PROCEDURE lab_1 IS

BEGIN

• Lab Page #1

  select lb_lab_spec_1,
         lb_lab_spec_2,
         lb_lab_spec_3,
         lb_lab_spec_4,
         lb_lab_spec_5,
         lb_lab_spec_6,
         lb_lab_spec_7,
         lb_lab_spec_8,
         lb_lab_spec_9,
         lb_lab_spec_10,
         date_transform ( lb_lab_ymdbeg_1 ),
         date_transform ( lb_lab_ymdbeg_2 ),
         date_transform ( lb_lab_ymdbeg_3 ),
         date_transform ( lb_lab_ymdbeg_4 ),
         date_transform ( lb_lab_ymdbeg_5 ),
         date_transform ( lb_lab_ymdbeg_6 ),
         date_transform ( lb_lab_ymdbeg_7 ),
         date_transform ( lb_lab_ymdbeg_8 ),
         date_transform ( lb_lab_ymdbeg_9 ),
         date_transform ( lb_lab_ymdbeg_10),
         date_transform ( lb_lab_ymdend_1 ),
         date_transform ( lb_lab_ymdend_2 ),
         date_transform ( lb_lab_ymdend_3 ),
         date_transform ( lb_lab_ymdend_4 ),
         date_transform ( lb_lab_ymdend_5 ),
         date_transform ( lb_lab_ymdend_6 ),
         date_transform ( lb_lab_ymdend_7 ),
         date_transform ( lb_lab_ymdend_8 ),
         date_transform ( lb_lab_ymdend_9 ),
         date_transform ( lb_lab_ymdend_10)
    into :prov_mstr_file.p_lab_code_1,


         :prov_mstr_file.p_lab_code_2,

         :prov_mstr_file.p_lab_code_3,

         :prov_mstr_file.p_lab_code_4,

         :prov_mstr_file.p_lab_code_5,

         :prov_mstr_file.p_lab_code_6,

         :prov_mstr_file.p_lab_code_7,

         :prov_mstr_file.p_lab_code_8,

         :prov_mstr_file.p_lab_code_9,

         :prov_mstr_file.p_lab_code_10,

         :prov_mstr_file.p_lab_eff_1,

         :prov_mstr_file.p_lab_eff_2,

         :prov_mstr_file.p_lab_eff_3,

         :prov_mstr_file.p_lab_eff_4,

         :prov_mstr_file.p_lab_eff_5,

         :prov_mstr_file.p_lab_eff_6,

         :prov_mstr_file.p_lab_eff_7,

         :prov_mstr_file.p_lab_eff_8,

         :prov_mstr_file.p_lab_eff_9,

         :prov_mstr_file.p_lab_eff_10,

         :prov_mstr_file.p_lab_end_1,

         :prov_mstr_file.p_lab_end_2,

         :prov_mstr_file.p_lab_end_3,

         :prov_mstr_file.p_lab_end_4,

         :prov_mstr_file.p_lab_end_5,

         :prov_mstr_file.p_lab_end_6,

         :prov_mstr_file.p_lab_end_7,

         :prov_mstr_file.p_lab_end_8,

         :prov_mstr_file.p_lab_end_9,


         :prov_mstr_file.p_lab_end_10

    from PMFDB.lab_spec_at_GTW
    where lab_spec.PROV# = :PROV_MSTR_FILE.PROV#;

EXCEPTION
   WHEN NO_DATA_FOUND THEN
      null;

END; -----== Posted via Deja News, The Leader in Internet Discussion ==----- http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum Received on Tue Jun 30 1998 - 00:00:00 CEST