How to convert my query to SQL Procedure

Question

Hi all,
I am running an SQL Query in my page process to set few items on my page.
begin
declare
l_vc_arr2 APEX_APPLICATION_GLOBAL.VC_ARR2;
begin
IF APEX_APPLICATION.G_F01.COUNT = 0 THEN
RAISE_APPLICATION_ERROR(-20001, 'Please select a email template to edit!!!');
END IF;
IF APEX_APPLICATION.G_F01.COUNT > 1 THEN
RAISE_APPLICATION_ERROR(-20001, 'Please select a single email template to edit at a time!!!');
END IF;
FOR i in 1..APEX_APPLICATION.G_F01.count
LOOP
l_vc_arr2 := APEX_UTIL.STRING_TO_TABLE(APEX_APPLICATION.G_F01(i),'$');
:P32_SUBJECT := l_vc_arr2(1);
:P32_TYPE := l_vc_arr2(2);
:P32_BODY := l_vc_arr2(3);
END LOOP;
end;
end;
It is running perfectly fine. Now i want to convert this query into custom procedure. I am writing follwing code to create SQL Procedure,
create or replace
procedure Edit_EmailTemplate as
begin
declare
l_vc_arr2 APEX_APPLICATION_GLOBAL.VC_ARR2;
begin
IF APEX_APPLICATION.G_F01.COUNT = 0 THEN
RAISE_APPLICATION_ERROR(-20001, 'Please select a email template to edit!!!');
END IF;
IF APEX_APPLICATION.G_F01.COUNT > 1 THEN
RAISE_APPLICATION_ERROR(-20001, 'Please select a single email template to edit at a time!!!');
END IF;
FOR i in 1..APEX_APPLICATION.G_F01.count
LOOP
l_vc_arr2 := APEX_UTIL.STRING_TO_TABLE(APEX_APPLICATION.G_F01(i),'$');
v(P32_SUBJECT) := l_vc_arr2(1);
v(P32_TYPE) := l_vc_arr2(2);
v(P32_BODY) := l_vc_arr2(3);
END LOOP;
end;
end;
but it is not getting compiled. Do anyone know what the problem is???
With Regards,
Sunil Bhatia

Answer 1

hey thanks,
but my problem is not of creating,
it has been created and i can see it in sql browser. but it is not getting compiled
it is returning with the following error
Compilation failed,line 18 (13:22:08)
PLS-00306: wrong number or types of arguments in call to 'V'Compilation failed,line 18 (13:22:08)
PL/SQL: Statement ignoredCompilation failed,line 19 (13:22:08)
PLS-00306: wrong number or types of arguments in call to 'V'Compilation failed,line 19 (13:22:08)
PL/SQL: Statement ignoredCompilation failed,line 20 (13:22:08)
PLS-00306: wrong number or types of arguments in call to 'V'Compilation failed,line 20 (13:22:08)
PL/SQL: Statement ignored
my statement is
create or replace
procedure Edit_EmailTemplate as
begin
declare
l_vc_arr2 APEX_APPLICATION_GLOBAL.VC_ARR2;
begin
IF APEX_APPLICATION.G_F01.COUNT = 0 THEN
RAISE_APPLICATION_ERROR(-20001, 'Please select a email template to edit!!!');
END IF;
IF APEX_APPLICATION.G_F01.COUNT > 1 THEN
RAISE_APPLICATION_ERROR(-20001, 'Please select a single email template to edit at a time!!!');
END IF;
FOR i in 1..APEX_APPLICATION.G_F01.count
LOOP
l_vc_arr2 := APEX_UTIL.STRING_TO_TABLE(APEX_APPLICATION.G_F01(i),'$');
v('P32_SUBJECT') := l_vc_arr2(1);
v('P32_TYPE') := l_vc_arr2(2);
v('P32_BODY') := l_vc_arr2(3);
END LOOP;
end;
end;