[Home] [Help]
66: l_assignment_status_type per_assignment_status_types.per_system_status%TYPE;
67:
68: BEGIN
69: --
70: hr_utility.set_location('Entering : '||l_proc, 10);
71: --
72: OPEN get_status_type;
73: FETCH get_status_type INTO l_assignment_status_type;
74: --
73: FETCH get_status_type INTO l_assignment_status_type;
74: --
75: IF get_status_type%NOTFOUND THEN
76: --
77: hr_utility.set_location(l_proc, 20);
78: --
79: CLOSE get_status_type;
80: --
81: hr_utility.set_message(801,'HR_7940_ASG_INV_ASG_STAT_TYPE');
77: hr_utility.set_location(l_proc, 20);
78: --
79: CLOSE get_status_type;
80: --
81: hr_utility.set_message(801,'HR_7940_ASG_INV_ASG_STAT_TYPE');
82: hr_utility.raise_error;
83: --
84: ELSE
85: --
78: --
79: CLOSE get_status_type;
80: --
81: hr_utility.set_message(801,'HR_7940_ASG_INV_ASG_STAT_TYPE');
82: hr_utility.raise_error;
83: --
84: ELSE
85: --
86: hr_utility.set_location(l_proc, 30);
82: hr_utility.raise_error;
83: --
84: ELSE
85: --
86: hr_utility.set_location(l_proc, 30);
87: --
88: CLOSE get_status_type;
89: --
90: END IF;
88: CLOSE get_status_type;
89: --
90: END IF;
91: --
92: hr_utility.set_location('Leaving : '||l_proc,100);
93: --
94: RETURN(l_assignment_status_type);
95: --
96: END get_assignment_status_type;
124: l_proc varchar2(72) := g_package||'Is_Type_An_Applicant_Type';
125: --
126: BEGIN
127: --
128: hr_utility.set_location('Entering:'|| l_proc, 10);
129: --
130: -- Check to see if a system person type has been
131: -- entered as part of the query criteria in the form.
132: --
132: --
133: Open c_get_system_person_type;
134: Fetch c_get_system_person_type into v_criteria_system_person_type;
135: --
136: hr_utility.set_location(l_proc,20);
137: --
138: -- If no system person type has been entered then
139: -- check that the employee is either an Applicant
140: -- or an Employee_Applicant.
140: -- or an Employee_Applicant.
141: --
142: If c_get_system_person_type%NOTFOUND Then
143: --
144: hr_utility.set_location(l_proc,30);
145: --
146: close c_get_system_person_type;
147: --
148: -- Retrieve the system person type for this employee
150: Open c_get_system_type_name(p_person_type_id);
151: Fetch c_get_system_type_name Into v_system_person_type;
152: Close c_get_system_type_name;
153: --
154: hr_utility.set_location(l_proc,40);
155: --
156: -- If the person is an Applicant or Employee_Applicant
157: -- then set the return value to TRUE else set to FALSE
158: --
171: -- one entered as part of the query criteria.
172: --
173: Else
174: --
175: hr_utility.set_location(l_proc,50);
176: --
177: -- Retrieve the system person type for this employee
178: --
179: Open c_get_system_type_name(p_person_type_id);
205: End If;
206: --
207: End If;
208: --
209: hr_utility.set_location('Leaving '||l_proc,80);
210: --
211: RETURN(v_return_value);
212: --
213: END Is_Type_An_Applicant_Type;
241: l_proc varchar2(72) := g_package||'Is_Type_A_System_Type';
242: --
243: BEGIN
244: --
245: hr_utility.set_location('Entering:'|| l_proc, 10);
246: --
247: -- Check to see if a system person type has been
248: -- entered as part of the query criteria in the form.
249: --
249: --
250: Open c_get_system_person_type;
251: Fetch c_get_system_person_type into v_criteria_system_person_type;
252: --
253: hr_utility.set_location(l_proc,20);
254: --
255: -- If no system person type has been entered then
256: -- check that the employee is either an Employee
257: -- or an Employee_Applicant.
257: -- or an Employee_Applicant.
258: --
259: If c_get_system_person_type%NOTFOUND Then
260: --
261: hr_utility.set_location(l_proc,30);
262: --
263: close c_get_system_person_type;
264: --
265: -- Retrieve the system person type for this employee
267: Open c_get_system_type_name(p_person_type_id);
268: Fetch c_get_system_type_name Into v_system_person_type;
269: Close c_get_system_type_name;
270: --
271: hr_utility.set_location(l_proc,40);
272: --
273: -- If the person is an Employee or Employee_Applicant
274: -- then set the return value to TRUE else set to FALSE
275: --
288: -- one entered as part of the query criteria.
289: --
290: Else
291: --
292: hr_utility.set_location(l_proc,50);
293: --
294: -- Retrieve the system person type for this employee
295: --
296: Open c_get_system_type_name(p_person_type_id);
322: End If;
323: --
324: End If;
325: --
326: hr_utility.set_location('Leaving '||l_proc,80);
327: --
328: RETURN(v_return_value);
329: --
330: END Is_Type_A_System_Type2;
364: l_proc VARCHAR2(72) := g_package||'Is_Person_Correct_Type';
365: --
366: BEGIN
367: --
368: hr_utility.set_location('Entering:'||pqh_gen_form.g_txn_id||'/'|| l_proc, 10);
369: --
370: IF pqh_gen_form.g_txn_id IS NULL THEN
371: --
372: hr_utility.set_location(l_proc,15);
368: hr_utility.set_location('Entering:'||pqh_gen_form.g_txn_id||'/'|| l_proc, 10);
369: --
370: IF pqh_gen_form.g_txn_id IS NULL THEN
371: --
372: hr_utility.set_location(l_proc,15);
373: --
374: pqh_gen_form.g_txn_id := pqh_generic.g_txn_id; -- #3553723
375: -- RETURN ( 'TRUE');-- #3553723
376: --
378: --
379: OPEN c_get_criteria_person_type;
380: FETCH c_get_criteria_person_type INTO v_emp, v_cwk, v_apl;
381: --
382: hr_utility.set_location(l_proc||v_emp||v_cwk||v_apl,20);
383: --
384: IF c_get_criteria_person_type%FOUND Then
385: --
386: hr_utility.set_location(l_proc,30);
382: hr_utility.set_location(l_proc||v_emp||v_cwk||v_apl,20);
383: --
384: IF c_get_criteria_person_type%FOUND Then
385: --
386: hr_utility.set_location(l_proc,30);
387: --
388: CLOSE c_get_criteria_person_type;
389: --
390: -- Fetch the persons system person type name
392: OPEN c_get_system_type_name(p_person_type_id);
393: FETCH c_get_system_type_name INTO v_system_person_type;
394: CLOSE c_get_system_type_name;
395: --
396: hr_utility.set_location(l_proc||v_system_person_type,40);
397: --
398: v_return_value := 'FALSE';
399: --
400: IF v_system_person_type IN ('EMP', 'EMP_APL') AND
399: --
400: IF v_system_person_type IN ('EMP', 'EMP_APL') AND
401: v_emp = 'Y' THEN
402: --
403: hr_utility.set_location(l_proc,50);
404: --
405: v_return_value := 'TRUE';
406: --
407: ELSIF v_system_person_type IN ('APL', 'APL_EX_APL', 'EMP_APL', 'EX_EMP_APL') AND
406: --
407: ELSIF v_system_person_type IN ('APL', 'APL_EX_APL', 'EMP_APL', 'EX_EMP_APL') AND
408: v_apl = 'Y' THEN
409: --
410: hr_utility.set_location(l_proc,60);
411: --
412: v_return_value := 'TRUE';
413: --
414: ELSIF v_system_person_type IN ('CWK') AND
413: --
414: ELSIF v_system_person_type IN ('CWK') AND
415: v_cwk = 'Y' THEN
416: --
417: hr_utility.set_location(l_proc,70);
418: --
419: v_return_value := 'TRUE';
420: --
421: END IF;
419: v_return_value := 'TRUE';
420: --
421: END IF;
422: --
423: hr_utility.set_location(l_proc,80);
424: --
425: END IF;
426: --
427: -- Bug fix 3547257
425: END IF;
426: --
427: -- Bug fix 3547257
428: if ( nvl(v_emp,'N') <>'Y' and nvl(v_cwk,'N') <>'Y') then
429: hr_utility.set_message(800,'HR_449558_NO_CHECK_BOX');
430: hr_utility.raise_error;
431: end if;
432: --
433: hr_utility.set_location('Leaving '||l_proc,999);
426: --
427: -- Bug fix 3547257
428: if ( nvl(v_emp,'N') <>'Y' and nvl(v_cwk,'N') <>'Y') then
429: hr_utility.set_message(800,'HR_449558_NO_CHECK_BOX');
430: hr_utility.raise_error;
431: end if;
432: --
433: hr_utility.set_location('Leaving '||l_proc,999);
434: --
429: hr_utility.set_message(800,'HR_449558_NO_CHECK_BOX');
430: hr_utility.raise_error;
431: end if;
432: --
433: hr_utility.set_location('Leaving '||l_proc,999);
434: --
435: RETURN(v_return_value);
436: --
437: END Is_Person_Correct_Type;
471: l_proc varchar2(72) := g_package||'Is_Type_A_System_Type';
472: --
473: BEGIN
474: --
475: hr_utility.set_location('Entering:'|| l_proc, 10);
476: --
477: Open c_get_system_person_type;
478: Fetch c_get_system_person_type into v_system_person_type;
479: --
476: --
477: Open c_get_system_person_type;
478: Fetch c_get_system_person_type into v_system_person_type;
479: --
480: hr_utility.set_location(l_proc,20);
481: --
482: If c_get_system_person_type%NOTFOUND Then
483: --
484: hr_utility.set_location(l_proc,30);
480: hr_utility.set_location(l_proc,20);
481: --
482: If c_get_system_person_type%NOTFOUND Then
483: --
484: hr_utility.set_location(l_proc,30);
485: --
486: close c_get_system_person_type;
487: --
488: Open c_get_system_type_name(p_person_type_id);
488: Open c_get_system_type_name(p_person_type_id);
489: Fetch c_get_system_type_name Into v_system_person_type;
490: Close c_get_system_type_name;
491: --
492: hr_utility.set_location(l_proc,40);
493: --
494: If v_system_person_type in ('EMP','EMP_APL') then
495: --
496: v_return_value := 'TRUE';
502: End If;
503: --
504: Else
505: --
506: hr_utility.set_location(l_proc,50);
507: --
508: Open c_compare_person_type(v_system_person_type);
509: Fetch c_compare_person_type Into v_dummy_field;
510: --
509: Fetch c_compare_person_type Into v_dummy_field;
510: --
511: If c_compare_person_type%NOTFOUND Then
512: --
513: hr_utility.set_location(l_proc,60);
514: --
515: close c_compare_person_type;
516: v_return_value := 'FALSE';
517: --
516: v_return_value := 'FALSE';
517: --
518: Else
519: --
520: hr_utility.set_location(l_proc,70);
521: --
522: close c_compare_person_type;
523: v_return_value := 'TRUE';
524: --
525: End If;
526: --
527: End If;
528: --
529: hr_utility.set_location('Leaving '||l_proc,80);
530: --
531: RETURN(v_return_value);
532: --
533: END Is_Type_A_System_Type;
576: l_proc varchar2(72) := g_package||'Is_Org_A_Node';
577: --
578: BEGIN
579: --
580: hr_utility.set_location('Entering:'|| l_proc, 10);
581: --
582: Open c_get_structure_version;
583: Fetch c_get_structure_version Into v_version_id;
584: Close c_get_structure_version;
582: Open c_get_structure_version;
583: Fetch c_get_structure_version Into v_version_id;
584: Close c_get_structure_version;
585: --
586: hr_utility.set_location(l_proc,20);
587: --
588: For c_rec in c_orgs_in_hierarchy(v_version_id) Loop
589: --
590: If c_rec.org_id = p_search_org_id Then
596: Exit When v_org_in_hierarchy;
597: --
598: End Loop;
599: --
600: hr_utility.set_location(l_proc,30);
601: --
602: if v_org_in_hierarchy Then
603: --
604: v_return_message := 'TRUE';
602: if v_org_in_hierarchy Then
603: --
604: v_return_message := 'TRUE';
605: --
606: hr_utility.set_location(l_proc,40);
607: --
608: ElsIf Not v_org_in_hierarchy Then
609: --
610: v_return_message := 'FALSE';
608: ElsIf Not v_org_in_hierarchy Then
609: --
610: v_return_message := 'FALSE';
611: --
612: hr_utility.set_location(l_proc,50);
613: --
614: End If;
615: --
616: hr_utility.set_location('Leaving'|| l_proc, 999);
612: hr_utility.set_location(l_proc,50);
613: --
614: End If;
615: --
616: hr_utility.set_location('Leaving'|| l_proc, 999);
617: --
618: Return(v_return_message);
619: --
620: END Is_Org_A_Node;
658: l_proc varchar2(72) := g_package||'Is_Org_In_hierarchy';
659: --
660: BEGIN
661: --
662: hr_utility.set_location('Entering:'|| l_proc||'/'||p_search_org_Id, 10);
663: --
664: /*
665: ** This tells us whether org hierarchy query criteria
666: ** has been entered for this mass update.
672: if v_org_hierarchy_id is null then
673: /*
674: ** No org criteria has been entered so exit returning TRUE.
675: */
676: hr_utility.set_location(l_proc,20);
677:
678: return('TRUE');
679:
680: else
689: if v_starting_node is null then
690: /*
691: ** derive the root node.
692: */
693: hr_utility.set_location(l_proc,22);
694: open c_get_hierarchy_root(v_org_hierarchy_id);
695: fetch c_get_hierarchy_root into g_org_hierarchy_root;
696: close c_get_hierarchy_root;
697: end if;
709: if v_starting_node is null then
710: /*
711: ** derive the root node.
712: */
713: hr_utility.set_location(l_proc,25);
714: open c_get_hierarchy_root(v_org_hierarchy_id);
715: fetch c_get_hierarchy_root into g_org_hierarchy_root;
716: close c_get_hierarchy_root;
717: end if;
716: close c_get_hierarchy_root;
717: end if;
718: end if;
719:
720: hr_utility.set_location(l_proc||'/'||g_org_hierarchy_id||'/'||
721: g_org_starting_node||'/'||g_org_hierarchy_root,30);
722: --
723: --
724: If g_org_starting_node IS NULL and
723: --
724: If g_org_starting_node IS NULL and
725: p_search_org_id <> g_org_hierarchy_root Then
726: --
727: hr_utility.set_location(l_proc,50);
728: /*
729: ** I've got an org hierarchy but no starting node so the search org
730: ** can appear anywhere in the hierarchy. We'll implement this as a tree
731: ** walk up to the root node.
747: WHERE v.organization_structure_id = g_org_hierarchy_id
748: AND hr_general.effective_date BETWEEN v.date_from
749: AND NVL(v.date_to, hr_general.end_of_time)));
750: if l_dummy = 'X' then
751: hr_utility.set_location(l_proc,52);
752: v_org_in_hierarchy := TRUE;
753: end if;
754: exception
755: when no_data_found then
752: v_org_in_hierarchy := TRUE;
753: end if;
754: exception
755: when no_data_found then
756: hr_utility.set_location(l_proc,55);
757: v_org_in_hierarchy := FALSE;
758:
759: when others then
760: raise;
763: --
764: Elsif g_org_starting_node IS NULL and
765: p_search_org_id = g_org_hierarchy_root Then
766: --
767: hr_utility.set_location(l_proc,60);
768: /*
769: ** I've not got a starting node but the search node is the root
770: ** node
771: */
773: --
774: ElsIf g_org_starting_node IS NOT NULL AND
775: g_org_starting_node = p_search_org_id Then
776: --
777: hr_utility.set_location(l_proc,65);
778: /*
779: ** I've got a starting node and it's the search org
780: */
781: --
783: --
784: ElsIf g_org_starting_node IS NOT NULL AND
785: g_org_starting_node <> p_search_org_id Then
786: --
787: hr_utility.set_location(l_proc,70);
788: /*
789: ** I've got a starting node, it's not the search org so search
790: ** the hierarchy from the search org looking for the
791: ** starting node.
811: v_org_in_hierarchy := TRUE;
812: end if;
813: exception
814: when no_data_found then
815: hr_utility.set_location(l_proc,75);
816: v_org_in_hierarchy := FALSE;
817:
818: when others then
819: raise;
833: v_return_message := 'FALSE';
834: --
835: End If;
836: --
837: hr_utility.set_location('Leaving: '||l_proc||' returning '
838: ||v_return_message,999);
839: --
840: Return(v_return_message);
841: --
883: l_proc varchar2(72) := g_package||'Is_Pos_A_Node';
884: --
885: BEGIN
886: --
887: hr_utility.set_location('Entering: '||l_proc,10);
888: --
889: Open c_get_structure_version;
890: Fetch c_get_structure_version Into v_version_id;
891: Close c_get_structure_version;
889: Open c_get_structure_version;
890: Fetch c_get_structure_version Into v_version_id;
891: Close c_get_structure_version;
892: --
893: hr_utility.set_location(l_proc,20);
894: --
895: For c_rec in c_pos_in_hierarchy(v_version_id) Loop
896: --
897: If c_rec.pos_id = p_search_pos_id Then
903: Exit When v_pos_in_hierarchy;
904: --
905: End Loop;
906: --
907: hr_utility.set_location('Leaving: '||l_proc,30);
908: --
909: if v_pos_in_hierarchy Then
910: --
911: v_return_message := 'TRUE';
915: v_return_message := 'FALSE';
916: --
917: End If;
918: --
919: hr_utility.set_location('Leaving: '||l_proc,40);
920: --
921: Return(v_return_message);
922: --
923: END Is_Pos_A_Node;
961: l_proc varchar2(72) := g_package||'Is_Position_In_Hierarchy';
962: --
963: BEGIN
964: --
965: hr_utility.set_location('Entering: '||l_proc||'/'||p_search_pos_id,10);
966: Open c_is_field_populated;
967: Fetch c_is_field_populated into v_pos_hierarchy, v_starting_node;
968: Close c_is_field_populated;
969: --
972: /*
973: ** No pos hierarchy criteria has been entered or the
974: ** assignment has no position so exit returning TRUE.
975: */
976: hr_utility.set_location(l_proc,20);
977:
978: return('TRUE');
979: --
980: Else
989: if v_starting_node is null then
990: /*
991: ** derive the root node.
992: */
993: hr_utility.set_location(l_proc,22);
994: open c_get_hierarchy_root(v_pos_hierarchy);
995: fetch c_get_hierarchy_root into g_pos_hierarchy_root;
996: close c_get_hierarchy_root;
997: end if;
1009: if v_starting_node is null then
1010: /*
1011: ** derive the root node.
1012: */
1013: hr_utility.set_location(l_proc,25);
1014: open c_get_hierarchy_root(v_pos_hierarchy);
1015: fetch c_get_hierarchy_root into g_pos_hierarchy_root;
1016: close c_get_hierarchy_root;
1017: end if;
1016: close c_get_hierarchy_root;
1017: end if;
1018: end if;
1019:
1020: hr_utility.set_location(l_proc||'/'||g_pos_hierarchy_id||'/'||
1021: g_pos_starting_node||'/'||g_pos_hierarchy_root,30);
1022: --
1023: if g_pos_starting_node IS NULL and
1024: p_search_pos_id <> g_pos_hierarchy_root then
1022: --
1023: if g_pos_starting_node IS NULL and
1024: p_search_pos_id <> g_pos_hierarchy_root then
1025:
1026: hr_utility.set_location(l_proc,40);
1027: /*
1028: ** I've got a pos hierarchy but no starting node so the search pos
1029: ** just needs to appear in the hierarchy. Implement this as a tree
1030: ** walk up the hierarchy to the root node.
1046: WHERE v.position_structure_id = g_pos_hierarchy_id
1047: AND hr_general.effective_date BETWEEN v.date_from
1048: AND NVL(v.date_to, hr_general.end_of_time)));
1049: if l_dummy = 'X' then
1050: hr_utility.set_location(l_proc,50);
1051: v_pos_in_hierarchy := TRUE;
1052: end if;
1053: exception
1054: when no_data_found then
1051: v_pos_in_hierarchy := TRUE;
1052: end if;
1053: exception
1054: when no_data_found then
1055: hr_utility.set_location(l_proc,60);
1056: v_pos_in_hierarchy := FALSE;
1057:
1058: when others then
1059: raise;
1061: end;
1062: Elsif g_pos_starting_node IS NULL and
1063: p_search_pos_id = g_pos_hierarchy_root Then
1064: --
1065: hr_utility.set_location(l_proc,70);
1066: /*
1067: ** I've not got a starting node but the search node is the root
1068: ** node
1069: */
1071: --
1072: ElsIf g_pos_starting_node IS NOT NULL AND
1073: g_pos_starting_node = p_search_pos_id Then
1074: --
1075: hr_utility.set_location(l_proc,80);
1076: /*
1077: ** I've got a starting node and it's the search pos
1078: */
1079: --
1081: --
1082: ElsIf g_pos_starting_node IS NOT NULL AND
1083: g_pos_starting_node <> p_search_pos_id Then
1084: --
1085: hr_utility.set_location(l_proc,90);
1086: /*
1087: ** I've got a starting node, it's not the search pos so search
1088: ** the hierarchy from the search pos looking for the
1089: ** starting node.
1105: WHERE v.position_structure_id = g_pos_hierarchy_id
1106: AND hr_general.effective_date BETWEEN v.date_from
1107: AND NVL(v.date_to, hr_general.end_of_time)));
1108: if l_dummy = 'X' then
1109: hr_utility.set_location(l_proc,100);
1110: v_pos_in_hierarchy := TRUE;
1111: end if;
1112: exception
1113: when no_data_found then
1110: v_pos_in_hierarchy := TRUE;
1111: end if;
1112: exception
1113: when no_data_found then
1114: hr_utility.set_location(l_proc,110);
1115: v_pos_in_hierarchy := FALSE;
1116:
1117: when others then
1118: raise;
1132: v_return_message := 'FALSE';
1133: --
1134: End If;
1135: --
1136: hr_utility.set_location('Leaving: '||l_proc||' returning '
1137: ||v_return_message,120);
1138: --
1139: Return(v_return_message);
1140: --
1150: l_proc varchar2(72) := g_package||'Write_Header';
1151: --
1152: BEGIN
1153: --
1154: hr_utility.set_location('Entering: '||l_proc,10);
1155: --
1156: fnd_file.new_line(fnd_file.log,1);
1157: fnd_file.put_line(fnd_file.log,'Errors For Assignment Number '||p_assignment_number);
1158: fnd_file.put_line(fnd_file.log,'==================================');
1157: fnd_file.put_line(fnd_file.log,'Errors For Assignment Number '||p_assignment_number);
1158: fnd_file.put_line(fnd_file.log,'==================================');
1159: --fnd_file.new_line(fnd_file.log,1);
1160: --
1161: hr_utility.set_location('Leaving: '||l_proc,20);
1162: --
1163: END Write_Header;
1164: --
1165: -- ---------------------------------------------------------------------------+
1178: l_already_errored BOOLEAN := p_already_errored;
1179: --
1180: BEGIN
1181: --
1182: hr_utility.set_location('Entering: '||l_proc,10);
1183: --
1184: If p_already_errored = FALSE Then
1185: --
1186: Write_Header(p_assignment_number);
1191: fnd_file.put_line(fnd_file.log,'TYPE = '||p_type);
1192: --
1193: If p_type = 'ERROR' Then
1194: --
1195: hr_utility.set_location(l_proc,20);
1196: --
1197: fnd_file.new_line(fnd_file.log,1);
1198: fnd_file.put_line(fnd_file.log,SQLERRM);
1199: --
1205: -- fnd_file.put_line(fnd_file.log,v_error_message);
1206: --
1207: ElsIf p_type = 'WARNING' Then
1208: --
1209: hr_utility.set_location(l_proc,30);
1210: --
1211: fnd_file.put_line(fnd_file.log,p_warning_message);
1212: --
1213: End If;
1211: fnd_file.put_line(fnd_file.log,p_warning_message);
1212: --
1213: End If;
1214: --
1215: hr_utility.set_location('Leaving: '||l_proc,40);
1216: --
1217: EXCEPTION
1218: when others then
1219: p_already_errored := l_already_errored;
1623: l_duplicate_assignment number;
1624: --
1625: BEGIN
1626: --
1627: --hr_utility.trace_on(NULL,'ORACLE'); --ynegoro
1628: hr_utility.set_location('Entering : '|| l_proc, 10);
1629:
1630: -- check for duplicate assignments
1631: l_duplicate_assignment := 0;
1624: --
1625: BEGIN
1626: --
1627: --hr_utility.trace_on(NULL,'ORACLE'); --ynegoro
1628: hr_utility.set_location('Entering : '|| l_proc, 10);
1629:
1630: -- check for duplicate assignments
1631: l_duplicate_assignment := 0;
1632: if p_asg_id.first is not null then
1633: for i in p_asg_id.first..p_asg_id.last
1634: loop
1635: if p_asg_id(i) = p_assignment_id then
1636: l_duplicate_assignment := 1;
1637: hr_utility.set_location('Assignment already updated'||l_proc, 5);
1638: end if;
1639: end loop;
1640: end if;
1641: if l_duplicate_assignment = 0 then
1643: p_asg_id(p_asg_id.last + 1) := p_assignment_id;
1644: else
1645: p_asg_id(1) := p_assignment_id;
1646: end if;
1647: hr_utility.set_location('Assignment appended to plsql table'||l_proc, 5);
1648: hr_utility.set_location('p_asg_id.last'||p_asg_id.last, 5);
1649: --
1650: -- Issue a savepoint.
1651: --
1644: else
1645: p_asg_id(1) := p_assignment_id;
1646: end if;
1647: hr_utility.set_location('Assignment appended to plsql table'||l_proc, 5);
1648: hr_utility.set_location('p_asg_id.last'||p_asg_id.last, 5);
1649: --
1650: -- Issue a savepoint.
1651: --
1652: SAVEPOINT upd_asg;
1664: open csr_get_org;
1665: fetch csr_get_org into l_organization_id;
1666: close csr_get_org;
1667:
1668: hr_utility.set_location('it is establishment', 55);
1669: hr_utility.set_location('l_establishment_id'||l_establishment_id, 55);
1670: hr_utility.set_location('l_organization_id'||l_organization_id, 55);
1671: else
1672: l_establishment_id := p_establishment_id;
1665: fetch csr_get_org into l_organization_id;
1666: close csr_get_org;
1667:
1668: hr_utility.set_location('it is establishment', 55);
1669: hr_utility.set_location('l_establishment_id'||l_establishment_id, 55);
1670: hr_utility.set_location('l_organization_id'||l_organization_id, 55);
1671: else
1672: l_establishment_id := p_establishment_id;
1673: l_organization_id := p_organization_id;
1666: close csr_get_org;
1667:
1668: hr_utility.set_location('it is establishment', 55);
1669: hr_utility.set_location('l_establishment_id'||l_establishment_id, 55);
1670: hr_utility.set_location('l_organization_id'||l_organization_id, 55);
1671: else
1672: l_establishment_id := p_establishment_id;
1673: l_organization_id := p_organization_id;
1674: hr_utility.set_location('it is not establishment', 55);
1670: hr_utility.set_location('l_organization_id'||l_organization_id, 55);
1671: else
1672: l_establishment_id := p_establishment_id;
1673: l_organization_id := p_organization_id;
1674: hr_utility.set_location('it is not establishment', 55);
1675: hr_utility.set_location('l_establishment_id'||l_establishment_id, 55);
1676: hr_utility.set_location('l_organization_id'||l_organization_id, 55);
1677: end if;
1678: end;
1671: else
1672: l_establishment_id := p_establishment_id;
1673: l_organization_id := p_organization_id;
1674: hr_utility.set_location('it is not establishment', 55);
1675: hr_utility.set_location('l_establishment_id'||l_establishment_id, 55);
1676: hr_utility.set_location('l_organization_id'||l_organization_id, 55);
1677: end if;
1678: end;
1679: --
1672: l_establishment_id := p_establishment_id;
1673: l_organization_id := p_organization_id;
1674: hr_utility.set_location('it is not establishment', 55);
1675: hr_utility.set_location('l_establishment_id'||l_establishment_id, 55);
1676: hr_utility.set_location('l_organization_id'||l_organization_id, 55);
1677: end if;
1678: end;
1679: --
1680: BEGIN
1678: end;
1679: --
1680: BEGIN
1681: --
1682: hr_utility.set_location(l_proc,15);
1683: --
1684: hr_assignment_api.update_emp_asg (
1685: P_VALIDATE => P_VALIDATE ,
1686: P_EFFECTIVE_DATE => L_EFFECTIVE_DATE ,
1809: P_OTHER_MANAGER_WARNING => P_OTHER_MANAGER_WARNING ,
1810: P_HOURLY_SALARIED_WARNING => l_dummy_b ,
1811: P_GSP_POST_PROCESS_WARNING => P_GSP_POST_PROCESS_WARNING );
1812: --
1813: hr_utility.set_location(l_proc, 20);
1814: --
1815: If p_no_managers_warning = TRUE Then
1816: --
1817: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
1813: hr_utility.set_location(l_proc, 20);
1814: --
1815: If p_no_managers_warning = TRUE Then
1816: --
1817: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
1818: l_message_text := 'WARNING: '||hr_utility.get_message;
1819: --
1820: Log_Error(p_type => 'WARNING',
1821: p_assignment_number => p_assignment_number,
1814: --
1815: If p_no_managers_warning = TRUE Then
1816: --
1817: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
1818: l_message_text := 'WARNING: '||hr_utility.get_message;
1819: --
1820: Log_Error(p_type => 'WARNING',
1821: p_assignment_number => p_assignment_number,
1822: p_warning_message => l_message_text,
1823: p_already_errored => v_already_errored);
1824: --
1825: ElsIf p_other_manager_warning = TRUE Then
1826: --
1827: hr_utility.set_message(800,'HR_289215_DUPLICATE_MANAGERS');
1828: l_message_text := 'WARNING: '||hr_utility.get_message;
1829: --
1830: Log_Error(p_type => 'WARNING',
1831: p_assignment_number => p_assignment_number,
1824: --
1825: ElsIf p_other_manager_warning = TRUE Then
1826: --
1827: hr_utility.set_message(800,'HR_289215_DUPLICATE_MANAGERS');
1828: l_message_text := 'WARNING: '||hr_utility.get_message;
1829: --
1830: Log_Error(p_type => 'WARNING',
1831: p_assignment_number => p_assignment_number,
1832: p_warning_message => l_message_text,
1836: --
1837: if p_gsp_post_process_warning is not null then
1838: --
1839: fnd_message.set_name('PQH',p_gsp_post_process_warning);
1840: l_message_text := 'WARNING: '||hr_utility.get_message;
1841: --
1842: Log_Error(p_type => 'WARNING',
1843: p_assignment_number => p_assignment_number,
1844: p_warning_message => l_message_text,
1845: p_already_errored => v_already_errored);
1846: --
1847: end if;
1848:
1849: hr_utility.set_location(l_proc, 30);
1850: --
1851: EXCEPTION
1852: --
1853: When OTHERS Then
1851: EXCEPTION
1852: --
1853: When OTHERS Then
1854: --
1855: hr_utility.set_location(l_proc, 35);
1856: --
1857: ROLLBACK TO upd_asg;
1858: --
1859: Log_Error(p_type => 'ERROR',
1865: END;
1866: --
1867: BEGIN
1868: --
1869: hr_utility.set_location(l_proc, 40);
1870: --
1871: hr_assignment_api.update_emp_asg_criteria (
1872: P_VALIDATE => P_VALIDATE ,
1873: P_EFFECTIVE_DATE => L_EFFECTIVE_DATE ,
1928: P_SOFT_CODING_KEYFLEX_ID => l_dummy_n ,
1929: P_CONCATENATED_SEGMENTS => l_dummy_v ,
1930: P_GSP_POST_PROCESS_WARNING => P_GSP_POST_PROCESS_WARNING );
1931: --
1932: hr_utility.set_location(l_proc, 50);
1933: --
1934: If p_spp_delete_warning = TRUE Then
1935: --
1936: hr_utility.set_message(800,'HR_289826_SPP_DELETE_WARN_API');
1932: hr_utility.set_location(l_proc, 50);
1933: --
1934: If p_spp_delete_warning = TRUE Then
1935: --
1936: hr_utility.set_message(800,'HR_289826_SPP_DELETE_WARN_API');
1937: l_message_text := 'WARNING: '||hr_utility.get_message;
1938: --
1939: Log_Error(p_type => 'WARNING',
1940: p_assignment_number => p_assignment_number,
1933: --
1934: If p_spp_delete_warning = TRUE Then
1935: --
1936: hr_utility.set_message(800,'HR_289826_SPP_DELETE_WARN_API');
1937: l_message_text := 'WARNING: '||hr_utility.get_message;
1938: --
1939: Log_Error(p_type => 'WARNING',
1940: p_assignment_number => p_assignment_number,
1941: p_warning_message => l_message_text,
1944: end if;
1945: --
1946: If p_org_now_no_manager_warning = TRUE Then
1947: --
1948: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
1949: l_message_text := 'WARNING: '||hr_utility.get_message;
1950: --
1951: Log_Error(p_type => 'WARNING',
1952: p_assignment_number => p_assignment_number,
1945: --
1946: If p_org_now_no_manager_warning = TRUE Then
1947: --
1948: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
1949: l_message_text := 'WARNING: '||hr_utility.get_message;
1950: --
1951: Log_Error(p_type => 'WARNING',
1952: p_assignment_number => p_assignment_number,
1953: p_warning_message => l_message_text,
1954: p_already_errored => v_already_errored);
1955: --
1956: ElsIf p_other_manager_warning = TRUE Then
1957: --
1958: hr_utility.set_message(800,'HR_289215_DUPLICATE_MANAGERS');
1959: l_message_text := 'WARNING: '||hr_utility.get_message;
1960: --
1961: Log_Error(p_type => 'WARNING',
1962: p_assignment_number => p_assignment_number,
1955: --
1956: ElsIf p_other_manager_warning = TRUE Then
1957: --
1958: hr_utility.set_message(800,'HR_289215_DUPLICATE_MANAGERS');
1959: l_message_text := 'WARNING: '||hr_utility.get_message;
1960: --
1961: Log_Error(p_type => 'WARNING',
1962: p_assignment_number => p_assignment_number,
1963: p_warning_message => l_message_text,
1967: --
1968: If p_gsp_post_process_warning is not null Then
1969: --
1970: fnd_message.set_name('PQH',p_gsp_post_process_warning);
1971: l_message_text := 'WARNING: '||hr_utility.get_message;
1972: --
1973: Log_Error(p_type => 'WARNING',
1974: p_assignment_number => p_assignment_number,
1975: p_warning_message => l_message_text,
1976: p_already_errored => v_already_errored);
1977: --
1978: End If;
1979: --
1980: hr_utility.set_location(l_proc, 60);
1981: --
1982: EXCEPTION
1983: --
1984: When OTHERS Then
1982: EXCEPTION
1983: --
1984: When OTHERS Then
1985: --
1986: hr_utility.set_location(l_proc, 65);
1987: --
1988: ROLLBACK TO upd_asg;
1989: --
1990: Log_Error(p_type => 'ERROR',
1994: RAISE;
1995: --
1996: END;
1997: --
1998: hr_utility.set_location(l_proc, 70);
1999: --
2000: BEGIN
2001: --
2002: -- Retrieve the Assignment Status from the id past in.
2004: l_assignment_status :=
2005: get_assignment_status_type
2006: (p_assignment_status_type_id => p_assignment_status_type_id);
2007: --
2008: hr_utility.set_location(l_proc, 80);
2009: --
2010: -- Call the correct assignment status API
2011: -- depending on what the assignment status is being
2012: -- changed to.
2012: -- changed to.
2013: --
2014: IF l_assignment_status = 'SUSP_ASSIGN' THEN
2015: --
2016: hr_utility.set_location(l_proc, 90);
2017: --
2018: hr_assignment_api.suspend_emp_asg
2019: (p_validate => p_validate
2020: ,p_effective_date => l_effective_date
2025: ,p_assignment_status_type_id => p_assignment_status_type_id
2026: ,p_effective_start_date => p_effective_start_date
2027: ,p_effective_end_date => p_effective_end_date);
2028: --
2029: hr_utility.set_location(l_proc, 100);
2030: --
2031: ELSIF l_assignment_status = 'TERM_ASSIGN' THEN
2032: --
2033: hr_utility.set_location(l_proc, 110);
2029: hr_utility.set_location(l_proc, 100);
2030: --
2031: ELSIF l_assignment_status = 'TERM_ASSIGN' THEN
2032: --
2033: hr_utility.set_location(l_proc, 110);
2034: --
2035: hr_assignment_api.actual_termination_emp_asg
2036: (p_validate => p_validate
2037: ,p_assignment_id => p_assignment_id
2043: ,p_asg_future_changes_warning => l_asg_future_changes_warning
2044: ,p_entries_changed_warning => l_entries_changed_warning
2045: ,p_pay_proposal_warning => l_pay_proposal_warning);
2046: --
2047: hr_utility.set_location(l_proc, 120);
2048: --
2049: IF l_asg_future_changes_warning = TRUE THEN
2050: --
2051: hr_utility.set_message(800,'HR_289216_FUTURE_CHANGES_REMOV');
2047: hr_utility.set_location(l_proc, 120);
2048: --
2049: IF l_asg_future_changes_warning = TRUE THEN
2050: --
2051: hr_utility.set_message(800,'HR_289216_FUTURE_CHANGES_REMOV');
2052: l_message_text := 'WARNING: '||hr_utility.get_message;
2053: --
2054: Log_Error
2055: (p_type => 'WARNING'
2048: --
2049: IF l_asg_future_changes_warning = TRUE THEN
2050: --
2051: hr_utility.set_message(800,'HR_289216_FUTURE_CHANGES_REMOV');
2052: l_message_text := 'WARNING: '||hr_utility.get_message;
2053: --
2054: Log_Error
2055: (p_type => 'WARNING'
2056: ,p_assignment_number => p_assignment_number
2058: ,p_already_errored => v_already_errored);
2059: --
2060: ELSIF l_entries_changed_warning <> 'N' THEN
2061: --
2062: hr_utility.set_message(800,'HR_289218_ENTRIES_CHANGED');
2063: l_message_text := 'WARNING: '||hr_utility.get_message;
2064: --
2065: Log_Error
2066: (p_type => 'WARNING'
2059: --
2060: ELSIF l_entries_changed_warning <> 'N' THEN
2061: --
2062: hr_utility.set_message(800,'HR_289218_ENTRIES_CHANGED');
2063: l_message_text := 'WARNING: '||hr_utility.get_message;
2064: --
2065: Log_Error
2066: (p_type => 'WARNING'
2067: ,p_assignment_number => p_assignment_number
2069: ,p_already_errored => v_already_errored);
2070: --
2071: ELSIF l_pay_proposal_warning THEN
2072: --
2073: hr_utility.set_message(800,'HR_289217_PAY_PROPOSAL_REMOVED');
2074: l_message_text := 'WARNING: '||hr_utility.get_message;
2075: --
2076: Log_Error
2077: (p_type => 'WARNING'
2070: --
2071: ELSIF l_pay_proposal_warning THEN
2072: --
2073: hr_utility.set_message(800,'HR_289217_PAY_PROPOSAL_REMOVED');
2074: l_message_text := 'WARNING: '||hr_utility.get_message;
2075: --
2076: Log_Error
2077: (p_type => 'WARNING'
2078: ,p_assignment_number => p_assignment_number
2082: END IF;
2083: --
2084: ELSE
2085: --
2086: hr_utility.set_location(l_proc, 130);
2087: --
2088: hr_assignment_api.activate_emp_asg
2089: (p_validate => p_validate
2090: ,p_effective_date => l_effective_date
2095: ,p_assignment_status_type_id => p_assignment_status_type_id
2096: ,p_effective_start_date => p_effective_start_date
2097: ,p_effective_end_date => p_effective_end_date);
2098: --
2099: hr_utility.set_location(l_proc, 140);
2100: --
2101: END IF;
2102: --
2103: EXCEPTION
2103: EXCEPTION
2104: --
2105: WHEN OTHERS THEN
2106: --
2107: hr_utility.set_location(l_proc, 145);
2108: --
2109: p_OBJECT_VERSION_NUMBER := l_OBJECT_VERSION_NUMBER ;
2110: p_ORGANIZATION_ID := l_ORGANIZATION_ID ;
2111: p_SPECIAL_CEILING_STEP_ID := l_SPECIAL_CEILING_STEP_ID ;
2136: RAISE;
2137: --
2138: END;
2139: else
2140: hr_utility.set_location('duplicate assignment'||l_proc, 995);
2141: end if; --ends duplicate assignment checking
2142: --
2143: hr_utility.set_location('Leaving : '||l_proc, 999);
2144: --
2139: else
2140: hr_utility.set_location('duplicate assignment'||l_proc, 995);
2141: end if; --ends duplicate assignment checking
2142: --
2143: hr_utility.set_location('Leaving : '||l_proc, 999);
2144: --
2145: END upd_asg;
2146: --
2147: -- ---------------------------------------------------------------------------+
2345: l_message_text VARCHAR2(255);
2346: --
2347: BEGIN
2348: --
2349: hr_utility.set_location('Entering '||l_proc,10);
2350: --
2351: l_effective_date := TRUNC(p_effective_date);
2352: --
2353: l_scl_concat_segments := p_concatenated_segments;
2353: l_scl_concat_segments := p_concatenated_segments;
2354: --
2355: BEGIN
2356: --
2357: hr_utility.set_location(l_proc,20);
2358: --
2359: hr_assignment_api.update_apl_asg
2360: (p_validate => p_validate
2361: ,p_effective_date => l_effective_date
2526: ,p_soft_coding_keyflex_id => p_soft_coding_keyflex_id
2527: ,p_effective_start_date => p_effective_start_date
2528: ,p_effective_end_date => p_effective_end_date);
2529: --
2530: hr_utility.set_location(l_proc,30);
2531: --
2532: EXCEPTION
2533: --
2534: WHEN OTHERS THEN
2544: END;
2545: --
2546: BEGIN
2547: --
2548: hr_utility.set_location(l_proc,40);
2549: --
2550: -- Retrieve the Assignment Status from the id past in.
2551: --
2552: l_assignment_status :=
2552: l_assignment_status :=
2553: get_assignment_status_type
2554: (p_assignment_status_type_id => p_assignment_status_type_id);
2555: --
2556: hr_utility.set_location(l_proc, 50);
2557: --
2558: -- Call the correct assignment status API
2559: -- depending on what the assignment status is being
2560: -- changed to.
2560: -- changed to.
2561: --
2562: IF l_assignment_status = 'ACCEPTED' THEN
2563: --
2564: hr_utility.set_location(l_proc, 60);
2565: --
2566: hr_assignment_api.accept_apl_asg
2567: (p_validate => p_validate
2568: ,p_effective_date => l_effective_date
2574: ,p_effective_start_date => p_effective_start_date
2575: ,p_effective_end_date => p_effective_end_date
2576: );
2577: --
2578: hr_utility.set_location(l_proc, 100);
2579: --
2580: ELSIF l_assignment_status = 'ACTIVE_APL' THEN
2581: --
2582: hr_utility.set_location(l_proc, 110);
2578: hr_utility.set_location(l_proc, 100);
2579: --
2580: ELSIF l_assignment_status = 'ACTIVE_APL' THEN
2581: --
2582: hr_utility.set_location(l_proc, 110);
2583: --
2584: hr_assignment_api.activate_apl_asg
2585: (p_validate => p_validate
2586: ,p_effective_date => l_effective_date
2591: ,p_change_reason => p_change_reason
2592: ,p_effective_start_date => p_effective_start_date
2593: ,p_effective_end_date => p_effective_end_date);
2594: --
2595: hr_utility.set_location(l_proc, 120);
2596: --
2597: ELSIF l_assignment_status = 'OFFER' THEN
2598: --
2599: hr_utility.set_location(l_proc,130);
2595: hr_utility.set_location(l_proc, 120);
2596: --
2597: ELSIF l_assignment_status = 'OFFER' THEN
2598: --
2599: hr_utility.set_location(l_proc,130);
2600: --
2601: hr_assignment_api.offer_apl_asg
2602: (p_validate => p_validate
2603: ,p_effective_date => l_effective_date
2608: ,p_change_reason => p_change_reason
2609: ,p_effective_start_date => p_effective_start_date
2610: ,p_effective_end_date => p_effective_end_date);
2611: --
2612: hr_utility.set_location(l_proc,140);
2613: --
2614: ELSE
2615: --
2616: hr_utility.set_location(l_proc, 130);
2612: hr_utility.set_location(l_proc,140);
2613: --
2614: ELSE
2615: --
2616: hr_utility.set_location(l_proc, 130);
2617: --
2618: hr_assignment_internal.update_status_type_apl_asg
2619: (p_effective_date => l_effective_date
2620: ,p_datetrack_update_mode => 'CORRECTION'
2625: ,p_change_reason => p_change_reason
2626: ,p_effective_start_date => p_effective_start_date
2627: ,p_effective_end_date => p_effective_end_date);
2628: --
2629: hr_utility.set_location(l_proc, 140);
2630: --
2631: END IF;
2632: --
2633: EXCEPTION
2655: RAISE;
2656: --
2657: END;
2658: --
2659: hr_utility.set_location('Leaving '||l_proc, 70);
2660: --
2661: END update_applicant_asg;
2662: --
2663: -- ---------------------------------------------------------------------------+
2840: l_scl_concat_segments VARCHAR2(4000);
2841: --
2842: BEGIN
2843: --
2844: hr_utility.set_location('Entering : '|| l_proc, 10);
2845: --
2846: -- Issue a savepoint.
2847: --
2848: SAVEPOINT update_cwk_assignment;
2953: ,p_soft_coding_keyflex_id => l_soft_coding_keyflex_id
2954: ,p_concatenated_segments => l_concatenated_segments
2955: ,p_hourly_salaried_warning => l_hourly_salaried_warning);
2956: --
2957: hr_utility.set_location(l_proc, 20);
2958: --
2959: IF l_no_managers_warning = TRUE THEN
2960: --
2961: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
2957: hr_utility.set_location(l_proc, 20);
2958: --
2959: IF l_no_managers_warning = TRUE THEN
2960: --
2961: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
2962: l_message_text := 'WARNING: '||hr_utility.get_message;
2963: --
2964: Log_Error(p_type => 'WARNING',
2965: p_assignment_number => p_assignment_number,
2958: --
2959: IF l_no_managers_warning = TRUE THEN
2960: --
2961: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
2962: l_message_text := 'WARNING: '||hr_utility.get_message;
2963: --
2964: Log_Error(p_type => 'WARNING',
2965: p_assignment_number => p_assignment_number,
2966: p_warning_message => l_message_text,
2967: p_already_errored => l_already_errored);
2968: --
2969: ELSIF l_other_manager_warning = TRUE THEN
2970: --
2971: hr_utility.set_message(800,'HR_289215_DUPLICATE_MANAGERS');
2972: l_message_text := 'WARNING: '||hr_utility.get_message;
2973: --
2974: Log_Error(p_type => 'WARNING',
2975: p_assignment_number => p_assignment_number,
2968: --
2969: ELSIF l_other_manager_warning = TRUE THEN
2970: --
2971: hr_utility.set_message(800,'HR_289215_DUPLICATE_MANAGERS');
2972: l_message_text := 'WARNING: '||hr_utility.get_message;
2973: --
2974: Log_Error(p_type => 'WARNING',
2975: p_assignment_number => p_assignment_number,
2976: p_warning_message => l_message_text,
2977: p_already_errored => l_already_errored);
2978: --
2979: ELSIF l_hourly_salaried_warning = TRUE THEN
2980: --
2981: hr_utility.set_message(800,'HR_289648_CWK_HR_CODE_NOT_NULL');
2982: l_message_text := 'WARNING: '||hr_utility.get_message;
2983: --
2984: Log_Error(p_type => 'WARNING',
2985: p_assignment_number => p_assignment_number,
2978: --
2979: ELSIF l_hourly_salaried_warning = TRUE THEN
2980: --
2981: hr_utility.set_message(800,'HR_289648_CWK_HR_CODE_NOT_NULL');
2982: l_message_text := 'WARNING: '||hr_utility.get_message;
2983: --
2984: Log_Error(p_type => 'WARNING',
2985: p_assignment_number => p_assignment_number,
2986: p_warning_message => l_message_text,
2987: p_already_errored => l_already_errored);
2988: --
2989: END IF;
2990: --
2991: hr_utility.set_location(l_proc, 30);
2992: --
2993: END;
2994: --
2995: BEGIN
3050: ,p_spp_delete_warning => l_spp_delete_warning
3051: ,p_entries_changed_warning => l_entries_changed_warning
3052: ,p_tax_district_changed_warning => l_tax_district_changed_warning);
3053: --
3054: hr_utility.set_location(l_proc, 40);
3055: --
3056: IF l_org_now_no_manager_warning = TRUE THEN
3057: --
3058: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
3054: hr_utility.set_location(l_proc, 40);
3055: --
3056: IF l_org_now_no_manager_warning = TRUE THEN
3057: --
3058: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
3059: l_message_text := 'WARNING: '||hr_utility.get_message;
3060: --
3061: Log_Error(p_type => 'WARNING',
3062: p_assignment_number => p_assignment_number,
3055: --
3056: IF l_org_now_no_manager_warning = TRUE THEN
3057: --
3058: hr_utility.set_message(800,'HR_289214_NO_MANAGERS');
3059: l_message_text := 'WARNING: '||hr_utility.get_message;
3060: --
3061: Log_Error(p_type => 'WARNING',
3062: p_assignment_number => p_assignment_number,
3063: p_warning_message => l_message_text,
3064: p_already_errored => l_already_errored);
3065: --
3066: ELSIF l_other_manager_warning = TRUE THEN
3067: --
3068: hr_utility.set_message(800,'HR_289215_DUPLICATE_MANAGERS');
3069: l_message_text := 'WARNING: '||hr_utility.get_message;
3070: --
3071: Log_Error(p_type => 'WARNING',
3072: p_assignment_number => p_assignment_number,
3065: --
3066: ELSIF l_other_manager_warning = TRUE THEN
3067: --
3068: hr_utility.set_message(800,'HR_289215_DUPLICATE_MANAGERS');
3069: l_message_text := 'WARNING: '||hr_utility.get_message;
3070: --
3071: Log_Error(p_type => 'WARNING',
3072: p_assignment_number => p_assignment_number,
3073: p_warning_message => l_message_text,
3074: p_already_errored => l_already_errored);
3075: --
3076: ELSIF l_spp_delete_warning = TRUE THEN
3077: --
3078: hr_utility.set_message(800,'HR_289826_SPP_DELETE_WARN_API');
3079: l_message_text := 'WARNING: '||hr_utility.get_message;
3080: --
3081: Log_Error(p_type => 'WARNING',
3082: p_assignment_number => p_assignment_number,
3075: --
3076: ELSIF l_spp_delete_warning = TRUE THEN
3077: --
3078: hr_utility.set_message(800,'HR_289826_SPP_DELETE_WARN_API');
3079: l_message_text := 'WARNING: '||hr_utility.get_message;
3080: --
3081: Log_Error(p_type => 'WARNING',
3082: p_assignment_number => p_assignment_number,
3083: p_warning_message => l_message_text,
3084: p_already_errored => l_already_errored);
3085: --
3086: END IF;
3087: --
3088: hr_utility.set_location(l_proc, 50);
3089: --
3090: END;
3091: --
3092: -- When in validation only mode raise the Validate_Enabled exception
3114: p_spp_delete_warning := l_spp_delete_warning;
3115: p_entries_changed_warning := l_entries_changed_warning;
3116: p_tax_district_changed_warning := l_tax_district_changed_warning;
3117: --
3118: hr_utility.set_location('Leaving : '||l_proc, 997);
3119: --
3120: EXCEPTION
3121: --
3122: WHEN hr_api.validate_enabled THEN
3120: EXCEPTION
3121: --
3122: WHEN hr_api.validate_enabled THEN
3123: --
3124: hr_utility.set_location('Leaving : '||l_proc, 998);
3125: --
3126: --
3127: -- As the Validate_Enabled exception has been raised
3128: -- we must rollback to the savepoint
3150: p_tax_district_changed_warning := l_tax_district_changed_warning;
3151: --
3152: WHEN OTHERS THEN
3153: --
3154: hr_utility.set_location('Leaving : '||l_proc, 999);
3155: --
3156: ROLLBACK TO update_cwk_asg;
3157: --
3158: -- Only set output warning arguments
3419: AND paf.effective_end_date;
3420: --
3421: BEGIN
3422: --
3423: --hr_utility.trace_on(NULL,'ORACLE'); --ynegoro
3424: hr_utility.set_location('Entering : '|| l_proc, 10);
3425: --
3426: -- Issue a savepoint.
3427: --
3420: --
3421: BEGIN
3422: --
3423: --hr_utility.trace_on(NULL,'ORACLE'); --ynegoro
3424: hr_utility.set_location('Entering : '|| l_proc, 10);
3425: --
3426: -- Issue a savepoint.
3427: --
3428: SAVEPOINT upd_asg;
3435: IF csr_assignment_type%NOTFOUND THEN
3436: --
3437: CLOSE csr_assignment_type;
3438: --
3439: hr_utility.set_message(801,'HR_449903_INV_ASG_TYPE');
3440: hr_utility.raise_error;
3441: --
3442: END IF;
3443: --
3436: --
3437: CLOSE csr_assignment_type;
3438: --
3439: hr_utility.set_message(801,'HR_449903_INV_ASG_TYPE');
3440: hr_utility.raise_error;
3441: --
3442: END IF;
3443: --
3444: IF l_assignment_type = 'E' THEN
3638: -- fields have been entered but will not get updated.
3639: --
3640: IF l_non_person_type_fields THEN
3641: --
3642: hr_utility.set_message(800,'HR_449904_NON_EMP_FIELDS');
3643: l_message_text := 'WARNING: '||hr_utility.get_message;
3644: --
3645: Log_Error(p_type => 'WARNING',
3646: p_assignment_number => p_assignment_number,
3639: --
3640: IF l_non_person_type_fields THEN
3641: --
3642: hr_utility.set_message(800,'HR_449904_NON_EMP_FIELDS');
3643: l_message_text := 'WARNING: '||hr_utility.get_message;
3644: --
3645: Log_Error(p_type => 'WARNING',
3646: p_assignment_number => p_assignment_number,
3647: p_warning_message => l_message_text,
3840: -- fields have been entered but will not get updated.
3841: --
3842: IF l_non_person_type_fields THEN
3843: --
3844: hr_utility.set_message(800,'HR_449906_NON_APL_FIELDS');
3845: l_message_text := 'WARNING: '||hr_utility.get_message;
3846: --
3847: Log_Error(p_type => 'WARNING',
3848: p_assignment_number => p_assignment_number,
3841: --
3842: IF l_non_person_type_fields THEN
3843: --
3844: hr_utility.set_message(800,'HR_449906_NON_APL_FIELDS');
3845: l_message_text := 'WARNING: '||hr_utility.get_message;
3846: --
3847: Log_Error(p_type => 'WARNING',
3848: p_assignment_number => p_assignment_number,
3849: p_warning_message => l_message_text,
4047: -- fields have been entered but will not get updated.
4048: --
4049: IF l_non_person_type_fields THEN
4050: --
4051: hr_utility.set_message(800,'HR_449905_NON_CWK_FIELDS');
4052: l_message_text := 'WARNING: '||hr_utility.get_message;
4053: --
4054: Log_Error(p_type => 'WARNING',
4055: p_assignment_number => p_assignment_number,
4048: --
4049: IF l_non_person_type_fields THEN
4050: --
4051: hr_utility.set_message(800,'HR_449905_NON_CWK_FIELDS');
4052: l_message_text := 'WARNING: '||hr_utility.get_message;
4053: --
4054: Log_Error(p_type => 'WARNING',
4055: p_assignment_number => p_assignment_number,
4056: p_warning_message => l_message_text,
4061: -- then raise an error.
4062: --
4063: ELSE
4064: --
4065: hr_utility.set_message(801,'HR_449903_INV_ASG_TYPE');
4066: hr_utility.raise_error;
4067: --
4068: END IF;
4069: --
4062: --
4063: ELSE
4064: --
4065: hr_utility.set_message(801,'HR_449903_INV_ASG_TYPE');
4066: hr_utility.raise_error;
4067: --
4068: END IF;
4069: --
4070: hr_utility.set_location('Leaving : '||l_proc, 999);
4066: hr_utility.raise_error;
4067: --
4068: END IF;
4069: --
4070: hr_utility.set_location('Leaving : '||l_proc, 999);
4071: --
4072: END update_assignment;
4073: --
4074: BEGIN