ORA-06502: PL/SQL: numeric or value error: Bulk Bind: Truncated Bind

Hi
I am getting this run time error ORA-06502: PL/SQL: numeric or value error: Bulk Bind: Truncated Bind in my pl/sql . I tried evrything , changing datatypes ,etc but still this error is coming .What can be the cause , please help.
declare
svid xxpor_utility.p_svid@sppmig1%type;
p_sv_id xxpor_utility.p_svid@sppmig1%type;
tab xxpor_utility.xxpor_indextab@sppmig1;
svid1 xxpor_utility.p_svid@sppmig1%type;
p_sv_id1 xxpor_utility.p_svid@sppmig1%type;
tab1 xxpor_utility.xxpor_indextab@sppmig1;
svid2 xxpor_utility.p_svid@sppmig1%type;
p_sv_id2 xxpor_utility.p_svid@sppmig1%type;
tab2 xxpor_utility.xxpor_indextab@sppmig1;
svid3 xxpor_utility.p_svid@sppmig1%type;
p_sv_id3 xxpor_utility.p_svid@sppmig1%type;
tab3 xxpor_utility.xxpor_indextab@sppmig1;
v_index t2_error_table.id_value%type;
v_code t2_error_table.error_code%type;
p_error varchar2(600);
k number(20):=0;
v_msg varchar2(2000);
v_commit_count number(10);
v_at_gpid varchar2(512);
v_at_oper varchar2(512);
v_sch varchar2(512);
v_vat varchar2(512);
exp exception;
exp1 exception;
exp2 exception;
exp3 exception;
exp4 exception;
v_pay varchar2(512);
v_res varchar2(512);
v_digit varchar2(512);
v_agree varchar2(512);
v_driver_licence PERSON_HISTORY.drivers_licence%TYPE;
v_cus_gen1 number(10);
v_cus_gen2 number(10);
v_cus_gen3 number(10);
svid_sr number(10);
v_social PERSON_HISTORY.social_security_number%TYPE;
CURSOR person_cur (p_person_id person_history.person_id%TYPE)
IS
SELECT drivers_licence ,social_security_number
FROM PERSON_HISTORY@SPPMIG1
WHERE PERSON_ID=p_person_id --p2(p).person_id
     AND EFFECTIVE_START_DATE = (SELECT MAX(EFFECTIVE_START_DATE)
     FROM PERSON_HISTORY@sppmig1
                                        WHERE PERSON_ID=p_person_id);--p2(p).person_id) ;
