[Home] [Help]
151: IS --SPR C167 BY BC
152: -- Declare local variables
153: l_batch_id hxt_timecards.batch_id%TYPE;
154: l_pre_bat_id hxt_timecards.batch_id%TYPE DEFAULT 0; --SPR C362 by BC
155: l_person_id hxt_timecards.for_person_id%TYPE; -- null to see new person in first loop
156: l_tim_id hxt_timecards.id%TYPE; -- to hold tim_id for same person
157: l_request_id NUMBER := fnd_profile.VALUE ('CONC_REQUEST_ID');
158: l_tim_cntr NUMBER := g_batch_size; -- set to create batch in first loop
159: l_retcode NUMBER;
782: l_tim_id := get_hxt_seqno;
783: -- Insert timecard
784: g_sub_loc := 'INSERT into hxt_timecards';
785:
786: INSERT INTO hxt_timecards_f
787: (id, for_person_id, payroll_id,
788: time_period_id, batch_id, auto_gen_flag, created_by,
789: creation_date, last_updated_by, last_update_date,
790: last_update_login, effective_start_date,
1232: -- that won't be autogen'ed again. Hours worked and error records will
1233: -- cascade-delete.
1234:
1235: CURSOR c_get_tim_id IS
1236: SELECT id FROM hxt_timecards_f tim
1237: WHERE tim.auto_gen_flag = 'A'
1238: AND tim.time_period_id = g_time_period_id
1239: AND exists -- added 2772781
1240: (
1268:
1269: DELETE FROM hxt_sum_hours_worked_f
1270: WHERE tim_id = l_record.id;
1271:
1272: DELETE FROM hxt_timecards_f
1273: WHERE id = l_record.id;
1274: END LOOP;
1275:
1276: COMMIT;
1316: --BEGIN SIR435
1317: CURSOR cur_tim_exists
1318: IS
1319: SELECT auto_gen_flag, for_person_id
1320: FROM hxt_timecards_f tim
1321: WHERE tim.auto_gen_flag <> 'A'
1322: AND tim.for_person_id = a_person_id
1323: AND tim.time_period_id = a_time_period_id
1324: AND tim.payroll_id = a_payroll_id