1: PACKAGE BODY hxt_otc_retrieval_interface AS
2: /* $Header: hxtotcri.pkb 120.23.12020000.3 2013/04/04 15:17:25 asrajago ship $ */
3: --
4: --
5: g_debug BOOLEAN := hr_utility.debug_enabled;
6: g_package CONSTANT VARCHAR2 (31) := 'hxc_otc_retrieval_interface.';
7:
8: TYPE t_timcards_tab IS TABLE OF NUMBER
9: INDEX BY VARCHAR2(255);
88: LOOP
89: IF g_debug
90: THEN
91: -- The index is tbb id here
92: hr_utility.trace(' Index is '||l_index);
93: hr_utility.trace(' OVN is '||g_ovn_tab(l_index));
94: hr_utility.trace(' Tim is '||g_timid_tab(l_index));
95: END IF;
96: -- Find if there is a retro batch for this Tim_id
89: IF g_debug
90: THEN
91: -- The index is tbb id here
92: hr_utility.trace(' Index is '||l_index);
93: hr_utility.trace(' OVN is '||g_ovn_tab(l_index));
94: hr_utility.trace(' Tim is '||g_timid_tab(l_index));
95: END IF;
96: -- Find if there is a retro batch for this Tim_id
97: IF g_retro_tab.EXISTS(TO_CHAR(g_timid_tab(l_index)))
90: THEN
91: -- The index is tbb id here
92: hr_utility.trace(' Index is '||l_index);
93: hr_utility.trace(' OVN is '||g_ovn_tab(l_index));
94: hr_utility.trace(' Tim is '||g_timid_tab(l_index));
95: END IF;
96: -- Find if there is a retro batch for this Tim_id
97: IF g_retro_tab.EXISTS(TO_CHAR(g_timid_tab(l_index)))
98: THEN
97: IF g_retro_tab.EXISTS(TO_CHAR(g_timid_tab(l_index)))
98: THEN
99: IF g_debug
100: THEN
101: hr_utility.trace(' Retro batch is '||g_retro_tab(TO_CHAR(g_timid_tab(l_index))));
102: END IF;
103: -- Extend all the tables
104: l_bb_tab.EXTEND;
105: l_ovn_tab.EXTEND;
114: -- Details would all be end dated with status 'R' meaning the retro batch was never transferred.
115: IF g_old_retro_tab.EXISTS(TO_CHAR(g_timid_tab(l_index)))
116: AND g_old_retro_tab(TO_CHAR(g_timid_tab(l_index))) <> 0
117: THEN
118: hr_utility.trace(' Older retro batch exists for this bb ');
119: l_old_ret_tab(i) := g_old_retro_tab(TO_CHAR(g_timid_tab(l_index)));
120: ELSE
121: hr_utility.trace(' Older retro batch Does not exist for this bb ');
122: l_old_ret_tab(i) := -99;
117: THEN
118: hr_utility.trace(' Older retro batch exists for this bb ');
119: l_old_ret_tab(i) := g_old_retro_tab(TO_CHAR(g_timid_tab(l_index)));
120: ELSE
121: hr_utility.trace(' Older retro batch Does not exist for this bb ');
122: l_old_ret_tab(i) := -99;
123: END IF;
124: END IF;
125: l_index := g_timid_tab.NEXT(l_index);
128: END IF;
129:
130: IF g_debug
131: THEN
132: hr_utility.trace('Printing out collected info ');
133: IF l_bb_tab.COUNT > 0
134: THEN
135: FOR j IN l_bb_tab.FIRST..l_bb_tab.LAST
136: LOOP
133: IF l_bb_tab.COUNT > 0
134: THEN
135: FOR j IN l_bb_tab.FIRST..l_bb_tab.LAST
136: LOOP
137: hr_utility.trace('tbb_id :'||l_bb_tab(j));
138: hr_utility.trace('Ovn:'||l_ovn_tab(j));
139: hr_utility.trace('Retro Batch '||l_ret_tab(i));
140: hr_utility.trace('Old Retro Batch '||l_old_ret_tab(i));
141: END LOOP;
134: THEN
135: FOR j IN l_bb_tab.FIRST..l_bb_tab.LAST
136: LOOP
137: hr_utility.trace('tbb_id :'||l_bb_tab(j));
138: hr_utility.trace('Ovn:'||l_ovn_tab(j));
139: hr_utility.trace('Retro Batch '||l_ret_tab(i));
140: hr_utility.trace('Old Retro Batch '||l_old_ret_tab(i));
141: END LOOP;
142: END IF;
135: FOR j IN l_bb_tab.FIRST..l_bb_tab.LAST
136: LOOP
137: hr_utility.trace('tbb_id :'||l_bb_tab(j));
138: hr_utility.trace('Ovn:'||l_ovn_tab(j));
139: hr_utility.trace('Retro Batch '||l_ret_tab(i));
140: hr_utility.trace('Old Retro Batch '||l_old_ret_tab(i));
141: END LOOP;
142: END IF;
143: END IF;
136: LOOP
137: hr_utility.trace('tbb_id :'||l_bb_tab(j));
138: hr_utility.trace('Ovn:'||l_ovn_tab(j));
139: hr_utility.trace('Retro Batch '||l_ret_tab(i));
140: hr_utility.trace('Old Retro Batch '||l_old_ret_tab(i));
141: END LOOP;
142: END IF;
143: END IF;
144:
219: --
220:
221: IF g_debug
222: THEN
223: hr_utility.trace('Trying to Pick up retro for '||p_tim_id);
224: END IF;
225:
226: IF NOT g_old_retro_tab.EXISTS(TO_CHAR(p_tim_id))
227: THEN
227: THEN
228:
229: IF g_debug
230: THEN
231: hr_utility.trace('Not already cached; Need to query');
232: END IF;
233:
234: OPEN get_retro_batches;
235: FETCH get_retro_batches INTO l_retro_batch;
240: END IF;
241:
242: IF g_debug
243: THEN
244: hr_utility.trace('Selected :'||g_old_retro_tab(TO_CHAR(p_tim_id)));
245: END IF;
246:
247: -- Record this retro batch against the building block id and OVN
248: g_rdb_index := g_rdb_bb_tab.COUNT;
465:
466: IF g_debug
467: THEN
468: l_proc := g_package || 'timecard_id';
469: hr_utility.set_location ('Entering: ' || l_proc, 10);
470: END IF;
471:
472: IF (p_sum_id IS NOT NULL)
473: THEN
487: END IF;
488:
489: IF g_debug
490: THEN
491: hr_utility.set_location ( 'Leaving: '
492: || l_proc
493: || ' returning timecard_id = '
494: || l_timecard_id,
495: 100
501: /*
502: || MAIN
503: */
504: BEGIN
505: g_debug := hr_utility.debug_enabled;
506:
507: IF g_debug
508: THEN
509: l_proc := g_package || 'is_retrievable';
506:
507: IF g_debug
508: THEN
509: l_proc := g_package || 'is_retrievable';
510: hr_utility.set_location ( 'Entering: '
511: || l_proc
512: || ' (p_sum_id IN = '
513: || p_sum_id
514: || ')',
514: || ')',
515: 10
516: );
517:
518: hr_utility.trace('p_person_id '||p_person_id);
519: hr_utility.trace('p_date_worked '||p_date_worked);
520: hr_utility.trace('p_sum_id '||p_sum_id);
521: hr_utility.trace('p_tc_bb_id '||p_tc_bb_id);
522: hr_utility.trace('p_tc_ovn '||p_tc_ovn);
515: 10
516: );
517:
518: hr_utility.trace('p_person_id '||p_person_id);
519: hr_utility.trace('p_date_worked '||p_date_worked);
520: hr_utility.trace('p_sum_id '||p_sum_id);
521: hr_utility.trace('p_tc_bb_id '||p_tc_bb_id);
522: hr_utility.trace('p_tc_ovn '||p_tc_ovn);
523:
516: );
517:
518: hr_utility.trace('p_person_id '||p_person_id);
519: hr_utility.trace('p_date_worked '||p_date_worked);
520: hr_utility.trace('p_sum_id '||p_sum_id);
521: hr_utility.trace('p_tc_bb_id '||p_tc_bb_id);
522: hr_utility.trace('p_tc_ovn '||p_tc_ovn);
523:
524: END IF;
517:
518: hr_utility.trace('p_person_id '||p_person_id);
519: hr_utility.trace('p_date_worked '||p_date_worked);
520: hr_utility.trace('p_sum_id '||p_sum_id);
521: hr_utility.trace('p_tc_bb_id '||p_tc_bb_id);
522: hr_utility.trace('p_tc_ovn '||p_tc_ovn);
523:
524: END IF;
525:
518: hr_utility.trace('p_person_id '||p_person_id);
519: hr_utility.trace('p_date_worked '||p_date_worked);
520: hr_utility.trace('p_sum_id '||p_sum_id);
521: hr_utility.trace('p_tc_bb_id '||p_tc_bb_id);
522: hr_utility.trace('p_tc_ovn '||p_tc_ovn);
523:
524: END IF;
525:
526:
537: AND g_intg_pref_tab(p_tc_bb_id) = 0
538: THEN
539: IF g_debug
540: THEN
541: hr_utility.trace('For this timecard, integration is disabled, so neednt check again ');
542: END IF;
543: l_do_intg_check := 'N';
544: END IF;
545:
562:
563:
564: IF g_debug
565: THEN
566: hr_utility.trace('Start -'||l_start);
567: hr_utility.trace('Stop - '||l_stop);
568: END IF;
569:
570: hxc_preference_evaluation.resource_preferences(p_person_id,
563:
564: IF g_debug
565: THEN
566: hr_utility.trace('Start -'||l_start);
567: hr_utility.trace('Stop - '||l_stop);
568: END IF;
569:
570: hxc_preference_evaluation.resource_preferences(p_person_id,
571: l_start,
579: LOOP
580:
581: IF g_debug
582: THEN
583: hr_utility.trace(' Preference - '||l_pref_tab(i).preference_code);
584: hr_utility.trace(' Attribute1 - '||l_pref_tab(i).attribute1);
585: hr_utility.trace(' Attribute2 - '||l_pref_tab(i).attribute2);
586: hr_utility.trace(' Attribute3 - '||l_pref_tab(i).attribute3);
587: hr_utility.trace(' Attribute4 - '||l_pref_tab(i).attribute4);
580:
581: IF g_debug
582: THEN
583: hr_utility.trace(' Preference - '||l_pref_tab(i).preference_code);
584: hr_utility.trace(' Attribute1 - '||l_pref_tab(i).attribute1);
585: hr_utility.trace(' Attribute2 - '||l_pref_tab(i).attribute2);
586: hr_utility.trace(' Attribute3 - '||l_pref_tab(i).attribute3);
587: hr_utility.trace(' Attribute4 - '||l_pref_tab(i).attribute4);
588: hr_utility.trace(' Attribute5 - '||l_pref_tab(i).attribute5);
581: IF g_debug
582: THEN
583: hr_utility.trace(' Preference - '||l_pref_tab(i).preference_code);
584: hr_utility.trace(' Attribute1 - '||l_pref_tab(i).attribute1);
585: hr_utility.trace(' Attribute2 - '||l_pref_tab(i).attribute2);
586: hr_utility.trace(' Attribute3 - '||l_pref_tab(i).attribute3);
587: hr_utility.trace(' Attribute4 - '||l_pref_tab(i).attribute4);
588: hr_utility.trace(' Attribute5 - '||l_pref_tab(i).attribute5);
589: END IF;
582: THEN
583: hr_utility.trace(' Preference - '||l_pref_tab(i).preference_code);
584: hr_utility.trace(' Attribute1 - '||l_pref_tab(i).attribute1);
585: hr_utility.trace(' Attribute2 - '||l_pref_tab(i).attribute2);
586: hr_utility.trace(' Attribute3 - '||l_pref_tab(i).attribute3);
587: hr_utility.trace(' Attribute4 - '||l_pref_tab(i).attribute4);
588: hr_utility.trace(' Attribute5 - '||l_pref_tab(i).attribute5);
589: END IF;
590:
583: hr_utility.trace(' Preference - '||l_pref_tab(i).preference_code);
584: hr_utility.trace(' Attribute1 - '||l_pref_tab(i).attribute1);
585: hr_utility.trace(' Attribute2 - '||l_pref_tab(i).attribute2);
586: hr_utility.trace(' Attribute3 - '||l_pref_tab(i).attribute3);
587: hr_utility.trace(' Attribute4 - '||l_pref_tab(i).attribute4);
588: hr_utility.trace(' Attribute5 - '||l_pref_tab(i).attribute5);
589: END IF;
590:
591: -- If this is our preference, check if it is set.
584: hr_utility.trace(' Attribute1 - '||l_pref_tab(i).attribute1);
585: hr_utility.trace(' Attribute2 - '||l_pref_tab(i).attribute2);
586: hr_utility.trace(' Attribute3 - '||l_pref_tab(i).attribute3);
587: hr_utility.trace(' Attribute4 - '||l_pref_tab(i).attribute4);
588: hr_utility.trace(' Attribute5 - '||l_pref_tab(i).attribute5);
589: END IF;
590:
591: -- If this is our preference, check if it is set.
592: -- If yes, return TRUE, and set the global variable.
595: AND l_pref_tab(i).attribute1 = 'Y'
596: THEN
597: IF g_debug
598: THEN
599: hr_utility.trace(' Integration is enabled ');
600: END IF;
601: -- Integration enabled. Need to raise error.
602: g_intg_pref_tab(p_tc_bb_id) := 1;
603: END IF;
625: o_error_message => l_error_message,
626: o_return_code => l_return_code,
627: p_do_intg_check => l_do_intg_check
628: );
629: hr_utility.set_location ('l_dt_update_mode = ' || l_dt_update_mode, 11);
630: hr_utility.set_location ('l_error_message = ' || l_error_message, 12);
631: hr_utility.set_location ('l_return_code = ' || l_return_code, 13);
632:
633: -- If we got this error message, need to set g_intg_error.
626: o_return_code => l_return_code,
627: p_do_intg_check => l_do_intg_check
628: );
629: hr_utility.set_location ('l_dt_update_mode = ' || l_dt_update_mode, 11);
630: hr_utility.set_location ('l_error_message = ' || l_error_message, 12);
631: hr_utility.set_location ('l_return_code = ' || l_return_code, 13);
632:
633: -- If we got this error message, need to set g_intg_error.
634: IF l_error_message IS NOT NULL
627: p_do_intg_check => l_do_intg_check
628: );
629: hr_utility.set_location ('l_dt_update_mode = ' || l_dt_update_mode, 11);
630: hr_utility.set_location ('l_error_message = ' || l_error_message, 12);
631: hr_utility.set_location ('l_return_code = ' || l_return_code, 13);
632:
633: -- If we got this error message, need to set g_intg_error.
634: IF l_error_message IS NOT NULL
635: THEN
639: IF (l_dt_update_mode IS NULL)
640: THEN
641: IF g_debug
642: THEN
643: hr_utility.set_location
644: ( ' This line is not retrievable (p_sum_id = '
645: || p_sum_id
646: || ')',
647: 20
654: END IF;
655:
656: IF g_debug
657: THEN
658: hr_utility.set_location ('Leaving: ' || l_proc, 100);
659: END IF;
660:
661: RETURN l_is_retrievable;
662: END is_retrievable;
674: -- local vars
675: l_employee_number VARCHAR2 (30);
676: l_full_name VARCHAR2 (240);
677: BEGIN
678: g_debug := hr_utility.debug_enabled;
679:
680: --
681: IF g_debug
682: THEN
679:
680: --
681: IF g_debug
682: THEN
683: hr_utility.set_location
684: ('HXT_OTC_RETRIEVAL_INTERFACE.get_employee_number',
685: 1
686: );
687: END IF;
709:
710: --
711: IF g_debug
712: THEN
713: hr_utility.set_location
714: ('HXT_OTC_RETRIEVAL_INTERFACE.employee_number',
715: 2
716: );
717: hr_utility.TRACE ('Employee Number is ' || l_employee_number);
713: hr_utility.set_location
714: ('HXT_OTC_RETRIEVAL_INTERFACE.employee_number',
715: 2
716: );
717: hr_utility.TRACE ('Employee Number is ' || l_employee_number);
718: hr_utility.TRACE ('Full Name is ' || l_full_name);
719: END IF;
720:
721: --
714: ('HXT_OTC_RETRIEVAL_INTERFACE.employee_number',
715: 2
716: );
717: hr_utility.TRACE ('Employee Number is ' || l_employee_number);
718: hr_utility.TRACE ('Full Name is ' || l_full_name);
719: END IF;
720:
721: --
722: RETURN (l_employee_number);
856: RETURN l_att_index;
857: EXCEPTION
858: WHEN OTHERS
859: THEN
860: hr_utility.trace(dbms_utility.format_error_backtrace);
861: hr_utility.TRACE ('exception is sync atts ' || SQLERRM);
862: RAISE;
863: END sync_attributes;
864:
857: EXCEPTION
858: WHEN OTHERS
859: THEN
860: hr_utility.trace(dbms_utility.format_error_backtrace);
861: hr_utility.TRACE ('exception is sync atts ' || SQLERRM);
862: RAISE;
863: END sync_attributes;
864:
865: --
884: -- Get the attributes of the detail record - element name, input values
885: --
886: IF g_debug
887: THEN
888: hr_utility.TRACE ('------ Start get_Attributes ------');
889: END IF;
890:
891: --
892: IF p_att_table.COUNT <> 0
893: THEN
894: --
895: IF g_debug
896: THEN
897: hr_utility.TRACE (' att table not empty');
898: END IF;
899:
900: l_att_index := NVL (p_last_att_index, p_att_table.FIRST);
901:
900: l_att_index := NVL (p_last_att_index, p_att_table.FIRST);
901:
902: IF g_debug
903: THEN
904: hr_utility.TRACE (' RM 2');
905: END IF;
906:
907: l_bld_blk_id := p_att_table (l_att_index).bb_id;
908:
907: l_bld_blk_id := p_att_table (l_att_index).bb_id;
908:
909: IF g_debug
910: THEN
911: hr_utility.TRACE (' RM 3');
912: END IF;
913: --
914: ELSE
915: --
919:
920: --
921: IF g_debug
922: THEN
923: hr_utility.TRACE ('------ Middle get_Attributes ------');
924: END IF;
925:
926: --
927: -- sanity check to make sure we are in sync
940: WHILE ((l_att_index IS NOT NULL) AND (NOT l_bb_id_changed))
941: LOOP
942: IF g_debug
943: THEN
944: hr_utility.TRACE ('------ In Attribute Loop ------');
945: END IF;
946:
947: p_field_name (l_att_index) := p_att_table (l_att_index).field_name;
948:
947: p_field_name (l_att_index) := p_att_table (l_att_index).field_name;
948:
949: IF g_debug
950: THEN
951: hr_utility.TRACE ( 'p_field_name(l_att_index) is '
952: || p_field_name (l_att_index)
953: );
954: END IF;
955:
965: p_value (l_att_index) := p_att_table (l_att_index).VALUE;
966:
967: IF g_debug
968: THEN
969: hr_utility.TRACE ( 'p_value(l_att_index) is '
970: || p_value (l_att_index)
971: );
972: END IF;
973:
974: p_context (l_att_index) := p_att_table (l_att_index).CONTEXT;
975:
976: IF g_debug
977: THEN
978: hr_utility.TRACE ( 'p_context(l_att_index) is '
979: || p_context (l_att_index)
980: );
981: END IF;
982:
983: p_category (l_att_index) := p_att_table (l_att_index).CATEGORY;
984:
985: IF g_debug
986: THEN
987: hr_utility.TRACE ( 'p_category(l_att_index) is '
988: || p_category (l_att_index)
989: );
990: END IF;
991:
1015: BEGIN
1016: --
1017: IF g_debug
1018: THEN
1019: hr_utility.set_location ('get_element_name', 1);
1020: END IF;
1021:
1022: --
1023: BEGIN
1042:
1043: --
1044: IF g_debug
1045: THEN
1046: hr_utility.set_location ('get_element_name', 2);
1047: END IF;
1048:
1049: --
1050: RETURN (l_element_name);
1110:
1111: l_id_flex_num NUMBER;
1112: --
1113: BEGIN
1114: g_debug := hr_utility.debug_enabled;
1115: pay_paywsqee_pkg.populate_context_items (g_bg_id, l_id_flex_num);
1116:
1117: --
1118: -- Initialize 30 costing segments to NULL
1124:
1125: --
1126: IF g_debug
1127: THEN
1128: hr_utility.set_location (c_proc, 10);
1129: END IF;
1130:
1131: --
1132: -- If the detail block is of type duration, then the number
1138:
1139: --
1140: IF g_debug
1141: THEN
1142: hr_utility.set_location (c_proc, 20);
1143: END IF;
1144: --
1145: END IF;
1146:
1146:
1147: --
1148: IF g_debug
1149: THEN
1150: hr_utility.set_location (c_proc, 30);
1151: END IF;
1152:
1153: --
1154: -- If the detail block is of type range, then the number
1161:
1162: --
1163: IF g_debug
1164: THEN
1165: hr_utility.set_location (c_proc, 40);
1166: END IF;
1167: --
1168: END IF;
1169:
1169:
1170: --
1171: IF g_debug
1172: THEN
1173: hr_utility.TRACE ('The Number of Hours is ' || TO_CHAR (p_hours));
1174: hr_utility.set_location (c_proc, 50);
1175: END IF;
1176:
1177: --
1170: --
1171: IF g_debug
1172: THEN
1173: hr_utility.TRACE ('The Number of Hours is ' || TO_CHAR (p_hours));
1174: hr_utility.set_location (c_proc, 50);
1175: END IF;
1176:
1177: --
1178: -- Set up the date earned for the batch line. The
1182:
1183: --
1184: IF g_debug
1185: THEN
1186: hr_utility.TRACE ( 'p_date_worked is '
1187: || TO_CHAR (p_date_worked, 'DD-MON-YYYY')
1188: );
1189: hr_utility.TRACE ( 'p_start_time is '
1190: || TO_CHAR (p_start_time, 'DD-MON-YYYY HH:MI:SS')
1185: THEN
1186: hr_utility.TRACE ( 'p_date_worked is '
1187: || TO_CHAR (p_date_worked, 'DD-MON-YYYY')
1188: );
1189: hr_utility.TRACE ( 'p_start_time is '
1190: || TO_CHAR (p_start_time, 'DD-MON-YYYY HH:MI:SS')
1191: );
1192: END IF;
1193:
1201: LOOP
1202: --
1203: IF g_debug
1204: THEN
1205: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1206: hr_utility.TRACE ('category is ' || p_category (l_att));
1207: hr_utility.TRACE ('context is ' || p_context (l_att));
1208: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1209: hr_utility.TRACE ('value is ' || p_value (l_att));
1202: --
1203: IF g_debug
1204: THEN
1205: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1206: hr_utility.TRACE ('category is ' || p_category (l_att));
1207: hr_utility.TRACE ('context is ' || p_context (l_att));
1208: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1209: hr_utility.TRACE ('value is ' || p_value (l_att));
1210: hr_utility.set_location (c_proc, 200);
1203: IF g_debug
1204: THEN
1205: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1206: hr_utility.TRACE ('category is ' || p_category (l_att));
1207: hr_utility.TRACE ('context is ' || p_context (l_att));
1208: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1209: hr_utility.TRACE ('value is ' || p_value (l_att));
1210: hr_utility.set_location (c_proc, 200);
1211: END IF;
1204: THEN
1205: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1206: hr_utility.TRACE ('category is ' || p_category (l_att));
1207: hr_utility.TRACE ('context is ' || p_context (l_att));
1208: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1209: hr_utility.TRACE ('value is ' || p_value (l_att));
1210: hr_utility.set_location (c_proc, 200);
1211: END IF;
1212:
1205: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1206: hr_utility.TRACE ('category is ' || p_category (l_att));
1207: hr_utility.TRACE ('context is ' || p_context (l_att));
1208: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1209: hr_utility.TRACE ('value is ' || p_value (l_att));
1210: hr_utility.set_location (c_proc, 200);
1211: END IF;
1212:
1213: --
1206: hr_utility.TRACE ('category is ' || p_category (l_att));
1207: hr_utility.TRACE ('context is ' || p_context (l_att));
1208: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1209: hr_utility.TRACE ('value is ' || p_value (l_att));
1210: hr_utility.set_location (c_proc, 200);
1211: END IF;
1212:
1213: --
1214: IF UPPER (p_field_name (l_att)) = 'DUMMY ELEMENT CONTEXT'
1236:
1237: --
1238: IF g_debug
1239: THEN
1240: hr_utility.TRACE
1241: ('---- Before setting the hours type ----');
1242: hr_utility.TRACE ( 'MH assignment id is '
1243: || p_assignment_id
1244: );
1238: IF g_debug
1239: THEN
1240: hr_utility.TRACE
1241: ('---- Before setting the hours type ----');
1242: hr_utility.TRACE ( 'MH assignment id is '
1243: || p_assignment_id
1244: );
1245: hr_utility.TRACE ( 'MH earning policy id'
1246: || l_earn_policy_id
1241: ('---- Before setting the hours type ----');
1242: hr_utility.TRACE ( 'MH assignment id is '
1243: || p_assignment_id
1244: );
1245: hr_utility.TRACE ( 'MH earning policy id'
1246: || l_earn_policy_id
1247: );
1248: hr_utility.TRACE ( 'MH base element type id '
1249: || l_base_elt_id
1244: );
1245: hr_utility.TRACE ( 'MH earning policy id'
1246: || l_earn_policy_id
1247: );
1248: hr_utility.TRACE ( 'MH base element type id '
1249: || l_base_elt_id
1250: );
1251: hr_utility.TRACE ( 'MH l_element_type_id '
1252: || l_element_type_id
1247: );
1248: hr_utility.TRACE ( 'MH base element type id '
1249: || l_base_elt_id
1250: );
1251: hr_utility.TRACE ( 'MH l_element_type_id '
1252: || l_element_type_id
1253: );
1254: hr_utility.TRACE ('MH p_hours_type ' || p_hours_type);
1255: END IF;
1250: );
1251: hr_utility.TRACE ( 'MH l_element_type_id '
1252: || l_element_type_id
1253: );
1254: hr_utility.TRACE ('MH p_hours_type ' || p_hours_type);
1255: END IF;
1256:
1257: --
1258: IF l_element_type_id = l_base_elt_id
1265:
1266: --
1267: IF g_debug
1268: THEN
1269: hr_utility.TRACE
1270: ('---- After setting the hours type ----');
1271: hr_utility.TRACE ('MH p_hours_type ' || p_hours_type);
1272: END IF;
1273: --
1267: IF g_debug
1268: THEN
1269: hr_utility.TRACE
1270: ('---- After setting the hours type ----');
1271: hr_utility.TRACE ('MH p_hours_type ' || p_hours_type);
1272: END IF;
1273: --
1274: END IF;
1275: --
1345:
1346: --
1347: IF g_debug
1348: THEN
1349: hr_utility.set_location (c_proc, 90);
1350: END IF;
1351: --
1352: END parse_attributes;
1353:
1435:
1436: l_id_flex_num NUMBER;
1437: --
1438: BEGIN
1439: g_debug := hr_utility.debug_enabled;
1440: pay_paywsqee_pkg.populate_context_items (g_bg_id, l_id_flex_num);
1441:
1442: --
1443: -- Initialize 30 costing segments to NULL
1449:
1450: --
1451: IF g_debug
1452: THEN
1453: hr_utility.set_location (c_proc, 10);
1454: END IF;
1455:
1456: --
1457: -- If the detail block is of type duration, then the number
1463:
1464: --
1465: IF g_debug
1466: THEN
1467: hr_utility.set_location (c_proc, 20);
1468: END IF;
1469: --
1470: END IF;
1471:
1471:
1472: --
1473: IF g_debug
1474: THEN
1475: hr_utility.set_location (c_proc, 30);
1476: END IF;
1477:
1478: --
1479: -- If the detail block is of type range, then the number
1486:
1487: --
1488: IF g_debug
1489: THEN
1490: hr_utility.set_location (c_proc, 40);
1491: END IF;
1492: --
1493: END IF;
1494:
1494:
1495: --
1496: IF g_debug
1497: THEN
1498: hr_utility.TRACE ('The Number of Hours is ' || TO_CHAR (p_hours));
1499: hr_utility.set_location (c_proc, 50);
1500: END IF;
1501:
1502: --
1495: --
1496: IF g_debug
1497: THEN
1498: hr_utility.TRACE ('The Number of Hours is ' || TO_CHAR (p_hours));
1499: hr_utility.set_location (c_proc, 50);
1500: END IF;
1501:
1502: --
1503: -- Set up the date earned for the batch line. The
1507:
1508: --
1509: IF g_debug
1510: THEN
1511: hr_utility.TRACE ( 'p_date_worked is '
1512: || TO_CHAR (p_date_worked, 'DD-MON-YYYY')
1513: );
1514: hr_utility.TRACE ( 'p_start_time is '
1515: || TO_CHAR (p_start_time, 'DD-MON-YYYY HH:MI:SS')
1510: THEN
1511: hr_utility.TRACE ( 'p_date_worked is '
1512: || TO_CHAR (p_date_worked, 'DD-MON-YYYY')
1513: );
1514: hr_utility.TRACE ( 'p_start_time is '
1515: || TO_CHAR (p_start_time, 'DD-MON-YYYY HH:MI:SS')
1516: );
1517: END IF;
1518:
1526: LOOP
1527: --
1528: IF g_debug
1529: THEN
1530: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1531: hr_utility.TRACE ('category is ' || p_category (l_att));
1532: hr_utility.TRACE ('context is ' || p_context (l_att));
1533: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1534: hr_utility.TRACE ('value is ' || p_value (l_att));
1527: --
1528: IF g_debug
1529: THEN
1530: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1531: hr_utility.TRACE ('category is ' || p_category (l_att));
1532: hr_utility.TRACE ('context is ' || p_context (l_att));
1533: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1534: hr_utility.TRACE ('value is ' || p_value (l_att));
1535: hr_utility.set_location (c_proc, 200);
1528: IF g_debug
1529: THEN
1530: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1531: hr_utility.TRACE ('category is ' || p_category (l_att));
1532: hr_utility.TRACE ('context is ' || p_context (l_att));
1533: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1534: hr_utility.TRACE ('value is ' || p_value (l_att));
1535: hr_utility.set_location (c_proc, 200);
1536: END IF;
1529: THEN
1530: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1531: hr_utility.TRACE ('category is ' || p_category (l_att));
1532: hr_utility.TRACE ('context is ' || p_context (l_att));
1533: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1534: hr_utility.TRACE ('value is ' || p_value (l_att));
1535: hr_utility.set_location (c_proc, 200);
1536: END IF;
1537:
1530: hr_utility.TRACE ('------ In Parse attribute Loop ------');
1531: hr_utility.TRACE ('category is ' || p_category (l_att));
1532: hr_utility.TRACE ('context is ' || p_context (l_att));
1533: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1534: hr_utility.TRACE ('value is ' || p_value (l_att));
1535: hr_utility.set_location (c_proc, 200);
1536: END IF;
1537:
1538: --
1531: hr_utility.TRACE ('category is ' || p_category (l_att));
1532: hr_utility.TRACE ('context is ' || p_context (l_att));
1533: hr_utility.TRACE ('field_name is ' || p_field_name (l_att));
1534: hr_utility.TRACE ('value is ' || p_value (l_att));
1535: hr_utility.set_location (c_proc, 200);
1536: END IF;
1537:
1538: --
1539: IF UPPER (p_field_name (l_att)) = 'DUMMY ELEMENT CONTEXT'
1561:
1562: --
1563: IF g_debug
1564: THEN
1565: hr_utility.TRACE
1566: ('---- Before setting the hours type ----');
1567: hr_utility.TRACE ( 'MH assignment id is '
1568: || p_assignment_id
1569: );
1563: IF g_debug
1564: THEN
1565: hr_utility.TRACE
1566: ('---- Before setting the hours type ----');
1567: hr_utility.TRACE ( 'MH assignment id is '
1568: || p_assignment_id
1569: );
1570: hr_utility.TRACE ( 'MH earning policy id'
1571: || l_earn_policy_id
1566: ('---- Before setting the hours type ----');
1567: hr_utility.TRACE ( 'MH assignment id is '
1568: || p_assignment_id
1569: );
1570: hr_utility.TRACE ( 'MH earning policy id'
1571: || l_earn_policy_id
1572: );
1573: hr_utility.TRACE ( 'MH base element type id '
1574: || l_base_elt_id
1569: );
1570: hr_utility.TRACE ( 'MH earning policy id'
1571: || l_earn_policy_id
1572: );
1573: hr_utility.TRACE ( 'MH base element type id '
1574: || l_base_elt_id
1575: );
1576: hr_utility.TRACE ( 'MH l_element_type_id '
1577: || l_element_type_id
1572: );
1573: hr_utility.TRACE ( 'MH base element type id '
1574: || l_base_elt_id
1575: );
1576: hr_utility.TRACE ( 'MH l_element_type_id '
1577: || l_element_type_id
1578: );
1579: hr_utility.TRACE ('MH p_hours_type ' || p_hours_type);
1580: END IF;
1575: );
1576: hr_utility.TRACE ( 'MH l_element_type_id '
1577: || l_element_type_id
1578: );
1579: hr_utility.TRACE ('MH p_hours_type ' || p_hours_type);
1580: END IF;
1581:
1582: --
1583: IF l_element_type_id = l_base_elt_id
1590:
1591: --
1592: IF g_debug
1593: THEN
1594: hr_utility.TRACE
1595: ('---- After setting the hours type ----');
1596: hr_utility.TRACE ('MH p_hours_type ' || p_hours_type);
1597: END IF;
1598: --
1592: IF g_debug
1593: THEN
1594: hr_utility.TRACE
1595: ('---- After setting the hours type ----');
1596: hr_utility.TRACE ('MH p_hours_type ' || p_hours_type);
1597: END IF;
1598: --
1599: END IF;
1600: --
1672: -- Would do this only if the Input value is none of the above types.
1673:
1674: IF g_debug
1675: THEN
1676: hr_utility.trace('Picking up some configured input value here ');
1677: hr_utility.trace('Field name : '||p_field_name(l_att));
1678: hr_utility.trace('Value : '||p_value(l_att));
1679: END IF;
1680:
1673:
1674: IF g_debug
1675: THEN
1676: hr_utility.trace('Picking up some configured input value here ');
1677: hr_utility.trace('Field name : '||p_field_name(l_att));
1678: hr_utility.trace('Value : '||p_value(l_att));
1679: END IF;
1680:
1681: -- Bug 9774867
1674: IF g_debug
1675: THEN
1676: hr_utility.trace('Picking up some configured input value here ');
1677: hr_utility.trace('Field name : '||p_field_name(l_att));
1678: hr_utility.trace('Value : '||p_value(l_att));
1679: END IF;
1680:
1681: -- Bug 9774867
1682: -- Added a TO_CHAR conversion to the indexes below.
1773:
1774: --
1775: IF g_debug
1776: THEN
1777: hr_utility.set_location (c_proc, 90);
1778: END IF;
1779: --
1780: END parse_attributes;
1781:
2034: BEGIN
2035: --
2036: IF g_debug
2037: THEN
2038: hr_utility.set_location
2039: ('HXT_OTC_RETRIEVAL_INTERFACE.get_ele_type_id',
2040: 1
2041: );
2042: END IF;
2070:
2071: --
2072: IF g_debug
2073: THEN
2074: hr_utility.set_location
2075: ('HXT_OTC_RETRIEVAL_INTERFACE.get_ele_type_id',
2076: 2
2077: );
2078: END IF;
2135: --
2136: BEGIN
2137: IF g_debug
2138: THEN
2139: hr_utility.TRACE ('---- Before Call to Record Time API ----');
2140: hr_utility.TRACE ('employee_number is ' || p_employee_number);
2141: hr_utility.TRACE ('approver_number is ' || p_approver_number);
2142: hr_utility.TRACE ( 'date_worked is '
2143: || TO_CHAR (p_date_worked, 'DD-MON-YYYY')
2136: BEGIN
2137: IF g_debug
2138: THEN
2139: hr_utility.TRACE ('---- Before Call to Record Time API ----');
2140: hr_utility.TRACE ('employee_number is ' || p_employee_number);
2141: hr_utility.TRACE ('approver_number is ' || p_approver_number);
2142: hr_utility.TRACE ( 'date_worked is '
2143: || TO_CHAR (p_date_worked, 'DD-MON-YYYY')
2144: );
2137: IF g_debug
2138: THEN
2139: hr_utility.TRACE ('---- Before Call to Record Time API ----');
2140: hr_utility.TRACE ('employee_number is ' || p_employee_number);
2141: hr_utility.TRACE ('approver_number is ' || p_approver_number);
2142: hr_utility.TRACE ( 'date_worked is '
2143: || TO_CHAR (p_date_worked, 'DD-MON-YYYY')
2144: );
2145: hr_utility.TRACE ( 'start_time is '
2138: THEN
2139: hr_utility.TRACE ('---- Before Call to Record Time API ----');
2140: hr_utility.TRACE ('employee_number is ' || p_employee_number);
2141: hr_utility.TRACE ('approver_number is ' || p_approver_number);
2142: hr_utility.TRACE ( 'date_worked is '
2143: || TO_CHAR (p_date_worked, 'DD-MON-YYYY')
2144: );
2145: hr_utility.TRACE ( 'start_time is '
2146: || TO_CHAR (p_start_time,
2141: hr_utility.TRACE ('approver_number is ' || p_approver_number);
2142: hr_utility.TRACE ( 'date_worked is '
2143: || TO_CHAR (p_date_worked, 'DD-MON-YYYY')
2144: );
2145: hr_utility.TRACE ( 'start_time is '
2146: || TO_CHAR (p_start_time,
2147: 'DD-MON-YYYY HH:MI:SS')
2148: );
2149: hr_utility.TRACE ( 'end_time is '
2145: hr_utility.TRACE ( 'start_time is '
2146: || TO_CHAR (p_start_time,
2147: 'DD-MON-YYYY HH:MI:SS')
2148: );
2149: hr_utility.TRACE ( 'end_time is '
2150: || TO_CHAR (p_end_time, 'DD-MON-YYYY HH:MI:SS')
2151: );
2152: hr_utility.TRACE ('hours is ' || TO_CHAR (p_hours));
2153: hr_utility.TRACE ('hours_type is ' || p_hours_type);
2148: );
2149: hr_utility.TRACE ( 'end_time is '
2150: || TO_CHAR (p_end_time, 'DD-MON-YYYY HH:MI:SS')
2151: );
2152: hr_utility.TRACE ('hours is ' || TO_CHAR (p_hours));
2153: hr_utility.TRACE ('hours_type is ' || p_hours_type);
2154: hr_utility.TRACE ('earning_policy is ' || p_earning_policy);
2155: hr_utility.TRACE ('project is ' || p_project);
2156: hr_utility.TRACE ('task is ' || p_task);
2149: hr_utility.TRACE ( 'end_time is '
2150: || TO_CHAR (p_end_time, 'DD-MON-YYYY HH:MI:SS')
2151: );
2152: hr_utility.TRACE ('hours is ' || TO_CHAR (p_hours));
2153: hr_utility.TRACE ('hours_type is ' || p_hours_type);
2154: hr_utility.TRACE ('earning_policy is ' || p_earning_policy);
2155: hr_utility.TRACE ('project is ' || p_project);
2156: hr_utility.TRACE ('task is ' || p_task);
2157: hr_utility.TRACE ('location is ' || p_location);
2150: || TO_CHAR (p_end_time, 'DD-MON-YYYY HH:MI:SS')
2151: );
2152: hr_utility.TRACE ('hours is ' || TO_CHAR (p_hours));
2153: hr_utility.TRACE ('hours_type is ' || p_hours_type);
2154: hr_utility.TRACE ('earning_policy is ' || p_earning_policy);
2155: hr_utility.TRACE ('project is ' || p_project);
2156: hr_utility.TRACE ('task is ' || p_task);
2157: hr_utility.TRACE ('location is ' || p_location);
2158: hr_utility.TRACE ('rate_multiple is '
2151: );
2152: hr_utility.TRACE ('hours is ' || TO_CHAR (p_hours));
2153: hr_utility.TRACE ('hours_type is ' || p_hours_type);
2154: hr_utility.TRACE ('earning_policy is ' || p_earning_policy);
2155: hr_utility.TRACE ('project is ' || p_project);
2156: hr_utility.TRACE ('task is ' || p_task);
2157: hr_utility.TRACE ('location is ' || p_location);
2158: hr_utility.TRACE ('rate_multiple is '
2159: || TO_CHAR (p_rate_multiple)
2152: hr_utility.TRACE ('hours is ' || TO_CHAR (p_hours));
2153: hr_utility.TRACE ('hours_type is ' || p_hours_type);
2154: hr_utility.TRACE ('earning_policy is ' || p_earning_policy);
2155: hr_utility.TRACE ('project is ' || p_project);
2156: hr_utility.TRACE ('task is ' || p_task);
2157: hr_utility.TRACE ('location is ' || p_location);
2158: hr_utility.TRACE ('rate_multiple is '
2159: || TO_CHAR (p_rate_multiple)
2160: );
2153: hr_utility.TRACE ('hours_type is ' || p_hours_type);
2154: hr_utility.TRACE ('earning_policy is ' || p_earning_policy);
2155: hr_utility.TRACE ('project is ' || p_project);
2156: hr_utility.TRACE ('task is ' || p_task);
2157: hr_utility.TRACE ('location is ' || p_location);
2158: hr_utility.TRACE ('rate_multiple is '
2159: || TO_CHAR (p_rate_multiple)
2160: );
2161: hr_utility.TRACE ('hourly_rate is ' || TO_CHAR (p_rate_multiple));
2154: hr_utility.TRACE ('earning_policy is ' || p_earning_policy);
2155: hr_utility.TRACE ('project is ' || p_project);
2156: hr_utility.TRACE ('task is ' || p_task);
2157: hr_utility.TRACE ('location is ' || p_location);
2158: hr_utility.TRACE ('rate_multiple is '
2159: || TO_CHAR (p_rate_multiple)
2160: );
2161: hr_utility.TRACE ('hourly_rate is ' || TO_CHAR (p_rate_multiple));
2162: hr_utility.TRACE ('amount is ' || TO_CHAR (p_amount));
2157: hr_utility.TRACE ('location is ' || p_location);
2158: hr_utility.TRACE ('rate_multiple is '
2159: || TO_CHAR (p_rate_multiple)
2160: );
2161: hr_utility.TRACE ('hourly_rate is ' || TO_CHAR (p_rate_multiple));
2162: hr_utility.TRACE ('amount is ' || TO_CHAR (p_amount));
2163: hr_utility.TRACE ( 'time_summary_id is '
2164: || TO_CHAR (p_time_summary_id)
2165: );
2158: hr_utility.TRACE ('rate_multiple is '
2159: || TO_CHAR (p_rate_multiple)
2160: );
2161: hr_utility.TRACE ('hourly_rate is ' || TO_CHAR (p_rate_multiple));
2162: hr_utility.TRACE ('amount is ' || TO_CHAR (p_amount));
2163: hr_utility.TRACE ( 'time_summary_id is '
2164: || TO_CHAR (p_time_summary_id)
2165: );
2166: hr_utility.TRACE ( 'time_sum_start_date is '
2159: || TO_CHAR (p_rate_multiple)
2160: );
2161: hr_utility.TRACE ('hourly_rate is ' || TO_CHAR (p_rate_multiple));
2162: hr_utility.TRACE ('amount is ' || TO_CHAR (p_amount));
2163: hr_utility.TRACE ( 'time_summary_id is '
2164: || TO_CHAR (p_time_summary_id)
2165: );
2166: hr_utility.TRACE ( 'time_sum_start_date is '
2167: || TO_CHAR (p_time_sum_start_date,
2162: hr_utility.TRACE ('amount is ' || TO_CHAR (p_amount));
2163: hr_utility.TRACE ( 'time_summary_id is '
2164: || TO_CHAR (p_time_summary_id)
2165: );
2166: hr_utility.TRACE ( 'time_sum_start_date is '
2167: || TO_CHAR (p_time_sum_start_date,
2168: 'DD-MON-YYYY')
2169: );
2170: hr_utility.TRACE ( 'time_sum_end_date is '
2166: hr_utility.TRACE ( 'time_sum_start_date is '
2167: || TO_CHAR (p_time_sum_start_date,
2168: 'DD-MON-YYYY')
2169: );
2170: hr_utility.TRACE ( 'time_sum_end_date is '
2171: || TO_CHAR (p_time_sum_end_date, 'DD-MON-YYYY')
2172: );
2173: END IF;
2174:
2297: IF g_iv_table.EXISTS(TO_CHAR(p_time_building_block_id))
2298: THEN
2299: IF g_debug
2300: THEN
2301: hr_utility.trace('There exists some input values, need to update them');
2302: hr_utility.trace(' l_created_sum_id :'||l_created_tim_sum_id);
2303: hr_utility.trace(' bb_id :'||p_time_building_block_id);
2304: hr_utility.trace(' attribute1 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute1 );
2305: hr_utility.trace(' attribute2 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute2 );
2298: THEN
2299: IF g_debug
2300: THEN
2301: hr_utility.trace('There exists some input values, need to update them');
2302: hr_utility.trace(' l_created_sum_id :'||l_created_tim_sum_id);
2303: hr_utility.trace(' bb_id :'||p_time_building_block_id);
2304: hr_utility.trace(' attribute1 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute1 );
2305: hr_utility.trace(' attribute2 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute2 );
2306: hr_utility.trace(' attribute3 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute3 );
2299: IF g_debug
2300: THEN
2301: hr_utility.trace('There exists some input values, need to update them');
2302: hr_utility.trace(' l_created_sum_id :'||l_created_tim_sum_id);
2303: hr_utility.trace(' bb_id :'||p_time_building_block_id);
2304: hr_utility.trace(' attribute1 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute1 );
2305: hr_utility.trace(' attribute2 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute2 );
2306: hr_utility.trace(' attribute3 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute3 );
2307: hr_utility.trace(' attribute4 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute4 );
2300: THEN
2301: hr_utility.trace('There exists some input values, need to update them');
2302: hr_utility.trace(' l_created_sum_id :'||l_created_tim_sum_id);
2303: hr_utility.trace(' bb_id :'||p_time_building_block_id);
2304: hr_utility.trace(' attribute1 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute1 );
2305: hr_utility.trace(' attribute2 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute2 );
2306: hr_utility.trace(' attribute3 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute3 );
2307: hr_utility.trace(' attribute4 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute4 );
2308: hr_utility.trace(' attribute5 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute5 );
2301: hr_utility.trace('There exists some input values, need to update them');
2302: hr_utility.trace(' l_created_sum_id :'||l_created_tim_sum_id);
2303: hr_utility.trace(' bb_id :'||p_time_building_block_id);
2304: hr_utility.trace(' attribute1 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute1 );
2305: hr_utility.trace(' attribute2 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute2 );
2306: hr_utility.trace(' attribute3 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute3 );
2307: hr_utility.trace(' attribute4 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute4 );
2308: hr_utility.trace(' attribute5 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute5 );
2309: hr_utility.trace(' attribute6 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute6 );
2302: hr_utility.trace(' l_created_sum_id :'||l_created_tim_sum_id);
2303: hr_utility.trace(' bb_id :'||p_time_building_block_id);
2304: hr_utility.trace(' attribute1 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute1 );
2305: hr_utility.trace(' attribute2 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute2 );
2306: hr_utility.trace(' attribute3 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute3 );
2307: hr_utility.trace(' attribute4 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute4 );
2308: hr_utility.trace(' attribute5 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute5 );
2309: hr_utility.trace(' attribute6 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute6 );
2310: hr_utility.trace(' attribute7 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute7 );
2303: hr_utility.trace(' bb_id :'||p_time_building_block_id);
2304: hr_utility.trace(' attribute1 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute1 );
2305: hr_utility.trace(' attribute2 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute2 );
2306: hr_utility.trace(' attribute3 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute3 );
2307: hr_utility.trace(' attribute4 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute4 );
2308: hr_utility.trace(' attribute5 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute5 );
2309: hr_utility.trace(' attribute6 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute6 );
2310: hr_utility.trace(' attribute7 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute7 );
2311: hr_utility.trace(' attribute8 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute8 );
2304: hr_utility.trace(' attribute1 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute1 );
2305: hr_utility.trace(' attribute2 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute2 );
2306: hr_utility.trace(' attribute3 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute3 );
2307: hr_utility.trace(' attribute4 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute4 );
2308: hr_utility.trace(' attribute5 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute5 );
2309: hr_utility.trace(' attribute6 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute6 );
2310: hr_utility.trace(' attribute7 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute7 );
2311: hr_utility.trace(' attribute8 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute8 );
2312: hr_utility.trace(' attribute9 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute9 );
2305: hr_utility.trace(' attribute2 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute2 );
2306: hr_utility.trace(' attribute3 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute3 );
2307: hr_utility.trace(' attribute4 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute4 );
2308: hr_utility.trace(' attribute5 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute5 );
2309: hr_utility.trace(' attribute6 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute6 );
2310: hr_utility.trace(' attribute7 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute7 );
2311: hr_utility.trace(' attribute8 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute8 );
2312: hr_utility.trace(' attribute9 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute9 );
2313: hr_utility.trace(' attribute10 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute10);
2306: hr_utility.trace(' attribute3 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute3 );
2307: hr_utility.trace(' attribute4 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute4 );
2308: hr_utility.trace(' attribute5 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute5 );
2309: hr_utility.trace(' attribute6 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute6 );
2310: hr_utility.trace(' attribute7 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute7 );
2311: hr_utility.trace(' attribute8 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute8 );
2312: hr_utility.trace(' attribute9 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute9 );
2313: hr_utility.trace(' attribute10 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute10);
2314: hr_utility.trace(' attribute11 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute11);
2307: hr_utility.trace(' attribute4 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute4 );
2308: hr_utility.trace(' attribute5 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute5 );
2309: hr_utility.trace(' attribute6 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute6 );
2310: hr_utility.trace(' attribute7 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute7 );
2311: hr_utility.trace(' attribute8 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute8 );
2312: hr_utility.trace(' attribute9 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute9 );
2313: hr_utility.trace(' attribute10 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute10);
2314: hr_utility.trace(' attribute11 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute11);
2315: hr_utility.trace(' attribute12 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute12);
2308: hr_utility.trace(' attribute5 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute5 );
2309: hr_utility.trace(' attribute6 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute6 );
2310: hr_utility.trace(' attribute7 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute7 );
2311: hr_utility.trace(' attribute8 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute8 );
2312: hr_utility.trace(' attribute9 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute9 );
2313: hr_utility.trace(' attribute10 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute10);
2314: hr_utility.trace(' attribute11 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute11);
2315: hr_utility.trace(' attribute12 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute12);
2316: hr_utility.trace(' attribute13 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute13);
2309: hr_utility.trace(' attribute6 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute6 );
2310: hr_utility.trace(' attribute7 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute7 );
2311: hr_utility.trace(' attribute8 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute8 );
2312: hr_utility.trace(' attribute9 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute9 );
2313: hr_utility.trace(' attribute10 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute10);
2314: hr_utility.trace(' attribute11 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute11);
2315: hr_utility.trace(' attribute12 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute12);
2316: hr_utility.trace(' attribute13 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute13);
2317: hr_utility.trace(' attribute14 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute14);
2310: hr_utility.trace(' attribute7 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute7 );
2311: hr_utility.trace(' attribute8 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute8 );
2312: hr_utility.trace(' attribute9 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute9 );
2313: hr_utility.trace(' attribute10 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute10);
2314: hr_utility.trace(' attribute11 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute11);
2315: hr_utility.trace(' attribute12 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute12);
2316: hr_utility.trace(' attribute13 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute13);
2317: hr_utility.trace(' attribute14 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute14);
2318: hr_utility.trace(' attribute15 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute15);
2311: hr_utility.trace(' attribute8 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute8 );
2312: hr_utility.trace(' attribute9 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute9 );
2313: hr_utility.trace(' attribute10 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute10);
2314: hr_utility.trace(' attribute11 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute11);
2315: hr_utility.trace(' attribute12 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute12);
2316: hr_utility.trace(' attribute13 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute13);
2317: hr_utility.trace(' attribute14 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute14);
2318: hr_utility.trace(' attribute15 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute15);
2319: END IF;
2312: hr_utility.trace(' attribute9 : '||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute9 );
2313: hr_utility.trace(' attribute10 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute10);
2314: hr_utility.trace(' attribute11 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute11);
2315: hr_utility.trace(' attribute12 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute12);
2316: hr_utility.trace(' attribute13 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute13);
2317: hr_utility.trace(' attribute14 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute14);
2318: hr_utility.trace(' attribute15 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute15);
2319: END IF;
2320:
2313: hr_utility.trace(' attribute10 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute10);
2314: hr_utility.trace(' attribute11 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute11);
2315: hr_utility.trace(' attribute12 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute12);
2316: hr_utility.trace(' attribute13 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute13);
2317: hr_utility.trace(' attribute14 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute14);
2318: hr_utility.trace(' attribute15 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute15);
2319: END IF;
2320:
2321: UPDATE hxt_sum_hours_worked_f
2314: hr_utility.trace(' attribute11 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute11);
2315: hr_utility.trace(' attribute12 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute12);
2316: hr_utility.trace(' attribute13 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute13);
2317: hr_utility.trace(' attribute14 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute14);
2318: hr_utility.trace(' attribute15 :'||g_iv_table(TO_CHAR(p_time_building_block_id)).attribute15);
2319: END IF;
2320:
2321: UPDATE hxt_sum_hours_worked_f
2322: SET attribute1 = g_iv_table(TO_CHAR(p_time_building_block_id)).attribute1,
2342:
2343: --
2344: IF g_debug
2345: THEN
2346: hr_utility.TRACE ( 'TIM_SUM_ID IS : '
2347: || TO_CHAR (l_created_tim_sum_id)
2348: );
2349: hr_utility.TRACE ('l_timecard_id is : ' || TO_CHAR (l_timecard_id));
2350: END IF;
2345: THEN
2346: hr_utility.TRACE ( 'TIM_SUM_ID IS : '
2347: || TO_CHAR (l_created_tim_sum_id)
2348: );
2349: hr_utility.TRACE ('l_timecard_id is : ' || TO_CHAR (l_timecard_id));
2350: END IF;
2351:
2352: --
2353: IF (NOT g_timecards.EXISTS (l_timecard_id))
2397:
2398: --
2399: IF g_debug
2400: THEN
2401: hr_utility.set_location (c_proc, 7);
2402: END IF;
2403:
2404: --
2405: hxt_batch_process.main_process (errbuf => l_errbuf,
2514: );
2515: EXCEPTION
2516: WHEN OTHERS
2517: THEN
2518: hr_utility.trace(dbms_utility.format_error_backtrace);
2519: g_status := 'ERRORS';
2520: fnd_message.set_name ('HXC', 'HXC_HRPAY_RET_BATCH_HDR_API');
2521: g_exception_description := SUBSTR (fnd_message.get, 1, 2000);
2522: RAISE e_retrieval_error;
2578: BEGIN
2579: --
2580: IF g_debug
2581: THEN
2582: hr_utility.set_location
2583: ('HXT_OTC_RETRIEVAL_INTERFACE.get_batch_info',
2584: 1
2585: );
2586: END IF;
2616:
2617: --
2618: IF g_debug
2619: THEN
2620: hr_utility.set_location
2621: ('HXT_OTC_RETRIEVAL_INTERFACE.get_batch_info',
2622: 2
2623: );
2624: END IF;
2634:
2635: --
2636: IF g_debug
2637: THEN
2638: hr_utility.set_location
2639: ('HXT_OTC_RETRIEVAL_INTERFACE.get_batch_info',
2640: 3
2641: );
2642: END IF;
2668:
2669: --
2670: IF g_debug
2671: THEN
2672: hr_utility.set_location
2673: ('HXT_OTC_RETRIEVAL_INTERFACE.get_batch_info',
2674: 4
2675: );
2676: END IF;
2685:
2686: --
2687: IF g_debug
2688: THEN
2689: hr_utility.set_location
2690: ('HXT_OTC_RETRIEVAL_INTERFACE.get_batch_info',
2691: 5
2692: );
2693: END IF;
2710: BEGIN
2711: --
2712: IF g_debug
2713: THEN
2714: hr_utility.TRACE ('----- In procedure set_transaction -----');
2715: hr_utility.TRACE ('Setting status for bb_id ' || TO_CHAR (p_bb_id)
2716: );
2717: hr_utility.TRACE ('Status is ' || p_status);
2718: hr_utility.TRACE ('Exception is ' || p_excep);
2711: --
2712: IF g_debug
2713: THEN
2714: hr_utility.TRACE ('----- In procedure set_transaction -----');
2715: hr_utility.TRACE ('Setting status for bb_id ' || TO_CHAR (p_bb_id)
2716: );
2717: hr_utility.TRACE ('Status is ' || p_status);
2718: hr_utility.TRACE ('Exception is ' || p_excep);
2719: END IF;
2713: THEN
2714: hr_utility.TRACE ('----- In procedure set_transaction -----');
2715: hr_utility.TRACE ('Setting status for bb_id ' || TO_CHAR (p_bb_id)
2716: );
2717: hr_utility.TRACE ('Status is ' || p_status);
2718: hr_utility.TRACE ('Exception is ' || p_excep);
2719: END IF;
2720:
2721: IF (hxc_generic_retrieval_pkg.t_tx_detail_bb_id (p_bb_index) <>
2714: hr_utility.TRACE ('----- In procedure set_transaction -----');
2715: hr_utility.TRACE ('Setting status for bb_id ' || TO_CHAR (p_bb_id)
2716: );
2717: hr_utility.TRACE ('Status is ' || p_status);
2718: hr_utility.TRACE ('Exception is ' || p_excep);
2719: END IF;
2720:
2721: IF (hxc_generic_retrieval_pkg.t_tx_detail_bb_id (p_bb_index) <>
2722: p_bb_id
2733: p_excep;
2734:
2735: IF g_debug
2736: THEN
2737: hr_utility.TRACE ('----- Done setting status -----');
2738: END IF;
2739: END set_transaction;
2740: --
2741: -------------------------- transfer_to_otm Main --------------------
2741: -------------------------- transfer_to_otm Main --------------------
2742: --
2743: -- Main Procedure
2744: BEGIN
2745: g_debug := hr_utility.debug_enabled;
2746:
2747: --
2748: --
2749: --
2748: --
2749: --
2750: IF g_debug
2751: THEN
2752: hr_utility.set_location (c_proc, 1);
2753: END IF;
2754:
2755: --
2756: g_timecards.DELETE;
2759:
2760: --
2761: IF g_debug
2762: THEN
2763: hr_utility.TRACE ('****** Parameters are: ******');
2764: hr_utility.TRACE ('p_bg_id is: ' || TO_CHAR (p_bg_id));
2765: hr_utility.TRACE ('p_incremental is: ' || p_incremental);
2766: hr_utility.TRACE ('p_start_date is: ' || p_start_date);
2767: hr_utility.TRACE ('p_end_date is: ' || p_end_date);
2760: --
2761: IF g_debug
2762: THEN
2763: hr_utility.TRACE ('****** Parameters are: ******');
2764: hr_utility.TRACE ('p_bg_id is: ' || TO_CHAR (p_bg_id));
2765: hr_utility.TRACE ('p_incremental is: ' || p_incremental);
2766: hr_utility.TRACE ('p_start_date is: ' || p_start_date);
2767: hr_utility.TRACE ('p_end_date is: ' || p_end_date);
2768: hr_utility.TRACE ( 'p_retrieval_transaction_code is: '
2761: IF g_debug
2762: THEN
2763: hr_utility.TRACE ('****** Parameters are: ******');
2764: hr_utility.TRACE ('p_bg_id is: ' || TO_CHAR (p_bg_id));
2765: hr_utility.TRACE ('p_incremental is: ' || p_incremental);
2766: hr_utility.TRACE ('p_start_date is: ' || p_start_date);
2767: hr_utility.TRACE ('p_end_date is: ' || p_end_date);
2768: hr_utility.TRACE ( 'p_retrieval_transaction_code is: '
2769: || p_retrieval_transaction_code
2762: THEN
2763: hr_utility.TRACE ('****** Parameters are: ******');
2764: hr_utility.TRACE ('p_bg_id is: ' || TO_CHAR (p_bg_id));
2765: hr_utility.TRACE ('p_incremental is: ' || p_incremental);
2766: hr_utility.TRACE ('p_start_date is: ' || p_start_date);
2767: hr_utility.TRACE ('p_end_date is: ' || p_end_date);
2768: hr_utility.TRACE ( 'p_retrieval_transaction_code is: '
2769: || p_retrieval_transaction_code
2770: );
2763: hr_utility.TRACE ('****** Parameters are: ******');
2764: hr_utility.TRACE ('p_bg_id is: ' || TO_CHAR (p_bg_id));
2765: hr_utility.TRACE ('p_incremental is: ' || p_incremental);
2766: hr_utility.TRACE ('p_start_date is: ' || p_start_date);
2767: hr_utility.TRACE ('p_end_date is: ' || p_end_date);
2768: hr_utility.TRACE ( 'p_retrieval_transaction_code is: '
2769: || p_retrieval_transaction_code
2770: );
2771: hr_utility.TRACE ('p_batch_ref is: ' || p_batch_ref);
2764: hr_utility.TRACE ('p_bg_id is: ' || TO_CHAR (p_bg_id));
2765: hr_utility.TRACE ('p_incremental is: ' || p_incremental);
2766: hr_utility.TRACE ('p_start_date is: ' || p_start_date);
2767: hr_utility.TRACE ('p_end_date is: ' || p_end_date);
2768: hr_utility.TRACE ( 'p_retrieval_transaction_code is: '
2769: || p_retrieval_transaction_code
2770: );
2771: hr_utility.TRACE ('p_batch_ref is: ' || p_batch_ref);
2772: hr_utility.TRACE ('p_transfer_to_bee is: ' || p_transfer_to_bee);
2767: hr_utility.TRACE ('p_end_date is: ' || p_end_date);
2768: hr_utility.TRACE ( 'p_retrieval_transaction_code is: '
2769: || p_retrieval_transaction_code
2770: );
2771: hr_utility.TRACE ('p_batch_ref is: ' || p_batch_ref);
2772: hr_utility.TRACE ('p_transfer_to_bee is: ' || p_transfer_to_bee);
2773: END IF;
2774:
2775: --
2768: hr_utility.TRACE ( 'p_retrieval_transaction_code is: '
2769: || p_retrieval_transaction_code
2770: );
2771: hr_utility.TRACE ('p_batch_ref is: ' || p_batch_ref);
2772: hr_utility.TRACE ('p_transfer_to_bee is: ' || p_transfer_to_bee);
2773: END IF;
2774:
2775: --
2776: IF g_debug
2774:
2775: --
2776: IF g_debug
2777: THEN
2778: hr_utility.set_location (c_proc, 10);
2779: END IF;
2780:
2781: --
2782: -- Set session date
2790:
2791: --
2792: IF g_debug
2793: THEN
2794: hr_utility.set_location (c_proc, 20);
2795: END IF;
2796:
2797: --
2798: -- Initialize batch counters
2812:
2813: --
2814: IF g_debug
2815: THEN
2816: hr_utility.set_location (c_proc, 30);
2817: hr_utility.set_location (c_proc, 40);
2818: END IF;
2819:
2820: --
2813: --
2814: IF g_debug
2815: THEN
2816: hr_utility.set_location (c_proc, 30);
2817: hr_utility.set_location (c_proc, 40);
2818: END IF;
2819:
2820: --
2821: /*
2829: */
2830: --
2831: IF g_debug
2832: THEN
2833: hr_utility.set_location (c_proc, 50);
2834: hr_utility.set_location (c_proc, 60);
2835: END IF;
2836:
2837: --
2830: --
2831: IF g_debug
2832: THEN
2833: hr_utility.set_location (c_proc, 50);
2834: hr_utility.set_location (c_proc, 60);
2835: END IF;
2836:
2837: --
2838: --
2840:
2841: --
2842: IF g_debug
2843: THEN
2844: hr_utility.TRACE ('l_where_clause is: ' || l_where_clause);
2845: hr_utility.set_location (c_proc, 70);
2846: END IF;
2847:
2848: --
2841: --
2842: IF g_debug
2843: THEN
2844: hr_utility.TRACE ('l_where_clause is: ' || l_where_clause);
2845: hr_utility.set_location (c_proc, 70);
2846: END IF;
2847:
2848: --
2849: ---------------------------- Call Generic Retrieval -----------------------
2849: ---------------------------- Call Generic Retrieval -----------------------
2850: --
2851: IF g_debug
2852: THEN
2853: hr_utility.TRACE ('--- Calling Generic Retrieval ---');
2854: END IF;
2855:
2856: --
2857: WHILE (NOT l_no_more_timecards)
2886: INTO l_debug;
2887:
2888: IF get_debug%FOUND
2889: THEN
2890: hr_utility.trace_on (NULL, 'RET_OTM');
2891: END IF;
2892:
2893: CLOSE get_debug;
2894:
2894:
2895: --
2896: IF g_debug
2897: THEN
2898: hr_utility.TRACE ('--- Returned from Generic Retrieval ---');
2899: hr_utility.set_location (c_proc, 80);
2900: END IF;
2901:
2902: --
2895: --
2896: IF g_debug
2897: THEN
2898: hr_utility.TRACE ('--- Returned from Generic Retrieval ---');
2899: hr_utility.set_location (c_proc, 80);
2900: END IF;
2901:
2902: --
2903: ----------------------------- Transfer to BEE -----------------------------
2978:
2979: --
2980: IF g_debug
2981: THEN
2982: hr_utility.set_location (c_proc, 90);
2983: --
2984: hr_utility.TRACE ('--------------------------------');
2985: hr_utility.TRACE ('In Building Block Loop');
2986: hr_utility.TRACE ('l_type is ' || l_type);
2980: IF g_debug
2981: THEN
2982: hr_utility.set_location (c_proc, 90);
2983: --
2984: hr_utility.TRACE ('--------------------------------');
2985: hr_utility.TRACE ('In Building Block Loop');
2986: hr_utility.TRACE ('l_type is ' || l_type);
2987: hr_utility.TRACE ('l_measure is ' || l_measure);
2988: hr_utility.TRACE ( 'l_start_time is '
2981: THEN
2982: hr_utility.set_location (c_proc, 90);
2983: --
2984: hr_utility.TRACE ('--------------------------------');
2985: hr_utility.TRACE ('In Building Block Loop');
2986: hr_utility.TRACE ('l_type is ' || l_type);
2987: hr_utility.TRACE ('l_measure is ' || l_measure);
2988: hr_utility.TRACE ( 'l_start_time is '
2989: || TO_CHAR (l_start_time,
2982: hr_utility.set_location (c_proc, 90);
2983: --
2984: hr_utility.TRACE ('--------------------------------');
2985: hr_utility.TRACE ('In Building Block Loop');
2986: hr_utility.TRACE ('l_type is ' || l_type);
2987: hr_utility.TRACE ('l_measure is ' || l_measure);
2988: hr_utility.TRACE ( 'l_start_time is '
2989: || TO_CHAR (l_start_time,
2990: 'DD-MON-YYYY HH:MI:SS'
2983: --
2984: hr_utility.TRACE ('--------------------------------');
2985: hr_utility.TRACE ('In Building Block Loop');
2986: hr_utility.TRACE ('l_type is ' || l_type);
2987: hr_utility.TRACE ('l_measure is ' || l_measure);
2988: hr_utility.TRACE ( 'l_start_time is '
2989: || TO_CHAR (l_start_time,
2990: 'DD-MON-YYYY HH:MI:SS'
2991: )
2984: hr_utility.TRACE ('--------------------------------');
2985: hr_utility.TRACE ('In Building Block Loop');
2986: hr_utility.TRACE ('l_type is ' || l_type);
2987: hr_utility.TRACE ('l_measure is ' || l_measure);
2988: hr_utility.TRACE ( 'l_start_time is '
2989: || TO_CHAR (l_start_time,
2990: 'DD-MON-YYYY HH:MI:SS'
2991: )
2992: );
2989: || TO_CHAR (l_start_time,
2990: 'DD-MON-YYYY HH:MI:SS'
2991: )
2992: );
2993: hr_utility.TRACE ( 'l_stop_time is '
2994: || TO_CHAR (l_stop_time,
2995: 'DD-MON-YYYY HH:MI:SS'
2996: )
2997: );
2994: || TO_CHAR (l_stop_time,
2995: 'DD-MON-YYYY HH:MI:SS'
2996: )
2997: );
2998: hr_utility.TRACE ('l_scope is ' || l_scope);
2999: hr_utility.TRACE ( 'l_resource_id is '
3000: || TO_CHAR (l_resource_id)
3001: );
3002: hr_utility.TRACE ('l_resource_type is '
2995: 'DD-MON-YYYY HH:MI:SS'
2996: )
2997: );
2998: hr_utility.TRACE ('l_scope is ' || l_scope);
2999: hr_utility.TRACE ( 'l_resource_id is '
3000: || TO_CHAR (l_resource_id)
3001: );
3002: hr_utility.TRACE ('l_resource_type is '
3003: || l_resource_type
2998: hr_utility.TRACE ('l_scope is ' || l_scope);
2999: hr_utility.TRACE ( 'l_resource_id is '
3000: || TO_CHAR (l_resource_id)
3001: );
3002: hr_utility.TRACE ('l_resource_type is '
3003: || l_resource_type
3004: );
3005: hr_utility.TRACE ('l_changed is ' || l_changed);
3006: hr_utility.TRACE ('l_deleted is ' || l_deleted);
3001: );
3002: hr_utility.TRACE ('l_resource_type is '
3003: || l_resource_type
3004: );
3005: hr_utility.TRACE ('l_changed is ' || l_changed);
3006: hr_utility.TRACE ('l_deleted is ' || l_deleted);
3007: hr_utility.trace ('OTL: l_old_bb_index is '||l_old_bb_index);
3008: hr_utility.TRACE ('--------------------------------');
3009: END IF;
3002: hr_utility.TRACE ('l_resource_type is '
3003: || l_resource_type
3004: );
3005: hr_utility.TRACE ('l_changed is ' || l_changed);
3006: hr_utility.TRACE ('l_deleted is ' || l_deleted);
3007: hr_utility.trace ('OTL: l_old_bb_index is '||l_old_bb_index);
3008: hr_utility.TRACE ('--------------------------------');
3009: END IF;
3010:
3003: || l_resource_type
3004: );
3005: hr_utility.TRACE ('l_changed is ' || l_changed);
3006: hr_utility.TRACE ('l_deleted is ' || l_deleted);
3007: hr_utility.trace ('OTL: l_old_bb_index is '||l_old_bb_index);
3008: hr_utility.TRACE ('--------------------------------');
3009: END IF;
3010:
3011: IF l_scope = 'DETAIL'
3004: );
3005: hr_utility.TRACE ('l_changed is ' || l_changed);
3006: hr_utility.TRACE ('l_deleted is ' || l_deleted);
3007: hr_utility.trace ('OTL: l_old_bb_index is '||l_old_bb_index);
3008: hr_utility.TRACE ('--------------------------------');
3009: END IF;
3010:
3011: IF l_scope = 'DETAIL'
3012: THEN
3043:
3044: --
3045: IF g_debug
3046: THEN
3047: hr_utility.TRACE
3048: ( 'l_start_time is '
3049: || TO_CHAR
3050: (l_start_time,
3051: 'DD-MON-YYYY HH:MI:SS'
3050: (l_start_time,
3051: 'DD-MON-YYYY HH:MI:SS'
3052: )
3053: );
3054: hr_utility.TRACE
3055: ( 'l_stop_time is '
3056: || TO_CHAR
3057: (l_stop_time,
3058: 'DD-MON-YYYY HH:MI:SS'
3068:
3069: --
3070: IF g_debug
3071: THEN
3072: hr_utility.set_location (c_proc, 100);
3073: END IF;
3074:
3075: --
3076: IF l_resource_type = 'PERSON'
3079:
3080: --
3081: IF g_debug
3082: THEN
3083: hr_utility.TRACE ( 'l_person_id is '
3084: || TO_CHAR (l_person_id)
3085: );
3086: END IF;
3087: --
3092:
3093: --
3094: IF g_debug
3095: THEN
3096: hr_utility.TRACE ( 'l_assignment_id is '
3097: || TO_CHAR (l_assignment_id)
3098: );
3099: END IF;
3100: --
3102:
3103: --
3104: IF g_debug
3105: THEN
3106: hr_utility.set_location (c_proc, 110);
3107: END IF;
3108:
3109: --
3110: l_effective_date := TRUNC (l_start_time);
3110: l_effective_date := TRUNC (l_start_time);
3111:
3112: IF g_debug
3113: THEN
3114: hr_utility.TRACE ( 'l_effective_date is :'
3115: || TO_CHAR (l_effective_date,
3116: 'DD-MON-YYYY'
3117: )
3118: );
3128: AND effective_end_date;
3129: EXCEPTION
3130: WHEN NO_DATA_FOUND
3131: THEN
3132: hr_utility.set_message
3133: (800,
3134: 'HR_52365_PTU_NO_PERSON_EXISTS'
3135: );
3136: l_last_att_index :=
3144: (p_att_table => hxc_generic_retrieval_pkg.t_old_detail_attributes,
3145: p_bb_id => l_bb_id,
3146: p_last_att_index => l_old_last_att_index
3147: );
3148: hr_utility.raise_error;
3149: END;
3150:
3151: --
3152: -- Get the attributes of the detail record.
3171:
3172: --
3173: IF g_debug
3174: THEN
3175: hr_utility.set_location (c_proc, 120);
3176: END IF;
3177:
3178: --
3179: -- If there is a mapping set up for the assignment_id, get the assignment
3202:
3203: --
3204: IF g_debug
3205: THEN
3206: hr_utility.set_location (c_proc, 130);
3207: END IF;
3208:
3209: --
3210: -- Get payroll id
3218:
3219: --
3220: IF g_debug
3221: THEN
3222: hr_utility.set_location (c_proc, 140);
3223: hr_utility.TRACE
3224: ('--- After Call to get_assignment_info ---');
3225: hr_utility.TRACE ( 'Person IDs are '
3226: || TO_CHAR (l_person_id)
3219: --
3220: IF g_debug
3221: THEN
3222: hr_utility.set_location (c_proc, 140);
3223: hr_utility.TRACE
3224: ('--- After Call to get_assignment_info ---');
3225: hr_utility.TRACE ( 'Person IDs are '
3226: || TO_CHAR (l_person_id)
3227: );
3221: THEN
3222: hr_utility.set_location (c_proc, 140);
3223: hr_utility.TRACE
3224: ('--- After Call to get_assignment_info ---');
3225: hr_utility.TRACE ( 'Person IDs are '
3226: || TO_CHAR (l_person_id)
3227: );
3228: hr_utility.TRACE ( 'Payroll IDs are '
3229: || TO_CHAR (l_payroll_id)
3224: ('--- After Call to get_assignment_info ---');
3225: hr_utility.TRACE ( 'Person IDs are '
3226: || TO_CHAR (l_person_id)
3227: );
3228: hr_utility.TRACE ( 'Payroll IDs are '
3229: || TO_CHAR (l_payroll_id)
3230: );
3231: hr_utility.TRACE ( 'bg IDs are '
3232: || TO_CHAR (l_bg_id)
3227: );
3228: hr_utility.TRACE ( 'Payroll IDs are '
3229: || TO_CHAR (l_payroll_id)
3230: );
3231: hr_utility.TRACE ( 'bg IDs are '
3232: || TO_CHAR (l_bg_id)
3233: || ' AND '
3234: || TO_CHAR (p_bg_id)
3235: );
3240: THEN
3241: --
3242: IF g_debug
3243: THEN
3244: hr_utility.set_location (c_proc, 150);
3245: hr_utility.TRACE ('Inside IF');
3246: END IF;
3247:
3248: --
3241: --
3242: IF g_debug
3243: THEN
3244: hr_utility.set_location (c_proc, 150);
3245: hr_utility.TRACE ('Inside IF');
3246: END IF;
3247:
3248: --
3249: -- Get the attributes of the detail record
3249: -- Get the attributes of the detail record
3250: --
3251: IF g_debug
3252: THEN
3253: hr_utility.TRACE
3254: ( 'g_cnt_t_detail_bld_blks count is '
3255: || TO_CHAR (g_cnt_t_detail_bld_blks)
3256: );
3257: END IF;
3263: -- Get the old data
3264: --
3265: IF g_debug
3266: THEN
3267: hr_utility.set_location (c_proc, 160);
3268: hr_utility.TRACE
3269: ( 'Get old building block info for bb id: '
3270: || TO_CHAR (l_bb_id)
3271: );
3264: --
3265: IF g_debug
3266: THEN
3267: hr_utility.set_location (c_proc, 160);
3268: hr_utility.TRACE
3269: ( 'Get old building block info for bb id: '
3270: || TO_CHAR (l_bb_id)
3271: );
3272: END IF;
3279:
3280: --
3281: IF g_debug
3282: THEN
3283: hr_utility.TRACE ('Before IF');
3284: hr_utility.TRACE
3285: ( 'g_cnt_t_old_detail_bld_blks count is '
3286: || TO_CHAR
3287: (hxc_generic_retrieval_pkg.t_old_detail_bld_blks.COUNT
3280: --
3281: IF g_debug
3282: THEN
3283: hr_utility.TRACE ('Before IF');
3284: hr_utility.TRACE
3285: ( 'g_cnt_t_old_detail_bld_blks count is '
3286: || TO_CHAR
3287: (hxc_generic_retrieval_pkg.t_old_detail_bld_blks.COUNT
3288: )
3286: || TO_CHAR
3287: (hxc_generic_retrieval_pkg.t_old_detail_bld_blks.COUNT
3288: )
3289: );
3290: hr_utility.TRACE ( 'l_old_bb_index IS : '
3291: || TO_CHAR (l_old_bb_index)
3292: );
3293: hr_utility.TRACE ( 'l_cnt IS : '
3294: || TO_CHAR (l_cnt)
3289: );
3290: hr_utility.TRACE ( 'l_old_bb_index IS : '
3291: || TO_CHAR (l_old_bb_index)
3292: );
3293: hr_utility.TRACE ( 'l_cnt IS : '
3294: || TO_CHAR (l_cnt)
3295: );
3296: END IF;
3297:
3306: THEN
3307: FOR i IN
3308: hxc_generic_retrieval_pkg.t_old_detail_bld_blks.FIRST .. hxc_generic_retrieval_pkg.t_old_detail_bld_blks.LAST
3309: LOOP
3310: hr_utility.TRACE
3311: ( 'BB ID IS : '
3312: || TO_CHAR
3313: (hxc_generic_retrieval_pkg.t_old_detail_bld_blks
3314: (i).bb_id
3313: (hxc_generic_retrieval_pkg.t_old_detail_bld_blks
3314: (i).bb_id
3315: )
3316: );
3317: hr_utility.TRACE ('i is : ' || TO_CHAR (i));
3318: END LOOP;
3319: END IF;
3320:
3321:
3327: l_bb_id
3328: THEN
3329: IF g_debug
3330: THEN
3331: hr_utility.TRACE
3332: ('in old bb id exception!!!');
3333: END IF;
3334:
3335: fnd_message.set_name
3347:
3348: --
3349: IF g_debug
3350: THEN
3351: hr_utility.TRACE ('After IF');
3352: END IF;
3353:
3354: --
3355: l_old_ovn :=
3388: -- Commenting this out, and doing it at the end of the loop.
3389: --l_old_bb_index := l_old_bb_index + 1;
3390: IF g_debug
3391: THEN
3392: hr_utility.trace('OTL: Old bb index was incremented here -- moved below');
3393: hr_utility.trace('OTL: Old bb index still is '||l_old_bb_index);
3394: END IF;
3395:
3396: IF l_old_type = 'MEASURE'
3389: --l_old_bb_index := l_old_bb_index + 1;
3390: IF g_debug
3391: THEN
3392: hr_utility.trace('OTL: Old bb index was incremented here -- moved below');
3393: hr_utility.trace('OTL: Old bb index still is '||l_old_bb_index);
3394: END IF;
3395:
3396: IF l_old_type = 'MEASURE'
3397: THEN
3407: LOOP
3408: --
3409: IF g_debug
3410: THEN
3411: hr_utility.set_location (c_proc, 170);
3412: hr_utility.TRACE
3413: ('Get old start and stop times');
3414: END IF;
3415:
3408: --
3409: IF g_debug
3410: THEN
3411: hr_utility.set_location (c_proc, 170);
3412: hr_utility.TRACE
3413: ('Get old start and stop times');
3414: END IF;
3415:
3416: --
3433:
3434: --
3435: IF g_debug
3436: THEN
3437: hr_utility.TRACE
3438: ( 'l_old_start_time is '
3439: || TO_CHAR
3440: (l_old_start_time,
3441: 'DD-MON-YYYY HH:MI:SS'
3440: (l_old_start_time,
3441: 'DD-MON-YYYY HH:MI:SS'
3442: )
3443: );
3444: hr_utility.TRACE
3445: ( 'l_old_stop_time is '
3446: || TO_CHAR
3447: (l_old_stop_time,
3448: 'DD-MON-YYYY HH:MI:SS'
3466:
3467: --
3468: IF g_debug
3469: THEN
3470: hr_utility.set_location (c_proc, 180);
3471: END IF;
3472:
3473: --
3474: -- Get the attributes of the old detail record.
3474: -- Get the attributes of the old detail record.
3475: --
3476: IF g_debug
3477: THEN
3478: hr_utility.TRACE
3479: ( 'Get old attributes for bb id: '
3480: || TO_CHAR (l_bb_id)
3481: );
3482: END IF;
3495:
3496: --
3497: IF g_debug
3498: THEN
3499: hr_utility.set_location (c_proc, 190);
3500: END IF;
3501: --
3502: END IF; -- l_changed is Y and p_incremental is Y
3503:
3534:
3535: --
3536: IF g_debug
3537: THEN
3538: hr_utility.set_location (c_proc, 210);
3539: hr_utility.set_location (c_proc, 220);
3540: hr_utility.set_location (c_proc, 230);
3541: END IF;
3542:
3535: --
3536: IF g_debug
3537: THEN
3538: hr_utility.set_location (c_proc, 210);
3539: hr_utility.set_location (c_proc, 220);
3540: hr_utility.set_location (c_proc, 230);
3541: END IF;
3542:
3543: --
3536: IF g_debug
3537: THEN
3538: hr_utility.set_location (c_proc, 210);
3539: hr_utility.set_location (c_proc, 220);
3540: hr_utility.set_location (c_proc, 230);
3541: END IF;
3542:
3543: --
3544: IF l_changed = 'Y' AND p_incremental = 'Y'
3547: -- Parse the old attributes
3548: --
3549: IF g_debug
3550: THEN
3551: hr_utility.set_location (c_proc, 240);
3552: hr_utility.TRACE ('Parse old attributes.');
3553: END IF;
3554:
3555: --
3548: --
3549: IF g_debug
3550: THEN
3551: hr_utility.set_location (c_proc, 240);
3552: hr_utility.TRACE ('Parse old attributes.');
3553: END IF;
3554:
3555: --
3556: parse_attributes
3581:
3582: --
3583: IF g_debug
3584: THEN
3585: hr_utility.set_location (c_proc, 270);
3586: END IF;
3587: --
3588: END IF;
3589:
3591: -------------------- Create Batch Header --------------------
3592: --
3593: IF g_debug
3594: THEN
3595: hr_utility.set_location (c_proc, 280);
3596: END IF;
3597:
3598: --
3599: /*
3600: --
3601: IF l_count_timecards > l_max_batches THEN
3602: --
3603: if g_debug then
3604: hr_utility.set_location(c_proc, 290);
3605: end if;
3606: --
3607: -- Reset counter
3608: l_count_timecards := 0;
3610: -- Increment batch header reference
3611: l_count_batch_head := l_count_batch_head + 1;
3612: --
3613: if g_debug then
3614: hr_utility.set_location(c_proc, 300);
3615: end if;
3616: --
3617: --
3618: ------------------- Transfer To BEE -----------------------
3617: --
3618: ------------------- Transfer To BEE -----------------------
3619: --
3620: if g_debug then
3621: hr_utility.set_location(c_proc, 5);
3622: end if;
3623: --
3624: -- Only transfer if the user has asked for it.
3625: --
3625: --
3626: IF p_transfer_to_bee = 'Y' THEN
3627: --
3628: if g_debug then
3629: hr_utility.set_location(c_proc, 6);
3630: end if;
3631: --
3632: transfer_to_bee(p_bg_id => p_bg_id,
3633: p_batch_id => l_non_retro_batch_id,
3639: l_batch_name := replace(l_batch_ref, ' ', '_') ||
3640: to_char(l_count_batch_head);
3641: --
3642: if g_debug then
3643: hr_utility.set_location(c_proc, 310);
3644: end if;
3645: --
3646: END IF;
3647: --
3647: --
3648: IF l_retro_count_batch_lines > l_max_batches THEN
3649: --
3650: if g_debug then
3651: hr_utility.set_location(c_proc, 320);
3652: end if;
3653: --
3654: -- Reset retro counter
3655: l_retro_count_batch_lines := 0;
3657: -- Increment retro batch header reference
3658: l_retro_count_batch_head := l_retro_count_batch_head + 1;
3659: --
3660: if g_debug then
3661: hr_utility.set_location(c_proc, 330);
3662: end if;
3663: --
3664: ------------------- Transfer To BEE -----------------------
3665: --
3663: --
3664: ------------------- Transfer To BEE -----------------------
3665: --
3666: if g_debug then
3667: hr_utility.set_location(c_proc, 5);
3668: end if;
3669: --
3670: -- Only transfer if the user has asked for it.
3671: --
3671: --
3672: IF p_transfer_to_bee = 'Y' THEN
3673: --
3674: if g_debug then
3675: hr_utility.set_location(c_proc, 6);
3676: end if;
3677: --
3678: transfer_to_bee_retro(p_bg_id => p_bg_id,
3679: p_retro_batch_id => l_retro_batch_id,
3686: '_RETRO_' ||
3687: to_char(l_retro_count_batch_head);
3688: --
3689: if g_debug then
3690: hr_utility.set_location(c_proc, 340);
3691: end if;
3692: --
3693: END IF;
3694: */
3693: END IF;
3694: */
3695: IF g_debug
3696: THEN
3697: hr_utility.set_location (c_proc, 350);
3698: END IF;
3699:
3700: --
3701: --------------------- Create Timecard ---------------------
3701: --------------------- Create Timecard ---------------------
3702: --
3703: IF g_debug
3704: THEN
3705: hr_utility.TRACE
3706: ('---- Before Create Timecard ----');
3707: END IF;
3708:
3709: -- Bug 12850901
3722: END IF;
3723:
3724: IF g_debug
3725: THEN
3726: hr_utility.TRACE ( 'l_employee_number is '
3727: || l_employee_number
3728: );
3729: END IF;
3730:
3756: THEN
3757: --
3758: IF g_debug
3759: THEN
3760: hr_utility.TRACE
3761: ('---- Making retro timecard entry ----');
3762: hr_utility.TRACE ( 'l_retro_batch_id is '
3763: || TO_CHAR (l_retro_batch_id)
3764: );
3758: IF g_debug
3759: THEN
3760: hr_utility.TRACE
3761: ('---- Making retro timecard entry ----');
3762: hr_utility.TRACE ( 'l_retro_batch_id is '
3763: || TO_CHAR (l_retro_batch_id)
3764: );
3765: END IF;
3766:
3779:
3780: --
3781: IF g_debug
3782: THEN
3783: hr_utility.set_location (c_proc, 352);
3784: END IF;
3785: END IF; -- l_changed is Y and p_incremental is Y
3786:
3787: --
3809: l_element_id ))
3810: THEN
3811: IF g_debug
3812: THEN
3813: hr_utility.trace('This timecard needs re-explosion');
3814: END IF;
3815: l_retcode := hxt_tim_col_util.get_session_date(
3816: hxt_time_collection.g_sess_date);
3817: g_timecards(l_tim_id) := l_tim_id;
3837: THEN
3838: --
3839: IF g_debug
3840: THEN
3841: hr_utility.TRACE
3842: ('---- Creating new timecard ----');
3843: hr_utility.TRACE ( 'l_date_worked is '
3844: || TO_CHAR (l_date_worked,
3845: 'DD-MON-YYYY'
3839: IF g_debug
3840: THEN
3841: hr_utility.TRACE
3842: ('---- Creating new timecard ----');
3843: hr_utility.TRACE ( 'l_date_worked is '
3844: || TO_CHAR (l_date_worked,
3845: 'DD-MON-YYYY'
3846: )
3847: );
3844: || TO_CHAR (l_date_worked,
3845: 'DD-MON-YYYY'
3846: )
3847: );
3848: hr_utility.set_location (c_proc, 353);
3849: END IF;
3850:
3851: --
3852: -- Pass in Person ID for employee number - issue
3909:
3910: --
3911: IF g_debug
3912: THEN
3913: hr_utility.set_location (c_proc, 360);
3914: END IF;
3915: --
3916: END IF;
3917:
3939:
3940: --
3941: IF g_debug
3942: THEN
3943: hr_utility.set_location (c_proc, 370);
3944: END IF;
3945:
3946: --
3947: --------------------- Write Error Report --------------------
3951: -- validate or transfer resulted in error status
3952: --
3953: IF g_debug
3954: THEN
3955: hr_utility.set_location (c_proc, 380);
3956: hr_utility.set_location (c_proc, 390);
3957: hr_utility.set_location (c_proc, 400);
3958: END IF;
3959: --
3952: --
3953: IF g_debug
3954: THEN
3955: hr_utility.set_location (c_proc, 380);
3956: hr_utility.set_location (c_proc, 390);
3957: hr_utility.set_location (c_proc, 400);
3958: END IF;
3959: --
3960: END IF; -- parameter validation
3953: IF g_debug
3954: THEN
3955: hr_utility.set_location (c_proc, 380);
3956: hr_utility.set_location (c_proc, 390);
3957: hr_utility.set_location (c_proc, 400);
3958: END IF;
3959: --
3960: END IF; -- parameter validation
3961:
3961:
3962: --
3963: IF g_debug
3964: THEN
3965: hr_utility.set_location (c_proc, 410);
3966: END IF;
3967: --
3968: END IF; -- scope = 'DETAIL'
3969:
3971: -- Added incrementing Old bb id here so that all processing is complete
3972: -- before this.
3973: IF g_debug
3974: THEN
3975: hr_utility.trace('OTL: Adding bb index here now '||l_old_bb_index);
3976: END IF;
3977: IF l_changed = 'Y' AND p_incremental = 'Y'
3978: THEN
3979: l_old_bb_index := NVL(l_old_bb_index,
3982:
3983: IF (l_old_bb_index <= g_cnt_t_old_detail_bld_blks)
3984: THEN
3985: l_old_bb_index := l_old_bb_index + 1;
3986: hr_utility.trace('End of loop: l_old_bb_index is changed '||l_old_bb_index);
3987: END IF;
3988: END IF;
3989:
3990:
3994: THEN
3995: --
3996: IF g_debug
3997: THEN
3998: hr_utility.set_location (c_proc, 411);
3999: END IF;
4000:
4001: --
4002: set_transaction (p_bb_id => l_bb_id,
4034:
4035: -- Bug 9308216
4036: IF g_debug
4037: THEN
4038: hr_utility.trace('OTL: l_old_bb_index is '||l_old_bb_index);
4039: END IF;
4040:
4041: IF l_changed = 'Y' AND p_incremental = 'Y'
4042: THEN
4046:
4047: IF (l_old_bb_index <= g_cnt_t_old_detail_bld_blks)
4048: THEN
4049: l_old_bb_index := l_old_bb_index + 1;
4050: hr_utility.trace('e_record_error:l_old_bb_index is changed '||l_old_bb_index);
4051: END IF;
4052: END IF;
4053:
4054: IF g_debug
4052: END IF;
4053:
4054: IF g_debug
4055: THEN
4056: hr_utility.set_location (c_proc, 412);
4057: END IF;
4058: --
4059: WHEN e_amount_hours
4060: THEN
4059: WHEN e_amount_hours
4060: THEN
4061: IF g_debug
4062: THEN
4063: hr_utility.set_location (c_proc, 666);
4064: END IF;
4065:
4066: fnd_message.set_name ('HXT', 'HXT_39443_HRS_AMT_EDIT');
4067: g_status := 'ERRORS';
4069: SUBSTR (fnd_message.get, 1, 2000);
4070:
4071: IF g_debug
4072: THEN
4073: hr_utility.TRACE ( 'g_exception_description is : '
4074: || g_exception_description
4075: );
4076: END IF;
4077:
4098:
4099: -- Bug 9308216
4100: IF g_debug
4101: THEN
4102: hr_utility.trace('OTL: l_old_bb_index is '||l_old_bb_index);
4103: END IF;
4104:
4105: IF l_changed = 'Y' AND p_incremental = 'Y'
4106: THEN
4110:
4111: IF (l_old_bb_index <= g_cnt_t_old_detail_bld_blks)
4112: THEN
4113: l_old_bb_index := l_old_bb_index + 1;
4114: hr_utility.trace('e_amount_hours:l_old_bb_index is changed '||l_old_bb_index);
4115: END IF;
4116: END IF;
4117:
4118:
4117:
4118:
4119: IF g_debug
4120: THEN
4121: hr_utility.set_location (c_proc, 666.5);
4122: END IF;
4123:
4124: fnd_message.raise_error;
4125: RETURN;
4126: WHEN e_not_retrievable
4127: THEN
4128: IF g_debug
4129: THEN
4130: hr_utility.set_location (c_proc, 700);
4131: END IF;
4132:
4133: -- Bug 12850901
4134: IF g_intg_error IS NULL
4153:
4154:
4155: IF g_debug
4156: THEN
4157: hr_utility.TRACE ( 'g_exception_description is : '
4158: || g_exception_description
4159: );
4160: END IF;
4161:
4181:
4182: -- Bug 9308216
4183: IF g_debug
4184: THEN
4185: hr_utility.trace('OTL: l_old_bb_index is '||l_old_bb_index);
4186: END IF;
4187:
4188: IF l_changed = 'Y' AND p_incremental = 'Y'
4189: THEN
4193:
4194: IF (l_old_bb_index <= g_cnt_t_old_detail_bld_blks)
4195: THEN
4196: l_old_bb_index := l_old_bb_index + 1;
4197: hr_utility.trace('e_not_retrievable:l_old_bb_index is changed '||l_old_bb_index);
4198: END IF;
4199: END IF;
4200:
4201:
4200:
4201:
4202: IF g_debug
4203: THEN
4204: hr_utility.set_location (c_proc, 710);
4205: END IF;
4206: WHEN OTHERS
4207: THEN
4208: --
4207: THEN
4208: --
4209: IF g_debug
4210: THEN
4211: hr_utility.set_location (c_proc, 413);
4212: END IF;
4213:
4214: hr_utility.trace(dbms_utility.format_error_backtrace);
4215:
4210: THEN
4211: hr_utility.set_location (c_proc, 413);
4212: END IF;
4213:
4214: hr_utility.trace(dbms_utility.format_error_backtrace);
4215:
4216: --
4217: g_status := 'ERRORS';
4218: g_exception_description :=
4222: || SQLERRM,
4223: 1,
4224: 2000
4225: );
4226: hr_utility.trace('G_exception description is '||g_exception_description);
4227: --
4228: set_transaction (p_bb_id => l_bb_id,
4229: p_bb_index => l_cnt,
4230: p_status => g_status,
4248:
4249: -- Bug 9308216
4250: IF g_debug
4251: THEN
4252: hr_utility.trace('OTL: l_old_bb_index is '||l_old_bb_index);
4253: END IF;
4254:
4255: IF l_changed = 'Y' AND p_incremental = 'Y'
4256: THEN
4260:
4261: IF (l_old_bb_index <= g_cnt_t_old_detail_bld_blks)
4262: THEN
4263: l_old_bb_index := l_old_bb_index + 1;
4264: hr_utility.trace('OTHERS:l_old_bb_index is changed '||l_old_bb_index);
4265: END IF;
4266: END IF;
4267:
4268:
4267:
4268:
4269: IF g_debug
4270: THEN
4271: hr_utility.set_location (c_proc, 414);
4272: END IF;
4273: --
4274: END;
4275:
4275:
4276: --
4277: IF g_debug
4278: THEN
4279: hr_utility.set_location (c_proc, 420);
4280: END IF;
4281: --
4282: END LOOP;
4283:
4283:
4284: --
4285: IF g_debug
4286: THEN
4287: hr_utility.set_location (c_proc, 430);
4288: END IF;
4289:
4290: --
4291: --------------- Update Transaction in OTC for whole process ---------------
4311: );
4312:
4313: IF g_debug
4314: THEN
4315: hr_utility.set_location (c_proc, 440);
4316: END IF;
4317: ELSE
4318: -- end of loop
4319: l_no_more_timecards := TRUE;
4320: END IF;
4321:
4322: IF g_debug
4323: THEN
4324: hr_utility.TRACE ('g_timecards.count = ' || g_timecards.COUNT);
4325: hr_utility.TRACE ('p_batch_ref = ' || p_batch_ref);
4326: END IF;
4327:
4328: -- reset timecard list
4321:
4322: IF g_debug
4323: THEN
4324: hr_utility.TRACE ('g_timecards.count = ' || g_timecards.COUNT);
4325: hr_utility.TRACE ('p_batch_ref = ' || p_batch_ref);
4326: END IF;
4327:
4328: -- reset timecard list
4329: i := g_timecards.FIRST;
4341: );
4342:
4343: IF g_debug
4344: THEN
4345: hr_utility.TRACE ('l_dt_update_mode = ' || l_dt_update_mode);
4346: END IF;
4347:
4348: hxt_time_collection.re_explode_timecard
4349: (timecard_id => g_timecards
4361: IF l_otm_error IS NOT NULL
4362: THEN
4363: IF g_debug
4364: THEN
4365: hr_utility.set_location (c_proc, 2000);
4366: hr_utility.TRACE ('l_otm_error :' || l_otm_error);
4367: END IF;
4368: -- raise e_error;
4369: END IF;
4362: THEN
4363: IF g_debug
4364: THEN
4365: hr_utility.set_location (c_proc, 2000);
4366: hr_utility.TRACE ('l_otm_error :' || l_otm_error);
4367: END IF;
4368: -- raise e_error;
4369: END IF;
4370:
4371: IF l_oracle_error IS NOT NULL
4372: THEN
4373: IF g_debug
4374: THEN
4375: hr_utility.set_location (c_proc, 2050);
4376: hr_utility.TRACE ('l_oracle_error :' || l_oracle_error);
4377: END IF;
4378: -- raise e_error;
4379: END IF;
4372: THEN
4373: IF g_debug
4374: THEN
4375: hr_utility.set_location (c_proc, 2050);
4376: hr_utility.TRACE ('l_oracle_error :' || l_oracle_error);
4377: END IF;
4378: -- raise e_error;
4379: END IF;
4380:
4409: --
4410: --
4411: WHEN OTHERS
4412: THEN
4413: hr_utility.trace(dbms_utility.format_error_backtrace);
4414: g_status := 'ERRORS';
4415: g_exception_description :=
4416: SUBSTR ('The error is : ' || TO_CHAR (SQLCODE) || ' ' || SQLERRM,
4417: 1,
4420:
4421: --
4422: IF g_debug
4423: THEN
4424: hr_utility.TRACE ('g_exception_description is : ' || SQLERRM);
4425: END IF;
4426:
4427: --
4428: IF SQLERRM NOT LIKE '%HXC%'
4480: --
4481: --
4482: IF g_debug
4483: THEN
4484: hr_utility.set_location (c_proc, 450);
4485: END IF;
4486: --
4487:
4488: --
4523:
4524: BEGIN
4525: IF g_debug
4526: THEN
4527: hr_utility.trace('Deleted entry, check if re-explosion needed ');
4528: END IF;
4529:
4530: -- Check if the earning policy list is created already for this
4531: -- assignment. If not, create it.
4532: IF NOT(g_earn_pol_list.exists((to_char(p_assignment_id))))
4533: THEN
4534: IF g_debug
4535: THEN
4536: hr_utility.trace('Checking policy for '||p_assignment_id);
4537: END IF;
4538: OPEN get_earn_pol(p_assignment_id);
4539: FETCH get_earn_pol BULK COLLECT INTO l_ep_list ;
4540: CLOSE get_earn_pol;
4557:
4558:
4559: IF g_debug
4560: THEN
4561: hr_utility.trace('Earning policy is '||l_ep_id);
4562: END IF;
4563:
4564: -- Check if this earning policy already has
4565: -- elements in earning group populated.
4565: -- elements in earning group populated.
4566: -- If not, fetch and populate it.
4567: IF NOT (g_earn_group_list.exists(to_char(l_ep_id)))
4568: THEN
4569: hr_utility.trace(' Checking earning group elements for '||l_ep_id);
4570: OPEN get_earn_group_elements(l_ep_id);
4571: FETCH get_earn_group_elements BULK COLLECT INTO l_element_list;
4572: CLOSE get_earn_group_elements;
4573:
4588: ELSIF p_element_type_id = g_earn_group_list(l_ep_id).element_list(i)
4589: THEN
4590: IF g_debug
4591: THEN
4592: hr_utility.trace(' Element '||p_element_type_id||' in Earning group ');
4593: END IF;
4594: RETURN TRUE;
4595: END IF;
4596: END LOOP;