--p number(20):=1;
--j number(20);
cursor c1 is
select * from cus_node_his ;
type temp_c1 is table of customer_node_history%rowtype
index by binary_integer;
t2 temp_c1;
type temp_c2 is table of customer_node_history@slpmig1%rowtype
index by binary_integer;
p2 temp_c2;
/*cursor c2(p_id customer_query.customer_node_id%type) is
select general_1,general_2,general_3
from customer_query@sppmig1 c where c.customer_query_type_id=10003 and
c.customer_node_id(+) =p_id
and c.open_date = (select
max(open_date) from customer_query@sppmig1 where customer_node_id=p_id
and customer_query_type_id=10003 and c.customer_query_id =(select max(customer_query_id) from customer_query@sppmig1
where customer_node_id=p_id and customer_query_type_id=10003));*/
procedure do_bulk_insert is
bulk_errors EXCEPTION;
PRAGMA EXCEPTION_INIT(bulk_errors, -24381);
begin
forall j in 1..t2.count SAVE EXCEPTIONS
insert into aaa values t2(j);
commit;
--t2.delete;
k:=0;
v_msg:=sqlerrm;
EXCEPTION WHEN bulk_errors THEN
FOR L IN 1..SQL%bulk_exceptions.count
LOOP
v_index := SQL%bulk_exceptions(L).ERROR_INDEX;
v_code := sqlerrm(-1 * SQL%bulk_exceptions(L).ERROR_CODE);
--v_index := SQL%bulk_exceptions(j).ERROR_INDEX;
--v_code := sqlerrm(-1 * SQL%bulk_exceptions(j).ERROR_CODE);
INSERT INTO t2_error_table
VALUES('CUSTOMER_NODE_HISTORY',
'CUSTOMER_NODE_ID',
v_msg,
t2(v_index).customer_node_id,
null,
'DO_BULK_INSERT',
v_code
commit;
END LOOP;
end do_bulk_insert;
begin
select value into v_at_gpid from t2_system_parameter@sppmig1 where name='atlanta_group_id';
select value into v_commit_count from t2_system_parameter@sppmig1 where name='batch_size';
select value into v_sch from t2_system_parameter@sppmig1 where name='schedule_id';
select value into v_pay from t2_system_parameter@sppmig1 where name='payment_location_code';
select value into v_at_oper from t2_system_parameter@sppmig1 where name='atlanta_operator_id';
select value into v_digit from t2_system_parameter@sppmig1 where name='digits_to_be_screened';
select value into v_res from t2_system_parameter@sppmig1 where name='responsible_agent';
select value into v_vat from t2_system_parameter@sppmig1 where name='vat_rate';
select value into v_agree from t2_system_parameter@sppmig1 where name='bank_agreement_status';
xxpor_utility.xxpor_loadmemory@sppmig1('CUSTOMER_NODE_HISTORY','CUSTOMER_NODE_TYPE_ID',tab);
xxpor_utility.xxpor_loadmemory@sppmig1('CUSTOMER_NODE_HISTORY','CREDIT_RATING_CODE',tab2);
xxpor_utility.xxpor_loadmemory@sppmig1('CUSTOMER_NODE_HISTORY','PAYMENT_METHOD_CODE',tab3);
xxpor_utility.xxpor_loadmemory@sppmig1('CUSTOMER_NODE_HISTORY','CUSTOMER_NODE_STATUS_CODE',tab1);
open c1;
loop
fetch c1 bulk collect into p2 limit v_commit_count;
for p in 1..p2.count loop
k:=K+1;
begin
xxpor_utility.xxpor_getsvid@sppmig1(p2(p).CUSTOMER_NODE_TYPE_ID,tab,svid);
p_sv_id:=svid;
xxpor_utility.xxpor_getsvid@sppmig1(p2(p).CUSTOMER_NODE_STATUS_CODE,tab1,svid1);
p_sv_id1 :=svid1;
xxpor_utility.xxpor_getsvid@sppmig1(p2(p).CREDIT_RATING_CODE,tab2,svid2);
p_sv_id2:=svid2;
xxpor_utility.xxpor_getsvid@sppmig1(p2(p).PAYMENT_METHOD_CODE,tab3,svid3);
p_sv_id3:=svid3;
OPEN person_cur (p2(p).person_id);
FETCH person_cur INTO v_driver_licence, v_social;
CLOSE person_cur;
--select social_security_number  into v_social from person_history@sppmig1 where
--PERSON_ID=p2(p).person_id AND EFFECTIVE_START_DATE = (SELECT MAX(EFFECTIVE_START_DATE) FROM
--PERSON_HISTORY@sppmig1 WHERE PERSON_ID=p2(p).person_id) ;
/*open c2(p2(p).customer_node_id);
fetch c2 into v_cus_gen1, v_cus_gen2, v_cus_gen3;
close c2;
xxpor_utility.get_status_code@sppmig1(v_cus_gen1,v_cus_gen2,v_cus_gen3,svid_sr);*/
svid_sr:=2600000;
t2(k).CUSTOMER_NODE_ID     :=     p2(p).CUSTOMER_NODE_ID;
t2(k).LAST_MODIFIED          :=     p2(p).LAST_MODIFIED;
t2(k).EFFECTIVE_START_DATE     :=     p2(p).EFFECTIVE_START_DATE;
t2(k).EFFECTIVE_END_DATE     :=     p2(p).EFFECTIVE_END_DATE;
t2(k).CUSTOMER_NODE_TYPE_ID     := p_sv_id;
if p_sv_id is null then
raise exp1;
end if;
t2(k).PRIMARY_IDENTIFIER      :=     p2(p).PRIMARY_IDENTIFIER;
t2(k).PRIMARY_IDENTIFIER2     :=     p2(p).PRIMARY_IDENTIFIER2;
t2(k).NODE_NAME           :=     p2(p).NODE_NAME ;
t2(k).NODE_NAME_UPPERCASE     :=     p2(p).NODE_NAME_UPPERCASE ;
t2(k).NODE_NAME_SOUNDEX     :=     p2(p).NODE_NAME_SOUNDEX;
t2(k).ATLANTA_GROUP_ID          := v_at_gpid ;
t2(k).ATLANTA_OPERATOR_ID     :=     p2(p).ATLANTA_OPERATOR_ID;
t2(k).GL_CODE_ID          :=     p2(p).GL_CODE_ID;
t2(k).PARENT_CUSTOMER_NODE_ID     := p2(p).PARENT_CUSTOMER_NODE_ID ;
t2(k).HIERARCHY_LEVEL          := p2(p).HIERARCHY_LEVEL ;
t2(k).ROOT_CUSTOMER_NODE_ID      := p2(p).ROOT_CUSTOMER_NODE_ID ;
t2(k).CUSTOMER_NODE_STATUS_CODE := p_sv_id1 ;
if p_sv_id1 is null then
raise exp2;
end if;
t2(k).CREATED_DATE     :=          p2(p).CREATED_DATE;
t2(k).ACTIVE_DATE      :=          p2(p).ACTIVE_DATE ;
t2(k).PERSON_ID     :=          p2(p).PERSON_ID ;
t2(k).PRIME_ACCOUNT_ID :=          p2(p).PRIME_ACCOUNT_ID;
t2(k).REPORT_LEVEL_CODE :=          p2(p).REPORT_LEVEL_CODE;
t2(k).POSTAL_ADDRESS_ID     :=     p2(p).POSTAL_ADDRESS_ID;
t2(k).SITE_ADDRESS_ID     :=     p2(p).SITE_ADDRESS_ID ;
t2(k).CURRENCY_ID      :=          p2(p).CURRENCY_ID;
t2(k).SCHEDULE_ID     :=          v_sch;
t2(k).BILLING_PRIORITY     :=     p2(p).BILLING_PRIORITY ;
t2(k).BILLING_COMPLEXITY:=          p2(p).BILLING_COMPLEXITY ;
t2(k).BILLING_CONFIGURATION_CODE     := p2(p).BILLING_CONFIGURATION_CODE;
t2(k).SUPPRESS_IND_CODE           := p2(p).SUPPRESS_IND_CODE ;
t2(k).SUPPRESS_BILL_CYCLE_COUNT := p2(p).SUPPRESS_BILL_CYCLE_COUNT;
t2(k).SUPPRESS_UNTIL_ISSUE_DATE := p2(p).SUPPRESS_UNTIL_ISSUE_DATE;
t2(k).TURNOVER               := p2(p).TURNOVER;
t2(k).TURNOVER_CURRENCY_ID      :=     p2(p).TURNOVER_CURRENCY_ID ;
t2(k).CREDIT_LIMIT           :=     p2(p).CREDIT_LIMIT ;
t2(k).CREDIT_LIMIT_CURRENCY_ID :=     p2(p).CREDIT_LIMIT_CURRENCY_ID;
t2(k).EXPECTED_REVENUE      :=     p2(p).EXPECTED_REVENUE ;
t2(k).EXPECTED_REVENUE_CURRENCY_ID     := p2(p).EXPECTED_REVENUE_CURRENCY_ID ;
t2(k).CREDIT_RATING_CODE      :=     p_sv_id2 ;
-- if p_sv_id2 is null then
--raise exp3;
-- end if;
t2(k).CREDIT_COMMENTS           := p2(p).CREDIT_COMMENTS ;
t2(k).TAX_CLASS_CODE          := 1     ;
t2(k).PAYMENT_METHOD_CODE     :=     p_sv_id3;
--if p_sv_id3 is null then
--raise exp4;
--end if;
t2(k).PAYMENT_LOCATION_CODE      := v_pay ;
t2(k).BANK_CODE           :=     NULL;
t2(k).BRANCH_CODE           :=     NULL ;
t2(k).BANK_ACCOUNT_NAME     :=     p2(p).NODE_NAME ;
t2(k).BANK_ACCOUNT_NUMBER     :=     '1000000';
t2(k).BANK_ACCOUNT_REF      :=     v_agree;
t2(k).CARD_TYPE_CODE          := p2(p).CARD_TYPE_CODE     ;
t2(k).CARD_NUMBER          :=     p2(p).CARD_NUMBER ;
t2(k).CARD_EXPIRY_DATE          := NULL ;
t2(k).ASSIGNED_OPERATOR_ID      :=     NULL ;
t2(k).SALES_CHANNEL_CODE     :=     0;
t2(k).COMPANY_NUMBER          := NULL;
t2(k).INDUSTRY_CODE          :=     NULL;
t2(k).REGION_CODE           :=     NULL;
t2(k).GENERAL_1          :=     v_vat ;
t2(k).GENERAL_2           :=     svid_sr ;
if svid_sr is null then
raise exp;
end if;
t2(k).GENERAL_3           :=     v_social ;
t2(k).GENERAL_4           :=     v_driver_licence ;
t2(k).GENERAL_5           :=     v_vat;
t2(k).GENERAL_6           :=     v_res;
t2(k).GENERAL_7           :=     null||':'||null||':'||'1000000'||':'||null||':'||null||':'||null||':';
t2(k).GENERAL_8          :=     '2' ;
t2(k).GENERAL_9           :=     v_digit;
t2(k).GENERAL_10          :=     p2(p).CUSTOMER_NODE_ID;
exception when exp then
p_error:= sqlerrm;
insert into t2_error_table values ( 'CUSTOMER_NODE_HISTORY','CUSTOMER_NODE_ID',p_error,p2(p).customer_node_id
,null,null,null);
commit;
when exp1 then
p_error:= sqlerrm;
insert into t2_error_table values ( 'CUSTOMER_NODE_HISTORY','CUSTOMER_NODE_ID',p_error,p2(p).customer_node_id
,null,null,'customer_node_type_id is null');
commit;
when exp2 then
p_error:= sqlerrm;
insert into t2_error_table values ( 'CUSTOMER_NODE_HISTORY','CUSTOMER_NODE_ID',p_error,p2(p).customer_node_id
,null,null,'customer_node_status_code is null');
commit;
/*when exp3 then
p_error:= sqlerrm;
insert into t2_error_table values ( 'CUSTOMER_NODE_HISTORY','CUSTOMER_NODE_ID',p_error,p2(p).customer_node_id
,null,null,'credit_rating_code is null');
commit;
when exp4 then
p_error:= sqlerrm;
insert into t2_error_table values ( 'CUSTOMER_NODE_HISTORY','CUSTOMER_NODE_ID',p_error,p2(p).customer_node_id
,null,null,null);
commit;*/
when others then
p_error:= sqlerrm;
insert into t2_error_table values ( 'CUSTOMER_NODE_HISTORY','CUSTOMER_NODE_ID',p_error,p2(p).customer_node_id
,null,null,null);
commit;
end;
if mod(k,v_commit_count)=0 then
do_bulk_insert;
t2.delete;
end if;
end loop;
do_bulk_insert;
exit when c1%notfound;
end loop;
t2.delete;
exception when others then
p_error:= sqlerrm;
insert into t2_error_table values ( 'CUSTOMER_NODE_HISTORY','CUSTOMER_NODE_ID',p_error,null
,null,null,null);
commit;
RAISE;
end;
/

Hi there,
Following is the description of the error, you are getting.
ORA-06502:VALUE_ERROR
An arithmetic, conversion, truncation, or size-constraint error occurs. For example, when your program selects a column value into a character variable, if the value is longer than the declared length of the variable, PL/SQL aborts the assignment and raises VALUE_ERROR. In procedural statements, VALUE_ERROR is raised if the conversion of a character string into a number fails. (In SQL statements, INVALID_NUMBER is raised.)
Hopefully this will help.

Similar Messages

  • Error Message - ORA-06502: PL/SQL: numeric or value error: Bulk Bind: Trunc

    This is driving me nuts!
    I am getting this error from OWB during a mapping process.
    I have checked the input data and it looks fine.
    The run time audit browser just lists all of the steps but does not make it clear which one failed. Is it the last one which is shown (does not have HIDE as selection link.)
    I also tried to determine which row was causing the problem and followed the instructions at http://www.nicholasgoodman.com/bt/blog/2005/07/, but no row_id was recorded in the views. In actual fact there wasn't very much audit info other than that the mapping ran and was complete (even though it failed).
    In the error message section it has, in order
    Map Step - blank
    Rowkey - 35204435256
    Severity - X
    Error Message - ORA-06502: PL/SQL: numeric or value error: Bulk Bind: Truncated Bind
    Object Name - N/A
    Object Column - *
    From the PL/SQL error I thought it may be trying to insert into a data field that was too small, but all of the columns that are used are full of data of length shorter than all of the target tables.
    I have even started running the cursors in the generated PLSQL but I don't get the error by doing this.
    Thanks in advance for any tips at all.

    Thanks for the response.
    I managed to work it out and it had to do with the selection criteria of one of the filters.
    For anyone else facing this error, check to see if any of the rows being inserted has the same key/identifier as some existing in the target table. If so add an extra condition to the where clause.
    This worked for me.

  • ORA-06502: PL/SQL: numeric or value error: Bulk Bind: Truncated Bink

    I have a map which worked fine in 10.2.0.1. The same map in 11.2.0.2 is giving me the error:
    'ORA-06502: PL/SQL: numeric or value error: Bulk Bind: Truncated Bink.'
    I have one source and one target. This is a straight load, no transformations.
    While debugging the map I have noticed the culprit is one column in the source which is varchar2(30),
    I have the target column with the same varchar2(30), and I tried increasing the size of
    the target column but i keep getting the same error. While searching the forum someone suggested
    to change the configuration of code generation options and runtime parameters to set based.
    But strangely it gave me an error because the set based option is not availabe in the new 11.2.0.2.
    Should the set based option be available in this version. Please suggest on how i could resolve the
    error of 'ORA-06502: PL/SQL: numeric or value error: Bulk Bind: Truncated Bink.' Thank you.

    Hi there,
    Following is the description of the error, you are getting.
    ORA-06502:VALUE_ERROR
    An arithmetic, conversion, truncation, or size-constraint error occurs. For example, when your program selects a column value into a character variable, if the value is longer than the declared length of the variable, PL/SQL aborts the assignment and raises VALUE_ERROR. In procedural statements, VALUE_ERROR is raised if the conversion of a character string into a number fails. (In SQL statements, INVALID_NUMBER is raised.)
    Hopefully this will help.

  • ORA-06502: PL/SQL: numeric or value error: Bulk bind: Error in define

    Hi All,
    Getting aforesaid error while executing a procedure.
    I have a procedure which takes 7 paramneters and have 13 IN OUT parameters. all the IN OUT parameters are PLSQL tables of number and varchar2.
    I Have checked there are no not null columns this procedure is just seelcting these values and assigning it to plsql table.
    Regards
    Manish

    Thanks for the reply.
    This is the procedure which returns the list of projects
    PROCEDURE DS$2342_PROC
    (P_PROJECT_ID_ARR IN DS$REF.TT_PRO_ID
    ,P_PAGE_NO IN NUMBER
    ,P_RECORDS_PER_PAGE IN NUMBER
    ,P_USER_ID IN USERS.ID%TYPE
    ,P_SORT_ORDER IN VARCHAR2
    ,P_PSE_ID IN PORTAL_SERVICES.ID%TYPE
    ,P_LAST_ACCESSED_DATE IN VARCHAR2
    ,O_PRO_ALL_ID_ARRAY IN OUT DS$REF.TT_PRO_ID
    ,O_PRO_ID_ARRAY IN OUT DS$REF.TT_PRO_ID
    ,O_NAME_ARRAY IN OUT DS$REF.TT_VARCHAR2
    ,O_TYPE_OF_WORK_ARRAY IN OUT DS$REF.TT_VARCHAR2
    ,O_STAGE_ARRAY IN OUT DS$REF.TT_VARCHAR2
    ,O_LOC_ARRAY IN OUT DS$REF.TT_VARCHAR2
    ,O_CURRENCY_ARRAY IN OUT DS$REF.TT_VARCHAR2
    ,O_VALUE_ARRAY IN OUT DS$REF.TT_NUMBER
    ,O_DISPLAY_VALUE_ARRAY IN OUT DS$REF.TT_VARCHAR2
    ,O_LATEST_UPDATED_DATE_ARRAY IN OUT DS$REF.TT_VARCHAR2
    ,O_FLAG_ARRAY IN OUT DS$REF.TT_VARCHAR2
    ,O_LOCATION IN OUT DS$REF.TT_VARCHAR2
    IS
    BEGIN
    DECLARE
    List of parameters
    1.p_project_id_arr Projects id.
    2.p_page_no Page number.
    3.p_records_per_page Records per page.
    4.p_user_id User id.
    5.p_sort_order Sorting by column.
    6.p_pse_id Portal service id.
    7.p_last_accessed_date User last accessed date
    Output parameters
    1. o_pro_all_id_array Project id array
    2. o_pro_id_array Project id array as per records to be displayed
    3. o_name_array Project title array
    4. o_type_of_work_array Project type of work array
    5. o_stage_array Project stage array
    6. o_loc_array Project location array
    7. o_currency_array Project currency array
    8. o_value_array Project values array
    9. o_display_value_array Project display values array
    10. o_latest_updated_date_array Project latest updated date
    11. o_flag_array Flags for new and updated watch icon, project notes, download leads
    12. o_location Location
    v_status CONSTANT EXTRACT_BATCH_HEADERS.STATUS%TYPE := 'OPN';
    CURSOR c_psc(qp_pse_id PORTAL_SERVICES.ID%TYPE) IS
    SELECT DISTINCT psc.LOCATION_REPORTING_LEVEL
    FROM PORTAL_SCS psc
    WHERE psc.START_DATE <= SYSDATE
    AND ( psc.END_DATE IS NULL
    OR psc.END_DATE > SYSDATE )
    AND psc.LOCATION_REPORTING_LEVEL IS NOT NULL
    AND psc.PSE_ID = qp_pse_id;
    CURSOR c_projects_name_order_asc IS
    SELECT pro.ID id
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY pro.NAME;
    CURSOR c_projects_name_order_desc IS
    SELECT pro.ID id
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY pro.NAME DESC;
    CURSOR c_projects_work_order_asc IS
    SELECT pro.ID id
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY TYPE_OF_WORK;
    CURSOR c_projects_work_order_desc IS
    SELECT pro.ID id
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY TYPE_OF_WORK DESC;
    CURSOR c_projects_stage_order_asc IS
    SELECT pro.ID id
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY pro.STAGE;
    CURSOR c_projects_stage_order_desc IS
    SELECT pro.ID id
    FROM PROJECTS pro,
         TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY pro.STAGE DESC;
    /* Cursor changed by Tushar on 08/02/2005 */
    CURSOR c_projects_loc_order_asc (cp_location PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE) IS
    SELECT pro.ID id,
    DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4) location
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    -- ORDER BY DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    ORDER BY DECODE(cp_location
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    TRUNC(pro.LATEST_UPDATED_DATE) DESC,
    pro.VALUE DESC,
    pro.ID DESC;
    /* Cursor changed by Tushar on 08/02/2005 */
    CURSOR c_projects_loc_order_desc (cp_location PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE) IS
    SELECT pro.ID id,
    DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4) location
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    -- ORDER BY DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    ORDER BY DECODE(cp_location
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) DESC,
    TRUNC(pro.LATEST_UPDATED_DATE) DESC,
    pro.VALUE DESC,
    pro.ID DESC;
    /* Cursor changed by Tushar on 08/02/2005 */
    CURSOR c_projects_value_order_asc(cp_location PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE) IS
    SELECT pro.ID id,
    DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4) location
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY pro.VALUE,
    TRUNC(pro.LATEST_UPDATED_DATE),
    -- DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    DECODE(cp_location
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    pro.ID DESC;
    /* Cursor changed by Tushar on 08/02/2005 */
    CURSOR c_projects_value_order_desc(cp_location PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE) IS
    SELECT pro.ID id,
    DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4) location
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY pro.VALUE DESC,
    TRUNC(pro.LATEST_UPDATED_DATE) DESC,
    -- DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    DECODE(cp_location
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    pro.ID DESC;
    /* Cursor changed by Tushar on 08/02/2005 */
    CURSOR c_projects_lud_order_asc(cp_location PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE) IS
    SELECT pro.ID id,
    DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4) location
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY TRUNC(pro.LATEST_UPDATED_DATE),
    pro.VALUE DESC,
    -- DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    DECODE(cp_location
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    pro.ID DESC;
    /* Cursor changed by Tushar on 08/02/2005 */
    CURSOR c_projects_lud_order_desc(cp_location PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE) IS
    SELECT pro.ID id,
    DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4) location
    FROM PROJECTS pro,
    TMP_PROJECTS tmp
    WHERE pro.ID = tmp.PRO_ID
    ORDER BY TRUNC(pro.LATEST_UPDATED_DATE) DESC,
    pro.VALUE DESC,
    -- DECODE(cp_location,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    DECODE(cp_location
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    pro.ID DESC;
    /*Cursors for project details depending on order by clause */
    /* Cursor for order by name ascending */
    CURSOR c_pro_sum_name_asc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY pro.NAME;
    /* Cursor for order by name descending */
    CURSOR c_pro_sum_name_dsc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY pro.NAME DESC;
    /* Cursor for order by TYPE_OF_WORK asc*/
    CURSOR c_pro_sum_work_asc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY pro.TYPE_OF_WORK;
    /* Cursor for order by TYPE_OF_WORK descending */
    CURSOR c_pro_sum_work_dsc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY pro.TYPE_OF_WORK DESC;
    /* Cursor for order by STAGE asc*/
    CURSOR c_pro_sum_stage_asc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY pro.STAGE;
    /* Cursor for order by STAGE descending */
    CURSOR c_pro_sum_stage_dsc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY pro.STAGE DESC;
    /* Cursor for order by LOCATION asc*/
    CURSOR c_pro_sum_loc_asc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    -- ORDER BY DECODE(cp_loc_lvl
    -- ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    ORDER BY DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    TRUNC(pro.LATEST_UPDATED_DATE)DESC,
    pro.VALUE DESC,
    pro.ID DESC;
    /* Cursor for order by LOCATION descending */
    CURSOR c_pro_sum_loc_dsc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    -- ORDER BY DECODE(cp_loc_lvl
    -- ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4) DESC,
    ORDER BY DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) DESC,
    TRUNC(pro.LATEST_UPDATED_DATE) DESC,
    pro.VALUE DESC,
    pro.ID DESC;
    /* Cursor for order by VALUE asc*/
    CURSOR c_pro_sum_val_asc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY pro.VALUE,
    TRUNC(pro.LATEST_UPDATED_DATE),
    -- DECODE(cp_loc_lvl
    -- ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    pro.ID DESC;
    /* Cursor for order by VALUE descending */
    CURSOR c_pro_sum_val_dsc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY pro.VALUE DESC,
    TRUNC(pro.LATEST_UPDATED_DATE) DESC,
    -- DECODE(cp_loc_lvl
    -- ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    pro.ID DESC;
    /* Cursor for order by LATEST_UPDATED_DATE asc*/
    CURSOR c_pro_sum_lud_asc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY TRUNC(pro.LATEST_UPDATED_DATE),
    pro.VALUE DESC,
    -- DECODE(cp_loc_lvl
    -- ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    pro.ID DESC;
    /* Cursor for order by LATEST_UPDATED_DATE descending*/
    CURSOR c_pro_sum_lud_dsc(cp_pse_id PORTAL_SERVICES.ID%TYPE,
    cp_user_id USERS.ID%TYPE,
    cp_status EXTRACT_BATCH_HEADERS.STATUS%TYPE,
    cp_loc_lvl PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE,
    cp_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE ) IS
    SELECT pro.ID id,
    pro.NAME name,
    pro.TYPE_OF_WORK type_of_work,
    pro.STAGE stage,
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))) location,
    pro.Currency currency,
    pro.VALUE value,
    pro.DISPLAY_VALUE display_value,
    TO_CHAR(pro.LATEST_UPDATED_DATE,'DD/MM/YYYY') latest_updated_date,
    DECODE(pro.LATEST_UPDATED_DATE, pro.CREATED_DATE,
    'true','false')
    ||'~'||DECODE(SIGN(cp_last_accessed_date -
    TRUNC(pro.LATEST_UPDATED_DATE)
    ),0,'true'
    ,-1,'true'
    ,1,'false')
    ||'~'||DECODE(wrt_rec.wrt_pro_id,NULL,'false','true')
    ||'~'||DECODE(pne_rec.pne_pro_id,NULL,'false','true')
    ||'~'||DECODE(ebr_rec.ebr_status,cp_status,'true','false') flags
    FROM PROJECTS pro,
    TMP_PROJECTS tmp,
    (SELECT wrt.PRO_ID wrt_pro_id
    FROM WATCH_REQUESTS wrt,
    TMP_PROJECTS tmp_sub
    WHERE wrt.VIEWED_DATE IS NULL
    AND wrt.PSR_PSN_PSE_ID = cp_pse_id
    AND wrt.PSR_USR_ID = cp_user_id
    AND tmp_sub.PRO_ID = wrt.PRO_ID
    GROUP BY wrt.PRO_ID) wrt_rec,
    (SELECT pne.PRO_ID pne_pro_id
    FROM PROJECT_NOTES pne,
    TMP_PROJECTS tmp_pne
    WHERE pne.USR_ID = cp_user_id
    AND tmp_pne.PRO_ID = pne.PRO_ID) pne_rec,
    (SELECT ebr.STATUS ebr_status,
    ebp.PRO_ID ebp_pro_id
    FROM EXTRACT_BATCH_HEADERS ebr,
    EXTRACT_BATCH_PROJECTS ebp,
    TMP_PROJECTS tmp_ebr
    WHERE ebr.ID = ebp.EBR_ID
    AND ebp.PRO_ID = tmp_ebr.PRO_ID
    AND ebr.USR_ID = cp_user_id
    AND ebr.STATUS = cp_status) ebr_rec
    WHERE pro.ID = tmp.PRO_ID
    AND pro.ID = wrt_rec.wrt_pro_id(+)
    AND pro.ID = pne_rec.pne_pro_id(+)
    AND pro.ID = ebr_rec.ebp_pro_id(+)
    ORDER BY TRUNC(pro.LATEST_UPDATED_DATE) DESC,
    pro.VALUE DESC,
    -- DECODE(cp_loc_lvl
    -- ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    -- ,'C',pro.ADDRESS_LINE_4),
    DECODE(cp_loc_lvl
    ,'T',NVL(pro.ADDRESS_LINE_3,pro.ADDRESS_LINE_4)
    ,'C',pro.ADDRESS_LINE_4)||', '||
    SUBSTR(POST_CODE,1,DECODE(LTRIM(INSTR(POST_CODE,' ')),0,
    LENGTH(POST_CODE),LTRIM(INSTR(POST_CODE,' ')))),
    pro.ID DESC;
    /* Local Variables */
    v_tt_pro_id DS$REF.TT_PRO_ID;
    v_first PROJECTS.ID%TYPE := p_project_id_arr.FIRST;
    v_last PROJECTS.ID%TYPE := 0;
    v_project_id_count PROJECTS.ID%TYPE := p_project_id_arr.COUNT;
    v_page_count PROJECTS.ID%TYPE := 0;
    v_delimter CONSTANT VARCHAR2(1) := '|';
    v_sort_no NUMBER;
    v_sort_order VARCHAR2(4);
    v_sort_by_column VARCHAR2(30);
    v_last_accessed_date USERS.LAST_ACCESSED_DATE%TYPE;
    v_loc_level PORTAL_SCS.LOCATION_REPORTING_LEVEL%TYPE;
    /* Variables for Error handling */
    v_location ERROR_LOGS.LOCATION%TYPE := ' :: 0';
    v_module CONSTANT VARCHAR2(25) := 'DS$234.DS$2342_PROC';
    e_user_defined_excep EXCEPTION;
    PRAGMA EXCEPTION_INIT (e_user_defined_excep, -20001);
    /* Variables for Timestamp logging */
    v_tpg_id NUMBER;
    v_start_time NUMBER;
    v_tt_location DS$REF.TT_VARCHAR2;
    BEGIN
    v_location := ' :: 1';
    /*Dynamically change the sort area size to 64 mb */
    EXECUTE IMMEDIATE 'ALTER SESSION SET SORT_AREA_SIZE = 67108864';
    v_location := ' :: 1a';
    -- Call to timestamp log procedure for logging start time.
    DS$226.DS$2261_PROC(p_usr_id => p_user_id,
    p_module_name => v_module,
    p_call_by_module => 'ds_projectlist_bl.jsp',
    p_caller_module => NULL,
    o_tpg_id => v_tpg_id,
    o_start_time => v_start_time);
    v_location := ' 1a';
    v_last_accessed_date :=TRUNC(TO_DATE(p_last_accessed_date,'DD MON YYYY HH24:MI:SS'));
    v_location := ' 2';
    v_sort_no := SUBSTR(p_sort_order,
    1,
    INSTR(p_sort_order, v_delimter,1) - 1
    v_sort_order := SUBSTR(p_sort_order,
    INSTR(p_sort_order,v_delimter,1)+ 1
    v_page_count := CEIL(((p_project_id_arr.COUNT)/p_records_per_page));
    v_location := ' 3';
    FOR j IN 1..v_page_count
    LOOP
    v_location := ' 4';
    v_first := v_first;
    v_last := v_first + (p_records_per_page - 1);
    IF (v_last >= v_project_id_count)
    THEN
    v_last := v_project_id_count;
    ELSE
    v_last := v_first + (p_records_per_page - 1);
    END IF;
    IF (j = p_page_no)
    THEN
    v_location := ' 5';
    EXIT;
    END IF;
    v_location := ' 6';
    v_first := v_last + 1;
    v_location := ' 7';
    END LOOP;
    v_location := ' 8';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(p_project_id_arr(i));
    FORALL i IN p_project_id_arr.FIRST..p_project_id_arr.LAST
    INSERT INTO TMP_PROJECTS VALUES(p_project_id_arr(i));
    v_location := ' 9';
    OPEN c_psc(p_pse_id);
    LOOP
    FETCH c_psc INTO v_loc_level;
    EXIT WHEN c_psc%NOTFOUND;
    IF c_psc%ROWCOUNT > 1
    THEN
    v_location := ' 10';
    CLOSE c_psc;
    RAISE_APPLICATION_ERROR(-20001,'PLS-00234201');
    END IF;
    END LOOP;
    CLOSE c_psc;
    v_location := ' 11';
    IF v_loc_level IS NULL
    THEN
    v_location := ' 12';
    RAISE_APPLICATION_ERROR(-20001,'PLS-00234202');
    END IF;
    IF (v_sort_no = 1)
    THEN
    v_location := ' 13';
    IF (v_sort_order ='ASC' )
    THEN
    v_location := ' 14';
    IF c_projects_name_order_asc%ISOPEN
    THEN
    CLOSE c_projects_name_order_asc;
    END IF;
    OPEN c_projects_name_order_asc;
    v_location := ' 15';
    FETCH c_projects_name_order_asc BULK COLLECT INTO v_tt_pro_id;
    v_location := ' 16';
    CLOSE c_projects_name_order_asc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 17';
    o_pro_all_id_array := v_tt_pro_id;
    /* Delete records from temporary table TMP_PROJECTS */
    v_location := ' 18';
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 19';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 20';
    OPEN c_pro_sum_name_asc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    v_location := ' 21';
    FETCH c_pro_sum_name_asc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_name_asc;
    ELSE
    v_location := ' 22';
    IF c_projects_name_order_desc%ISOPEN
    THEN
    CLOSE c_projects_name_order_desc;
    END IF;
    OPEN c_projects_name_order_desc;
    v_location := ' 23';
    FETCH c_projects_name_order_desc BULK COLLECT INTO v_tt_pro_id;
    CLOSE c_projects_name_order_desc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 24';
    o_pro_all_id_array := v_tt_pro_id;
              /*Delete records from temporary table TMP_PROJECTS */
    v_location := ' 25';
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 26';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 27';
    OPEN c_pro_sum_name_dsc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    v_location := ' 28';
    FETCH c_pro_sum_name_dsc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_name_dsc;
    END IF;
    ELSIF (v_sort_no = 2)
    THEN
    v_location := ' 29';
    IF (v_sort_order ='ASC' )
    THEN
    v_location := ' 30';
    IF c_projects_work_order_asc%ISOPEN
    THEN
    CLOSE c_projects_work_order_asc;
    END IF;
    OPEN c_projects_work_order_asc;
    v_location := ' 31';
    FETCH c_projects_work_order_asc BULK COLLECT INTO v_tt_pro_id;
    CLOSE c_projects_work_order_asc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 32';
    o_pro_all_id_array := v_tt_pro_id;
    /* Delete records from temporary table TMP_PROJECTS */
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 33';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 34';
    OPEN c_pro_sum_work_asc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    v_location := ' 35';
    FETCH c_pro_sum_work_asc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_work_asc;
    ELSE
    v_location := ' 36';
    IF c_projects_work_order_desc%ISOPEN
    THEN
    CLOSE c_projects_work_order_desc;
    END IF;
    OPEN c_projects_work_order_desc;
    v_location := ' 37';
    FETCH c_projects_work_order_desc BULK COLLECT INTO v_tt_pro_id;
    CLOSE c_projects_work_order_desc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 38';
    o_pro_all_id_array := v_tt_pro_id;
    /* Delete records from temporary table TMP_PROJECTS */
    v_location := ' 39';
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 40';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 41';
    OPEN c_pro_sum_work_dsc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    v_location := ' 42';
    FETCH c_pro_sum_work_dsc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_work_dsc;
    END IF;
    ELSIF (v_sort_no = 3)
    THEN
    v_location := ' 43';
    IF (v_sort_order ='ASC' )
    THEN
    v_location := ' 44';
    IF c_projects_stage_order_asc%ISOPEN
    THEN
    CLOSE c_projects_stage_order_asc;
    END IF;
    OPEN c_projects_stage_order_asc;
    v_location := ' 45';
    FETCH c_projects_stage_order_asc BULK COLLECT INTO v_tt_pro_id;
    CLOSE c_projects_stage_order_asc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 46';
    o_pro_all_id_array := v_tt_pro_id;
    /* Delete records from temporary table TMP_PROJECTS */
    v_location := ' 47';
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 48';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 49';
    OPEN c_pro_sum_stage_asc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    v_location := ' 50';
    FETCH c_pro_sum_stage_asc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_stage_asc;
    ELSE
    v_location := ' 51';
    IF c_projects_stage_order_desc%ISOPEN
    THEN
    CLOSE c_projects_stage_order_desc;
    END IF;
    OPEN c_projects_stage_order_desc;
    v_location := ' 52';
    FETCH c_projects_stage_order_desc BULK COLLECT INTO v_tt_pro_id;
    CLOSE c_projects_stage_order_desc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 53';
    o_pro_all_id_array := v_tt_pro_id;
         /* Delete records from temporary table TMP_PROJECTS */
    v_location := ' 54';
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 55';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 56';
    OPEN c_pro_sum_stage_dsc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    v_location := ' 57';
    FETCH c_pro_sum_stage_dsc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_stage_dsc;
    END IF;
    ELSIF (v_sort_no = 4)
    THEN
    v_location := ' 58';
    IF (v_sort_order ='ASC' )
    THEN
    IF c_projects_loc_order_asc%ISOPEN
    THEN
    CLOSE c_projects_loc_order_asc;
    END IF;
    OPEN c_projects_loc_order_asc(v_loc_level);
    v_location := ' 59';
    FETCH c_projects_loc_order_asc BULK COLLECT INTO v_tt_pro_id,v_tt_location;
    CLOSE c_projects_loc_order_asc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY,O_LOCATION for fast scan */
    v_location := ' 60';
    o_pro_all_id_array := v_tt_pro_id;
    o_location := v_tt_location;
    /* Delete records from temporary table TMP_PROJECTS */
    v_location := ' 61';
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 62';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 63';
    OPEN c_pro_sum_loc_asc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    v_location := ' 64';
    FETCH c_pro_sum_loc_asc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_loc_asc;
    ELSE
    v_location := ' 65';
    IF c_projects_loc_order_desc%ISOPEN
    THEN
    CLOSE c_projects_loc_order_desc;
    END IF;
    OPEN c_projects_loc_order_desc (v_loc_level);
    v_location := ' 66';
    FETCH c_projects_loc_order_desc BULK COLLECT INTO v_tt_pro_id,v_tt_location;
    CLOSE c_projects_loc_order_desc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY,O_LOCATION for fast scan */
    v_location := ' 67';
    o_pro_all_id_array := v_tt_pro_id;
    o_location := v_tt_location;
    /* Delete records from temporary table TMP_PROJECTS */
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 68';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 69';
    OPEN c_pro_sum_loc_dsc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    v_location := ' 70';
    FETCH c_pro_sum_loc_dsc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_loc_dsc;
    END IF;
    ELSIF (v_sort_no = 5)
    THEN
    v_location := ' 71';
    IF (v_sort_order ='ASC' )
    THEN
    v_location := ' 72';
    IF c_projects_value_order_asc%ISOPEN
    THEN
    CLOSE c_projects_value_order_asc;
    END IF;
    OPEN c_projects_value_order_asc(v_loc_level);
    v_location := ' 73';
    FETCH c_projects_value_order_asc BULK COLLECT INTO v_tt_pro_id,v_tt_location;
    CLOSE c_projects_value_order_asc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 74';
    o_pro_all_id_array := v_tt_pro_id;
         o_location := v_tt_location;
    /* Delete records from temporary table TMP_PROJECTS */
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 75';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 76';
    OPEN c_pro_sum_val_asc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    v_location := ' 77';
    FETCH c_pro_sum_val_asc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_val_asc;
    ELSE
    v_location := ' 78';
    IF c_projects_value_order_desc%ISOPEN
    THEN
    CLOSE c_projects_value_order_desc;
    END IF;
    OPEN c_projects_value_order_desc(v_loc_level);
    v_location := ' 79';
    FETCH c_projects_value_order_desc BULK COLLECT INTO v_tt_pro_id,v_tt_location;
    CLOSE c_projects_value_order_desc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 80';
    o_pro_all_id_array := v_tt_pro_id;
         o_location := v_tt_location;
    /* Delete records from temporary table TMP_PROJECTS */
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 81';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 82';
    OPEN c_pro_sum_val_dsc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    FETCH c_pro_sum_val_dsc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_val_dsc;
    END IF;
    ELSIF (v_sort_no = 6)
    THEN
    v_location := ' 83';
    IF (v_sort_order ='ASC' )
    THEN
    v_location := ' 84';
    IF c_projects_lud_order_asc%ISOPEN
    THEN
    CLOSE c_projects_lud_order_asc;
    END IF;
    OPEN c_projects_lud_order_asc(v_loc_level);
    v_location := ' 85';
    FETCH c_projects_lud_order_asc BULK COLLECT INTO v_tt_pro_id,v_tt_location;
    CLOSE c_projects_lud_order_asc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 86';
    o_pro_all_id_array := v_tt_pro_id;
    o_location := v_tt_location;
    /* Delete records from temporary table TMP_PROJECTS */
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 87';
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    v_location := ' 88';
    OPEN c_pro_sum_lud_asc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    FETCH c_pro_sum_lud_asc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_lud_asc;
    ELSE
    v_location := ' 89';
    IF c_projects_lud_order_desc%ISOPEN
    THEN
    CLOSE c_projects_lud_order_desc;
    END IF;
    OPEN c_projects_lud_order_desc(v_loc_level);
    v_location := ' 90';
    FETCH c_projects_lud_order_desc BULK COLLECT INTO v_tt_pro_id,v_tt_location;
    CLOSE c_projects_lud_order_desc;
    /* Assign the Sorted project ids to O/P parameter O_PRO_ALL_ID_ARRAY for fast scan */
    v_location := ' 91';
    o_pro_all_id_array := v_tt_pro_id;
         o_location := v_tt_location;
    /* Delete records from temporary table TMP_PROJECTS */
    DELETE FROM TMP_PROJECTS;
    /* Insert records into TMP_PROJECTS as per the page number (p_page_no) */
    v_location := ' 92';
    -- FORALL i IN p_project_id_arr.FIRST..p_project_id_arr.LAST
    -- FORALL i IN v_first..v_last
    FORALL i IN v_first..v_last
    INSERT INTO TMP_PROJECTS VALUES(v_tt_pro_id(i));
    FORALL i IN p_project_id_arr.FIRST..p_project_id_arr.LAST
    INSERT INTO TUSH2 VALUES(v_tt_pro_id(i));
    v_location := ' 93';
    OPEN c_pro_sum_lud_dsc(p_pse_id,p_user_id,v_status,v_loc_level,v_last_accessed_date);
    FETCH c_pro_sum_lud_dsc BULK COLLECT INTO o_pro_id_array,
    o_name_array,
    o_type_of_work_array,
    o_stage_array,
    o_loc_array,
    o_currency_array,
    o_value_array,
    o_display_value_array,
    o_latest_updated_date_array,
    o_flag_array;
    CLOSE c_pro_sum_lud_dsc;
    END IF;
    END IF;
    v_location := ' 94';
    -- Call to Timestamp Logs for logging end_time.
    DS$226.DS$2262_PROC(p_usr_id => p_user_id,
    p_tpg_id => v_tpg_id,
    p_start_time => v_start_time);
    v_location := ' 95';
    EXCEPTION
    WHEN e_user_defined_excep
    THEN
    ds$221.ds$2211_proc(p_module_type => 'PLS',
    p_err_type => 'R',
    p_location => v_module ||'::'|| v_location,
    p_java_error_stack => NULL,
    p_user_id => p_user_id);
    RAISE;
    WHEN OTHERS
    THEN
    ds$221.ds$2211_proc(p_module_type => 'PLS',
    p_err_type => 'R',
    p_location => v_module || v_location,
    p_java_error_stack => NULL,
    p_user_id => p_user_id);
    RAISE;
    END;
    END;

  • ORA-06502: PL/SQL: numeric or value error: Bulk bind: Error in define (WWV-11230)

    Hello,
    I'm running into the above error when running a master/detail form. I can also run the form as a portlet and the form comes up but if I try to save, query or reset, I also get the error. I have portal 3.0.9.8.0 and I do have other master detail forms that work.
    Any thoughts?
    Thanks,
    Martin
    Table structure
    PCH
    PCH_ID NUMBER(9) NOT NULL PK,
    PCH_AGY NUMBER(9) NOT NULL
    PCD
    PCD_ID NUMBER(9) NOT NULL PK,
    PCD_CAN VARCHAR2(7) NOT NULL,
    PCD_PCH_ID NUMBER(9) NOT NULL FK to PCH.PCH_ID

    This usually happens when you upgrade/patch the db after you have upgraded portal/ias. The owa package required by portal are usually of a higher version than that supplied by the db, The db upgrade/patch will cause the owa packages to be overwritten. The solution as mentioned is to reload the latest owa packages supplied with portal/iAS.

  • Error: ORA-06502: PL/SQL: numeric or value error:NULL index table key value

    Hi,
    I am trying toceate an interface which collects data from database make some transformation and populated seeded tables in the same database.
    My Approach is :
    a) Create a record type variable ( concists of multiple segments)
    b) Create a pl/sql table type of the records type in a)
    c) Created a cursor of same structure as pl/sql table type ( collects data)
    d) BULK CoLLECT data from cursor into pl/sql table
    e) Print the data
    But during Bulk Collect i get the below error :
    Unexpected error in xxc_hr2hr_populate_elements.main at FLOW TRACE-1.120. Error: ORA-06502: PL/SQL: numeric or value error: NULL index table key value
    ORA-20003: Unexpected error in xxc_hr2hr_populate_elements.get_data at FLOW TRACE-1.1.100. Error: ORA-06502: PL/SQL: numeric or value error: Bulk Bind: Truncated Bind

    Ashish_Apps wrote:
    Hi,
    I am trying toceate an interface which collects data from database make some transformation and populated seeded tables in the same database.
    My Approach is :
    a) Create a record type variable ( concists of multiple segments)
    b) Create a pl/sql table type of the records type in a)
    c) Created a cursor of same structure as pl/sql table type ( collects data)
    d) BULK CoLLECT data from cursor into pl/sql table
    e) Print the data
    But during Bulk Collect i get the below error :
    Unexpected error in xxc_hr2hr_populate_elements.main at FLOW TRACE-1.120. Error: ORA-06502: PL/SQL: numeric or value error: NULL index table key value
    ORA-20003: Unexpected error in xxc_hr2hr_populate_elements.get_data at FLOW TRACE-1.1.100. Error: ORA-06502: PL/SQL: numeric or value error: Bulk Bind: Truncated BindVerify the rows you are fetching are having the same data types as your Record like Dates should go to date , decimal should not be fetched in type defined as number etc.

  • Problem with error ORA-06502: PL/SQL: numeric or value error string

    Hi,
    I am running a loop to just spool output data using 'dbms_output.put_line' and I keep getting this error after a few records. I resorted it and it happen at a different interval. Could it have to do with the length of the item I am trying to spool? Thanks.
    ORA-06502: PL/SQL: numeric or value error string

    SD wrote:
    Hi,
    I am running a loop to just spool output data using 'dbms_output.put_line' and I keep getting this error after a few records. I resorted it and it happen at a different interval. Could it have to do with the length of the item I am trying to spool? Thanks.
    ORA-06502: PL/SQL: numeric or value error stringyes, it is a data dependent error.
    Handle:     SD
    Status Level:     Newbie
    Registered:     Nov 21, 2001
    Total Posts:     289
    Total Questions:     189 (183 unresolved)
    why do you waste time here when you rarely get your questions answered?

  • ORA-06502: PL/SQL: numeric or value error: character string buffer too smal

    Hi Guys I am getting error ORA-06502: PL/SQL: numeric or value error: character string buffer too small as it said i thought it would be issue with length of feild but i tried to change is nothihg work i am posing code here if any one can please help me on this
    PROCEDURE REPORT
    p_rpt_from_dt in varchar2,
    p_rpt_to_dt in varchar2,
    p_apvr_id in tc_wkr.tc_row_id%type default NULL,
    p_rpt_type in varchar2 default NULL,
    p_backto_pg in varchar2 default NULL
    IS
    v_rpt_from_dt date := var_to_date(p_rpt_from_dt);
    v_rpt_to_dt date := var_to_date(p_rpt_to_dt);
    v_time_str varchar2(15);
    cursor period_cur
    cp_from_dt date,
    cp_to_dt date
    is
    select beg_dt, end_dt
    from jmcs_wk_tprd
    where beg_dt <= cp_to_dt -- report end date
    and end_dt >= cp_from_dt -- report start date
    BEGIN
    if sys_security('tcsys', 'tc_reports') != 'GRANTED' then
    apps_main.access_denied;
    return;
    end if;
    if lg_debug_fl then
    v_time_str := to_char(lg_sysdate, 'hh:mi:ss a.m.');
    else
    v_time_str := tc_time(lg_sysdate);
    end if;
    /* get the time card time periods applicable to the report */
    lga_tc_strt_dt := lga_null_date;
    for recs in period_cur(v_rpt_from_dt, v_rpt_to_dt) loop
    lga_tc_strt_dt(lga_tc_strt_dt.count+1) := recs.beg_dt;
    lga_tc_end_dt(lga_tc_end_dt.count+1) := recs.end_dt;
    end loop;
    --if p_apvr_id is NULL then
    if p_rpt_type != 'D' then
    tc_reporting.reports_header
    1,
    'Time Card Status Report',
    'for '||dd_mon_yyyy(v_rpt_from_dt)||' through '||dd_mon_yyyy(v_rpt_to_dt)||'<BR>'||
    'Report Date: '||dd_mon_yyyy(lg_sysdate)||' Time: '||v_time_str,
    NULL,
    NULL,
    NULL,
    'javascript:window.close()', /* Backto */
    'alert(''Reminder! Click on logo when you are ready to return to previous page'')'
    end if;
    if p_apvr_id is NULL then
    sub_STATUS_BD_ALPHA (v_rpt_from_dt, v_rpt_to_dt, TRUE, p_rpt_type, p_apvr_id);
    else
    htp.p('<!-- Selected Approver ('||p_apvr_id||') -->');
    sub_STATUS_BD_APVR (v_rpt_from_dt, v_rpt_to_dt, p_rpt_type, p_apvr_id);
    end if;
    htp.p('</body></html>');
    EXCEPTION
    WHEN OTHERS THEN
    error_proc(SQLERRM, SQLCODE, owa_util.get_cgi_env('PATH_INFO'));
    htp.p('Error Code is :'||SQLERRM);
    END REPORT;
    This package in trun call other procedure like below
    PROCEDURE sub_STATUS_BD_ALPHA
    p_rpt_from_dt in date,
    p_rpt_to_dt in date,
    p_display_hdr in boolean,
    p_rpt_type in varchar2 default 'B',
    p_apvr_id in tc_wkr.tc_row_id%type default NULL,
    p_tcs_user_id in tc_wkr.tc_row_id%type default NULL
    IS
    v_time_str varchar2(15);
    v_apvr_id tc_wkr.tc_row_id%type := 0;
    v_a_user_id tc_wkr.tc_row_id%type; -- approver tcs_user_id
    v_cnt integer := 0;
    v_people_cnt integer := 0;
    v_stat_cd varchar2(2000);
    v_display_fl boolean := FALSE;
    /*===========================================================================*/
    cursor people_cur
    cp_from_dt in date,
    cp_to_dt in date
    is
    select
    d_full_nm_lfm as name,
    tc_row_id as tcs_user_id,
    tcw_typ as pay_typ,
    tcw_id as pay_id,
    sys_strt_date as sys_strt_dt,
    sys_end_dt
    from tc_wkr
    where sys_strt_date <= cp_to_dt
    and nvl(sys_end_dt, cp_to_dt) >= cp_from_dt
    order by upper(d_full_nm_lfm);
    /* find the current or the most recent (if no current) approver */
    cursor apvr_cur
    cp_tcs_user_id in tc_wkr.tc_row_id%type
    is
    select
    a.f_tc_apvr_id as fk_tcs_apvr_id,
    w.d_full_nm_lfm as apvr_name,
    w.tcw_typ as apvr_pay_typ,
    w.tcw_id as apvr_pay_id,
    a.strt_dt,
    a.end_dt
    from tc_wkr w, tc_ap_asmt a
    where a.f_tc_wkr_id = cp_tcs_user_id
    and w.tc_row_id = a.f_tc_apvr_id
    order by a.strt_dt desc;
    /* list of existing time cards UNION required time cards */
    cursor tc_cur
    cp_tcs_user_id in tc_wkr.tc_row_id%type, /* who's time cards */
    cp_from_dt in date, /* report period from date */
    cp_to_dt in date /* report period to date */
    is
    select
    stat_cd,
    strt_dt,
    end_dt
    from tc
    where strt_dt <= cp_to_dt
    and end_dt >= cp_from_dt
    and fk_tc_wkrtcw_id = cp_tcs_user_id
    UNION
    select
    'Required' as stat_cd,
    beg_dt as strt_dt,
    end_dt
    from jmcs_wk_tprd
    where beg_dt <= cp_to_dt
    and end_dt >= cp_from_dt
    and beg_dt not in (
    select strt_dt
    from tc
    where strt_dt <= cp_to_dt
    and end_dt >= cp_from_dt
    and fk_tc_wkrtcw_id = cp_tcs_user_id
    order by strt_dt;
    BEGIN
    if lg_debug_fl then
    v_time_str := to_char(lg_sysdate, 'hh:mi:ss a.m.');
    else
    v_time_str := tc_time(lg_sysdate);
    end if;
    if p_apvr_id > 0 then
    lga_report_out := lga_report_out_null;
    v_apvr_id := p_apvr_id;
    lga_apvr := lga_apvr_null;
    select
    d_full_nm_lfm,
    tc_row_id,
    tcw_id,
    tcw_typ
    into
    lga_apvr(1).apvr_name,
    lga_apvr(1).apvr_tcs_id,
    lga_apvr(1).apvr_pay_id,
    lga_apvr(1).apvr_pay_typ
    from tc_wkr
    where tc_row_id = v_apvr_id;
    if lga_apvr(1).apvr_pay_typ != 'S' then
    select decode(bend_empl_fl, 'Y', 'E', 'W')
    into lga_apvr(1).apvr_pay_typ
    from empl
    where empl_id = lga_apvr(1).apvr_pay_id;
    end if;
    end if;
    if p_display_hdr then
    if lga_tc_strt_dt.count > 6 then /* more than 6 time periods (1 month) */
    lga_width(1) := to_char(.15 * lg_page_width_standard);
    lga_width(2) := to_char(.08 * lg_page_width_standard);
    for i in 1..lga_tc_strt_dt.count loop
    lga_width(lga_width.count+1) := to_char(.09 * lg_page_width_standard);
    end loop;
    lg_page_width_standard := to_number(lga_width(1)) + to_number(lga_width(2));
    if nvl(p_apvr_id, 0) = 0 then
    lg_page_width_standard := lg_page_width_standard * 2;
    end if;
    htp.p('<!-- page width = '||lg_page_width_standard||'-->');
    for i in 3..lga_width.count loop
    lg_page_width_standard := lg_page_width_standard + to_number(lga_width(i));
    htp.p('<!-- page width = '||lg_page_width_standard||'-->');
    end loop;
    lg_page_width := to_char(lg_page_width_standard);
    else
    lga_width(1) := '15%';
    lga_width(2) := '8%';
    lga_width(3) := '9%';
    lga_width(4) := '9%';
    lga_width(5) := '9%';
    lga_width(6) := '9%';
    lga_width(7) := '9%';
    lga_width(8) := '9%';
    end if;
    sub_DETAIL_PAGE_HD(p_apvr_id);
    end if;
    /* cursor loop */
    for p in people_cur(p_rpt_from_dt, p_rpt_to_dt) loop
    /* is/was this person assigned to the selected approver for the report period */
    v_display_fl := FALSE;
    if nvl(p_tcs_user_id, 0) > 0 then
    if p_tcs_user_id = p.tcs_user_id then
    htp.p('<br>Selected User');
    v_display_fl := TRUE;
    end if;
    elsif nvl(p_apvr_id, 0) = 0 then
    if nvl(p_apvr_id, 0) = 0 then
    v_display_fl := TRUE;
    elsif p_apvr_id > 0 or p_apvr_id = -1 then
    v_display_fl := fct_ASSIGNED_APVR(p.tcs_user_id, p_apvr_id, p_rpt_from_dt, p_rpt_to_dt);
    end if;
    if v_display_fl then
    v_people_cnt := v_people_cnt + 1;
    lg_tcs_owner_info.USER_ID := p.tcs_user_id;
    lg_tcs_owner_info.PAY_ID := p.pay_id;
    lg_tcs_owner_info.PAY_TYPE := p.pay_typ;
    lg_tcs_owner_info.SYS_STRT_DT := p.sys_strt_dt;
    lg_tcs_owner_info.TERM_DT := p.sys_end_dt;
    if p.pay_typ = 'S' then
    begin
    select wrk_hire_dt
    into lg_tcs_owner_info.hire_dt
    from subcntr
    where sub_id = p.pay_id;
    exception
    when no_data_found then
    tc_debug.html_message('subcntr.pay_id('||p.pay_id||')');
    end;
    else
    select
    wrk_hire_dt,
    decode(bend_empl_fl, 'Y', 'E', 'W')
    into
    lg_tcs_owner_info.hire_dt,
    lg_tcs_owner_info.pay_type
    from empl
    where empl_id = lg_tcs_owner_info.PAY_ID;
    end if;
    if lga_report_out.count = 0 then
    lga_report_out(lga_report_out.count+1) := '<table border="1" cellpadding="3" width="'||lg_page_width||'">';
    end if;
    if mod(v_people_cnt,2) = 1 then
    lga_report_out(lga_report_out.count+1) := ('<tr bgcolor="'||lg_odd_bgcolor||'">');
    else
    lga_report_out(lga_report_out.count+1) := ('<tr bgcolor="'||lg_even_bgcolor||'">');
    end if;
    lga_report_out(lga_report_out.count+1) := ('<td valign="top"><font size=-2>'||p.name||'</font></td >');
    lga_report_out(lga_report_out.count+1) := ('<td valign="top"><font size=-2>'||p.pay_typ||'-'||lpad(p.pay_id,4,'0')||'</font></td >');
    if nvl(p_apvr_id, 0) > 0 then /* Single Approver */
    /* need approver ID for time card "status" */
    lga_apvr := lga_apvr_null; /* clear the approver id array */
    lga_apvr(1).apvr_tcs_id := p_apvr_id;
    elsif nvl(p_apvr_id, 0) = 0 then /* ALL Approvers */
    lga_apvr := lga_apvr_null; /* clear the approver id array */
    v_cnt := 0;
    for ap in apvr_cur (p.tcs_user_id) loop
    if v_cnt = 0 then
    /* most recent approver may not be the applicable approver */
    v_cnt := 1;
    lga_apvr(v_cnt).apvr_name := ap.apvr_name; -- identify multiple approvers for the "status"
    lga_apvr(v_cnt).apvr_tcs_id := ap.fk_tcs_apvr_id; -- identify multiple approvers for the "status"
    lga_apvr(v_cnt).apvr_pay_id := ap.apvr_pay_id; -- identify multiple approvers for the "status"
    v_apvr_id := ap.fk_tcs_apvr_id;
    if ap.apvr_pay_typ = 'S' then
    lga_apvr(v_cnt).apvr_pay_typ := ap.apvr_pay_typ; -- identify multiple approvers for the "status"
    else
    select decode(bend_empl_fl, 'Y', 'E', 'W')
    into lga_apvr(1).apvr_pay_typ
    from empl
    where empl_id = lga_apvr(1).apvr_pay_id;
    end if;
    end if;
    if ap.strt_dt <= p_rpt_to_dt and nvl(ap.end_dt, p_rpt_to_dt) >= p_rpt_from_dt then
    /* approver record */
    lg_tcs_owner_info.APVR_ID := ap.fk_tcs_apvr_id;
    lg_tcs_owner_info.APVR_STRT_DT := ap.strt_dt;
    lg_tcs_owner_info.APVR_END_DT := ap.end_dt;
    don't enter same approver name multiple times
    when same approver has been assigned more than once
    Example: approver1, approver_2, approver_1 (change back to approver 1)
    for i in 1..lga_apvr.count loop
    v_apvr_id := ap.fk_tcs_apvr_id;
    if lga_apvr(i).apvr_tcs_id = ap.fk_tcs_apvr_id then
    /* don't add again */
    v_apvr_id := NULL;
    exit;
    end if;
    end loop;
    if v_apvr_id is not NULL then
    v_cnt := v_cnt + 1;
    lga_apvr(v_cnt).apvr_name := ap.apvr_name; -- identify multiple approvers for the "status"
    lga_apvr(v_cnt).apvr_tcs_id := ap.fk_tcs_apvr_id; -- identify multiple approvers for the "status"
    lga_apvr(v_cnt).apvr_pay_id := ap.apvr_pay_id; -- identify multiple approvers for the "status"
    lga_apvr(v_cnt).apvr_pay_typ := ap.apvr_pay_typ; -- identify multiple approvers for the "status"
    end if;
    end if;
    end loop;
    /* list approver pay IDs */
    lga_report_out(lga_report_out.count+1) := ('<td valign="top"><font size=-2>');
    if lga_apvr.count = 0 then
    lga_report_out(lga_report_out.count+1) := 'Approver Unassigned';
    else
    for i in 1..lga_apvr.count loop
    if i > 1 then
    lga_report_out(lga_report_out.count+1) := '<br>';
    end if;
    lga_report_out(lga_report_out.count+1) := (lga_apvr(i).apvr_name);
    end loop;
    end if;
    lga_report_out(lga_report_out.count+1) := ('<td valign="top"><font size=-2>');
    if lga_apvr.count = 0 then
    lga_report_out(lga_report_out.count+1) := 'N/A';
    else
    for i in 1..lga_apvr.count loop
    if i > 1 then
    lga_report_out(lga_report_out.count+1) := '<br>';
    end if;
    lga_report_out(lga_report_out.count+1) := (lga_apvr(i).apvr_pay_typ)||'-'||lpad(lga_apvr(i).apvr_pay_id,4,'0');
    end loop;
    end if;
    lga_report_out(lga_report_out.count+1) := ('</font></td >');
    end if;
    for t in tc_cur(p.tcs_user_id, p_rpt_from_dt, p_rpt_to_dt) loop
    htp.p('<! '||t.strt_dt||', '||t.end_dt||', '||t.stat_cd||' -->');
    --lga_report_out(lga_report_out.count+1) := ('<td valign="top"><font size=-2>');
    --lga_report_out(lga_report_out.count+1) := (t.stat_cd);
    --lga_report_out(lga_report_out.count+1) := ('</font></td >');
    /* has the selected approver has completed processing */
    if p_apvr_id > 0
    and v_apvr_id = p_apvr_id
    and v_a_user_id != p_apvr_id
    then
    exit;
    end if;
    for ap in apvr_cur (p.tcs_user_id) loop
    if apvr_cur%rowcount = 1 then
    /* most recent approver assigned */
    lg_tcs_owner_info.apvr_id := ap.fk_tcs_apvr_id;
    end if;
    if ap.strt_dt <= t.end_dt and nvl(ap.end_dt, t.end_dt) >= t.strt_dt then
    /* approver assigned during time card period */
    lg_tcs_owner_info.apvr_id := ap.fk_tcs_apvr_id;
    exit;
    end if;
    end loop;
    lg_tc_status.strt_dt := t.strt_dt;
    lg_tc_status.end_dt := t.end_dt;
    lg_tc_status.stat_cd := t.stat_cd;
    v_stat_cd := fct_TC_STATUS(nvl(p_apvr_id, 0));
    lga_report_out(lga_report_out.count+1) := ('<td align="center" valign="top" bgcolor="'||lg_tc_status.bg_color||'">');
    lga_report_out(lga_report_out.count+1) := ('<font size=-2 color='||lg_tc_status.font_color||'>');
    lga_report_out(lga_report_out.count+1) := v_stat_cd;
    lga_report_out(lga_report_out.count+1) := ('</font></td >');
    end loop;
    lga_report_out(lga_report_out.count+1) := '</tr>';
    end if; /* v_display_fl */
    end loop;
    if p_rpt_type in ('B', 'S') then
    lg_page_cnt := lg_page_cnt + 1;
    sub_DISPLAY_STATUS_SUMMARY;
    end if;
    if lga_report_out.count > 0 then
    lga_report_out(lga_report_out.count+1) := '</table>';
    end if;
    if lga_report_out.count > 0 then
    if p_rpt_type = 'B' or p_apvr_id > 0 then
    if p_display_hdr then
    if lg_page_cnt > 0 then
    if p_apvr_id > 0 then /* selected individual approver */
    htp.p('</table>');
    end if;
    htp.p('<br style="page-break-after:always">');
                        htp.p('<!-- &&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& -->');
                        htp.p('<!-- &&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& -->');
    end if;
    lg_page_cnt := lg_page_cnt + 1;
    tc_reporting.reports_header
    1,
    'Time Card Status Report',
    'for '||dd_mon_yyyy(p_rpt_from_dt)||' through '||dd_mon_yyyy(p_rpt_to_dt)||'<BR>'||
    'Report Date: '||dd_mon_yyyy(lg_sysdate)||' Time: '||v_time_str,
    NULL,
    NULL,
    NULL,
    NULL, -- p_backto_pg, /* Backto */
    'focus()',
    lg_page_cnt
    end if;
    end if;
    if p_rpt_type in ('B', 'D') then
    for i in 1..lga_report_out.count loop
    htp.p(lga_report_out(i));
    end loop;
    end if;
    end if;
    END sub_STATUS_BD_ALPHA;
    Some veriable
    type report_tc_rec is record
    tc_owner_name tc_wkr.d_full_nm_lfm%type,
    o_user_id tc_wkr.tc_row_id%type,
    o_pay_id varchar2(10),
    o_sys_strt_dt date,
    o_sys_end_dt date,
    tc_apvr_name tc_wkr.d_full_nm_lfm%type,
    a_pay_id varchar2(10),
    a_user_id tc_wkr.tc_row_id%type,
    tc_strt_dt date,
    tc_end_dt date,
    tc_stat_cd varchar2(50),
    ap_strt_dt date,
    ap_end_dt date
    /* time card owner information */
    TYPE tcs_owner_info_rec IS RECORD
    USER_ID tc_wkr.tc_row_id%type,
    PAY_ID tc_wkr.tcw_id%type,
    PAY_TYPE tc_wkr.tcw_typ%type,
    HIRE_DT date,
    SYS_STRT_DT date,
    TERM_DT date,
    APVR_ID tc_wkr.tc_row_id%type,
    APVR_STRT_DT date,
    APVR_END_DT date
    /* status code determines report cell font and background colors */
    TYPE tc_status_rec IS RECORD
    STRT_DT date,
    END_DT date,
    STAT_CD tc.stat_cd%type,
    FONT_COLOR varchar2(16),
    BG_COLOR varchar2(16)
    /* count of all time card status for report summary */
    TYPE tc_status_summary_rec IS RECORD
    APPROVED_CNT integer := 0,
    REJECTED_CNT integer := 0,
    SUBMITTED_CNT integer := 0,
    POSTED_CNT integer := 0,
    VERIFIED_CNT integer := 0,
    OPEN_CNT integer := 0,
    NEW_CNT integer := 0,
    REQUIRED_CNT integer := 0,
    TOTAL_CNT integer := 0
    /* determine multiple approvers for individual for selected report period */
    TYPE apvr_rec IS RECORD
    apvr_name tc_wkr.d_full_nm_lfm%type,
    apvr_tcs_id tc_wkr.tc_row_id%type,
    apvr_pay_id tc_wkr.tcw_id%type,
    apvr_pay_typ tc_wkr.tcw_typ%type
    TYPE apvr_id_array_table IS TABLE OF apvr_rec
    index by binary_integer;
    type output_array is table of varchar2(1000)
    index by binary_integer;
    type date_array is table of date
    index by binary_integer;
    type status_array is table of varchar2(1000)
    index by binary_integer;
    type apvr_array is table of number(8)
    index by binary_integer;
    lga_report_out output_array; /* array of HTML code to be output to browser */
    lga_report_out_null output_array; /* null array of HTML code */
    lga_tc_status status_array;
    lga_null_status status_array;
    lga_tc_strt_dt date_array;
    lga_tc_end_dt date_array;
    lga_tc_disp date_array; /* start dates of displayed TC for selected user */
    lga_null_date date_array; /* null array used to clear other date arrays */
    /* LOCAL GLOBAL VARIABLES */
    lg_tcs_owner_info tcs_owner_info_rec; /* time card owner information */
    lg_tc_status tc_status_rec; /* time card status information */
    lg_tc_status_summary tc_status_summary_rec; /* time card count by status */
    lg_tc_rec report_tc_rec; /* time card */
    lga_apvr apvr_id_array_table; /* array of approver Names and Payroll IDs */
    lga_apvr_null apvr_id_array_table; /* clear the lga_apvr array for each user */
    lg_sysdate date := sysdate;
    lg_debug_fl boolean := FALSE;
    lg_debug_owner_id tc_wkr.tc_row_id%type := 9905;
    lg_debug_apvr_id tc_wkr.tc_row_id%type := 1000;
    The chnages i have done its in bold
    Please Advice
    Thanks
    Edited by: Purvik on Aug 25, 2009 11:59 AM

    There is not a chance in the world, especially not knowing column definitions that I, and I suspect most anyone else, is going to wade through this much unformated code looking for an error you couldn't bother to copy in full.
    Either tell us, specifically, the line on which the error is occurring or, better yet, start whacking stuff out of your code until you find the offending definition. That is certainly what I would do. Commenting out sections is a marvelous way to quickly find an issue.
    Before you post again please read the FAQ. It will explain to you how to properly post and use the tags.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           

  • Report error: ORA-06502: PL/SQL: numeric or value error: character string b

    I have a form which uses a customer form/report, drop downs etc..
    the debug shows it running this statement
    ...Execute Statement: begin begin SELECT distinct initcap(RTRIM (LTRIM (e.surname, ' *0123456789-/:.?,'), ' *0123456789-/:.?,') || ', ' || RTRIM (LTRIM (e.first_name, ' *0123456789-/:.?,'), ' *0123456789-/:.?,' )) empname, e.ID bulk collect into wwv_flow_utilities.g_display,wwv_flow_utilities.g_value FROM dms.dms_employees@dmsprd e, dms.dms_employee_contracts@dmsprd ec WHERE e.ID = ec.emp_id and e.surname like '%%' AND :p75_date BETWEEN ec.start_date AND NVL (ec.end_date, :p75_date) AND e.brh_id = 3654 ORDER BY 1; end; end;
    Then says
    "report error: ORA-06502: PL/SQL: numeric or value error: character string buffer too small"
    Any Ideas?
    Thanks
    Dean

    Denes Kubicek wrote:
    A select list is limited in size. I am not sure what the limit is but that is definitelly the case.The maximum size for the HTML generated for a select list is 32K.
    86 options sounds on the low side to be hitting that limit, but there are other concerns to this as well. Scrolling through hundreds/thousands of options in a select list is a pain for users, and huge select lists produce bloated pages that impact load times and network bandwidth. That list of around 200 countries you find on many sites is about the sensible maximum length for a select list.
    You should use popups.Indeed.

  • Report error:ORA-06502: PL/SQL: numeric or value error: character to number

    The oracle application express environment is created by installing the HTTP Server on the windows server and the application express 3.2.1 components on the 11.1.0.7 oracle database on UNIX. The installation is successfully and have not seen any issues during the installation. After completing all the steps, when tried to login and click the application builder or workspace components, I see the error message
    report error:ORA-06502: PL/SQL: numeric or value error: character to number.
    This error message is seen on most of the pages when trying to accessed and not able to understand the reasons behind it. Its a brand new environment setup and not even presented to developers to test it.
    Below error message is always seen when trying to access most of the components like application builder, schema comparison and some other tabs. Please advice
    report error:
    ORA-06502: PL/SQL: numeric or value error: character to number conversion error
    Edited by: user589320 on Jun 9, 2011 5:17 PM

    I think its better you use APEX 4.x version ratherthan using old version.
    You will get more features and some bug fixes and also it's easy for you to get some help when you need.
    * If this answer is helpfull or correct then please mark it and grant the points.

  • Report error:ORA-06502: PL/SQL: numeric or value error: character string bu

    We face the above error in HTMLDB (APEX) application Ver 3.1.0. This occurs when we try to display more number of rows/records in drop-down list (LOV in tabular forms). We are able to display 200 records in LOV. When the list of records exceeds 230, we face the below error
    report error:ORA-06502: PL/SQL: numeric or value error: character string buffer too small
    the values listed in LOV are from tables (one of the columns in table)
    Could anyone give us a solution?

    Hi
    As you are using a tabular form, you could actually do the following:
    1 - In the tabular form column's attributes, set the following:
    Display as: Select List (query based on LOV)
    Display extra values: Yes
    List of values definition: SELECT null d, null r FROM DUAL
    2 - Add a new page item and set it to generate your select list
    3 - Create an HTML region with no template and use the following for its source:
    &lt;script type="text/javascript"&gt;
    function loadList(c, l)
    var s = document.getElementsByName(c);
    var lItem = document.getElementById(l);
    var lLength = lItem.options.length;
    var k;
    var j;
    var x = lItem.innerHTML;
    var v;
    var o;
    var z;
    for (k = 0; k &lt; s.length; k++)
    z = s[k];
    v = z.value;
    z.options.length = 0;
    for (j = 0; j &lt; lLength; j++)
    o = new Option()
    o.value = lItem[j].value;
    o.text = lItem[j].text;
    z.options[j] = o;
    z.value = v;
    if (z.selectedIndex == -1)
    z.selectedIndex = 0;
    loadList("f05", "P1_MGR");
    &lt;/script&gt;
    (Change "f05" and "P1_MGR" as appropriate to your column and your new page item respectively)
    Now, when you load the page, the select list contains a null entry plus the entry already on the database. The javascript kicks in automatically, loops through every entry in the "f05" column, copies the existing value, replaces the select list with the new page item version and sets its value to the copied value.
    Your new page item could be in a DIV tag that has a style of "display:none" to hide it from view.
    Andy

  • Report error: ORA-06502: PL/SQL: numeric or value error: NULL index table k

    Hi everybody,
    I have two Distinct Databases on two distinct servers. (Oracle Ent. Release 10.2.0.3.0 on AIX 5.3). After I install the latest patch last week, One of the APEX installation has some problems on Home>Application Builder Page. The error message is very random and
    report error:
    ORA-06502: PL/SQL: numeric or value error: NULL index table key value.
    When i change the view (details to icons), everything goes to normal. This error message is reflected some of the pages (report region) of some of my applications randomly. When it appears in a report region, i deselect the order method of the region, the result is normal.
    But the other APEX application on the other instance has no problem. It is a bug? or Should i re-install the APEX instance?
    Thank you for your interest?
    Gökhan ÇATALKAYA

    No, but we have a reproducible test case now so we're working on it. See ORA-06502: PL/SQL: numeric or value error: NULL index table key value
    Scott

  • REP-1401: 'cf_10formula': Fatal PL/SQL error occurred. ORA-06502: PL/SQL: numeric or value error

    Hi Team,
    I am running one conc programme.
    After running I am getting below  error. I checked the issue on metalink  and other, seems that it is an size related issue. I have increased the size of formula columns and placeholdder too.
    But still getting issue.
    My requirement is to get comma seperated values using SQL query itself. Neither i wanted to create layout of the report , since it is a XML publisher report and nor  I am including it on RTF template.
    I want the CF_10 formula column to be populated with comma seperated values.
    MSG-00187: From Date 01-Sep-2014
    REP-1401: 'cf_10formula': Fatal PL/SQL error occurred.
    ORA-06502: PL/SQL: numeric or value error
    And Here is my code for CF_10
    function CF_10Formula return Number is
    begin
       SELECT NVL(TO_CHAR(sum(Amount),'99,99,99,999'),0) into :CP_5 --NVL(ROUND(sum(Amount)),0) into :CP_5
    --  xxhw_Coll_cat(category)     "Intercat  Catg"
    FROM hhxw_Region_col_v
    WHERE Category IN ('Intercompany - CATV')
    AND trunc(gl_date) BETWEEN TO_DATE(:P_FROM_DATE, 'DD/MM/RRRR') AND TO_DATE(:P_TO_DATE, 'DD/MM/RRRR');
    RETURN ROUND(:CP_5);
    end;
    Anyone please suggest me.
    Regards,
    Sachin

    Hi,
    1)Why are you selecting the value into a report item? Select into a local variable and return that
    RETURN :CP_5 --> This one!!
    2)And you should avoid applying functions to DB columns in where clauses wherever possible, so oracle can use indexes on them if applicable:
    AND gl_date >= To_date(:P_FROM_DATE, 'DD/MM/RRRR')
    AND gl_date < To_date( :P_TO_DATE, 'DD/MM/RRRR') + 1;
    I think you are taking 2 column in the Layout CF_10 and CP_5 right? if so, then use below Query.
    FUNCTION cf_10formula
      RETURN NUMBER
    IS
      v_amount NUMBER:null;
    IS
    BEGIN
      BEGIN
        SELECT nvl(round(SUM(amount)), 0)
        INTO   v_amount --> Retruns the value for CF_10 column
        FROM   hhxw_region_col_v
        WHERE  category IN ( 'Intercompany - CATV' )
        AND    gl_date >= to_date(:P_FROM_DATE, 'DD/MM/RRRR')
        AND    gl_date < to_date( :P_TO_DATE, 'DD/MM/RRRR') + 1;
        :CP_5 := nvl(trunc(v_amount),0); --> Retruns the value for CP_5 column
      EXCEPTION
      WHEN OTHERS THEN
        v_amount := 0;
        srw.message(1003,'Error in Getting  :' ||p_from_date);
      END;
    END;
    And
    If you've got a number function returning into a number field then all you should need to do to make the comma appear is to change the number format mask in field.
    From 40000 to 40,000

  • SQL Report query ORA-06502: PL/SQL: numeric or value error: character strin

    Hello,
    I have saved below query in the sql scripts, which executes good under SQL Developer,
    select     "RVV"."RLNUM" as "RLNUM",
         "GVREB"."RLNUM" as "RLNUM",
         "TVV"."RLNUM" as "RLNUM_1",
         "Regulation"."CODE" as "CODE",
         "Regulation"."NAAM" as "NAAM",
         "GVREB"."BRONCODE" as "BRONCODE",
         sum(RVV.RVV_MODULATIE) as "RVV_MODULATIE",
         sum(RVV.RVV_EXTRA_MODUL) as "RVV_EXTRA_MODUL",
         sum(GVREB.PMB) as "PMB",
         sum(GVREB.VVM) as "VVM",
         sum(GVREB.VVEM) as "VVEM",
         "GVREB"."STATUS" as "STATUS",
         sum(TVV.VVM) as "VVM",
         sum(TVV.VVEM) as "VVEM",
         "Regulation"."version" as "version",
         "TVV"."Appyear" as "Appyear"
    from     "GVREB" "GVREB",
         "RVV" "RVV",
         "TVV" "TVV",
         "Regulation" "Regulation"
    where      "RVV"."RLNUM" = :P17_Relationnum
    and     "GVREB"."RLNUM" = "RVV"."RLNUM"
    and     "TVV"."RLNUM" = "GVREB"."RLNUM"
    and     "GVREB"."CODE" = "TVV"."RegulationSCODE"
    and     "Regulation"."CODE" = "GVREB"."CODE"
    and     "GVREB"."STATUS" = 'VWT'
    and     "TVV"."Appyear" = 2009
    group by RVV.RLNUM, GVREB.RLNUM, TVV.RLNUM, Regulation.CODE, Regulation.NAAM, GVREB.BRONCODE, GVREB.STATUS, Regulation.version, TVV.Appyear
    order by Regulation.version ASC
    however when tried to put in the region -> query builder it gives below error,
    italics ORA-06502: PL/SQL: numeric or value error: character string buffer too small
    Return to application.+italics+
    Kindly suggest me work around this error.
    Cheers,
    G1R15|-|
    Edited by: G on Jul 11, 2010 10:03 PM

    Hi,
    I was able to resolve the issue. I changed it to = To_Number while assigning.
    and for other issue, earlier I choose "Select List" for drop down. I changed this to "Select list with Submit". for the issue of "depending on this values in the report should get change"
    Thanks for your support,
    Girish

  • PL/SQL function body returning SQL query - ORA-06502: PL/SQL: numeric or value error

    I'm attempting to dynamically generate a rather large SQL query via the "PL/SQL function body returning SQL query" report region option.  The SQL query generated will possibly be over 32K.  When I execute my page, I sometimes receive the "ORA-06502: PL/SQL: numeric or value error" which points to a larger than 32K query that was generated.  I've seen other posts in the forum related to this dynamic SQL size limitation issue, but they are older (pre-2010) and point to the 32K limit of the DNS (EXECUTE IMMEDIATE) and DBMS_SQL.  I found this post (dynamic sql enhancements in 11g) which discusses 11g no longer having the 32K size limitation for generating dynamic SQL.  Our environment is on 11gR2 and using ApEx 4.2.1.  I do not know which dynamic SQL method -- DNS or DBMS_SQL -- ApEx 4.2.1 is using.  Can someone clarify for me which dynamic SQL method ApEx uses to implement the "PL/SQL function body returning SQL query" option?
    As a test, I created a page on apex.oracle.com with a report region with the following source:
    declare
      l_stub varchar2(25) := 'select * from sys.dual ';
      l_sql  clob := l_stub || 'union all ';
      br     number(3) := 33;
    begin
      while length ( l_sql ) < 34000 loop
        l_sql := l_sql || l_stub || 'union all ';
      end loop;
      l_sql := l_sql || l_stub;
      for i in 1 .. ceil ( length ( l_sql ) / br ) loop
        dbms_output.put_line ( dbms_lob.substr ( l_sql, br, ( ( i - 1 ) * br ) + 1 ) );
      end loop;
      return l_sql;
    end;
    The dbms_output section is there to be able to run this code in SQL*Plus and confirm the size of the SQL is indeed larger than 32K.  When running this in SQL*Plus, the procedure is successful and produces a proper SQL statement which can be executed.  When I put this into the report region on apex.oracle.com, I get the ORA-06502 error.
    I can certainly implement a work-around for my issue by creating a 'Before Header' process on the page which populates an ApEx collection with the data I am returning and then the report can simply select from the collection, but according to documentation, the above 32K limitation should be resolved in 11g.  Thoughts?
    Shane.

    What setting do you use in your report properties - especially in Type and in Region Source?
    If you have Type="SQL Query", then you should have a SELECT statement in the Region Source. Something like: SELECT .... FROM ... WHERE
    According to the ERR-1101 error message, you have probably set Type to "SQL Query (PL/SQL function body returning SQL query)". In this situation APEX expects you to write a body of a PL/SQL function, that will generate the text of a SQL query that APEX should run. So it can be something like:
    declare
    mycond varchar2(4000);
    begin
    if :P1_REPORT_SEARCH is not null THEN
    mycond:='WHERE LAST_NAME like :P1_REPORT_SEARCH ||''%''';
    end if;
    return 'select EMPLOYEE_ID, FIRST_NAME, LAST_NAME from EMPLOYEES ' ||mycond;
    end;
    And for escaping - are you interested in escaping the LIKE wildcards, or the quotes?
    For escaping the wildcards in LIKE function so that when the user enters % you will find a record with % and not all functions, look into the SQL Reference:
    http://download-uk.oracle.com/docs/cd/B19306_01/server.102/b14200/conditions007.htm
    (You would than need to change the code of your function accordingly).
    If you are interested in escaping the quotes, try to avoid concatenating the values entered by the user into the SQL. If you can, use bind variables instead - as I have in my example above. If you start concatenating the values into the text of SQL, you are open to SQLInjection - user can enter anything, even things that will break your SQL. If you really need to allow users to choose the operator, I would probably give them a separate combo for operators and a textfield for values, than you could check if the operator is one of the allowed ones and create the condition accordingly - and than still use bind variable for inserting the filtering value into the query.

Maybe you are looking for