[Home] [Help]
328: ELSE
329: l_org_rec.c1_over_100_13 := '2';
330: END IF;
331:
332: /* fnd_file.put_line
333: (which => fnd_file.log,
334: buff => 'p_start_date '||p_start_date);
335: --
336: fnd_file.put_line
329: l_org_rec.c1_over_100_13 := '2';
330: END IF;
331:
332: /* fnd_file.put_line
333: (which => fnd_file.log,
334: buff => 'p_start_date '||p_start_date);
335: --
336: fnd_file.put_line
337: (which => fnd_file.log,
332: /* fnd_file.put_line
333: (which => fnd_file.log,
334: buff => 'p_start_date '||p_start_date);
335: --
336: fnd_file.put_line
337: (which => fnd_file.log,
338: buff => 'p_end_date '||p_end_date);
339: --
340: fnd_file.put_line
333: (which => fnd_file.log,
334: buff => 'p_start_date '||p_start_date);
335: --
336: fnd_file.put_line
337: (which => fnd_file.log,
338: buff => 'p_end_date '||p_end_date);
339: --
340: fnd_file.put_line
341: (which => fnd_file.log,
336: fnd_file.put_line
337: (which => fnd_file.log,
338: buff => 'p_end_date '||p_end_date);
339: --
340: fnd_file.put_line
341: (which => fnd_file.log,
342: buff => 'l_org_rec.l_d1_payroll_period_18 before '
343: ||l_org_rec.l_d1_payroll_period_18); */
344:
337: (which => fnd_file.log,
338: buff => 'p_end_date '||p_end_date);
339: --
340: fnd_file.put_line
341: (which => fnd_file.log,
342: buff => 'l_org_rec.l_d1_payroll_period_18 before '
343: ||l_org_rec.l_d1_payroll_period_18); */
344:
345: l_org_rec.l_d1_payroll_period_18 :=
353: -- l_report_year := SUBSTR(l_org_rec.l_d1_payroll_period_18,1,4);
354: l_report_year := SUBSTR(l_org_rec.l_d1_payroll_period_18,5,4);
355:
356: l_prev_year_filed := TO_CHAR(TO_NUMBER(l_report_year - 1));
357: /*fnd_file.put_line
358: (which => fnd_file.log,
359: buff => 'l_org_rec.name_cert_off_23 '
360: ||l_org_rec.name_cert_off_23);
361: fnd_file.put_line
354: l_report_year := SUBSTR(l_org_rec.l_d1_payroll_period_18,5,4);
355:
356: l_prev_year_filed := TO_CHAR(TO_NUMBER(l_report_year - 1));
357: /*fnd_file.put_line
358: (which => fnd_file.log,
359: buff => 'l_org_rec.name_cert_off_23 '
360: ||l_org_rec.name_cert_off_23);
361: fnd_file.put_line
362: (which => fnd_file.log,
357: /*fnd_file.put_line
358: (which => fnd_file.log,
359: buff => 'l_org_rec.name_cert_off_23 '
360: ||l_org_rec.name_cert_off_23);
361: fnd_file.put_line
362: (which => fnd_file.log,
363: buff => 'sustr of l_org_rec.name_cert_off_23 '
364: ||substr(l_org_rec.name_cert_off_23,1,3)); */
365:
358: (which => fnd_file.log,
359: buff => 'l_org_rec.name_cert_off_23 '
360: ||l_org_rec.name_cert_off_23);
361: fnd_file.put_line
362: (which => fnd_file.log,
363: buff => 'sustr of l_org_rec.name_cert_off_23 '
364: ||substr(l_org_rec.name_cert_off_23,1,3)); */
365:
366: BEGIN --Local1
365:
366: BEGIN --Local1
367: -- error IF required fields not present.
368: IF l_org_rec.company_number_1 IS NULL THEN
369: fnd_file.put_line
370: (which => fnd_file.log,
371: buff => '==================================');
372: fnd_file.put_line
373: (which => fnd_file.log,
366: BEGIN --Local1
367: -- error IF required fields not present.
368: IF l_org_rec.company_number_1 IS NULL THEN
369: fnd_file.put_line
370: (which => fnd_file.log,
371: buff => '==================================');
372: fnd_file.put_line
373: (which => fnd_file.log,
374: buff => '*** Field 1 - company NUMBER is blank, '
368: IF l_org_rec.company_number_1 IS NULL THEN
369: fnd_file.put_line
370: (which => fnd_file.log,
371: buff => '==================================');
372: fnd_file.put_line
373: (which => fnd_file.log,
374: buff => '*** Field 1 - company NUMBER is blank, '
375: ||'but this is a required field - Please enter. '
376: ||'This is entered IN the GRE parent Entity Data '
369: fnd_file.put_line
370: (which => fnd_file.log,
371: buff => '==================================');
372: fnd_file.put_line
373: (which => fnd_file.log,
374: buff => '*** Field 1 - company NUMBER is blank, '
375: ||'but this is a required field - Please enter. '
376: ||'This is entered IN the GRE parent Entity Data '
377: ||'nav=Organization/Description/Parent Entity/Others ***');
374: buff => '*** Field 1 - company NUMBER is blank, '
375: ||'but this is a required field - Please enter. '
376: ||'This is entered IN the GRE parent Entity Data '
377: ||'nav=Organization/Description/Parent Entity/Others ***');
378: fnd_file.put_line
379: (which => fnd_file.log,
380: buff => '==================================');
381: fnd_file.put_line
382: (which => fnd_file.log,
375: ||'but this is a required field - Please enter. '
376: ||'This is entered IN the GRE parent Entity Data '
377: ||'nav=Organization/Description/Parent Entity/Others ***');
378: fnd_file.put_line
379: (which => fnd_file.log,
380: buff => '==================================');
381: fnd_file.put_line
382: (which => fnd_file.log,
383: buff => 'Field 14 - Question C2 may also be blank '
377: ||'nav=Organization/Description/Parent Entity/Others ***');
378: fnd_file.put_line
379: (which => fnd_file.log,
380: buff => '==================================');
381: fnd_file.put_line
382: (which => fnd_file.log,
383: buff => 'Field 14 - Question C2 may also be blank '
384: ||'(is company affiliated with Companies of at least 100 emps?) '
385: ||'This is also a required field - which the app will force you to '
378: fnd_file.put_line
379: (which => fnd_file.log,
380: buff => '==================================');
381: fnd_file.put_line
382: (which => fnd_file.log,
383: buff => 'Field 14 - Question C2 may also be blank '
384: ||'(is company affiliated with Companies of at least 100 emps?) '
385: ||'This is also a required field - which the app will force you to '
386: ||'enter at organization level for the GRE parent Entity Data. '
384: ||'(is company affiliated with Companies of at least 100 emps?) '
385: ||'This is also a required field - which the app will force you to '
386: ||'enter at organization level for the GRE parent Entity Data. '
387: ||'nav=Organization/Description/Parent Entity/Others ');
388: fnd_file.put_line
389: (which => fnd_file.log,
390: buff => '==================================');
391: RAISE hr_utility.hr_error;
392: END IF;
385: ||'This is also a required field - which the app will force you to '
386: ||'enter at organization level for the GRE parent Entity Data. '
387: ||'nav=Organization/Description/Parent Entity/Others ');
388: fnd_file.put_line
389: (which => fnd_file.log,
390: buff => '==================================');
391: RAISE hr_utility.hr_error;
392: END IF;
393: END; --Local1
401:
402: IF UPPER(SUBSTR(l_org_rec.name_cert_off_23,1,3)) = UPPER('THE') THEN
403: l_org_rec.name_cert_off_23 :=
404: ltrim(l_org_rec.name_cert_off_23,'THEthe');
405: -- fnd_file.put_line
406: --(which => fnd_file.log,
407: -- buff => 'l_org_rec.name_cert_off_23 '
408: -- ||l_org_rec.name_cert_off_23);
409: l_org_rec.name_cert_off_23 :=
402: IF UPPER(SUBSTR(l_org_rec.name_cert_off_23,1,3)) = UPPER('THE') THEN
403: l_org_rec.name_cert_off_23 :=
404: ltrim(l_org_rec.name_cert_off_23,'THEthe');
405: -- fnd_file.put_line
406: --(which => fnd_file.log,
407: -- buff => 'l_org_rec.name_cert_off_23 '
408: -- ||l_org_rec.name_cert_off_23);
409: l_org_rec.name_cert_off_23 :=
410: l_org_rec.name_cert_off_23||' The';
407: -- buff => 'l_org_rec.name_cert_off_23 '
408: -- ||l_org_rec.name_cert_off_23);
409: l_org_rec.name_cert_off_23 :=
410: l_org_rec.name_cert_off_23||' The';
411: -- fnd_file.put_line
412: --(which => fnd_file.log,
413: -- buff => 'l_org_rec.name_cert_off_23 '
414: -- ||l_org_rec.name_cert_off_23);
415: END IF;
408: -- ||l_org_rec.name_cert_off_23);
409: l_org_rec.name_cert_off_23 :=
410: l_org_rec.name_cert_off_23||' The';
411: -- fnd_file.put_line
412: --(which => fnd_file.log,
413: -- buff => 'l_org_rec.name_cert_off_23 '
414: -- ||l_org_rec.name_cert_off_23);
415: END IF;
416:
414: -- ||l_org_rec.name_cert_off_23);
415: END IF;
416:
417: --
418: /* fnd_file.put_line
419: (which => fnd_file.log,
420: buff => 'l_org_rec.l_d1_payroll_period_18 after '
421: ||l_org_rec.l_d1_payroll_period_18);
422: --
415: END IF;
416:
417: --
418: /* fnd_file.put_line
419: (which => fnd_file.log,
420: buff => 'l_org_rec.l_d1_payroll_period_18 after '
421: ||l_org_rec.l_d1_payroll_period_18);
422: --
423: fnd_file.put_line
419: (which => fnd_file.log,
420: buff => 'l_org_rec.l_d1_payroll_period_18 after '
421: ||l_org_rec.l_d1_payroll_period_18);
422: --
423: fnd_file.put_line
424: (which => fnd_file.log,
425: buff => 'l_report_year '||l_report_year);
426: --
427: fnd_file.put_line
420: buff => 'l_org_rec.l_d1_payroll_period_18 after '
421: ||l_org_rec.l_d1_payroll_period_18);
422: --
423: fnd_file.put_line
424: (which => fnd_file.log,
425: buff => 'l_report_year '||l_report_year);
426: --
427: fnd_file.put_line
428: (which => fnd_file.log,
423: fnd_file.put_line
424: (which => fnd_file.log,
425: buff => 'l_report_year '||l_report_year);
426: --
427: fnd_file.put_line
428: (which => fnd_file.log,
429: buff => 'l_prev_year_filed '||l_prev_year_filed); */
430:
431: END set_org_details;
424: (which => fnd_file.log,
425: buff => 'l_report_year '||l_report_year);
426: --
427: fnd_file.put_line
428: (which => fnd_file.log,
429: buff => 'l_prev_year_filed '||l_prev_year_filed); */
430:
431: END set_org_details;
432:
449: IF l_org_rec.form_type = 'M' THEN
450:
451: IF l_consol_rec.unit_name_4 IS NULL THEN
452:
453: fnd_file.put_line
454: (which => fnd_file.log,
455: buff => ' ');
456:
457: fnd_file.put_line
450:
451: IF l_consol_rec.unit_name_4 IS NULL THEN
452:
453: fnd_file.put_line
454: (which => fnd_file.log,
455: buff => ' ');
456:
457: fnd_file.put_line
458: (which => fnd_file.log,
453: fnd_file.put_line
454: (which => fnd_file.log,
455: buff => ' ');
456:
457: fnd_file.put_line
458: (which => fnd_file.log,
459: buff => ' UNIT NAME OR NUMBER SHOULD NOT BE NULL FOR CONSOLIDATED REPORT.'
460: ||'THIS INFORMATION COMES FROM HEADQUARTERS ESTABLISHMENT.'
461: ||'The unit NUMBER IS ' || l_consol_rec.unit_number_3
454: (which => fnd_file.log,
455: buff => ' ');
456:
457: fnd_file.put_line
458: (which => fnd_file.log,
459: buff => ' UNIT NAME OR NUMBER SHOULD NOT BE NULL FOR CONSOLIDATED REPORT.'
460: ||'THIS INFORMATION COMES FROM HEADQUARTERS ESTABLISHMENT.'
461: ||'The unit NUMBER IS ' || l_consol_rec.unit_number_3
462: ||'The unit name IS ' || l_consol_rec.unit_name_4
461: ||'The unit NUMBER IS ' || l_consol_rec.unit_number_3
462: ||'The unit name IS ' || l_consol_rec.unit_name_4
463: ||'The unit address IS ' || l_consol_rec.unit_address_req_5);
464:
465: fnd_file.put_line
466: (which => fnd_file.log,
467: buff => 'Reported field IN the EEO1 Specific Data Extra '
468: ||'Information Type ');
469:
462: ||'The unit name IS ' || l_consol_rec.unit_name_4
463: ||'The unit address IS ' || l_consol_rec.unit_address_req_5);
464:
465: fnd_file.put_line
466: (which => fnd_file.log,
467: buff => 'Reported field IN the EEO1 Specific Data Extra '
468: ||'Information Type ');
469:
470: fnd_file.put_line
466: (which => fnd_file.log,
467: buff => 'Reported field IN the EEO1 Specific Data Extra '
468: ||'Information Type ');
469:
470: fnd_file.put_line
471: (which => fnd_file.log,
472: buff => ' ');
473:
474: END IF; --l_consol_rec.unit_name_4 IS NULL
467: buff => 'Reported field IN the EEO1 Specific Data Extra '
468: ||'Information Type ');
469:
470: fnd_file.put_line
471: (which => fnd_file.log,
472: buff => ' ');
473:
474: END IF; --l_consol_rec.unit_name_4 IS NULL
475:
889: lpad(l_consol_rec.o_10_grand_total,7,0);
890: --
891: /* g_message_text := 'd1) l_consol_rec.a_1_total_mf IN string '
892: ||l_consol_rec.a_1_total_mf;
893: fnd_file.put_line
894: (which => fnd_file.log,
895: buff => g_message_text);
896: g_message_text := ' ';
897: fnd_file.put_line
890: --
891: /* g_message_text := 'd1) l_consol_rec.a_1_total_mf IN string '
892: ||l_consol_rec.a_1_total_mf;
893: fnd_file.put_line
894: (which => fnd_file.log,
895: buff => g_message_text);
896: g_message_text := ' ';
897: fnd_file.put_line
898: (which => fnd_file.log,
893: fnd_file.put_line
894: (which => fnd_file.log,
895: buff => g_message_text);
896: g_message_text := ' ';
897: fnd_file.put_line
898: (which => fnd_file.log,
899: buff => g_message_text);
900: g_message_text := 'e1) put line for l_string for consolidated RECORD ';
901: fnd_file.put_line
894: (which => fnd_file.log,
895: buff => g_message_text);
896: g_message_text := ' ';
897: fnd_file.put_line
898: (which => fnd_file.log,
899: buff => g_message_text);
900: g_message_text := 'e1) put line for l_string for consolidated RECORD ';
901: fnd_file.put_line
902: (which => fnd_file.log,
897: fnd_file.put_line
898: (which => fnd_file.log,
899: buff => g_message_text);
900: g_message_text := 'e1) put line for l_string for consolidated RECORD ';
901: fnd_file.put_line
902: (which => fnd_file.log,
903: buff => g_message_text);
904: g_message_text := ' ';
905: fnd_file.put_line
898: (which => fnd_file.log,
899: buff => g_message_text);
900: g_message_text := 'e1) put line for l_string for consolidated RECORD ';
901: fnd_file.put_line
902: (which => fnd_file.log,
903: buff => g_message_text);
904: g_message_text := ' ';
905: fnd_file.put_line
906: (which => fnd_file.log,
901: fnd_file.put_line
902: (which => fnd_file.log,
903: buff => g_message_text);
904: g_message_text := ' ';
905: fnd_file.put_line
906: (which => fnd_file.log,
907: buff => g_message_text); */
908: fnd_file.put_line
909: (which => fnd_file.output,
902: (which => fnd_file.log,
903: buff => g_message_text);
904: g_message_text := ' ';
905: fnd_file.put_line
906: (which => fnd_file.log,
907: buff => g_message_text); */
908: fnd_file.put_line
909: (which => fnd_file.output,
910: buff => l_string);
904: g_message_text := ' ';
905: fnd_file.put_line
906: (which => fnd_file.log,
907: buff => g_message_text); */
908: fnd_file.put_line
909: (which => fnd_file.output,
910: buff => l_string);
911:
912: END IF; -- l_org_rec.form_type = 'M'
905: fnd_file.put_line
906: (which => fnd_file.log,
907: buff => g_message_text); */
908: fnd_file.put_line
909: (which => fnd_file.output,
910: buff => l_string);
911:
912: END IF; -- l_org_rec.form_type = 'M'
913: hr_utility.set_location('Leaving..' || l_proc,100);
929: hr_utility.trace('l_estab_rec.unit_number_3 : '||l_estab_rec.unit_number_3);
930: hr_utility.trace('l_estab_rec.unit_name_4 : '||l_estab_rec.unit_name_4);
931: hr_utility.trace('l_estab_rec.unit_address_5: '||l_estab_rec.unit_address_req_5);
932:
933: /* fnd_file.put_line
934: (which => fnd_file.log,
935: buff => ' ');
936: fnd_file.put_line
937: (which => fnd_file.log,
930: hr_utility.trace('l_estab_rec.unit_name_4 : '||l_estab_rec.unit_name_4);
931: hr_utility.trace('l_estab_rec.unit_address_5: '||l_estab_rec.unit_address_req_5);
932:
933: /* fnd_file.put_line
934: (which => fnd_file.log,
935: buff => ' ');
936: fnd_file.put_line
937: (which => fnd_file.log,
938: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
932:
933: /* fnd_file.put_line
934: (which => fnd_file.log,
935: buff => ' ');
936: fnd_file.put_line
937: (which => fnd_file.log,
938: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
939: fnd_file.put_line
940: (which => fnd_file.log,
933: /* fnd_file.put_line
934: (which => fnd_file.log,
935: buff => ' ');
936: fnd_file.put_line
937: (which => fnd_file.log,
938: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
939: fnd_file.put_line
940: (which => fnd_file.log,
941: buff => ' PROCEDURE write_establishment_record ');
935: buff => ' ');
936: fnd_file.put_line
937: (which => fnd_file.log,
938: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
939: fnd_file.put_line
940: (which => fnd_file.log,
941: buff => ' PROCEDURE write_establishment_record ');
942: fnd_file.put_line
943: (which => fnd_file.log,
936: fnd_file.put_line
937: (which => fnd_file.log,
938: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
939: fnd_file.put_line
940: (which => fnd_file.log,
941: buff => ' PROCEDURE write_establishment_record ');
942: fnd_file.put_line
943: (which => fnd_file.log,
944: buff => '-------------------------------------------------------------');
938: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
939: fnd_file.put_line
940: (which => fnd_file.log,
941: buff => ' PROCEDURE write_establishment_record ');
942: fnd_file.put_line
943: (which => fnd_file.log,
944: buff => '-------------------------------------------------------------');
945: */
946: --
939: fnd_file.put_line
940: (which => fnd_file.log,
941: buff => ' PROCEDURE write_establishment_record ');
942: fnd_file.put_line
943: (which => fnd_file.log,
944: buff => '-------------------------------------------------------------');
945: */
946: --
947: -- Set Status
1027: l_org_rec.l_status_code_2 := '8';
1028: --
1029: -- not HQ AND under 50 emps at location
1030: /*
1031: fnd_file.put_line
1032: (which => fnd_file.log,
1033: buff => 'l_estab_rec.unit_number_3: '||l_estab_rec.unit_number_3);
1034: */
1035: -- END IF;
1028: --
1029: -- not HQ AND under 50 emps at location
1030: /*
1031: fnd_file.put_line
1032: (which => fnd_file.log,
1033: buff => 'l_estab_rec.unit_number_3: '||l_estab_rec.unit_number_3);
1034: */
1035: -- END IF;
1036:
1044:
1045: IF l_estab_rec.unit_number_3 IS NOT NULL
1046: AND l_org_rec.l_status_code_2 IN ('8','9') THEN
1047:
1048: fnd_file.put_line
1049: (which => fnd_file.log,
1050: buff => ' ');
1051: fnd_file.put_line
1052: (which => fnd_file.log,
1045: IF l_estab_rec.unit_number_3 IS NOT NULL
1046: AND l_org_rec.l_status_code_2 IN ('8','9') THEN
1047:
1048: fnd_file.put_line
1049: (which => fnd_file.log,
1050: buff => ' ');
1051: fnd_file.put_line
1052: (which => fnd_file.log,
1053: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1047:
1048: fnd_file.put_line
1049: (which => fnd_file.log,
1050: buff => ' ');
1051: fnd_file.put_line
1052: (which => fnd_file.log,
1053: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1054: || l_estab_rec.unit_name_4 || ') HAS EITHER '
1055: ||'NOT YET BEEN REPORTED OR IS UNDER 50 EMPS');
1048: fnd_file.put_line
1049: (which => fnd_file.log,
1050: buff => ' ');
1051: fnd_file.put_line
1052: (which => fnd_file.log,
1053: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1054: || l_estab_rec.unit_name_4 || ') HAS EITHER '
1055: ||'NOT YET BEEN REPORTED OR IS UNDER 50 EMPS');
1056: fnd_file.put_line
1052: (which => fnd_file.log,
1053: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1054: || l_estab_rec.unit_name_4 || ') HAS EITHER '
1055: ||'NOT YET BEEN REPORTED OR IS UNDER 50 EMPS');
1056: fnd_file.put_line
1057: (which => fnd_file.log,
1058: buff => ' ');
1059:
1060: ELSIF l_estab_rec.unit_number_3 IS NULL
1053: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1054: || l_estab_rec.unit_name_4 || ') HAS EITHER '
1055: ||'NOT YET BEEN REPORTED OR IS UNDER 50 EMPS');
1056: fnd_file.put_line
1057: (which => fnd_file.log,
1058: buff => ' ');
1059:
1060: ELSIF l_estab_rec.unit_number_3 IS NULL
1061: AND l_org_rec.l_status_code_2 IN ('1','3','4','5') THEN
1059:
1060: ELSIF l_estab_rec.unit_number_3 IS NULL
1061: AND l_org_rec.l_status_code_2 IN ('1','3','4','5') THEN
1062:
1063: fnd_file.put_line
1064: (which => fnd_file.log,
1065: buff => ' ');
1066: fnd_file.put_line
1067: (which => fnd_file.log,
1060: ELSIF l_estab_rec.unit_number_3 IS NULL
1061: AND l_org_rec.l_status_code_2 IN ('1','3','4','5') THEN
1062:
1063: fnd_file.put_line
1064: (which => fnd_file.log,
1065: buff => ' ');
1066: fnd_file.put_line
1067: (which => fnd_file.log,
1068: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1062:
1063: fnd_file.put_line
1064: (which => fnd_file.log,
1065: buff => ' ');
1066: fnd_file.put_line
1067: (which => fnd_file.log,
1068: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1069: ||'THIS LOCATION HAS BEEN REPORTED ACCORDING TO THE Previously ');
1070: fnd_file.put_line
1063: fnd_file.put_line
1064: (which => fnd_file.log,
1065: buff => ' ');
1066: fnd_file.put_line
1067: (which => fnd_file.log,
1068: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1069: ||'THIS LOCATION HAS BEEN REPORTED ACCORDING TO THE Previously ');
1070: fnd_file.put_line
1071: (which => fnd_file.log,
1066: fnd_file.put_line
1067: (which => fnd_file.log,
1068: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1069: ||'THIS LOCATION HAS BEEN REPORTED ACCORDING TO THE Previously ');
1070: fnd_file.put_line
1071: (which => fnd_file.log,
1072: buff => 'Reported field IN the EEO1 Specific Data Extra '
1073: ||'Information Type. '
1074: ||' The unit NUMBER IS ' || l_estab_rec.unit_number_3
1067: (which => fnd_file.log,
1068: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1069: ||'THIS LOCATION HAS BEEN REPORTED ACCORDING TO THE Previously ');
1070: fnd_file.put_line
1071: (which => fnd_file.log,
1072: buff => 'Reported field IN the EEO1 Specific Data Extra '
1073: ||'Information Type. '
1074: ||' The unit NUMBER IS ' || l_estab_rec.unit_number_3
1075: ||' The unit name IS ' || l_estab_rec.unit_name_4
1074: ||' The unit NUMBER IS ' || l_estab_rec.unit_number_3
1075: ||' The unit name IS ' || l_estab_rec.unit_name_4
1076: ||' The unit address IS ' || l_estab_rec.unit_address_req_5
1077: || ' **********');
1078: fnd_file.put_line
1079: (which => fnd_file.log,
1080: buff => ' ');
1081:
1082: END IF; --l_estab_rec.unit_number_3 IS NOT NULL
1075: ||' The unit name IS ' || l_estab_rec.unit_name_4
1076: ||' The unit address IS ' || l_estab_rec.unit_address_req_5
1077: || ' **********');
1078: fnd_file.put_line
1079: (which => fnd_file.log,
1080: buff => ' ');
1081:
1082: END IF; --l_estab_rec.unit_number_3 IS NOT NULL
1083:
1082: END IF; --l_estab_rec.unit_number_3 IS NOT NULL
1083:
1084:
1085: g_message_text := '*2-for estab rec write form TYPE IS* '||l_org_rec.form_type;
1086: fnd_file.put_line
1087: (which => fnd_file.log,
1088: buff => g_message_text);
1089: g_message_text := '*2-l_estab_rec.reported_last_year_11 IS* '||l_estab_rec.reported_last_year_11;
1090: fnd_file.put_line
1083:
1084:
1085: g_message_text := '*2-for estab rec write form TYPE IS* '||l_org_rec.form_type;
1086: fnd_file.put_line
1087: (which => fnd_file.log,
1088: buff => g_message_text);
1089: g_message_text := '*2-l_estab_rec.reported_last_year_11 IS* '||l_estab_rec.reported_last_year_11;
1090: fnd_file.put_line
1091: (which => fnd_file.log,
1086: fnd_file.put_line
1087: (which => fnd_file.log,
1088: buff => g_message_text);
1089: g_message_text := '*2-l_estab_rec.reported_last_year_11 IS* '||l_estab_rec.reported_last_year_11;
1090: fnd_file.put_line
1091: (which => fnd_file.log,
1092: buff => g_message_text);
1093: g_message_text := '*2-l_estab_rec.hq IS* '||l_estab_rec.hq ;
1094: fnd_file.put_line
1087: (which => fnd_file.log,
1088: buff => g_message_text);
1089: g_message_text := '*2-l_estab_rec.reported_last_year_11 IS* '||l_estab_rec.reported_last_year_11;
1090: fnd_file.put_line
1091: (which => fnd_file.log,
1092: buff => g_message_text);
1093: g_message_text := '*2-l_estab_rec.hq IS* '||l_estab_rec.hq ;
1094: fnd_file.put_line
1095: (which => fnd_file.log,
1090: fnd_file.put_line
1091: (which => fnd_file.log,
1092: buff => g_message_text);
1093: g_message_text := '*2-l_estab_rec.hq IS* '||l_estab_rec.hq ;
1094: fnd_file.put_line
1095: (which => fnd_file.log,
1096: buff => g_message_text);
1097: g_message_text := '*2-status code IS* '||l_org_rec.l_status_code_2;
1098: fnd_file.put_line
1091: (which => fnd_file.log,
1092: buff => g_message_text);
1093: g_message_text := '*2-l_estab_rec.hq IS* '||l_estab_rec.hq ;
1094: fnd_file.put_line
1095: (which => fnd_file.log,
1096: buff => g_message_text);
1097: g_message_text := '*2-status code IS* '||l_org_rec.l_status_code_2;
1098: fnd_file.put_line
1099: (which => fnd_file.log,
1094: fnd_file.put_line
1095: (which => fnd_file.log,
1096: buff => g_message_text);
1097: g_message_text := '*2-status code IS* '||l_org_rec.l_status_code_2;
1098: fnd_file.put_line
1099: (which => fnd_file.log,
1100: buff => g_message_text);
1101: g_message_text := ' '||l_org_rec.l_status_code_2;
1102: fnd_file.put_line
1095: (which => fnd_file.log,
1096: buff => g_message_text);
1097: g_message_text := '*2-status code IS* '||l_org_rec.l_status_code_2;
1098: fnd_file.put_line
1099: (which => fnd_file.log,
1100: buff => g_message_text);
1101: g_message_text := ' '||l_org_rec.l_status_code_2;
1102: fnd_file.put_line
1103: (which => fnd_file.log,
1098: fnd_file.put_line
1099: (which => fnd_file.log,
1100: buff => g_message_text);
1101: g_message_text := ' '||l_org_rec.l_status_code_2;
1102: fnd_file.put_line
1103: (which => fnd_file.log,
1104: buff => g_message_text);
1105: END IF; ----l_org_rec.form_type = 'S'
1106: --
1099: (which => fnd_file.log,
1100: buff => g_message_text);
1101: g_message_text := ' '||l_org_rec.l_status_code_2;
1102: fnd_file.put_line
1103: (which => fnd_file.log,
1104: buff => g_message_text);
1105: END IF; ----l_org_rec.form_type = 'S'
1106: --
1107: -- include hawaii IN main processing
1129: hr_utility.trace('l_consol_rec.a_10_grand_total : '||l_consol_rec.a_10_grand_total);
1130: /*
1131: g_message_text := 'grand total for estab rep column a '
1132: ||'(total males AND females) ';
1133: fnd_file.put_line
1134: (which => fnd_file.log,
1135: buff => g_message_text);
1136: g_message_text := 'l_estab_rec.a_10_grand_total *'
1137: ||l_estab_rec.a_10_grand_total;
1130: /*
1131: g_message_text := 'grand total for estab rep column a '
1132: ||'(total males AND females) ';
1133: fnd_file.put_line
1134: (which => fnd_file.log,
1135: buff => g_message_text);
1136: g_message_text := 'l_estab_rec.a_10_grand_total *'
1137: ||l_estab_rec.a_10_grand_total;
1138: fnd_file.put_line
1134: (which => fnd_file.log,
1135: buff => g_message_text);
1136: g_message_text := 'l_estab_rec.a_10_grand_total *'
1137: ||l_estab_rec.a_10_grand_total;
1138: fnd_file.put_line
1139: (which => fnd_file.log,
1140: buff => g_message_text);
1141: fnd_file.put_line
1142: (which => fnd_file.log,
1135: buff => g_message_text);
1136: g_message_text := 'l_estab_rec.a_10_grand_total *'
1137: ||l_estab_rec.a_10_grand_total;
1138: fnd_file.put_line
1139: (which => fnd_file.log,
1140: buff => g_message_text);
1141: fnd_file.put_line
1142: (which => fnd_file.log,
1143: buff => ' '); */
1137: ||l_estab_rec.a_10_grand_total;
1138: fnd_file.put_line
1139: (which => fnd_file.log,
1140: buff => g_message_text);
1141: fnd_file.put_line
1142: (which => fnd_file.log,
1143: buff => ' '); */
1144: --
1145: -- grand total for column b (Hispanic or Latino Female)
1138: fnd_file.put_line
1139: (which => fnd_file.log,
1140: buff => g_message_text);
1141: fnd_file.put_line
1142: (which => fnd_file.log,
1143: buff => ' '); */
1144: --
1145: -- grand total for column b (Hispanic or Latino Female)
1146: --
1834: lpad(l_estab_rec.j_11_last_year_grand_total,6,0) ||
1835: lpad(l_estab_rec.k_11_last_year_grand_total,6,0); */
1836:
1837: /*g_message_text := 'l_estab_rec.a_1_total_mf -> '|| l_estab_rec.a_1_total_mf;
1838: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1839:
1840: g_message_text := 'l_estab_rec.a_2_total_mf -> '|| l_estab_rec.a_2_total_mf;
1841: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1842:
1837: /*g_message_text := 'l_estab_rec.a_1_total_mf -> '|| l_estab_rec.a_1_total_mf;
1838: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1839:
1840: g_message_text := 'l_estab_rec.a_2_total_mf -> '|| l_estab_rec.a_2_total_mf;
1841: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1842:
1843: g_message_text := 'l_estab_rec.a_3_total_mf -> '|| l_estab_rec.a_3_total_mf;
1844: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1845:
1840: g_message_text := 'l_estab_rec.a_2_total_mf -> '|| l_estab_rec.a_2_total_mf;
1841: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1842:
1843: g_message_text := 'l_estab_rec.a_3_total_mf -> '|| l_estab_rec.a_3_total_mf;
1844: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1845:
1846: g_message_text := 'l_estab_rec.a_4_total_mf -> '|| l_estab_rec.a_4_total_mf;
1847: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1848:
1843: g_message_text := 'l_estab_rec.a_3_total_mf -> '|| l_estab_rec.a_3_total_mf;
1844: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1845:
1846: g_message_text := 'l_estab_rec.a_4_total_mf -> '|| l_estab_rec.a_4_total_mf;
1847: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1848:
1849: g_message_text := 'l_estab_rec.a_5_total_mf -> '|| l_estab_rec.a_5_total_mf;
1850: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1851:
1846: g_message_text := 'l_estab_rec.a_4_total_mf -> '|| l_estab_rec.a_4_total_mf;
1847: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1848:
1849: g_message_text := 'l_estab_rec.a_5_total_mf -> '|| l_estab_rec.a_5_total_mf;
1850: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1851:
1852: g_message_text := 'l_estab_rec.a_6_total_mf -> '|| l_estab_rec.a_6_total_mf;
1853: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1854:
1849: g_message_text := 'l_estab_rec.a_5_total_mf -> '|| l_estab_rec.a_5_total_mf;
1850: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1851:
1852: g_message_text := 'l_estab_rec.a_6_total_mf -> '|| l_estab_rec.a_6_total_mf;
1853: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1854:
1855: g_message_text := 'l_estab_rec.a_7_total_mf -> '|| l_estab_rec.a_7_total_mf;
1856: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1857:
1852: g_message_text := 'l_estab_rec.a_6_total_mf -> '|| l_estab_rec.a_6_total_mf;
1853: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1854:
1855: g_message_text := 'l_estab_rec.a_7_total_mf -> '|| l_estab_rec.a_7_total_mf;
1856: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1857:
1858: g_message_text := 'l_estab_rec.a_8_total_mf -> '|| l_estab_rec.a_8_total_mf;
1859: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1860:
1855: g_message_text := 'l_estab_rec.a_7_total_mf -> '|| l_estab_rec.a_7_total_mf;
1856: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1857:
1858: g_message_text := 'l_estab_rec.a_8_total_mf -> '|| l_estab_rec.a_8_total_mf;
1859: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1860:
1861:
1862: g_message_text := 'l_estab_rec.a_9_total_mf -> '|| l_estab_rec.a_9_total_mf;
1863: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);*/
1859: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1860:
1861:
1862: g_message_text := 'l_estab_rec.a_9_total_mf -> '|| l_estab_rec.a_9_total_mf;
1863: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);*/
1864:
1865:
1866: g_message_text := 'l_estab_rec.a_10_grand_total -> '||l_estab_rec.a_10_grand_total;
1867: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1863: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);*/
1864:
1865:
1866: g_message_text := 'l_estab_rec.a_10_grand_total -> '||l_estab_rec.a_10_grand_total;
1867: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1868:
1869:
1870: --
1871: fnd_file.put_line
1867: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1868:
1869:
1870: --
1871: fnd_file.put_line
1872: (which => fnd_file.output,
1873: buff => l_string);
1874: hr_utility.set_location('Leaving..' || l_proc,100);
1875:
1868:
1869:
1870: --
1871: fnd_file.put_line
1872: (which => fnd_file.output,
1873: buff => l_string);
1874: hr_utility.set_location('Leaving..' || l_proc,100);
1875:
1876: END write_establishment_record;
2362: l_min_year VARCHAR2(4) := NULL;
2363:
2364: BEGIN --insert_location_eit
2365:
2366: fnd_file.put_line(which => fnd_file.log,buff =>'insert INTO location eit ');
2367:
2368: BEGIN --Local1
2369: SELECT eloc.location_id,
2370: eloc.location_code
2377: AND hierarchy_version_id = p_hierarchy_version_id
2378: AND pgn.node_type = 'EST'
2379: AND eloc.location_id = pgn.entity_id;
2380: END; --Local1
2381: fnd_file.put_line
2382: (which => fnd_file.log,
2383: buff => 'location code IS '||l_location_code);
2384: --
2385: BEGIN --Local2
2378: AND pgn.node_type = 'EST'
2379: AND eloc.location_id = pgn.entity_id;
2380: END; --Local1
2381: fnd_file.put_line
2382: (which => fnd_file.log,
2383: buff => 'location code IS '||l_location_code);
2384: --
2385: BEGIN --Local2
2386: SELECT 'U',
2393: AND location_id = l_location_id;
2394: EXCEPTION
2395: WHEN no_data_found THEN
2396: p_update := 'C';
2397: fnd_file.put_line
2398: (which => fnd_file.log,
2399: buff => ' ');
2400: fnd_file.put_line
2401: (which => fnd_file.log,
2394: EXCEPTION
2395: WHEN no_data_found THEN
2396: p_update := 'C';
2397: fnd_file.put_line
2398: (which => fnd_file.log,
2399: buff => ' ');
2400: fnd_file.put_line
2401: (which => fnd_file.log,
2402: buff => 'Need to create new eit for location '
2396: p_update := 'C';
2397: fnd_file.put_line
2398: (which => fnd_file.log,
2399: buff => ' ');
2400: fnd_file.put_line
2401: (which => fnd_file.log,
2402: buff => 'Need to create new eit for location '
2403: ||l_location_id ||' '|| l_location_code);
2404:
2397: fnd_file.put_line
2398: (which => fnd_file.log,
2399: buff => ' ');
2400: fnd_file.put_line
2401: (which => fnd_file.log,
2402: buff => 'Need to create new eit for location '
2403: ||l_location_id ||' '|| l_location_code);
2404:
2405: WHEN OTHERS THEN
2406: NULL;
2407: END;--Local2
2408:
2409: IF p_update = 'U' THEN
2410: fnd_file.put_line
2411: (which => fnd_file.log,
2412: buff => ' ');
2413: fnd_file.put_line
2414: (which => fnd_file.log,
2407: END;--Local2
2408:
2409: IF p_update = 'U' THEN
2410: fnd_file.put_line
2411: (which => fnd_file.log,
2412: buff => ' ');
2413: fnd_file.put_line
2414: (which => fnd_file.log,
2415: buff => 'p_update '||p_update||' location_id to update IS '
2409: IF p_update = 'U' THEN
2410: fnd_file.put_line
2411: (which => fnd_file.log,
2412: buff => ' ');
2413: fnd_file.put_line
2414: (which => fnd_file.log,
2415: buff => 'p_update '||p_update||' location_id to update IS '
2416: ||l_location_id ||' '|| l_location_code);
2417:
2410: fnd_file.put_line
2411: (which => fnd_file.log,
2412: buff => ' ');
2413: fnd_file.put_line
2414: (which => fnd_file.log,
2415: buff => 'p_update '||p_update||' location_id to update IS '
2416: ||l_location_id ||' '|| l_location_code);
2417:
2418: BEGIN--Local3
2435:
2436: END IF; --p_update = 'U'
2437:
2438: IF p_update = 'C' THEN
2439: fnd_file.put_line
2440: (which => fnd_file.log,
2441: buff => 'p_update '||p_update||' location_id '||l_location_id);
2442: fnd_file.put_line
2443: (which => fnd_file.log,
2436: END IF; --p_update = 'U'
2437:
2438: IF p_update = 'C' THEN
2439: fnd_file.put_line
2440: (which => fnd_file.log,
2441: buff => 'p_update '||p_update||' location_id '||l_location_id);
2442: fnd_file.put_line
2443: (which => fnd_file.log,
2444: buff => 'need to create new eit');
2438: IF p_update = 'C' THEN
2439: fnd_file.put_line
2440: (which => fnd_file.log,
2441: buff => 'p_update '||p_update||' location_id '||l_location_id);
2442: fnd_file.put_line
2443: (which => fnd_file.log,
2444: buff => 'need to create new eit');
2445:
2446: BEGIN--Local5
2439: fnd_file.put_line
2440: (which => fnd_file.log,
2441: buff => 'p_update '||p_update||' location_id '||l_location_id);
2442: fnd_file.put_line
2443: (which => fnd_file.log,
2444: buff => 'need to create new eit');
2445:
2446: BEGIN--Local5
2447: -- Bug 7447266
2502: );
2503:
2504: END;--Local5
2505: COMMIT;
2506: fnd_file.put_line
2507: (which => fnd_file.log,
2508: buff => ' ');
2509: fnd_file.put_line
2510: (which => fnd_file.log,
2503:
2504: END;--Local5
2505: COMMIT;
2506: fnd_file.put_line
2507: (which => fnd_file.log,
2508: buff => ' ');
2509: fnd_file.put_line
2510: (which => fnd_file.log,
2511: buff => 'eit created for location_id '||l_location_id ||' year '
2505: COMMIT;
2506: fnd_file.put_line
2507: (which => fnd_file.log,
2508: buff => ' ');
2509: fnd_file.put_line
2510: (which => fnd_file.log,
2511: buff => 'eit created for location_id '||l_location_id ||' year '
2512: ||p_report_year);
2513: /*fnd_file.put_line
2506: fnd_file.put_line
2507: (which => fnd_file.log,
2508: buff => ' ');
2509: fnd_file.put_line
2510: (which => fnd_file.log,
2511: buff => 'eit created for location_id '||l_location_id ||' year '
2512: ||p_report_year);
2513: /*fnd_file.put_line
2514: (which => fnd_file.log,
2509: fnd_file.put_line
2510: (which => fnd_file.log,
2511: buff => 'eit created for location_id '||l_location_id ||' year '
2512: ||p_report_year);
2513: /*fnd_file.put_line
2514: (which => fnd_file.log,
2515: buff => 'grand total IS '||l_estab_rec.a_11_last_year_grand_total); */
2516: fnd_file.put_line
2517: (which => fnd_file.log,
2510: (which => fnd_file.log,
2511: buff => 'eit created for location_id '||l_location_id ||' year '
2512: ||p_report_year);
2513: /*fnd_file.put_line
2514: (which => fnd_file.log,
2515: buff => 'grand total IS '||l_estab_rec.a_11_last_year_grand_total); */
2516: fnd_file.put_line
2517: (which => fnd_file.log,
2518: buff => ' ');
2512: ||p_report_year);
2513: /*fnd_file.put_line
2514: (which => fnd_file.log,
2515: buff => 'grand total IS '||l_estab_rec.a_11_last_year_grand_total); */
2516: fnd_file.put_line
2517: (which => fnd_file.log,
2518: buff => ' ');
2519: END IF; -- IF p_update = 'C'
2520: --
2513: /*fnd_file.put_line
2514: (which => fnd_file.log,
2515: buff => 'grand total IS '||l_estab_rec.a_11_last_year_grand_total); */
2516: fnd_file.put_line
2517: (which => fnd_file.log,
2518: buff => ' ');
2519: END IF; -- IF p_update = 'C'
2520: --
2521: -- IF over 4 eits delete the earliest
2559: ,p_location_extra_info_id => l_location_extra_info_id
2560: ,p_object_version_number => l_object_version_number
2561: );
2562: END;--Local10
2563: fnd_file.put_line
2564: (which => fnd_file.log,
2565: buff => '* there are over 4 Archive EITs for location id '
2566: ||l_location_id||' so deleting for year '||l_min_year);
2567: END IF;--l_eit_count > 4
2560: ,p_object_version_number => l_object_version_number
2561: );
2562: END;--Local10
2563: fnd_file.put_line
2564: (which => fnd_file.log,
2565: buff => '* there are over 4 Archive EITs for location id '
2566: ||l_location_id||' so deleting for year '||l_min_year);
2567: END IF;--l_eit_count > 4
2568:
2603: WHEN NO_DATA_FOUND THEN
2604: p_update := 'C';
2605: l_organization_id := l_org_rec.par_ent_org_id;
2606: --
2607: fnd_file.put_line
2608: (which => fnd_file.log,
2609: buff => ' ');
2610: fnd_file.put_line
2611: (which => fnd_file.log,
2604: p_update := 'C';
2605: l_organization_id := l_org_rec.par_ent_org_id;
2606: --
2607: fnd_file.put_line
2608: (which => fnd_file.log,
2609: buff => ' ');
2610: fnd_file.put_line
2611: (which => fnd_file.log,
2612: buff => 'need to create new eit for '||l_organization_id);
2606: --
2607: fnd_file.put_line
2608: (which => fnd_file.log,
2609: buff => ' ');
2610: fnd_file.put_line
2611: (which => fnd_file.log,
2612: buff => 'need to create new eit for '||l_organization_id);
2613: fnd_file.put_line
2614: (which => fnd_file.log,
2607: fnd_file.put_line
2608: (which => fnd_file.log,
2609: buff => ' ');
2610: fnd_file.put_line
2611: (which => fnd_file.log,
2612: buff => 'need to create new eit for '||l_organization_id);
2613: fnd_file.put_line
2614: (which => fnd_file.log,
2615: buff => ' ');
2609: buff => ' ');
2610: fnd_file.put_line
2611: (which => fnd_file.log,
2612: buff => 'need to create new eit for '||l_organization_id);
2613: fnd_file.put_line
2614: (which => fnd_file.log,
2615: buff => ' ');
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2610: fnd_file.put_line
2611: (which => fnd_file.log,
2612: buff => 'need to create new eit for '||l_organization_id);
2613: fnd_file.put_line
2614: (which => fnd_file.log,
2615: buff => ' ');
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2618: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2612: buff => 'need to create new eit for '||l_organization_id);
2613: fnd_file.put_line
2614: (which => fnd_file.log,
2615: buff => ' ');
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2618: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2613: fnd_file.put_line
2614: (which => fnd_file.log,
2615: buff => ' ');
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2618: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2615: buff => ' ');
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2618: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2618: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2624: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2618: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2624: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2625: fnd_file.put_line
2626: (which => fnd_file.log,
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2624: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2625: fnd_file.put_line
2626: (which => fnd_file.log,
2627: buff => 'MODE FOR LAST YEARS DATES. ');
2621: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2624: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2625: fnd_file.put_line
2626: (which => fnd_file.log,
2627: buff => 'MODE FOR LAST YEARS DATES. ');
2628: fnd_file.put_line
2629: (which => fnd_file.log,
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2624: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2625: fnd_file.put_line
2626: (which => fnd_file.log,
2627: buff => 'MODE FOR LAST YEARS DATES. ');
2628: fnd_file.put_line
2629: (which => fnd_file.log,
2630: buff => ' ');
2624: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2625: fnd_file.put_line
2626: (which => fnd_file.log,
2627: buff => 'MODE FOR LAST YEARS DATES. ');
2628: fnd_file.put_line
2629: (which => fnd_file.log,
2630: buff => ' ');
2631: WHEN OTHERS THEN
2632: NULL;
2625: fnd_file.put_line
2626: (which => fnd_file.log,
2627: buff => 'MODE FOR LAST YEARS DATES. ');
2628: fnd_file.put_line
2629: (which => fnd_file.log,
2630: buff => ' ');
2631: WHEN OTHERS THEN
2632: NULL;
2633: END;--Local1
2632: NULL;
2633: END;--Local1
2634:
2635: IF p_update = 'U' THEN
2636: fnd_file.put_line
2637: (which => fnd_file.log,
2638: buff => 'p_update '||p_update||' org_id to update IS '
2639: ||l_organization_id||' IN bus grp '
2640: ||p_business_group_id);
2633: END;--Local1
2634:
2635: IF p_update = 'U' THEN
2636: fnd_file.put_line
2637: (which => fnd_file.log,
2638: buff => 'p_update '||p_update||' org_id to update IS '
2639: ||l_organization_id||' IN bus grp '
2640: ||p_business_group_id);
2641:
2662: --
2663: END IF; --p_update = 'U'
2664:
2665: IF p_update = 'C' THEN
2666: fnd_file.put_line
2667: (which => fnd_file.log,
2668: buff => ' ');
2669: fnd_file.put_line
2670: (which => fnd_file.log,
2663: END IF; --p_update = 'U'
2664:
2665: IF p_update = 'C' THEN
2666: fnd_file.put_line
2667: (which => fnd_file.log,
2668: buff => ' ');
2669: fnd_file.put_line
2670: (which => fnd_file.log,
2671: buff => 'p_update '||p_update||' org id '||l_organization_id);
2665: IF p_update = 'C' THEN
2666: fnd_file.put_line
2667: (which => fnd_file.log,
2668: buff => ' ');
2669: fnd_file.put_line
2670: (which => fnd_file.log,
2671: buff => 'p_update '||p_update||' org id '||l_organization_id);
2672: fnd_file.put_line
2673: (which => fnd_file.log,
2666: fnd_file.put_line
2667: (which => fnd_file.log,
2668: buff => ' ');
2669: fnd_file.put_line
2670: (which => fnd_file.log,
2671: buff => 'p_update '||p_update||' org id '||l_organization_id);
2672: fnd_file.put_line
2673: (which => fnd_file.log,
2674: buff => 'need to create new eit');
2668: buff => ' ');
2669: fnd_file.put_line
2670: (which => fnd_file.log,
2671: buff => 'p_update '||p_update||' org id '||l_organization_id);
2672: fnd_file.put_line
2673: (which => fnd_file.log,
2674: buff => 'need to create new eit');
2675:
2676: BEGIN --Local4
2669: fnd_file.put_line
2670: (which => fnd_file.log,
2671: buff => 'p_update '||p_update||' org id '||l_organization_id);
2672: fnd_file.put_line
2673: (which => fnd_file.log,
2674: buff => 'need to create new eit');
2675:
2676: BEGIN --Local4
2677: /* hr_organization_api.create_org_information
2728:
2729: END;--Local4
2730: COMMIT;
2731:
2732: fnd_file.put_line
2733: (which => fnd_file.log,
2734: buff => ' ');
2735: fnd_file.put_line
2736: (which => fnd_file.log,
2729: END;--Local4
2730: COMMIT;
2731:
2732: fnd_file.put_line
2733: (which => fnd_file.log,
2734: buff => ' ');
2735: fnd_file.put_line
2736: (which => fnd_file.log,
2737: buff => 'eit created for org id '||l_organization_id
2731:
2732: fnd_file.put_line
2733: (which => fnd_file.log,
2734: buff => ' ');
2735: fnd_file.put_line
2736: (which => fnd_file.log,
2737: buff => 'eit created for org id '||l_organization_id
2738: ||' year '||p_report_year);
2739: END IF; --p_update = 'C'
2732: fnd_file.put_line
2733: (which => fnd_file.log,
2734: buff => ' ');
2735: fnd_file.put_line
2736: (which => fnd_file.log,
2737: buff => 'eit created for org id '||l_organization_id
2738: ||' year '||p_report_year);
2739: END IF; --p_update = 'C'
2740:
2782: ,p_org_information_id => l_org_information_id
2783: ,p_object_version_number => l_object_version_number
2784: );
2785: END;--Local9
2786: fnd_file.put_line
2787: (which => fnd_file.log,
2788: buff => ' there are over 4 Archive EITs for organization id '
2789: ||p_business_group_id||' so deleting for year '||l_min_year);
2790: END IF;--l_eit_count > 4
2783: ,p_object_version_number => l_object_version_number
2784: );
2785: END;--Local9
2786: fnd_file.put_line
2787: (which => fnd_file.log,
2788: buff => ' there are over 4 Archive EITs for organization id '
2789: ||p_business_group_id||' so deleting for year '||l_min_year);
2790: END IF;--l_eit_count > 4
2791: END; --Local5
2802: BEGIN -- unit name AND address are required.
2803: IF (l_c_estab_details.unit_name_4 IS NULL OR
2804: l_c_estab_details.unit_address_req_5 IS NULL)
2805: THEN
2806: fnd_file.put_line
2807: (which => fnd_file.log,
2808: buff => '======================================================');
2809: fnd_file.put_line
2810: (which => fnd_file.log,
2803: IF (l_c_estab_details.unit_name_4 IS NULL OR
2804: l_c_estab_details.unit_address_req_5 IS NULL)
2805: THEN
2806: fnd_file.put_line
2807: (which => fnd_file.log,
2808: buff => '======================================================');
2809: fnd_file.put_line
2810: (which => fnd_file.log,
2811: buff => ' ');
2805: THEN
2806: fnd_file.put_line
2807: (which => fnd_file.log,
2808: buff => '======================================================');
2809: fnd_file.put_line
2810: (which => fnd_file.log,
2811: buff => ' ');
2812: fnd_file.put_line
2813: (which => fnd_file.log,
2806: fnd_file.put_line
2807: (which => fnd_file.log,
2808: buff => '======================================================');
2809: fnd_file.put_line
2810: (which => fnd_file.log,
2811: buff => ' ');
2812: fnd_file.put_line
2813: (which => fnd_file.log,
2814: buff => 'Unit name AND address are '
2808: buff => '======================================================');
2809: fnd_file.put_line
2810: (which => fnd_file.log,
2811: buff => ' ');
2812: fnd_file.put_line
2813: (which => fnd_file.log,
2814: buff => 'Unit name AND address are '
2815: ||'required fields - ');
2816: fnd_file.put_line
2809: fnd_file.put_line
2810: (which => fnd_file.log,
2811: buff => ' ');
2812: fnd_file.put_line
2813: (which => fnd_file.log,
2814: buff => 'Unit name AND address are '
2815: ||'required fields - ');
2816: fnd_file.put_line
2817: (which => fnd_file.log,
2812: fnd_file.put_line
2813: (which => fnd_file.log,
2814: buff => 'Unit name AND address are '
2815: ||'required fields - ');
2816: fnd_file.put_line
2817: (which => fnd_file.log,
2818: buff => 'Please enter ''Reporting Name'' IN location/extra '
2819: ||'info/eeo1 specific information for unit/establishment '
2820: ||l_c_estab_details.unit_name_4||' '
2813: (which => fnd_file.log,
2814: buff => 'Unit name AND address are '
2815: ||'required fields - ');
2816: fnd_file.put_line
2817: (which => fnd_file.log,
2818: buff => 'Please enter ''Reporting Name'' IN location/extra '
2819: ||'info/eeo1 specific information for unit/establishment '
2820: ||l_c_estab_details.unit_name_4||' '
2821: ||l_c_estab_details.unit_address_req_5);
2818: buff => 'Please enter ''Reporting Name'' IN location/extra '
2819: ||'info/eeo1 specific information for unit/establishment '
2820: ||l_c_estab_details.unit_name_4||' '
2821: ||l_c_estab_details.unit_address_req_5);
2822: fnd_file.put_line
2823: (which => fnd_file.log,
2824: buff => ' ');
2825: fnd_file.put_line
2826: (which => fnd_file.log,
2819: ||'info/eeo1 specific information for unit/establishment '
2820: ||l_c_estab_details.unit_name_4||' '
2821: ||l_c_estab_details.unit_address_req_5);
2822: fnd_file.put_line
2823: (which => fnd_file.log,
2824: buff => ' ');
2825: fnd_file.put_line
2826: (which => fnd_file.log,
2827: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2821: ||l_c_estab_details.unit_address_req_5);
2822: fnd_file.put_line
2823: (which => fnd_file.log,
2824: buff => ' ');
2825: fnd_file.put_line
2826: (which => fnd_file.log,
2827: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2828: fnd_file.put_line
2829: (which => fnd_file.log,
2822: fnd_file.put_line
2823: (which => fnd_file.log,
2824: buff => ' ');
2825: fnd_file.put_line
2826: (which => fnd_file.log,
2827: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2828: fnd_file.put_line
2829: (which => fnd_file.log,
2830: buff => ' ');
2824: buff => ' ');
2825: fnd_file.put_line
2826: (which => fnd_file.log,
2827: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2828: fnd_file.put_line
2829: (which => fnd_file.log,
2830: buff => ' ');
2831: fnd_file.put_line
2832: (which => fnd_file.log,
2825: fnd_file.put_line
2826: (which => fnd_file.log,
2827: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2828: fnd_file.put_line
2829: (which => fnd_file.log,
2830: buff => ' ');
2831: fnd_file.put_line
2832: (which => fnd_file.log,
2833: buff => '======================================================');
2827: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2828: fnd_file.put_line
2829: (which => fnd_file.log,
2830: buff => ' ');
2831: fnd_file.put_line
2832: (which => fnd_file.log,
2833: buff => '======================================================');
2834: RAISE hr_utility.hr_error;
2835: ELSIF
2828: fnd_file.put_line
2829: (which => fnd_file.log,
2830: buff => ' ');
2831: fnd_file.put_line
2832: (which => fnd_file.log,
2833: buff => '======================================================');
2834: RAISE hr_utility.hr_error;
2835: ELSIF
2836: (l_c_estab_details.city_7 IS NULL OR
2837: l_c_estab_details.state_8 IS NULL OR
2838: l_c_estab_details.zip_code_9 IS NULL OR
2839: l_c_estab_details.county_17 IS NULL)
2840: THEN
2841: fnd_file.put_line
2842: (which => fnd_file.log,
2843: buff => '==================================');
2844: fnd_file.put_line
2845: (which => fnd_file.log,
2838: l_c_estab_details.zip_code_9 IS NULL OR
2839: l_c_estab_details.county_17 IS NULL)
2840: THEN
2841: fnd_file.put_line
2842: (which => fnd_file.log,
2843: buff => '==================================');
2844: fnd_file.put_line
2845: (which => fnd_file.log,
2846: buff => ' ');
2840: THEN
2841: fnd_file.put_line
2842: (which => fnd_file.log,
2843: buff => '==================================');
2844: fnd_file.put_line
2845: (which => fnd_file.log,
2846: buff => ' ');
2847: fnd_file.put_line
2848: (which => fnd_file.log,
2841: fnd_file.put_line
2842: (which => fnd_file.log,
2843: buff => '==================================');
2844: fnd_file.put_line
2845: (which => fnd_file.log,
2846: buff => ' ');
2847: fnd_file.put_line
2848: (which => fnd_file.log,
2849: buff => 'The Location/Establishment City, State, County AND '
2843: buff => '==================================');
2844: fnd_file.put_line
2845: (which => fnd_file.log,
2846: buff => ' ');
2847: fnd_file.put_line
2848: (which => fnd_file.log,
2849: buff => 'The Location/Establishment City, State, County AND '
2850: ||'Zip Code are required fields ');
2851: fnd_file.put_line
2844: fnd_file.put_line
2845: (which => fnd_file.log,
2846: buff => ' ');
2847: fnd_file.put_line
2848: (which => fnd_file.log,
2849: buff => 'The Location/Establishment City, State, County AND '
2850: ||'Zip Code are required fields ');
2851: fnd_file.put_line
2852: (which => fnd_file.log,
2847: fnd_file.put_line
2848: (which => fnd_file.log,
2849: buff => 'The Location/Establishment City, State, County AND '
2850: ||'Zip Code are required fields ');
2851: fnd_file.put_line
2852: (which => fnd_file.log,
2853: buff => ' ');
2854: fnd_file.put_line
2855: (which => fnd_file.log,
2848: (which => fnd_file.log,
2849: buff => 'The Location/Establishment City, State, County AND '
2850: ||'Zip Code are required fields ');
2851: fnd_file.put_line
2852: (which => fnd_file.log,
2853: buff => ' ');
2854: fnd_file.put_line
2855: (which => fnd_file.log,
2856: buff => 'Please enter IN location form for unit '
2850: ||'Zip Code are required fields ');
2851: fnd_file.put_line
2852: (which => fnd_file.log,
2853: buff => ' ');
2854: fnd_file.put_line
2855: (which => fnd_file.log,
2856: buff => 'Please enter IN location form for unit '
2857: ||l_c_estab_details.unit_name_4);
2858: fnd_file.put_line
2851: fnd_file.put_line
2852: (which => fnd_file.log,
2853: buff => ' ');
2854: fnd_file.put_line
2855: (which => fnd_file.log,
2856: buff => 'Please enter IN location form for unit '
2857: ||l_c_estab_details.unit_name_4);
2858: fnd_file.put_line
2859: (which => fnd_file.log,
2854: fnd_file.put_line
2855: (which => fnd_file.log,
2856: buff => 'Please enter IN location form for unit '
2857: ||l_c_estab_details.unit_name_4);
2858: fnd_file.put_line
2859: (which => fnd_file.log,
2860: buff => '==================================');
2861: RAISE hr_utility.hr_error;
2862: END IF;
2855: (which => fnd_file.log,
2856: buff => 'Please enter IN location form for unit '
2857: ||l_c_estab_details.unit_name_4);
2858: fnd_file.put_line
2859: (which => fnd_file.log,
2860: buff => '==================================');
2861: RAISE hr_utility.hr_error;
2862: END IF;
2863: END; -- unit name AND address are required.
2866: --unit name must be a minimum of two(2) positions
2867:
2868: IF (length(trim(l_c_estab_details.unit_name_4)) <2)
2869: THEN
2870: fnd_file.put_line
2871: (which => fnd_file.log,
2872: buff => 'The company/establishment names must be a minimum of two (2) positions.');
2873:
2874: fnd_file.put_line
2867:
2868: IF (length(trim(l_c_estab_details.unit_name_4)) <2)
2869: THEN
2870: fnd_file.put_line
2871: (which => fnd_file.log,
2872: buff => 'The company/establishment names must be a minimum of two (2) positions.');
2873:
2874: fnd_file.put_line
2875: (which => fnd_file.log,
2870: fnd_file.put_line
2871: (which => fnd_file.log,
2872: buff => 'The company/establishment names must be a minimum of two (2) positions.');
2873:
2874: fnd_file.put_line
2875: (which => fnd_file.log,
2876: buff => 'The Unit name '||l_c_estab_details.unit_name_4||' is less than two (2) positions.');
2877:
2878: fnd_file.put_line
2871: (which => fnd_file.log,
2872: buff => 'The company/establishment names must be a minimum of two (2) positions.');
2873:
2874: fnd_file.put_line
2875: (which => fnd_file.log,
2876: buff => 'The Unit name '||l_c_estab_details.unit_name_4||' is less than two (2) positions.');
2877:
2878: fnd_file.put_line
2879: (which => fnd_file.log,
2874: fnd_file.put_line
2875: (which => fnd_file.log,
2876: buff => 'The Unit name '||l_c_estab_details.unit_name_4||' is less than two (2) positions.');
2877:
2878: fnd_file.put_line
2879: (which => fnd_file.log,
2880: buff => 'Please change the "Reporting Name " IN location/extra '
2881: ||'info/eeo1 specific information for unit/establishment ');
2882:
2875: (which => fnd_file.log,
2876: buff => 'The Unit name '||l_c_estab_details.unit_name_4||' is less than two (2) positions.');
2877:
2878: fnd_file.put_line
2879: (which => fnd_file.log,
2880: buff => 'Please change the "Reporting Name " IN location/extra '
2881: ||'info/eeo1 specific information for unit/establishment ');
2882:
2883: RAISE hr_utility.hr_error;
2898: --unit_address_req_5 must be a minimum of four(4) postions
2899:
2900: IF (length(trim(l_c_estab_details.unit_address_req_5)) <4)
2901: THEN
2902: fnd_file.put_line
2903: (which => fnd_file.log,
2904: buff => 'The unit address of '||l_c_estab_details.unit_name_4||' must be a minimum of four (4) positions.');
2905: RAISE hr_utility.hr_error;
2906: END IF;
2899:
2900: IF (length(trim(l_c_estab_details.unit_address_req_5)) <4)
2901: THEN
2902: fnd_file.put_line
2903: (which => fnd_file.log,
2904: buff => 'The unit address of '||l_c_estab_details.unit_name_4||' must be a minimum of four (4) positions.');
2905: RAISE hr_utility.hr_error;
2906: END IF;
2907:
2910: IF NOT((UPPER(SUBSTR(l_c_estab_details.unit_address_req_5,1,6))='PO BOX')
2911: OR (ASCII(SUBSTR(l_c_estab_details.unit_address_req_5,1,1))>=48
2912: AND ASCII(SUBSTR(l_c_estab_details.unit_address_req_5,1,1))<=57))
2913: THEN
2914: fnd_file.put_line
2915: (which => fnd_file.log,
2916: buff => 'The street address of '||l_c_estab_details.unit_name_4||' must begin with a number or "PO BOX"');
2917: RAISE hr_utility.hr_error;
2918: END IF;
2911: OR (ASCII(SUBSTR(l_c_estab_details.unit_address_req_5,1,1))>=48
2912: AND ASCII(SUBSTR(l_c_estab_details.unit_address_req_5,1,1))<=57))
2913: THEN
2914: fnd_file.put_line
2915: (which => fnd_file.log,
2916: buff => 'The street address of '||l_c_estab_details.unit_name_4||' must begin with a number or "PO BOX"');
2917: RAISE hr_utility.hr_error;
2918: END IF;
2919:
2929: IF ( nvl(l_org_rec.c2_affiliated_14,'X') = '1' OR nvl(l_org_rec.c1_over_100_13,'X') = '1'
2930: OR nvl(to_char(l_c_estab_details.gov_contract_15),'X') = '1') THEN
2931:
2932: IF (l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL) THEN
2933: fnd_file.put_line
2934: (which => fnd_file.log,
2935: buff => '*==================================================*');
2936: fnd_file.put_line
2937: (which => fnd_file.log,
2930: OR nvl(to_char(l_c_estab_details.gov_contract_15),'X') = '1') THEN
2931:
2932: IF (l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL) THEN
2933: fnd_file.put_line
2934: (which => fnd_file.log,
2935: buff => '*==================================================*');
2936: fnd_file.put_line
2937: (which => fnd_file.log,
2938: buff => ' ');
2932: IF (l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL) THEN
2933: fnd_file.put_line
2934: (which => fnd_file.log,
2935: buff => '*==================================================*');
2936: fnd_file.put_line
2937: (which => fnd_file.log,
2938: buff => ' ');
2939: fnd_file.put_line
2940: (which => fnd_file.log,
2933: fnd_file.put_line
2934: (which => fnd_file.log,
2935: buff => '*==================================================*');
2936: fnd_file.put_line
2937: (which => fnd_file.log,
2938: buff => ' ');
2939: fnd_file.put_line
2940: (which => fnd_file.log,
2941: buff => 'The Location/Establishment NAICS NUMBER '
2935: buff => '*==================================================*');
2936: fnd_file.put_line
2937: (which => fnd_file.log,
2938: buff => ' ');
2939: fnd_file.put_line
2940: (which => fnd_file.log,
2941: buff => 'The Location/Establishment NAICS NUMBER '
2942: ||'IS a required field ');
2943: fnd_file.put_line
2936: fnd_file.put_line
2937: (which => fnd_file.log,
2938: buff => ' ');
2939: fnd_file.put_line
2940: (which => fnd_file.log,
2941: buff => 'The Location/Establishment NAICS NUMBER '
2942: ||'IS a required field ');
2943: fnd_file.put_line
2944: (which => fnd_file.log,
2939: fnd_file.put_line
2940: (which => fnd_file.log,
2941: buff => 'The Location/Establishment NAICS NUMBER '
2942: ||'IS a required field ');
2943: fnd_file.put_line
2944: (which => fnd_file.log,
2945: buff => 'Please enter IN either location/extra info'
2946: ||'/eeo1 specific information ');
2947: fnd_file.put_line
2940: (which => fnd_file.log,
2941: buff => 'The Location/Establishment NAICS NUMBER '
2942: ||'IS a required field ');
2943: fnd_file.put_line
2944: (which => fnd_file.log,
2945: buff => 'Please enter IN either location/extra info'
2946: ||'/eeo1 specific information ');
2947: fnd_file.put_line
2948: (which => fnd_file.log,
2943: fnd_file.put_line
2944: (which => fnd_file.log,
2945: buff => 'Please enter IN either location/extra info'
2946: ||'/eeo1 specific information ');
2947: fnd_file.put_line
2948: (which => fnd_file.log,
2949: buff => 'for unit/establishment: ');
2950: fnd_file.put_line
2951: (which => fnd_file.log,
2944: (which => fnd_file.log,
2945: buff => 'Please enter IN either location/extra info'
2946: ||'/eeo1 specific information ');
2947: fnd_file.put_line
2948: (which => fnd_file.log,
2949: buff => 'for unit/establishment: ');
2950: fnd_file.put_line
2951: (which => fnd_file.log,
2952: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2946: ||'/eeo1 specific information ');
2947: fnd_file.put_line
2948: (which => fnd_file.log,
2949: buff => 'for unit/establishment: ');
2950: fnd_file.put_line
2951: (which => fnd_file.log,
2952: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2953: fnd_file.put_line
2954: (which => fnd_file.log,
2947: fnd_file.put_line
2948: (which => fnd_file.log,
2949: buff => 'for unit/establishment: ');
2950: fnd_file.put_line
2951: (which => fnd_file.log,
2952: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2953: fnd_file.put_line
2954: (which => fnd_file.log,
2955: buff => 'address: ');
2949: buff => 'for unit/establishment: ');
2950: fnd_file.put_line
2951: (which => fnd_file.log,
2952: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2953: fnd_file.put_line
2954: (which => fnd_file.log,
2955: buff => 'address: ');
2956: fnd_file.put_line
2957: (which => fnd_file.log,
2950: fnd_file.put_line
2951: (which => fnd_file.log,
2952: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2953: fnd_file.put_line
2954: (which => fnd_file.log,
2955: buff => 'address: ');
2956: fnd_file.put_line
2957: (which => fnd_file.log,
2958: buff => '<<'||l_c_estab_details.unit_address_req_5||' '
2952: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2953: fnd_file.put_line
2954: (which => fnd_file.log,
2955: buff => 'address: ');
2956: fnd_file.put_line
2957: (which => fnd_file.log,
2958: buff => '<<'||l_c_estab_details.unit_address_req_5||' '
2959: ||l_c_estab_details.unit_address_6||' '
2960: ||l_c_estab_details.city_7||' '
2953: fnd_file.put_line
2954: (which => fnd_file.log,
2955: buff => 'address: ');
2956: fnd_file.put_line
2957: (which => fnd_file.log,
2958: buff => '<<'||l_c_estab_details.unit_address_req_5||' '
2959: ||l_c_estab_details.unit_address_6||' '
2960: ||l_c_estab_details.city_7||' '
2961: ||l_c_estab_details.state_8||' '
2959: ||l_c_estab_details.unit_address_6||' '
2960: ||l_c_estab_details.city_7||' '
2961: ||l_c_estab_details.state_8||' '
2962: ||l_c_estab_details.zip_code_9||'>>');
2963: fnd_file.put_line
2964: (which => fnd_file.log,
2965: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2966: fnd_file.put_line
2967: (which => fnd_file.log,
2960: ||l_c_estab_details.city_7||' '
2961: ||l_c_estab_details.state_8||' '
2962: ||l_c_estab_details.zip_code_9||'>>');
2963: fnd_file.put_line
2964: (which => fnd_file.log,
2965: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2966: fnd_file.put_line
2967: (which => fnd_file.log,
2968: buff => ' ');
2962: ||l_c_estab_details.zip_code_9||'>>');
2963: fnd_file.put_line
2964: (which => fnd_file.log,
2965: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2966: fnd_file.put_line
2967: (which => fnd_file.log,
2968: buff => ' ');
2969: fnd_file.put_line
2970: (which => fnd_file.log,
2963: fnd_file.put_line
2964: (which => fnd_file.log,
2965: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2966: fnd_file.put_line
2967: (which => fnd_file.log,
2968: buff => ' ');
2969: fnd_file.put_line
2970: (which => fnd_file.log,
2971: buff => '~OR~');
2965: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2966: fnd_file.put_line
2967: (which => fnd_file.log,
2968: buff => ' ');
2969: fnd_file.put_line
2970: (which => fnd_file.log,
2971: buff => '~OR~');
2972: fnd_file.put_line
2973: (which => fnd_file.log,
2966: fnd_file.put_line
2967: (which => fnd_file.log,
2968: buff => ' ');
2969: fnd_file.put_line
2970: (which => fnd_file.log,
2971: buff => '~OR~');
2972: fnd_file.put_line
2973: (which => fnd_file.log,
2974: buff => ' ');
2968: buff => ' ');
2969: fnd_file.put_line
2970: (which => fnd_file.log,
2971: buff => '~OR~');
2972: fnd_file.put_line
2973: (which => fnd_file.log,
2974: buff => ' ');
2975: fnd_file.put_line
2976: (which => fnd_file.log,
2969: fnd_file.put_line
2970: (which => fnd_file.log,
2971: buff => '~OR~');
2972: fnd_file.put_line
2973: (which => fnd_file.log,
2974: buff => ' ');
2975: fnd_file.put_line
2976: (which => fnd_file.log,
2977: buff => 'enter at organization level - for the '
2971: buff => '~OR~');
2972: fnd_file.put_line
2973: (which => fnd_file.log,
2974: buff => ' ');
2975: fnd_file.put_line
2976: (which => fnd_file.log,
2977: buff => 'enter at organization level - for the '
2978: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2979: fnd_file.put_line
2972: fnd_file.put_line
2973: (which => fnd_file.log,
2974: buff => ' ');
2975: fnd_file.put_line
2976: (which => fnd_file.log,
2977: buff => 'enter at organization level - for the '
2978: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2979: fnd_file.put_line
2980: (which => fnd_file.log,
2975: fnd_file.put_line
2976: (which => fnd_file.log,
2977: buff => 'enter at organization level - for the '
2978: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2979: fnd_file.put_line
2980: (which => fnd_file.log,
2981: buff => 'IN parent entity EEO1/VETS Establishment Data');
2982: fnd_file.put_line
2983: (which => fnd_file.log,
2976: (which => fnd_file.log,
2977: buff => 'enter at organization level - for the '
2978: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2979: fnd_file.put_line
2980: (which => fnd_file.log,
2981: buff => 'IN parent entity EEO1/VETS Establishment Data');
2982: fnd_file.put_line
2983: (which => fnd_file.log,
2984: buff => '*Nav path = Organization/Description/Parent Entity/'||
2978: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2979: fnd_file.put_line
2980: (which => fnd_file.log,
2981: buff => 'IN parent entity EEO1/VETS Establishment Data');
2982: fnd_file.put_line
2983: (which => fnd_file.log,
2984: buff => '*Nav path = Organization/Description/Parent Entity/'||
2985: 'Others/EEO1/VETS Establishment Data*');
2986: fnd_file.put_line
2979: fnd_file.put_line
2980: (which => fnd_file.log,
2981: buff => 'IN parent entity EEO1/VETS Establishment Data');
2982: fnd_file.put_line
2983: (which => fnd_file.log,
2984: buff => '*Nav path = Organization/Description/Parent Entity/'||
2985: 'Others/EEO1/VETS Establishment Data*');
2986: fnd_file.put_line
2987: (which => fnd_file.log,
2982: fnd_file.put_line
2983: (which => fnd_file.log,
2984: buff => '*Nav path = Organization/Description/Parent Entity/'||
2985: 'Others/EEO1/VETS Establishment Data*');
2986: fnd_file.put_line
2987: (which => fnd_file.log,
2988: buff => ' ');
2989: fnd_file.put_line
2990: (which => fnd_file.log,
2983: (which => fnd_file.log,
2984: buff => '*Nav path = Organization/Description/Parent Entity/'||
2985: 'Others/EEO1/VETS Establishment Data*');
2986: fnd_file.put_line
2987: (which => fnd_file.log,
2988: buff => ' ');
2989: fnd_file.put_line
2990: (which => fnd_file.log,
2991: buff => '*==================================================*');
2985: 'Others/EEO1/VETS Establishment Data*');
2986: fnd_file.put_line
2987: (which => fnd_file.log,
2988: buff => ' ');
2989: fnd_file.put_line
2990: (which => fnd_file.log,
2991: buff => '*==================================================*');
2992: RAISE hr_utility.hr_error;
2993: END IF; --(l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL)
2986: fnd_file.put_line
2987: (which => fnd_file.log,
2988: buff => ' ');
2989: fnd_file.put_line
2990: (which => fnd_file.log,
2991: buff => '*==================================================*');
2992: RAISE hr_utility.hr_error;
2993: END IF; --(l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL)
2994:
2994:
2995: IF (l_org_rec.title_cert_off_22 IS NULL OR
2996: l_org_rec.name_cert_off_23 IS NULL OR
2997: l_org_rec.tel_num_24 IS NULL) THEN
2998: fnd_file.put_line
2999: (which => fnd_file.log,
3000: buff => '==================================');
3001: fnd_file.put_line
3002: (which => fnd_file.log,
2995: IF (l_org_rec.title_cert_off_22 IS NULL OR
2996: l_org_rec.name_cert_off_23 IS NULL OR
2997: l_org_rec.tel_num_24 IS NULL) THEN
2998: fnd_file.put_line
2999: (which => fnd_file.log,
3000: buff => '==================================');
3001: fnd_file.put_line
3002: (which => fnd_file.log,
3003: buff => ' ');
2997: l_org_rec.tel_num_24 IS NULL) THEN
2998: fnd_file.put_line
2999: (which => fnd_file.log,
3000: buff => '==================================');
3001: fnd_file.put_line
3002: (which => fnd_file.log,
3003: buff => ' ');
3004: fnd_file.put_line
3005: (which => fnd_file.log,
2998: fnd_file.put_line
2999: (which => fnd_file.log,
3000: buff => '==================================');
3001: fnd_file.put_line
3002: (which => fnd_file.log,
3003: buff => ' ');
3004: fnd_file.put_line
3005: (which => fnd_file.log,
3006: buff => 'Fields 22/23/24 - Title of certifying official AND'
3000: buff => '==================================');
3001: fnd_file.put_line
3002: (which => fnd_file.log,
3003: buff => ' ');
3004: fnd_file.put_line
3005: (which => fnd_file.log,
3006: buff => 'Fields 22/23/24 - Title of certifying official AND'
3007: ||'/or their name AND phone NUMBER IS blank. ');
3008: fnd_file.put_line
3001: fnd_file.put_line
3002: (which => fnd_file.log,
3003: buff => ' ');
3004: fnd_file.put_line
3005: (which => fnd_file.log,
3006: buff => 'Fields 22/23/24 - Title of certifying official AND'
3007: ||'/or their name AND phone NUMBER IS blank. ');
3008: fnd_file.put_line
3009: (which => fnd_file.log,
3004: fnd_file.put_line
3005: (which => fnd_file.log,
3006: buff => 'Fields 22/23/24 - Title of certifying official AND'
3007: ||'/or their name AND phone NUMBER IS blank. ');
3008: fnd_file.put_line
3009: (which => fnd_file.log,
3010: buff => 'These are required fields. Please enter '
3011: ||'at organization level for the Business Group ');
3012: fnd_file.put_line
3005: (which => fnd_file.log,
3006: buff => 'Fields 22/23/24 - Title of certifying official AND'
3007: ||'/or their name AND phone NUMBER IS blank. ');
3008: fnd_file.put_line
3009: (which => fnd_file.log,
3010: buff => 'These are required fields. Please enter '
3011: ||'at organization level for the Business Group ');
3012: fnd_file.put_line
3013: (which => fnd_file.log,
3008: fnd_file.put_line
3009: (which => fnd_file.log,
3010: buff => 'These are required fields. Please enter '
3011: ||'at organization level for the Business Group ');
3012: fnd_file.put_line
3013: (which => fnd_file.log,
3014: buff => ' ');
3015: fnd_file.put_line
3016: (which => fnd_file.log,
3009: (which => fnd_file.log,
3010: buff => 'These are required fields. Please enter '
3011: ||'at organization level for the Business Group ');
3012: fnd_file.put_line
3013: (which => fnd_file.log,
3014: buff => ' ');
3015: fnd_file.put_line
3016: (which => fnd_file.log,
3017: buff => '<<'||l_org_rec.org_name||'>>');
3011: ||'at organization level for the Business Group ');
3012: fnd_file.put_line
3013: (which => fnd_file.log,
3014: buff => ' ');
3015: fnd_file.put_line
3016: (which => fnd_file.log,
3017: buff => '<<'||l_org_rec.org_name||'>>');
3018: fnd_file.put_line
3019: (which => fnd_file.log,
3012: fnd_file.put_line
3013: (which => fnd_file.log,
3014: buff => ' ');
3015: fnd_file.put_line
3016: (which => fnd_file.log,
3017: buff => '<<'||l_org_rec.org_name||'>>');
3018: fnd_file.put_line
3019: (which => fnd_file.log,
3020: buff => ' ');
3014: buff => ' ');
3015: fnd_file.put_line
3016: (which => fnd_file.log,
3017: buff => '<<'||l_org_rec.org_name||'>>');
3018: fnd_file.put_line
3019: (which => fnd_file.log,
3020: buff => ' ');
3021: fnd_file.put_line
3022: (which => fnd_file.log,
3015: fnd_file.put_line
3016: (which => fnd_file.log,
3017: buff => '<<'||l_org_rec.org_name||'>>');
3018: fnd_file.put_line
3019: (which => fnd_file.log,
3020: buff => ' ');
3021: fnd_file.put_line
3022: (which => fnd_file.log,
3023: buff => 'nav path = '
3017: buff => '<<'||l_org_rec.org_name||'>>');
3018: fnd_file.put_line
3019: (which => fnd_file.log,
3020: buff => ' ');
3021: fnd_file.put_line
3022: (which => fnd_file.log,
3023: buff => 'nav path = '
3024: ||'Business Group Organization/Description/Business Group'
3025: ||'/Others/EEO Report Details');
3018: fnd_file.put_line
3019: (which => fnd_file.log,
3020: buff => ' ');
3021: fnd_file.put_line
3022: (which => fnd_file.log,
3023: buff => 'nav path = '
3024: ||'Business Group Organization/Description/Business Group'
3025: ||'/Others/EEO Report Details');
3026: fnd_file.put_line
3022: (which => fnd_file.log,
3023: buff => 'nav path = '
3024: ||'Business Group Organization/Description/Business Group'
3025: ||'/Others/EEO Report Details');
3026: fnd_file.put_line
3027: (which => fnd_file.log,
3028: buff => '(unit name: '
3029: ||l_c_estab_details.unit_name_4||' address: '
3030: ||l_c_estab_details.unit_address_req_5||' '
3023: buff => 'nav path = '
3024: ||'Business Group Organization/Description/Business Group'
3025: ||'/Others/EEO Report Details');
3026: fnd_file.put_line
3027: (which => fnd_file.log,
3028: buff => '(unit name: '
3029: ||l_c_estab_details.unit_name_4||' address: '
3030: ||l_c_estab_details.unit_address_req_5||' '
3031: ||l_c_estab_details.zip_code_9||')');
3028: buff => '(unit name: '
3029: ||l_c_estab_details.unit_name_4||' address: '
3030: ||l_c_estab_details.unit_address_req_5||' '
3031: ||l_c_estab_details.zip_code_9||')');
3032: fnd_file.put_line
3033: (which => fnd_file.log,
3034: buff => ' ');
3035: fnd_file.put_line
3036: (which => fnd_file.log,
3029: ||l_c_estab_details.unit_name_4||' address: '
3030: ||l_c_estab_details.unit_address_req_5||' '
3031: ||l_c_estab_details.zip_code_9||')');
3032: fnd_file.put_line
3033: (which => fnd_file.log,
3034: buff => ' ');
3035: fnd_file.put_line
3036: (which => fnd_file.log,
3037: buff => '==================================');
3031: ||l_c_estab_details.zip_code_9||')');
3032: fnd_file.put_line
3033: (which => fnd_file.log,
3034: buff => ' ');
3035: fnd_file.put_line
3036: (which => fnd_file.log,
3037: buff => '==================================');
3038: RAISE hr_utility.hr_error;
3039: END IF;--l_org_rec.title_cert_off_22 IS NULL
3032: fnd_file.put_line
3033: (which => fnd_file.log,
3034: buff => ' ');
3035: fnd_file.put_line
3036: (which => fnd_file.log,
3037: buff => '==================================');
3038: RAISE hr_utility.hr_error;
3039: END IF;--l_org_rec.title_cert_off_22 IS NULL
3040:
4436: := nvl(l_consol_rec.a_11_last_year_grand_total,0) +
4437: nvl(l_estab_rec.a_11_last_year_grand_total,0);
4438:
4439: g_message_text := 'l_c_lastyears_details.p_total_a -> '|| l_c_lastyears_details.p_total_a;
4440: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
4441:
4442: g_message_text := 'l_consol_rec.a_11_last_year_grand_total -> '|| l_consol_rec.a_11_last_year_grand_total;
4443: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
4444:
4439: g_message_text := 'l_c_lastyears_details.p_total_a -> '|| l_c_lastyears_details.p_total_a;
4440: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
4441:
4442: g_message_text := 'l_consol_rec.a_11_last_year_grand_total -> '|| l_consol_rec.a_11_last_year_grand_total;
4443: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
4444:
4445: l_estab_rec.b_11_last_year_grand_total := l_c_lastyears_details.p_wmale_b;
4446: l_consol_rec.b_11_last_year_grand_total
4447: := nvl(l_consol_rec.b_11_last_year_grand_total,0) +
4562: --hr_utility.trace_on(NULL,'ORACLE');
4563: hr_utility.set_location('Entering..'||l_proc,10);
4564:
4565: g_message_text := 'EEO1 Entering...'||l_proc||' 10';
4566: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4567:
4568:
4569:
4570: set_org_details(p_hierarchy_version_id => p_hierarchy_version_id,
4583: END IF;
4584: CLOSE c_nodes;
4585:
4586: g_message_text := 'EEO1 l_org_rec.form_type -> '||l_org_rec.form_type;
4587: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4588:
4589: g_message_text := 'EEO1 p_hierarchy_version_id -> '||p_hierarchy_version_id;
4590: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4591:
4586: g_message_text := 'EEO1 l_org_rec.form_type -> '||l_org_rec.form_type;
4587: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4588:
4589: g_message_text := 'EEO1 p_hierarchy_version_id -> '||p_hierarchy_version_id;
4590: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4591:
4592: g_message_text := 'EEO1 p_business_group_id -> '|| p_business_group_id;
4593: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4594:
4589: g_message_text := 'EEO1 p_hierarchy_version_id -> '||p_hierarchy_version_id;
4590: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4591:
4592: g_message_text := 'EEO1 p_business_group_id -> '|| p_business_group_id;
4593: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4594:
4595: g_message_text := 'EEO1 l_start_date -> '|| l_start_date;
4596: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4597:
4592: g_message_text := 'EEO1 p_business_group_id -> '|| p_business_group_id;
4593: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4594:
4595: g_message_text := 'EEO1 l_start_date -> '|| l_start_date;
4596: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4597:
4598: g_message_text := 'EEO1 l_end_date -> '|| l_end_date;
4599: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4600:
4595: g_message_text := 'EEO1 l_start_date -> '|| l_start_date;
4596: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4597:
4598: g_message_text := 'EEO1 l_end_date -> '|| l_end_date;
4599: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4600:
4601: g_message_text := 'EEO1 p_report_mode -> '|| p_report_mode;
4602: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4603:
4598: g_message_text := 'EEO1 l_end_date -> '|| l_end_date;
4599: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4600:
4601: g_message_text := 'EEO1 p_report_mode -> '|| p_report_mode;
4602: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4603:
4604:
4605: loop_through_establishments(p_hierarchy_version_id => p_hierarchy_version_id,
4606: p_business_group_id => p_business_group_id,