How to write this procedure

Question

hi,
i want to create a procedure,which can create view when it works.i do it
as follow,but it shows 'compile errors',what's the matter,could someone
help me?
create or replace procedure p_mc_view
(n in varchar) is
begin
n:=edit1.text;
create view view_1 as select mc_name,provider,per_cost from material_tie
where mc_id in (select mc_id from material_cost where mc_type=n);
alter view view_1 add column cost as select cost(mc_number*mc_cost) from
material_cost where mc_type=n;
ADOTable1.tablename:='view_1';
ADOTable1.active:='true';
end;
here edit1.text is a component of my interface programe.
ribok
thanks!

Answer 1

hi
Jameel you made one mistake IN mode parameter cannot be assigned a value.
SQL> create or replace procedure p_mc_view (n in varchar2) as
  2  begin
  3  n:=edit1.text;
  4  execute immediate 'create view view_1 as select
  5  mc_name,provider,per_cost from material_tie where mc_id in (select mc_id
  6  from material_cost where mc_type='|| n ||')';
  7  execute immediate 'alter view view_1 add cost number as select cost(mc_number*mc_cost) from
  8  material_cost where mc_type='||n ;
  9  end;
10  .
SQL> /
Warning: Procedure created with compilation errors.
SQL> show error
Errors for PROCEDURE P_MC_VIEW:
LINE/COL ERROR
3/1      PLS-00363: expression 'N' cannot be used as an assignment target
3/1      PL/SQL: Statement ignored
SQL> create or replace procedure p_mc_view (n in varchar2) as
  2  begin
  3  --n:=edit1.text;
  4  execute immediate 'create view view_1 as select
  5  mc_name,provider,per_cost from material_tie where mc_id in (select mc_id
  6  from material_cost where mc_type='|| n ||')';
  7  execute immediate 'alter view view_1 add cost number as select cost(mc_number*mc_cost) from
  8  material_cost where mc_type='||n ;
  9  end;
10  .
SQL> /
Procedure created.
Khurram Siddiqui
[email protected]