Associative Array error
I am using a couple associative arrays in my code and comparing the data in one, and if it is an asterisk, I change it to use the data in the other. Here is the meat of my code. I am running into an error at the bolded line saying I have too many values, which I don't understand because the code is the exact same as the block of code right before it where I populate the first array. FYI, the table it is pulling from only has one row. The error is listed below the code.
Code
DECLARE
TYPE refresh_file_t IS TABLE OF test.loading_dock%ROWTYPE ;
refresh_data refresh_file_t ;
prospect_data refresh_file_t ;
TYPE CV_TYPE IS REF CURSOR ;
c_id CV_TYPE ;
v_id NUMBER(10) ;
v_phone VARCHAR2(10) ;
v_project VARCHAR2(10) ;
BEGIN
OPEN c_id FOR
'SELECT id
FROM test.loading_dock
WHERE rownum = 1' ;
LOOP
FETCH c_id INTO v_id ;
EXIT WHEN c_id%NOTFOUND ;
SELECT * BULK COLLECT
INTO refresh_data
FROM test.loading_dock
WHERE id = v_id ;
SELECT * BULK COLLECT
INTO prospect_data
FROM test.prospects
WHERE id_number = v_id ;
IF refresh_data(1).home_phone = '*' THEN
v_phone := prospect_data(1).phone ;
ELSE
v_phone := refresh_data(1).home_phone ;
END IF ;
DBMS_OUTPUT.PUT_LINE(v_phone) ;
END LOOP ;
CLOSE c_id ;
END ;
Error
ORA-06550: line 29, column 13:
PL/SQL: ORA-00913: too many values
ORA-06550: line 27, column 13:
PL/SQL: SQL Statement ignored
ORA-06550: line 34, column 46:
PLS-00302: component 'PHONE' must be declared
ORA-06550: line 34, column 13:
PL/SQL: Statement ignored
06550. 00000 - "line %s, column %s:\n%s"
Collection prospect_data is of type refresh_file_t, which is a table of records of test.loading_dock%TYPE. Most likely tables test.loading_dock and test.prospects have different structure - test.prospects has fewer columns. So when you try to fetch from test.prospects into prospect_data you get the error Try replacing
prospect_data refresh_file_t ;with
TYPE prospect_data_t IS TABLE OF test.prospects%ROWTYPE ;
prospect_data prospect_data_t ;SY.
Similar Messages
-
Associative array two variable comparison :update table error
Hi,
i am using associative array to update the version number of table
-i declare two associative array to compare the column from two table (temp,main tables)values in loop
-if id's of both variable(for temp and main table) are equal and column of either of table not matching then it should update the version no of temp table
-if id's not equal i.e record only exists temp table then update null version number annd increment it by 1
-following is the structure and procedure --it shows the matching and non matching records but for the update statement it not giving expected output i.e it updates all records irrespective of the condition provided
-i tried to put condition in update as well as in the if statement but it updates all record
....suggestion and help highly appreciate. thankx in advance !!!
/*--table structure and data--*/
CREATE TABLE "TEMP_TABLE"
( "ID" NUMBER NOT NULL ENABLE,
"COL1" VARCHAR2(20 BYTE),
"COL2" VARCHAR2(20 BYTE),
"VERSION" NUMBER
INSERT INTO TEMP_TABLE VALUES (101,'A','B',NULL);
INSERT INTO TEMP_TABLE VALUES (102,'x','y',NULL);
INSERT INTO TEMP_TABLE VALUES (103,'r','t',NULL);
CREATE TABLE "MAIN_TABLE"
( "ID" NUMBER NOT NULL ENABLE,
"COL1" VARCHAR2(20 BYTE),
"COL2" VARCHAR2(20 BYTE),
"VERSION" NUMBER
INSERT INTO MAIN_TABLE VALUES (101,'A','B',1);
/*------update version procedure----------*/
DECLARE
TYPE T_tmp_table IS TABLE OF tmp_table %ROWTYPE INDEX BY PLS_INTEGER;
TYPE T_main_table IS TABLE OF main_table%ROWTYPE INDEX BY PLS_INTEGER;
l_tmp_table T_tmp_table;
l_main_table T_main_table;
BEGIN
SELECT * BULK COLLECT INTO l_tmp_table FROM tmp_table;
SELECT * BULK COLLECT INTO l_main_table FROM main_table;
FOR i IN 1 .. l_tmp_table.count
LOOP
FOR j IN 1 .. l_main_table.count
LOOP
if(l_tmp_table(i).ID = l_main_table(j).ID AND l_tmp_table(i).VERSION IS NULL) then
---this first if loop updates temp table version irrespective of l_tmp_table.ID=l_main_table.ID orl_tmp_table. ID<>l_main_table.ID .it display proper matching and non-matching records.
dbms_output.put_line('matching ids from tmp and main are :'||l_tmp_table(i).ID||' '||l_main_table(j).ID);
UPDATE tmp_table SET VERSION = l_tmp_table(i).version +1;
--where l_tmp_table(i).ID = l_main_table(j).ID --
end if;
if (l_tmp_table(i).ID <> l_main_table(j).ID) then
dbms_output.put_line('non matching ids from tmp and main are :'||l_tmp_table(i).ID||' '||l_main_table(j).ID);
UPDATE tmp_table SET VERSION = l_tmp_table(i).version +1;
--where l_tmp_table(i).ID <> l_main_table(j).ID
end if;
END LOOP;
END LOOP;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('OTHER');
END;Hello user8937641
I think there is a problem with the logic of your SQL-Code.
But maybe in this formatted structure you can see where your problem is. -> I can not say it because I do not know what is the requirement.
I hope it helps...
/*------update version procedure----------*/
DECLARE
TYPE T_tmp_table IS TABLE OF tmp_table %ROWTYPE INDEX BY PLS_INTEGER;
TYPE T_main_table IS TABLE OF main_table%ROWTYPE INDEX BY PLS_INTEGER;
l_tmp_table T_tmp_table;
l_main_table T_main_table;
BEGIN
SELECT * BULK COLLECT INTO l_tmp_table FROM tmp_table;
SELECT * BULK COLLECT INTO l_main_table FROM main_table;
FOR i IN 1 .. l_tmp_table.count
LOOP
FOR j IN 1 .. l_main_table.count
LOOP
IF l_tmp_table(i).ID = l_main_table(j).ID
AND l_tmp_table(i).VERSION IS NULL
THEN
---this first if loop updates temp table version irrespective of l_tmp_table.ID=l_main_table.ID orl_tmp_table. ID<>l_main_table.ID .it display proper matching and non-matching records.
dbms_output.put_line('matching ids from tmp and main are :'||l_tmp_table(i).ID||' '||l_main_table(j).ID);
UPDATE tmp_table
SET version = l_tmp_table(i).version +1;
WHERE id = l_tmp_table(i).ID
END IF;
IF l_tmp_table(i).ID <> l_main_table(j).ID
THEN
dbms_output.put_line('non matching ids from tmp and main are :'||l_tmp_table(i).ID||' '||l_main_table(j).ID);
-- Maybe you do not need this update:
UPDATE tmp_table
SET version = l_tmp_table(i).version +1;
WHERE id = l_tmp_table(i).ID
END IF;
COMMIT;
END LOOP;
END LOOP;
EXCEPTION WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('Error at Executing the PLSQL-Block - ' || SQLERRM);
END; -
Error while assigning dates to associative array of date type
Hi All,
I am facing the issue while assigning dates to associative array of date type:
Oracle Version:
SQL> select * from v$version;
BANNER
Oracle Database 10g Enterprise Edition Release 10.2.0.1.0 - 64bi
PL/SQL Release 10.2.0.1.0 - Production
CORE 10.2.0.1.0 Production
TNS for Linux: Version 10.2.0.1.0 - Production
NLSRTL Version 10.2.0.1.0 - Production
Stored procedure i am trying to write is as following
create or replace procedure jp1 (
p_start_date date default trunc(sysdate,'MM')
, p_end_date date default trunc(sysdate)
is
l_no_of_days number;
type t_date_id is table of date
index by pls_integer;
l_date_id_arr t_date_id;
begin
l_no_of_days := p_end_date - p_start_date;
for i in 0
.. l_no_of_days - 1
loop
l_date_id_arr := p_start_date + i;
dbms_output.put_line(p_start_date + i);
end loop;
end;
I am getting error at line 14 while compiling this. and the error message is as following:
Errors for PROCEDURE JP1:
LINE/COL ERROR
14/5 PL/SQL: Statement ignored
14/22 PLS-00382: expression is of wrong type
So while investigating this i tried to output the value of (p_start_date + i) using dbms_output.put_line and the output is date itself.
create or replace procedure jp1 (
p_start_date date default trunc(sysdate,'MM')
, p_end_date date default trunc(sysdate)
is
l_no_of_days number;
type t_date_id is table of date
index by pls_integer;
l_date_id_arr t_date_id;
begin
l_no_of_days := p_end_date - p_start_date;
for i in 0 .. l_no_of_days-1
loop
--l_date_id_arr := p_start_date + i;
dbms_output.put_line(p_start_date + i);
end loop;
end;
output of the
exec jp1
is as following:
01-DEC-13
02-DEC-13
03-DEC-13
04-DEC-13
05-DEC-13
06-DEC-13
07-DEC-13
08-DEC-13
09-DEC-13
10-DEC-13
11-DEC-13
12-DEC-13
13-DEC-13
14-DEC-13
15-DEC-13
16-DEC-13
17-DEC-13
18-DEC-13
I see the output as date itself. so why it is throwing error while assigning the same to associative array of date type.
I tried to google also for the same but to no avail.
Any help in this regard is appreciated or any pointer some other thread on internet or in this forum.
Thanks in advance
Jagdeep SangwanRead about associative arrays :
create or replace procedure jp1 (
p_start_date date default trunc(sysdate,'MM')
, p_end_date date default trunc(sysdate)
) is
l_no_of_days number;
type t_date_id is table of date
index by pls_integer;
l_date_id_arr t_date_id;
begin
l_no_of_days := p_end_date - p_start_date;
for i in 0..l_no_of_days - 1
loop
l_date_id_arr(i) := p_start_date + i;
dbms_output.put_line(p_start_date + i);
end loop;
end;
Ramin Hashimzade -
Error in the pl/sql block using associative arrays
Hi
I tried the following block of code using associative arrays.
DECLARE
TYPE NumTab IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
CURSOR c1 IS SELECT empno FROM emp;
empnos NumTab;
rows NATURAL := 10;
BEGIN
OPEN c1;
FOR i in empnos.first..empnos.last LOOP
/* The following statement fetches 10 rows (or less). */
FETCH c1 BULK COLLECT INTO empnos LIMIT rows;
EXIT WHEN c1%NOTFOUND;
DBMS_OUTPUT.PUT_LINE ( empnos.next(i));
END LOOP;
CLOSE c1;
END;and the error is
DECLARE
ERROR at line 1:
ORA-06502: PL/SQL: numeric or value error
ORA-06512: at line 8could you please let me know where i'm wrong
and please guide me where we use these associative arrays.
ThanksSomething like this. Do minor modification in your code.
DECLARE
TYPE NumTab IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
CURSOR c1 IS SELECT empno FROM emp;
empnos NumTab;
rows NATURAL := 5;
BEGIN
OPEN c1;
LOOP
/* The following statement fetches 5 rows (or less). */
FETCH c1 BULK COLLECT INTO empnos LIMIT rows;
EXIT WHEN c1%NOTFOUND;
DBMS_OUTPUT.PUT_LINE ( empnos.count);
END LOOP;
CLOSE c1;
END;
/ -
Associative array related problem
Hi All,
When I am trying to use assotiative array in a select statement I recieve the following error:
ORA-06550: line 9, column 22:
PLS-00201: identifier 'COL1' must be declared
ORA-06550: line 9, column 22:
PLS-00201: identifier 'COL1' must be declared
ORA-06550: line 9, column 10:
PL/SQL: ORA-00904: : invalid identifier
ORA-06550: line 9, column 3:
PL/SQL: SQL Statement ignored
Here is the example
--create table MyTable (col1 varchar2(255), col2 varchar2(255))
declare
type m_ttMyTable
is table of MyTable%rowtype index by MyTable.col1%type;
m_tMyTable m_ttMyTable;
m_sCol2 varchar2(255);
begin
select m_tMyTable (col1).col2 /* works with ocntant: select m_tMyTable */('col1').col2
into m_sCol2
from MyTable
where rownum = 1;
end;
--drop table MyTableAny ideas how to workaround this?
ThanksThe only collection types SQL can query are ones defined in SQL using CREATE TYPE. That excludes associative arrays, as they are PL/SQL-only constructs. I'd recommend a nested table collection.
Some more suggestions:
www.williamrobertson.net/documents/collection-types.html -
Associative array EXISTS() DML
Is there a way to include the EXISTS() method of an associative array in a DML statement? For example:
This is fine...
SQL> declare
2 type distTblTyp is table of number index by varchar2(8);
3 testTbl distTblTyp; testVar varchar2(30);
4 begin
5 testTbl('a') := 1;
6 if (testTbl.exists('a')=true) then
7 null;
8 end if;
9* end;
SQL> /
PL/SQL procedure successfully completed.
But this fails...
SQL> declare
2 type distTblTyp is table of number index by varchar2(8);
3 testTbl distTblTyp; testVar varchar2(30);
4 begin
5 testTbl('a') := 1;
6 select decode(testTbl.exists('a'),true,'a','b')
7 into testVar from dual;
8* end;
SQL> /
select decode(testTbl.exists('a'),true,'a','b')
ERROR at line 6:
ORA-06550: line 6, column 24:
PL/SQL: ORA-01747: invalid user.table.column, table.column, or column
specification
ORA-06550: line 6, column 2:
PL/SQL: SQL Statement ignored
PL/SQL: SQL Statement ignored
Since I won't know which index elements exist until execution time, I want to have an insert statement (ran within a loop) with ~100 field values like:
insert into table [tablename]
values (
decode(testTbl.exists('a'), true, testTbl('a'), null),
decode(testTbl.exists('b'), true, testTbl('b'), null)
Any suggestions appreciated.As Gerd suggested...
SQL> create or replace package my_test_pk as
2 type my_type is table of number index by varchar2(2);
3 v_my_type my_type;
4 function ifExists(v_i varchar2) return number;
5 procedure runTest;
6 end;
7 /
Package created.
SQL> create or replace package body my_test_pk as
2 function ifExists(v_i varchar2) return number is
3 v_r number;
4 begin
5 v_r := 0;
6 if (v_my_type.exists(v_i)) then v_r := 1; end if;
7 return v_r;
8 end;
9
10 procedure runTest is
11 v_check varchar2(2);
12 begin
13 v_my_type('a') := 1;
14 select decode(ifExists('a'),1,'a',null) into v_check from dual;
15 dbms_output.put_line(v_check);
16 select decode(ifExists('b'),1,'b','N') into v_check from dual;
17 dbms_output.put_line(v_check);
18 end;
19 end;
20 /
Package body created.
SQL> exec my_test_pk.runtest;
a
N
PL/SQL procedure successfully completed.
SQL> -
Associative array comparison and INSERT upon IF condition
Hi Guys,
I have written this pl sql code to identify non existing sellers and insert their sales channel information into the dimension table (dimensional table update).
Somehow,......nothing is inserted and this script runs for 12 hours+ without any result. the sql autotrace shows no result and the explain plan (button on sql developer throws upon clicking "missing keyword". I have no
information what is going on/wrong. Does anyone spot an error?
UNDEFINE DimSales;
UNDEFINE FactTable;
DEFINE DimSales = 'testsales';
DEFINE FactTable = 'testfact';
DECLARE
v_SellerNo VarChar(9);
v_error_code T_ERRORS.v_error_code%TYPE;
v_error_message T_ERRORS.v_error_message%TYPE;
TYPE assoc_array_str_type1 IS TABLE OF VARCHAR2(32) INDEX BY PLS_INTEGER;
v1 assoc_array_str_type1;
TYPE assoc_array_str_type2 IS TABLE OF VARCHAR2(32) INDEX BY PLS_INTEGER;
v2 assoc_array_str_type2;
BEGIN
--Collect all distinct SellerNo into associative array (hash table)
select distinct SellerNo bulk collect into v1 from &FactTable;
select distinct seller_id bulk collect into v2 from &DimSales;
v_SellerNo := v1.first;
loop
exit when v1 is null;
--1 Check if v_SellerNo already exists in DIM_Sales (if NOT/FALSE, its a new seller and we can insert all records for that seller
if (v2.exists(v_SellerNo)=false) THEN
INSERT INTO &DimSales (K_Sales,REG,BVL,DS, VS,RS,GS,VK)
(SELECT DISTINCT trim(leading '0' from RS||GS) ,REG BVL,DS,VS,RS,GS,VK from &FactTable where SellerNo =v_SellerNo);
--ELSE
end if;
v_SellerNo := v1.next(v_SellerNo);
end loop;
EXCEPTION
WHEN OTHERS THEN
ROLLBACK;
--v_error_code := SQLCODE
--v_error_message := SQLERRM
--INSERT INTO t_errors VALUES ( v_error_code, v_error_message);
END;
---------------------------------------------------------------Distinct clause requires a sort. Sorts can be very expensive.
Bulk collects that are not constrained in fetch size, can potentially fetch millions of rows - requiring that data to be wholly read into server memory. I have seen how this can degrade performance so badly that the kernel reboots the server.
Using PL/SQL loops to process and insert/update/delete data is often problematic due to its row-by-row approach - also called slow-by-slow approach. It is far more scalable letting SQL do the "loop" processing, by using joins, sub-selects and so on.
Where the conditional processing is too complex for SQL to handle, then PL/SQL is obviously an alternative to use. Ideally one should process data sets as oppose to rows in PL//SQL. Reduce context switching by using bulk fetches and bulk binds.
But PL/SQL cannot execute in parallel as the SQL it fires off can. If after all the optimisation, the PL/SQL process still needs to hit a million rows to process, it will be slow irrespective of how optimal that PL/SQL approach and design - simply because of the number of rows and the processing overheads per row.
In that case, the PL/SQL code itself need to be parallelised. There are a number of ways to approach this problem - the typical one is to create unique and distinct ranges of rows to process, spawn multiple P/SQL processes, and provide each with a unique range of rows to process. In parallel.
So you need to look close at what you are trying to achieve, what the workloads are, and how to effectively decrease the workloads and increase the processing time of a workload.
For example - finding distinct column values. You can pay for that workload when wanting that distinct list. And each time afterward repeat that workload when wanting that distinct list. Or you can pay for that workload up-front with the DML that creates/updates those values - and use (for example) a materialised view to maintain a ready to use distinct list of values.
Same workload in essence - but paying once for it and up-front as oppose to each time you execute your code that needs to dynamically build that distinct list.
Kent Crotty did tests and showed stunning performance improvements with bulk collect and forall, up to 30x faster:Bulk processing is not a magical silver bullet. It is a tool. And when correctly use, the tool does exactly what it was designed to do.
The problem is using a hammer to drive in screws - instead of a screwdriver. There's nothing "stunning" about using a screwdriver. It is all about using the correct tool.
If the goal of the swap daemon is to free up "idle" chunks of memory, and try to use that memory for things like file cache instead, what does that have to do with bulk processing?The swap daemon reads virtual memory pages from swap space into memory, and writes virtual pages from memory to swap space.
What does it have to do with bulk processing? A bulk fetch reads data from the SGA (buffer cache) into the PGA (private process memory space). The larget the fetch, the more memory is required. If for example 50% of server memory is required for a bulk collection that is 2GB in size, then that will force in-use pages from memory to swap space.. only to be swapped back again as it is needed, thereby forcing other in-use pages to swap. The swap daemon will consume almost all the CPU time swapping hot pages continually in and out of memory. -
Associative Array with subsripts(Index) as Varchar2
Hi All,
I m using Oracle Version 10.1.0.2.0 - Production
I have the following requirement:
The Associative array which holds the value with the subscripts(Index) as database table column.
Create table Period_master
Period_code_c Varchar2(10),
Period_frm_dt Date,
Period_to_dt Date,
Year_code_c Varchar2(10)
Insert into period_master values ('10',to_date('01/01/2012','dd/mm/rrrr'),to_date('31/01/2012','dd/mm/rrrr'),'2011-2012');
Insert into period_master Values ('11',to_date('01/02/2012','dd/mm/rrrr'),to_date('29/02/2012','dd/mm/rrrr'),'2011-2012');
Insert into period_master Values ('12',to_date('01/03/2012','dd/mm/rrrr'),to_date('31/03/2012','dd/mm/rrrr'),'2011-2012');
Insert into period_master Values ('13',to_date('01/04/2012','dd/mm/rrrr'),to_date('30/04/2012','dd/mm/rrrr'),'2012-2013');
Insert into period_master Values ('14',to_date('01/05/2012','dd/mm/rrrr'),to_date('31/05/2012','dd/mm/rrrr'),'2012-2013');
Commit;
SQL > Select * from Period_Master;
Period_code --- Period_frm_dt --- Period_to_dt ---- Year_code_c
10 --- 01/01/2012 --- 31/01/2012 --- 2011-2012
11 --- 01/02/2012 --- 29/02/2012 --- 2011-2012
12 --- 01/03/2012 --- 31/03/2012 --- 2011-2012
13 --- 01/04/2012 --- 30/04/2012 --- 2012-2013
14 --- 01/05/2012 --- 31/05/2012 --- 2012-2013
My Requirement is get the Period_frm_dt,period_end_dt and yearcode based on period_code (which is input parameters from my procedure) by using Collections.
I have to create one PLSQL table type which having the subscripts(Index) as period_code which is Varchar2 type;
I have written follwing code ,but it's not giving the desired output:
Declare
iv_period Varchar2(10);
Cursor cur_prd(cp_period Varchar2) is select * from Period_Master Where Period_code_c = cp_period;
TYPE PRD_REC_TY IS TABLE OF cur_prd%ROWTYPE INDEX BY PLS_INTEGER;
lv_prd_data prd_rec_ty;
lv_prd PERIOD_MASTER.period_code_c%TYPE ;
lv_frm_dt PERIOD_MASTER.Period_frm_dt%TYPE ;
lv_to_dt PERIOD_MASTER.Period_to_dt%TYPE ;
lv_yr_code PERIOD_MASTER.Year_code_c%TYPE ;
Begin
iv_period := :period;
Open Cur_prd(iv_period);
Loop
Fetch cur_prd BULK COLLECT into lv_prd_data;
EXIT WHEN cur_prd%NOTFOUND;
End Loop;
Close Cur_Prd;
If lv_prd_data.COUNT > 0 THEN
For i IN lv_prd_data.FIRST .. lv_prd_data.LAST
LOOP
lv_prd := lv_prd_data(i).pERIOD_cODE_C;
lv_frm_dt := lv_prd_data(i).Period_frm_dt;
lv_to_dt := lv_prd_data(i).Period_to_dt;
lv_yr_code := lv_prd_data(i).Year_Code_c;
Dbms_output.Put_line('For Period code : '||lv_prd||' the Year code is : '||lv_yr_code);
Dbms_output.Put_line('For Period code : '||lv_prd||' the Period_from_dt is : '||lv_frm_dt);
Dbms_output.Put_line('For Period code : '||lv_prd||' the Period_to_dt is : '||lv_to_dt);
END LOOP;
End if;
Exception
When Others Then
Dbms_output.Put_line('Here Error Found: '||SQLERRM);
End;
But My requirement is to get the FRM_DT,TO_DT and YEAR CODE as per the following:
For Period Code :*11* -- the YearCode is --- *2011-2012*
For Period Code :*11* -- the From Dt is --- *01/02/2012*
For Period Code :*11* -- the To Dt is --- *29/02/2012*
for Period Code : *14* -- the Yearcode is --- *2012-2013*
For Period Code : *14* -- the From Dt is --- *01/05/2012*
For Period Code : *14* -- the To Dt is --- *31/05/2012*
So on...
Like:
lv_yr_code := lv_period_data(iv_period).Year_code_c;
lv_frm_dt := lv_period_data(iv_period).Period_frm_dt;
lv_to_dt := lv_period_data(iv_period).Period_to_dt;
Dbms_output.Put_line('For Period code : '||iv_period||' the Year code is : '||lv_yr_code);
Dbms_output.Put_line('For Period code : '||iv_period||' the Period_from_dt is : '||lv_frm_dt);
Dbms_output.Put_line('For Period code : '||iv_period||' the Period_to_dt is : '||lv_to_dt);
How do i resolve the above scenario.Please help me to resove the above scenario.
Regards,
PrasantaHi, Pransanta,
Prasanta wrote:
... My Requirement is get the Period_frm_dt,period_end_dt and yearcode based on period_code (which is input parameters from my procedure) by using Collections.Sorry, I don't understand.
What is the porocedure you mentioned? Do you mean the anonymous block that you posted? If not, post the procedure. How is it related to the anonymous block? E.g., does the anonymous block need to call the procedure?
I have to create one PLSQL table type which having the subscripts(Index) as period_code which is Varchar2 type;
I have written follwing code ,but it's not giving the desired output:
Declare
iv_period Varchar2(10);Please format your code, and use \ tags to keep the formatting when you post it on this site.
See the forum FAQ {message:id=9360002}
Cursor cur_prd(cp_period Varchar2) is select * from Period_Master Where Period_code_c = cp_period;You're only looking for a single given period_code_c. If you want to get all rows, lose the WHERE clause. If you want to multiple rows, but not all rows, then use an appropriate WHERE clause.
TYPE PRD_REC_TY IS TABLE OF cur_prd%ROWTYPE INDEX BY PLS_INTEGER;
lv_prd_data prd_rec_ty;
lv_prd PERIOD_MASTER.period_code_c%TYPE ;
lv_frm_dt PERIOD_MASTER.Period_frm_dt%TYPE ;
lv_to_dt PERIOD_MASTER.Period_to_dt%TYPE ;
lv_yr_code PERIOD_MASTER.Year_code_c%TYPE ;
Begin
iv_period := :period;Post the code that declares and sets :period.
Open Cur_prd(iv_period);
Loop
Fetch cur_prd BULK COLLECT into lv_prd_data;
EXIT WHEN cur_prd%NOTFOUND;
End Loop;
Close Cur_Prd;
If lv_prd_data.COUNT > 0 THEN
For i IN lv_prd_data.FIRST .. lv_prd_data.LAST
LOOP
lv_prd := lv_prd_data(i).pERIOD_cODE_C;
lv_frm_dt := lv_prd_data(i).Period_frm_dt;
lv_to_dt := lv_prd_data(i).Period_to_dt;
lv_yr_code := lv_prd_data(i).Year_Code_c;If the block is just supposed to do what it's doing now; then you don't need all these local variables. It's simpler just to teference lv_prd_data.
If you're planning to add some other code to the block later, then the local variables could be useful.
Dbms_output.Put_line('For Period code : '||lv_prd||' the Year code is : '||lv_yr_code);
Dbms_output.Put_line('For Period code : '||lv_prd||' the Period_from_dt is : '||lv_frm_dt);
Dbms_output.Put_line('For Period code : '||lv_prd||' the Period_to_dt is : '||lv_to_dt);
END LOOP;
End if;
Exception
When Others Then
Dbms_output.Put_line('Here Error Found: '||SQLERRM);Only use an EXCEPTION section when you need to. The EXCEPTION section above is only hiding some information about the error.
End;
But My requirement is to get the FRM_DT,TO_DT and YEAR CODE as per the following:
For Period Code :*11* -- the YearCode is --- *2011-2012*
For Period Code :*11* -- the From Dt is --- *01/02/2012*
For Period Code :*11* -- the To Dt is --- *29/02/2012*
for Period Code : *14* -- the Yearcode is --- *2012-2013*
For Period Code : *14* -- the From Dt is --- *01/05/2012*
For Period Code : *14* -- the To Dt is --- *31/05/2012*
So on...
Like:
lv_yr_code := lv_period_data(iv_period).Year_code_c;
lv_frm_dt := lv_period_data(iv_period).Period_frm_dt;
lv_to_dt := lv_period_data(iv_period).Period_to_dt;
Dbms_output.Put_line('For Period code : '||iv_period||' the Year code is : '||lv_yr_code);
Dbms_output.Put_line('For Period code : '||iv_period||' the Period_from_dt is : '||lv_frm_dt);
Dbms_output.Put_line('For Period code : '||iv_period||' the Period_to_dt is : '||lv_to_dt);
How do i resolve the above scenario.Please help me to resove the above scenario.
Regards,
PrasantaIf the problem is that you need to show all period_code_cs, not just one, then you can do this:DECLARE
CURSOR cur_prd
IS SELECT *
FROM period_master
ORDER BY period_code_c;
TYPE prd_rec_ty IS TABLE OF cur_prd%ROWTYPE INDEX BY PLS_INTEGER;
lv_prd_data prd_rec_ty;
BEGIN
OPEN cur_prd;
FETCH cur_prd BULK COLLECT into lv_prd_data;
CLOSE cur_prd;
IF lv_prd_data.COUNT > 0
THEN
FOR i IN lv_prd_data.FIRST .. lv_prd_data.LAST
LOOP
dbms_output.put_line ( 'For Period code : '
|| lv_prd_data(i).period_code_c
|| ' the Year code is : '
|| lv_prd_data(i).year_code_c
dbms_output.Put_line ( 'For Period code : '
|| lv_prd_data(i).period_code_c
|| ' the Period_from_dt is : '
|| lv_prd_data(i).period_frm_dt
dbms_output.put_line ( 'For Period code : '
|| lv_prd_data(i).period_code_c
|| ' the Period_to_dt is : '
|| lv_prd_data(i).period_to_dt
END LOOP;
END IF;
END; -
Returning collection-associative array from pl-sql procedure
CREATE OR REPLACE procedure test_ganesh( p_deptno IN number,gana out PARTIES_RESULT)
is
query varchar2(200);
PARTY_ID varchar2(200);
PARTY_CODE varchar2(200);
PARTY_NAME varchar2(200);
PARTY_SEQ VARCHAR2(200);
counter number;
TYPE PARTIES IS TABLE OF varchar2(2000) index by binary_integer;
txn_parties PARTIES;
type PARTIES_RESULT IS TABLE OF PARTIES index by binary_integer;
total_result PARTIES_RESULT;
TYPE EmpTyp IS REF CURSOR;
p_du EmpTyp;
p_cursor EmpTyp;
global_counter number;
begin
global_counter:=1;
counter:=1;
open p_cursor FOR
select A.ref_no
from ot_lc_txn_details A
where rownum <12;
LOOP
FETCH p_cursor INTO query;
EXIT WHEN p_cursor%NOTFOUND;
counter:=1;
open p_du FOR
select party_id,party_code,seq_no,party_name from ot_txn_party where ref_no=query;
LOOP
FETCH p_du INTO PARTY_ID,PARTY_CODE,PARTY_SEQ,PARTY_NAME;
EXIT WHEN p_du%NOTFOUND;
txn_parties(counter):=PARTY_ID || '&&&' || PARTY_CODE || '&&&'||PARTY_SEQ || '&&&' || PARTY_NAME;
counter:=counter+1;
END LOOP;
CLOSE p_du;
total_result(global_counter):=txn_parties;
global_counter:=global_counter+1;
END LOOP;
CLOSE p_cursor;
--open gana FOR SELECT * FROM table(cast(total_result as PARTIES_RESULT)) ;
end;
The error comes at line one, PLS-00905- object PARTIES_RESULT is invalid.
i have used the create type thing to create this type.
if i remove the out parameter it works, no compilation error.
Questions i) How to return the associative array as out parameter?
ii)Am i doing aynthing qrong here?
iii) Can i open a ref cursor to this associative array and then return that ref_cursor?
Please anyone reply back, Thanks in advance
Message was edited by:
user649602As an example:
SQL> create type PARTIES is table of varchar2(2000);
2 /
Type created.
SQL> create or replace procedure proc1(p_deptno number,gana out parties) as
2 begin
3 select ename
4 bulk collect into gana
5 from emp
6 where deptno = p_deptno;
7 end;
8 /
Procedure created. -
Associative Array problem in Oracle Procedure
Hi,
I've searched through the internet and this forum and haven't been able to resolve a problem using associative array values within an IN clause. Everything I've read states that I can't use the associative array directly in the SQL statement. I have to convert it to a table and then I can use it. Unfortunately, I'm receiving an "ORA-21700: object does not exist or is marked for delete" error when trying to access the table I've populated from the array. Please note that I have verified the table is actually being populated during the loop. I'm catching the error when referencing it in the SELECT statement.
I've declared the following in the ARCHIVE package specification:
TYPE RSType IS REF CURSOR;
TYPE integer_aat IS TABLE OF INTEGER INDEX BY PLS_INTEGER;
TYPE integer_table IS TABLE OF INTEGER;
The procedure is as follows:
PROCEDURE SEL_SEARCH_RESULTS (v_term IN VARCHAR2,
v_categories IN ARCHIVE.integer_aat,
rs OUT RSType)
AS
/* PURPOSE: Return Search Results for the Category and Keyword Provided
VARIABLES:
v_categories = Document Categories array
v_term = Keyword entered
rs = Result Set
tbl_cat ARCHIVE.integer_table := ARCHIVE.integer_table();
BEGIN
FOR i IN 1 .. v_categories.COUNT
LOOP
tbl_cat.EXTEND(1);
tbl_cat(i) := v_categories(i);
END LOOP;
OPEN rs FOR
SELECT A.ID,
B.CATEGORY,
A.FILENAME,
A.DISPLAY_NAME,
A.COMMENTS
FROM TBL_ARCHIVE_DOCUMENTS A,
TBL_ARCHIVE_DOC_CAT B,
TBL_ARCHIVE_DOC_KEYWORDS C
WHERE A.ID = B.ID
AND A.ID = C.ID
AND B.CATEGORY IN (SELECT * FROM TABLE(tbl_cat))
AND C.KEYWORD = v_term
ORDER BY A.ID;
END SEL_SEARCH_RESULTS;
Any help would be greatly appreciated and thanks in advance,
MattThank you for the quick response. I looked at the example you suggested and made the following changes. Now I'm receiving an "Invalid datatype" error on the "SELECT column_value FROM TABLE(CAST(tbl_cat AS tbl_integer))" statement. I must be missing something simple and I just can't put my finger on it.
PROCEDURE SEL_SEARCH_RESULTS (v_term IN VARCHAR2,
v_categories IN ARCHIVE.integer_aat,
rs OUT RSType)
AS
/* PURPOSE: Return Search Results for the Category and Keyword Provided
VARIABLES:
v_categories = Document Categories array entered
v_term = Keyword entered
rs = Result Set
TYPE tbl_integer IS TABLE OF INTEGER;
tbl_cat tbl_integer;
BEGIN
FOR i IN 1 .. v_categories.COUNT
LOOP
tbl_cat.EXTEND(1);
tbl_cat(i) := v_categories(i);
END LOOP;
OPEN rs FOR
SELECT A.ID,
B.CATEGORY,
A.FILENAME,
A.DISPLAY_NAME,
A.COMMENTS
FROM TBL_ARCHIVE_DOCUMENTS A,
TBL_ARCHIVE_DOC_CAT B,
TBL_ARCHIVE_DOC_KEYWORDS C
WHERE A.ID = B.ID
AND A.ID = C.ID
AND B.CATEGORY IN (SELECT column_value FROM TABLE(CAST(tbl_cat AS tbl_integer)))
AND C.KEYWORD = v_term
ORDER BY A.ID;
END SEL_SEARCH_RESULTS; -
How to call procedure in which one formal parameter is associative array ty
how to call procedure in which one formal parameter is associative array type,
pls explain with eg.>
above code work fine but when i use case then it give error like
i identifier should be declare
& my code is as
CASE v_array(i)
WHEN 'A' THEN
insert into di_ivpn_report (ID, test_name, table_name, status, entity, proposition)
values (v_att_id, v_att_name, 'DI_'||v_array(i)||'_REPORT'||'_'||v_att_id,
v_status, v_ent_name, v_array(i));
WHEN 'B' THEN
insert into di_mpls_report (ID, test_name, table_name, status, entity, proposition)
values (v_att_id, v_att_name, 'DI_'||v_array(i)||'_REPORT'||'_'||v_att_id,
v_status, v_ent_name, v_array(i));
END CASE;
>
Then you have to use ordinary loop
PROCEDURE insert_update_***_array (TRANID IN VARCHAR2, ATT_NAME IN VARCHAR2, ENT_NAME VARCHAR2, v_array IN ***_array)
IS
v_tranid VARCHAR2(1);
v_att_name VARCHAR2(100) := ATT_NAME;
v_ent_name VARCHAR2(100) := ENT_NAME;
v_att_id VARCHAR2(6);
v_ent_id NUMBER;
v_status VARCHAR2(20) DEFAULT 'INACTIVE';
I NUMBER;
BEGIN
i := v_array.first;
while i is not null loop
CASE v_array(i)
WHEN 'A' THEN
insert into di_ivpn_report (ID, test_name, table_name, status, entity, proposition)
values (v_att_id, v_att_name, 'DI_'||v_array(i)||'_REPORT'||'_'||v_att_id,
v_status, v_ent_name, v_array(i));
WHEN 'B' THEN
insert into di_mpls_report (ID, test_name, table_name, status, entity, proposition)
values (v_att_id, v_att_name, 'DI_'||v_array(i)||'_REPORT'||'_'||v_att_id,
v_status, v_ent_name, v_array(i));
END CASE;
i := v_array.next(i);
end loop;
end; -
Associative Array our only option?
Hello,
I'm having a problem accepting associative arrays as the only option I have for getting data from a stored procedure. I have a good reason for not wanting to use ref cursors as I am using the stored procedure to manipulate data which I in turn would like to pass back to VB through the stored procedure and would rather not have to insert he data into a table just to re-select it for a ref cursor.
My main concern is that with associative arrays I am expected to define the number of return results before I even generate the data. Also from what I can see I am required to set the data length for each and every item in said array one at a time. All this overhead seems like more work than what I would have to do to utilizer a reference cursor. Is there a right way to do this? I would really like to do the most straight forward way I can without the extra processing.Hi,
Here's a blog post of mine that illustrates using pipelined functions and PL/SQL to return results:
http://oradim.blogspot.com/2007/10/odpnet-tip-using-pipelined-functions.html
Not sure if that will be helpful in your case, but perhaps it might be a place to start anyway.
- Mark -
Associative Array (Object) problems
Here is the function i'm dealing with
i'm reading in a delimited string and using indexed arrays to
break them up and assign the keys and values to an associative
array in a loop.
i'm using variables in the loop and the array loads as
expected in the loop
but outside the loop, the only key is the variable name and
the value is undefined
this is true using dot or array notation, as well as literal
strings for the keys
any help is appreciated
watchSuspendData = function (id, oldval, newval):String {
//the incoming suspendData string is delimited by the
semicolon;
//newval is: firstValue=Yes;captivateKey=1
var listSuspendData:Array = newval.split(";"); // convert it
to a list of key/value pairs
if (listSuspendData.length > 0){
//line 123: listSuspendData.length is: 2
for (i=0; i < listSuspendData.length; i++){ //for each
key/value pair
var keyValArray:Array = new Array();
var myNameValue:String = listSuspendData
//line 127: listSuspendData is: firstValue=Yes
keyValArray = myNameValue.split("="); // split 'em on the
equal sign
var myKey:String = keyValArray[0];
var myVal:String = keyValArray[1];
//keyValArray[0] is: firstValue
//keyValArray[1] is: Yes
// store the key and the value in associative array
suspendDataArray.myKey = myVal;
trace("line 134: suspendDataArray is: " +
suspendDataArray.myKey);
// trace is line 134: suspendDataArray is: Yes on the first
pass and 1 on the second
//the below loop always returns one array key: myKey and the
value as undefined
for(x in suspendDataArray){
trace("x is: " + x); //x is: myKey
trace("the val is: " + suspendDataArray.x); //the val is:
undefined
} //end for
return newval;on lines 12-13 i assign the key=value pair to string
variables
then on lines 17-18 i assign those values to the associative
array using dot notation
the trace seems to work there
the problem is that when the procedure exits the for loop,
the associative array only has one key (myKey) and no value
(undefined)
all the documentation i've read shows using these types of
arrays with either non-quoted property names like:
myAssocArray.myKey = "somevalue";
or
myAssocArray[myKey] = "somevalue";
i tried assigning the key/value pairs directly from the
indexed arrays, but the result was always undefined
like this:
suspendDataArray.keyValArray[0] = keyValArray[1]
or
suspendDataArray[keyValArray[0]] = keyValArray[1]
i even tried building a string in the loop and trying to
assign all the pairs at once using the curly brace
this is pretty wierd behavior for actionscript or i'm missing
something basic here
thanks for looking -
Hi All,
I've searched through this forum trying to find information I'm needing on associative arrays with a varchar2 index without luck. What I'm looking for is a way to get the index or "key" values of the array without knowing what they are. Meaning, I wouldn't have to know the index value when designing the array but would be able to utilize them values at runtime. For those familiar with Java it would be like calling the keySet() method from a Map object.
So, if I have an array of TYPE COLUMN_ARRAY IS TABLE OF VARCHAR2(4000) INDEX BY VARCHAR2(100) is there any way to dynamically get the index values without knowing what they are?
Any help is appreciated.
ThanksThanks for the response.
I am aware of using FIRST and NEXT for iterating the array but can I extract the index value of the current element into a variable when I don't know what the index value is at runtime ?
Thanks -
Associative Array vs Table Scan
Still new to PL/SQL, but very keen to learn. I wondered if somebody could advise me whether I should use a collection (such as an associative array) instead of repeating a table scan within a loop for the example below. I need to read from an input table of experiment data and if the EXPERIMENT_ID does not already exist in my EXPERIMENTS table, then add it. Here is the code I have so far. My instinct is that it my code is inefficient. Would it be more efficient to scan the EXPERIMENTS table only once and store the list of IDs in a collection, then scan the collection within the loop?
-- Create any new Experiment IDs if needed
open CurExperiments;
loop
-- Fetch the explicit cursor
fetch CurExperiments
into vExpId, dExpDate;
exit when CurExperiments%notfound;
-- Check to see if already exists
select count(id)
into iCheckExpExists
from experiments
where id = vExpId;
if iCheckExpExists = 0 then
-- Experiment ID is not already in table so add a row
insert into experiments
(id, experiment_date)
values(vExpId, dExpDate);
end if;
end loop;Except that rownum is assigned after the result set
is computed, so the whole table will have to be
scanned.really?
SQL> explain plan for select * from i;
Explained.
SQL> select * from table( dbms_xplan.display );
PLAN_TABLE_OUTPUT
Plan hash value: 1766854993
| Id | Operation | Name | Rows | Bytes | Cost (%CPU)| Time |
| 0 | SELECT STATEMENT | | 910K| 4443K| 630 (3)| 00:00:08 |
| 1 | TABLE ACCESS FULL| I | 910K| 4443K| 630 (3)| 00:00:08 |
8 rows selected.
SQL> explain plan for select * from i where rownum=1;
Explained.
SQL> select * from table( dbms_xplan.display );
PLAN_TABLE_OUTPUT
Plan hash value: 2766403234
| Id | Operation | Name | Rows | Bytes | Cost (%CPU)| Time |
| 0 | SELECT STATEMENT | | 1 | 5 | 2 (0)| 00:00:01 |
|* 1 | COUNT STOPKEY | | | | | |
| 2 | TABLE ACCESS FULL| I | 1 | 5 | 2 (0)| 00:00:01 |
Predicate Information (identified by operation id):
1 - filter(ROWNUM=1)
14 rows selected.
Maybe you are looking for
-
BEA 100028 Could not deserialize session data.
Hi there, We have a production system which is running WL 8.1 which our J2EE application on top. In the WL domain logs the following error occurs : ####<Jan 31, 2007 8:50:07 AM CET> <Error> <JDBC> <viepapsro10> <viepapsro10> <ExecuteThread: '0' for q
-
Can't Connect to any Wi-Fi Network
So today (9th Oct 2013) i connected to my works wifi perfectly fine, been using it all morning. then at luch time i left the building and turned mobile data on (and 3G). when i returned it didnt connect to the wifi. and is now displaying a "Unable To
-
Encryption of external hard drive was interrupted! Now I can't repair it.
I was encrypting one of my external hard drives, and the connection was lost during encryption. And now I can not repair it, I can't do anything with it. It was used as an Windows external harddrive before (NTFS?). I tried to make it an extended mac
-
Are we allowed multiple installs of Appstore apps?
I want to install my copy of FCPX on my wife's MBP. Is this legal? When I login to my Appstore account from her computer and try to download, it opens the billing page again, and I'm worried we're going to be charged another $300. I've read mixed opi
-
I was just curious on how to add more AU Instrument plugin's into LE8.... I have found free one's online, but just wondering how i can shove them into the software program and use them? thank you http://www.myspace.com/sibeatz07