18: -- cursor variable
19: cursor update_tmp_tbl is SELECT ID,SESSION_ID
20: FROM biv_tmp_sr_arrvl where ID is not null
21: and session_id = biv_core_pkg.get_session_id;
22: -- dbms sql variable
23: owner_lists dbms_sql.number_table;
24: cur pls_integer:=dbms_sql.open_cursor;
25: cur2 pls_integer:=dbms_sql.open_cursor;
26: fdbk pls_integer;
19: cursor update_tmp_tbl is SELECT ID,SESSION_ID
20: FROM biv_tmp_sr_arrvl where ID is not null
21: and session_id = biv_core_pkg.get_session_id;
22: -- dbms sql variable
23: owner_lists dbms_sql.number_table;
24: cur pls_integer:=dbms_sql.open_cursor;
25: cur2 pls_integer:=dbms_sql.open_cursor;
26: fdbk pls_integer;
27: v_batchsize constant integer :=100;
20: FROM biv_tmp_sr_arrvl where ID is not null
21: and session_id = biv_core_pkg.get_session_id;
22: -- dbms sql variable
23: owner_lists dbms_sql.number_table;
24: cur pls_integer:=dbms_sql.open_cursor;
25: cur2 pls_integer:=dbms_sql.open_cursor;
26: fdbk pls_integer;
27: v_batchsize constant integer :=100;
28: sql_stmt varchar2(2000);
21: and session_id = biv_core_pkg.get_session_id;
22: -- dbms sql variable
23: owner_lists dbms_sql.number_table;
24: cur pls_integer:=dbms_sql.open_cursor;
25: cur2 pls_integer:=dbms_sql.open_cursor;
26: fdbk pls_integer;
27: v_batchsize constant integer :=100;
28: sql_stmt varchar2(2000);
29: insert_stmt varchar2(4000);
120: if (l_debug = 'Y') then
121: biv_core_pkg.biv_debug(insert_stmt,'BIV_AGNT_SR_ARRIVAL');
122: end if;
123:
124: dbms_sql.parse(cur,sql_stmt,dbms_sql.native);
125: dbms_sql.parse(cur2,insert_stmt,dbms_sql.native);
126:
127: dbms_sql.define_array(cur,1,owner_lists,v_batchsize,1);
128:
121: biv_core_pkg.biv_debug(insert_stmt,'BIV_AGNT_SR_ARRIVAL');
122: end if;
123:
124: dbms_sql.parse(cur,sql_stmt,dbms_sql.native);
125: dbms_sql.parse(cur2,insert_stmt,dbms_sql.native);
126:
127: dbms_sql.define_array(cur,1,owner_lists,v_batchsize,1);
128:
129: biv_core_pkg.bind_all_variables(cur);
123:
124: dbms_sql.parse(cur,sql_stmt,dbms_sql.native);
125: dbms_sql.parse(cur2,insert_stmt,dbms_sql.native);
126:
127: dbms_sql.define_array(cur,1,owner_lists,v_batchsize,1);
128:
129: biv_core_pkg.bind_all_variables(cur);
130: biv_core_pkg.bind_all_variables(cur2);
131:
129: biv_core_pkg.bind_all_variables(cur);
130: biv_core_pkg.bind_all_variables(cur2);
131:
132:
133: fdbk:=dbms_sql.execute(cur);
134:
135: loop
136: l_num_rows :=dbms_sql.fetch_rows(cur);
137: dbms_sql.column_value(cur,1,owner_lists);
132:
133: fdbk:=dbms_sql.execute(cur);
134:
135: loop
136: l_num_rows :=dbms_sql.fetch_rows(cur);
137: dbms_sql.column_value(cur,1,owner_lists);
138:
139: if l_num_rows=0 then
140: exit;
133: fdbk:=dbms_sql.execute(cur);
134:
135: loop
136: l_num_rows :=dbms_sql.fetch_rows(cur);
137: dbms_sql.column_value(cur,1,owner_lists);
138:
139: if l_num_rows=0 then
140: exit;
141: end if;
139: if l_num_rows=0 then
140: exit;
141: end if;
142:
143: dbms_sql.bind_array(cur2,':in_owner_lists',owner_lists,1,l_num_rows);
144: dbms_sql.bind_variable(cur2,':x_session',x_session);
145:
146:
147: fdbk:=dbms_sql.execute(cur2);
140: exit;
141: end if;
142:
143: dbms_sql.bind_array(cur2,':in_owner_lists',owner_lists,1,l_num_rows);
144: dbms_sql.bind_variable(cur2,':x_session',x_session);
145:
146:
147: fdbk:=dbms_sql.execute(cur2);
148: exit when l_num_rows < v_batchsize;
143: dbms_sql.bind_array(cur2,':in_owner_lists',owner_lists,1,l_num_rows);
144: dbms_sql.bind_variable(cur2,':x_session',x_session);
145:
146:
147: fdbk:=dbms_sql.execute(cur2);
148: exit when l_num_rows < v_batchsize;
149:
150: end loop;
151: dbms_sql.close_cursor(cur);
147: fdbk:=dbms_sql.execute(cur2);
148: exit when l_num_rows < v_batchsize;
149:
150: end loop;
151: dbms_sql.close_cursor(cur);
152: dbms_sql.close_cursor(cur2);
153: l_start_tz:=nvl(fnd_profile.value('SERVER_TIMEZONE_ID'),0);
154:
155: if biv_core_pkg.g_tm_zn is not null then
148: exit when l_num_rows < v_batchsize;
149:
150: end loop;
151: dbms_sql.close_cursor(cur);
152: dbms_sql.close_cursor(cur2);
153: l_start_tz:=nvl(fnd_profile.value('SERVER_TIMEZONE_ID'),0);
154:
155: if biv_core_pkg.g_tm_zn is not null then
156: l_end_tz:=to_number(nvl(biv_core_pkg.g_tm_zn,0));
454: cursor update_tmp_tbl is SELECT ID,SESSION_ID
455: FROM biv_tmp_sr_ARRVL where session_id = biv_core_pkg.get_session_id
456: --ID is not null
457: ;
458: -- DBMS_SQL variable
459: cur2 pls_integer:=dbms_sql.open_cursor;
460: fdbk pls_integer;
461: insert_stmt varchar2(4000);
462: l_owner_id number;
455: FROM biv_tmp_sr_ARRVL where session_id = biv_core_pkg.get_session_id
456: --ID is not null
457: ;
458: -- DBMS_SQL variable
459: cur2 pls_integer:=dbms_sql.open_cursor;
460: fdbk pls_integer;
461: insert_stmt varchar2(4000);
462: l_owner_id number;
463: x_from_list varchar2(2000);
534: biv_core_pkg.biv_debug(insert_stmt,'BIV_PRD_SR_ARRIVAL');
535: end if;
536:
537:
538: dbms_sql.parse(cur2,insert_stmt,dbms_sql.native);
539:
540:
541: biv_core_pkg.bind_all_variables(cur2);
542:
539:
540:
541: biv_core_pkg.bind_all_variables(cur2);
542:
543: --12/30/02 dbms_sql.bind_variable(cur2,':l_owner_id',l_owner_id);
544: dbms_sql.bind_variable(cur2,':X_SESSION',X_SESSION);
545: fdbk:=dbms_sql.execute(cur2);
546:
547: dbms_sql.close_cursor(cur2);
540:
541: biv_core_pkg.bind_all_variables(cur2);
542:
543: --12/30/02 dbms_sql.bind_variable(cur2,':l_owner_id',l_owner_id);
544: dbms_sql.bind_variable(cur2,':X_SESSION',X_SESSION);
545: fdbk:=dbms_sql.execute(cur2);
546:
547: dbms_sql.close_cursor(cur2);
548:
541: biv_core_pkg.bind_all_variables(cur2);
542:
543: --12/30/02 dbms_sql.bind_variable(cur2,':l_owner_id',l_owner_id);
544: dbms_sql.bind_variable(cur2,':X_SESSION',X_SESSION);
545: fdbk:=dbms_sql.execute(cur2);
546:
547: dbms_sql.close_cursor(cur2);
548:
549: if (l_debug = 'Y') then
543: --12/30/02 dbms_sql.bind_variable(cur2,':l_owner_id',l_owner_id);
544: dbms_sql.bind_variable(cur2,':X_SESSION',X_SESSION);
545: fdbk:=dbms_sql.execute(cur2);
546:
547: dbms_sql.close_cursor(cur2);
548:
549: if (l_debug = 'Y') then
550: biv_core_pkg.biv_debug('Update table:','BIV_PRD_SR_ARRIVAL');
551: end if;