532: --
533: hr_utility.set_location ('arch_initialise',6);
534: hr_utility.trace(statem);
535:
536: sql_cur := dbms_sql.open_cursor;
537: dbms_sql.parse(sql_cur,
538: statem,
539: dbms_sql.v7);
540: --
533: hr_utility.set_location ('arch_initialise',6);
534: hr_utility.trace(statem);
535:
536: sql_cur := dbms_sql.open_cursor;
537: dbms_sql.parse(sql_cur,
538: statem,
539: dbms_sql.v7);
540: --
541: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
535:
536: sql_cur := dbms_sql.open_cursor;
537: dbms_sql.parse(sql_cur,
538: statem,
539: dbms_sql.v7);
540: --
541: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
542: ignore := dbms_sql.execute(sql_cur);
543: dbms_sql.close_cursor(sql_cur);
537: dbms_sql.parse(sql_cur,
538: statem,
539: dbms_sql.v7);
540: --
541: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
542: ignore := dbms_sql.execute(sql_cur);
543: dbms_sql.close_cursor(sql_cur);
544: --
545: hr_utility.set_location('arch_initialise', 7);
538: statem,
539: dbms_sql.v7);
540: --
541: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
542: ignore := dbms_sql.execute(sql_cur);
543: dbms_sql.close_cursor(sql_cur);
544: --
545: hr_utility.set_location('arch_initialise', 7);
546: --
539: dbms_sql.v7);
540: --
541: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
542: ignore := dbms_sql.execute(sql_cur);
543: dbms_sql.close_cursor(sql_cur);
544: --
545: hr_utility.set_location('arch_initialise', 7);
546: --
547: end if;
547: end if;
548: --
549: exception
550: when others then
551: if (dbms_sql.is_open(sql_cur)) then
552: dbms_sql.close_cursor(sql_cur);
553: end if;
554: raise;
555: end;
548: --
549: exception
550: when others then
551: if (dbms_sql.is_open(sql_cur)) then
552: dbms_sql.close_cursor(sql_cur);
553: end if;
554: raise;
555: end;
556: -- Call procedure to retrieve all database items
607: --
608: hr_utility.set_location ('deinitialise',6);
609: hr_utility.trace(statem);
610:
611: sql_cur := dbms_sql.open_cursor;
612: dbms_sql.parse(sql_cur,
613: statem,
614: dbms_sql.v7);
615: --
608: hr_utility.set_location ('deinitialise',6);
609: hr_utility.trace(statem);
610:
611: sql_cur := dbms_sql.open_cursor;
612: dbms_sql.parse(sql_cur,
613: statem,
614: dbms_sql.v7);
615: --
616: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
610:
611: sql_cur := dbms_sql.open_cursor;
612: dbms_sql.parse(sql_cur,
613: statem,
614: dbms_sql.v7);
615: --
616: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
617: ignore := dbms_sql.execute(sql_cur);
618: dbms_sql.close_cursor(sql_cur);
612: dbms_sql.parse(sql_cur,
613: statem,
614: dbms_sql.v7);
615: --
616: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
617: ignore := dbms_sql.execute(sql_cur);
618: dbms_sql.close_cursor(sql_cur);
619: --
620: hr_utility.set_location('deinitialise', 7);
613: statem,
614: dbms_sql.v7);
615: --
616: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
617: ignore := dbms_sql.execute(sql_cur);
618: dbms_sql.close_cursor(sql_cur);
619: --
620: hr_utility.set_location('deinitialise', 7);
621: --
614: dbms_sql.v7);
615: --
616: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
617: ignore := dbms_sql.execute(sql_cur);
618: dbms_sql.close_cursor(sql_cur);
619: --
620: hr_utility.set_location('deinitialise', 7);
621: --
622: end if;
622: end if;
623: --
624: exception
625: when others then
626: if (dbms_sql.is_open(sql_cur)) then
627: dbms_sql.close_cursor(sql_cur);
628: end if;
629: raise;
630: end;
623: --
624: exception
625: when others then
626: if (dbms_sql.is_open(sql_cur)) then
627: dbms_sql.close_cursor(sql_cur);
628: end if;
629: raise;
630: end;
631: --
1097: statem := 'BEGIN '||archiv_proc||'(:pactid, :chunk_number); END;';
1098: --
1099: hr_utility.trace(statem);
1100: hr_utility.set_location ('process_chunk',2);
1101: sql_cur := dbms_sql.open_cursor;
1102: dbms_sql.parse(sql_cur,
1103: statem,
1104: dbms_sql.v7);
1105: dbms_sql.bind_variable(sql_cur, ':pactid', p_payroll_action_id);
1098: --
1099: hr_utility.trace(statem);
1100: hr_utility.set_location ('process_chunk',2);
1101: sql_cur := dbms_sql.open_cursor;
1102: dbms_sql.parse(sql_cur,
1103: statem,
1104: dbms_sql.v7);
1105: dbms_sql.bind_variable(sql_cur, ':pactid', p_payroll_action_id);
1106: dbms_sql.bind_variable(sql_cur, ':chunk_number',
1100: hr_utility.set_location ('process_chunk',2);
1101: sql_cur := dbms_sql.open_cursor;
1102: dbms_sql.parse(sql_cur,
1103: statem,
1104: dbms_sql.v7);
1105: dbms_sql.bind_variable(sql_cur, ':pactid', p_payroll_action_id);
1106: dbms_sql.bind_variable(sql_cur, ':chunk_number',
1107: p_chunk_number);
1108: ignore := dbms_sql.execute(sql_cur);
1101: sql_cur := dbms_sql.open_cursor;
1102: dbms_sql.parse(sql_cur,
1103: statem,
1104: dbms_sql.v7);
1105: dbms_sql.bind_variable(sql_cur, ':pactid', p_payroll_action_id);
1106: dbms_sql.bind_variable(sql_cur, ':chunk_number',
1107: p_chunk_number);
1108: ignore := dbms_sql.execute(sql_cur);
1109: dbms_sql.close_cursor(sql_cur);
1102: dbms_sql.parse(sql_cur,
1103: statem,
1104: dbms_sql.v7);
1105: dbms_sql.bind_variable(sql_cur, ':pactid', p_payroll_action_id);
1106: dbms_sql.bind_variable(sql_cur, ':chunk_number',
1107: p_chunk_number);
1108: ignore := dbms_sql.execute(sql_cur);
1109: dbms_sql.close_cursor(sql_cur);
1110: --
1104: dbms_sql.v7);
1105: dbms_sql.bind_variable(sql_cur, ':pactid', p_payroll_action_id);
1106: dbms_sql.bind_variable(sql_cur, ':chunk_number',
1107: p_chunk_number);
1108: ignore := dbms_sql.execute(sql_cur);
1109: dbms_sql.close_cursor(sql_cur);
1110: --
1111: hr_utility.set_location ('process_chunk',3);
1112: --
1105: dbms_sql.bind_variable(sql_cur, ':pactid', p_payroll_action_id);
1106: dbms_sql.bind_variable(sql_cur, ':chunk_number',
1107: p_chunk_number);
1108: ignore := dbms_sql.execute(sql_cur);
1109: dbms_sql.close_cursor(sql_cur);
1110: --
1111: hr_utility.set_location ('process_chunk',3);
1112: --
1113: exception
1111: hr_utility.set_location ('process_chunk',3);
1112: --
1113: exception
1114: when others then
1115: if (dbms_sql.is_open(sql_cur)) then
1116: dbms_sql.close_cursor(sql_cur);
1117: end if;
1118: raise;
1119: end;
1112: --
1113: exception
1114: when others then
1115: if (dbms_sql.is_open(sql_cur)) then
1116: dbms_sql.close_cursor(sql_cur);
1117: end if;
1118: raise;
1119: end;
1120: end if;
1186: statem := 'BEGIN '||archiv_proc||'(:aactid, :l_effective_date); END;';
1187: --
1188: hr_utility.trace(statem);
1189: hr_utility.set_location ('process_employee',2);
1190: sql_cur := dbms_sql.open_cursor;
1191: dbms_sql.parse(sql_cur,
1192: statem,
1193: dbms_sql.v7);
1194: dbms_sql.bind_variable(sql_cur, ':aactid', aactid);
1187: --
1188: hr_utility.trace(statem);
1189: hr_utility.set_location ('process_employee',2);
1190: sql_cur := dbms_sql.open_cursor;
1191: dbms_sql.parse(sql_cur,
1192: statem,
1193: dbms_sql.v7);
1194: dbms_sql.bind_variable(sql_cur, ':aactid', aactid);
1195: dbms_sql.bind_variable(sql_cur, ':l_effective_date',
1189: hr_utility.set_location ('process_employee',2);
1190: sql_cur := dbms_sql.open_cursor;
1191: dbms_sql.parse(sql_cur,
1192: statem,
1193: dbms_sql.v7);
1194: dbms_sql.bind_variable(sql_cur, ':aactid', aactid);
1195: dbms_sql.bind_variable(sql_cur, ':l_effective_date',
1196: l_effective_date);
1197: ignore := dbms_sql.execute(sql_cur);
1190: sql_cur := dbms_sql.open_cursor;
1191: dbms_sql.parse(sql_cur,
1192: statem,
1193: dbms_sql.v7);
1194: dbms_sql.bind_variable(sql_cur, ':aactid', aactid);
1195: dbms_sql.bind_variable(sql_cur, ':l_effective_date',
1196: l_effective_date);
1197: ignore := dbms_sql.execute(sql_cur);
1198: dbms_sql.close_cursor(sql_cur);
1191: dbms_sql.parse(sql_cur,
1192: statem,
1193: dbms_sql.v7);
1194: dbms_sql.bind_variable(sql_cur, ':aactid', aactid);
1195: dbms_sql.bind_variable(sql_cur, ':l_effective_date',
1196: l_effective_date);
1197: ignore := dbms_sql.execute(sql_cur);
1198: dbms_sql.close_cursor(sql_cur);
1199: --
1193: dbms_sql.v7);
1194: dbms_sql.bind_variable(sql_cur, ':aactid', aactid);
1195: dbms_sql.bind_variable(sql_cur, ':l_effective_date',
1196: l_effective_date);
1197: ignore := dbms_sql.execute(sql_cur);
1198: dbms_sql.close_cursor(sql_cur);
1199: --
1200: hr_utility.set_location ('process_employee',3);
1201: --
1194: dbms_sql.bind_variable(sql_cur, ':aactid', aactid);
1195: dbms_sql.bind_variable(sql_cur, ':l_effective_date',
1196: l_effective_date);
1197: ignore := dbms_sql.execute(sql_cur);
1198: dbms_sql.close_cursor(sql_cur);
1199: --
1200: hr_utility.set_location ('process_employee',3);
1201: --
1202: exception
1200: hr_utility.set_location ('process_employee',3);
1201: --
1202: exception
1203: when others then
1204: if (dbms_sql.is_open(sql_cur)) then
1205: dbms_sql.close_cursor(sql_cur);
1206: end if;
1207: raise;
1208: end;
1201: --
1202: exception
1203: when others then
1204: if (dbms_sql.is_open(sql_cur)) then
1205: dbms_sql.close_cursor(sql_cur);
1206: end if;
1207: raise;
1208: end;
1209: end if;