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 :=
350: -- for selection FROM location eit
351: --
352: l_report_year := SUBSTR(l_org_rec.l_d1_payroll_period_18,1,4);
353: l_prev_year_filed := TO_CHAR(TO_NUMBER(l_report_year - 1));
354: /*fnd_file.put_line
355: (which => fnd_file.log,
356: buff => 'l_org_rec.name_cert_off_23 '
357: ||l_org_rec.name_cert_off_23);
358: fnd_file.put_line
351: --
352: l_report_year := SUBSTR(l_org_rec.l_d1_payroll_period_18,1,4);
353: l_prev_year_filed := TO_CHAR(TO_NUMBER(l_report_year - 1));
354: /*fnd_file.put_line
355: (which => fnd_file.log,
356: buff => 'l_org_rec.name_cert_off_23 '
357: ||l_org_rec.name_cert_off_23);
358: fnd_file.put_line
359: (which => fnd_file.log,
354: /*fnd_file.put_line
355: (which => fnd_file.log,
356: buff => 'l_org_rec.name_cert_off_23 '
357: ||l_org_rec.name_cert_off_23);
358: fnd_file.put_line
359: (which => fnd_file.log,
360: buff => 'sustr of l_org_rec.name_cert_off_23 '
361: ||substr(l_org_rec.name_cert_off_23,1,3)); */
362:
355: (which => fnd_file.log,
356: buff => 'l_org_rec.name_cert_off_23 '
357: ||l_org_rec.name_cert_off_23);
358: fnd_file.put_line
359: (which => fnd_file.log,
360: buff => 'sustr of l_org_rec.name_cert_off_23 '
361: ||substr(l_org_rec.name_cert_off_23,1,3)); */
362:
363: BEGIN --Local1
362:
363: BEGIN --Local1
364: -- error IF required fields not present.
365: IF l_org_rec.company_number_1 IS NULL THEN
366: fnd_file.put_line
367: (which => fnd_file.log,
368: buff => '==================================');
369: fnd_file.put_line
370: (which => fnd_file.log,
363: BEGIN --Local1
364: -- error IF required fields not present.
365: IF l_org_rec.company_number_1 IS NULL THEN
366: fnd_file.put_line
367: (which => fnd_file.log,
368: buff => '==================================');
369: fnd_file.put_line
370: (which => fnd_file.log,
371: buff => '*** Field 1 - company NUMBER is blank, '
365: IF l_org_rec.company_number_1 IS NULL THEN
366: fnd_file.put_line
367: (which => fnd_file.log,
368: buff => '==================================');
369: fnd_file.put_line
370: (which => fnd_file.log,
371: buff => '*** Field 1 - company NUMBER is blank, '
372: ||'but this is a required field - Please enter. '
373: ||'This is entered IN the GRE parent Entity Data '
366: fnd_file.put_line
367: (which => fnd_file.log,
368: buff => '==================================');
369: fnd_file.put_line
370: (which => fnd_file.log,
371: buff => '*** Field 1 - company NUMBER is blank, '
372: ||'but this is a required field - Please enter. '
373: ||'This is entered IN the GRE parent Entity Data '
374: ||'nav=Organization/Description/Parent Entity/Others ***');
371: buff => '*** Field 1 - company NUMBER is blank, '
372: ||'but this is a required field - Please enter. '
373: ||'This is entered IN the GRE parent Entity Data '
374: ||'nav=Organization/Description/Parent Entity/Others ***');
375: fnd_file.put_line
376: (which => fnd_file.log,
377: buff => '==================================');
378: fnd_file.put_line
379: (which => fnd_file.log,
372: ||'but this is a required field - Please enter. '
373: ||'This is entered IN the GRE parent Entity Data '
374: ||'nav=Organization/Description/Parent Entity/Others ***');
375: fnd_file.put_line
376: (which => fnd_file.log,
377: buff => '==================================');
378: fnd_file.put_line
379: (which => fnd_file.log,
380: buff => 'Field 14 - Question C2 may also be blank '
374: ||'nav=Organization/Description/Parent Entity/Others ***');
375: fnd_file.put_line
376: (which => fnd_file.log,
377: buff => '==================================');
378: fnd_file.put_line
379: (which => fnd_file.log,
380: buff => 'Field 14 - Question C2 may also be blank '
381: ||'(is company affiliated with Companies of at least 100 emps?) '
382: ||'This is also a required field - which the app will force you to '
375: fnd_file.put_line
376: (which => fnd_file.log,
377: buff => '==================================');
378: fnd_file.put_line
379: (which => fnd_file.log,
380: buff => 'Field 14 - Question C2 may also be blank '
381: ||'(is company affiliated with Companies of at least 100 emps?) '
382: ||'This is also a required field - which the app will force you to '
383: ||'enter at organization level for the GRE parent Entity Data. '
381: ||'(is company affiliated with Companies of at least 100 emps?) '
382: ||'This is also a required field - which the app will force you to '
383: ||'enter at organization level for the GRE parent Entity Data. '
384: ||'nav=Organization/Description/Parent Entity/Others ');
385: fnd_file.put_line
386: (which => fnd_file.log,
387: buff => '==================================');
388: RAISE hr_utility.hr_error;
389: END IF;
382: ||'This is also a required field - which the app will force you to '
383: ||'enter at organization level for the GRE parent Entity Data. '
384: ||'nav=Organization/Description/Parent Entity/Others ');
385: fnd_file.put_line
386: (which => fnd_file.log,
387: buff => '==================================');
388: RAISE hr_utility.hr_error;
389: END IF;
390: END; --Local1
398:
399: IF UPPER(SUBSTR(l_org_rec.name_cert_off_23,1,3)) = UPPER('THE') THEN
400: l_org_rec.name_cert_off_23 :=
401: ltrim(l_org_rec.name_cert_off_23,'THEthe');
402: -- fnd_file.put_line
403: --(which => fnd_file.log,
404: -- buff => 'l_org_rec.name_cert_off_23 '
405: -- ||l_org_rec.name_cert_off_23);
406: l_org_rec.name_cert_off_23 :=
399: IF UPPER(SUBSTR(l_org_rec.name_cert_off_23,1,3)) = UPPER('THE') THEN
400: l_org_rec.name_cert_off_23 :=
401: ltrim(l_org_rec.name_cert_off_23,'THEthe');
402: -- fnd_file.put_line
403: --(which => fnd_file.log,
404: -- buff => 'l_org_rec.name_cert_off_23 '
405: -- ||l_org_rec.name_cert_off_23);
406: l_org_rec.name_cert_off_23 :=
407: l_org_rec.name_cert_off_23||' The';
404: -- buff => 'l_org_rec.name_cert_off_23 '
405: -- ||l_org_rec.name_cert_off_23);
406: l_org_rec.name_cert_off_23 :=
407: l_org_rec.name_cert_off_23||' The';
408: -- fnd_file.put_line
409: --(which => fnd_file.log,
410: -- buff => 'l_org_rec.name_cert_off_23 '
411: -- ||l_org_rec.name_cert_off_23);
412: END IF;
405: -- ||l_org_rec.name_cert_off_23);
406: l_org_rec.name_cert_off_23 :=
407: l_org_rec.name_cert_off_23||' The';
408: -- fnd_file.put_line
409: --(which => fnd_file.log,
410: -- buff => 'l_org_rec.name_cert_off_23 '
411: -- ||l_org_rec.name_cert_off_23);
412: END IF;
413:
411: -- ||l_org_rec.name_cert_off_23);
412: END IF;
413:
414: --
415: /* fnd_file.put_line
416: (which => fnd_file.log,
417: buff => 'l_org_rec.l_d1_payroll_period_18 after '
418: ||l_org_rec.l_d1_payroll_period_18);
419: --
412: END IF;
413:
414: --
415: /* fnd_file.put_line
416: (which => fnd_file.log,
417: buff => 'l_org_rec.l_d1_payroll_period_18 after '
418: ||l_org_rec.l_d1_payroll_period_18);
419: --
420: fnd_file.put_line
416: (which => fnd_file.log,
417: buff => 'l_org_rec.l_d1_payroll_period_18 after '
418: ||l_org_rec.l_d1_payroll_period_18);
419: --
420: fnd_file.put_line
421: (which => fnd_file.log,
422: buff => 'l_report_year '||l_report_year);
423: --
424: fnd_file.put_line
417: buff => 'l_org_rec.l_d1_payroll_period_18 after '
418: ||l_org_rec.l_d1_payroll_period_18);
419: --
420: fnd_file.put_line
421: (which => fnd_file.log,
422: buff => 'l_report_year '||l_report_year);
423: --
424: fnd_file.put_line
425: (which => fnd_file.log,
420: fnd_file.put_line
421: (which => fnd_file.log,
422: buff => 'l_report_year '||l_report_year);
423: --
424: fnd_file.put_line
425: (which => fnd_file.log,
426: buff => 'l_prev_year_filed '||l_prev_year_filed); */
427:
428: END set_org_details;
421: (which => fnd_file.log,
422: buff => 'l_report_year '||l_report_year);
423: --
424: fnd_file.put_line
425: (which => fnd_file.log,
426: buff => 'l_prev_year_filed '||l_prev_year_filed); */
427:
428: END set_org_details;
429:
443: IF l_org_rec.form_type = 'M' THEN
444:
445: IF l_consol_rec.unit_name_4 IS NULL THEN
446:
447: fnd_file.put_line
448: (which => fnd_file.log,
449: buff => ' ');
450:
451: fnd_file.put_line
444:
445: IF l_consol_rec.unit_name_4 IS NULL THEN
446:
447: fnd_file.put_line
448: (which => fnd_file.log,
449: buff => ' ');
450:
451: fnd_file.put_line
452: (which => fnd_file.log,
447: fnd_file.put_line
448: (which => fnd_file.log,
449: buff => ' ');
450:
451: fnd_file.put_line
452: (which => fnd_file.log,
453: buff => ' UNIT NAME OR NUMBER SHOULD NOT BE NULL FOR CONSOLIDATED REPORT.'
454: ||'THIS INFORMATION COMES FROM HEADQUARTERS ESTABLISHMENT.'
455: ||'The unit NUMBER IS ' || l_consol_rec.unit_number_3
448: (which => fnd_file.log,
449: buff => ' ');
450:
451: fnd_file.put_line
452: (which => fnd_file.log,
453: buff => ' UNIT NAME OR NUMBER SHOULD NOT BE NULL FOR CONSOLIDATED REPORT.'
454: ||'THIS INFORMATION COMES FROM HEADQUARTERS ESTABLISHMENT.'
455: ||'The unit NUMBER IS ' || l_consol_rec.unit_number_3
456: ||'The unit name IS ' || l_consol_rec.unit_name_4
455: ||'The unit NUMBER IS ' || l_consol_rec.unit_number_3
456: ||'The unit name IS ' || l_consol_rec.unit_name_4
457: ||'The unit address IS ' || l_consol_rec.unit_address_req_5);
458:
459: fnd_file.put_line
460: (which => fnd_file.log,
461: buff => 'Reported field IN the EEO1 Specific Data Extra '
462: ||'Information Type ');
463:
456: ||'The unit name IS ' || l_consol_rec.unit_name_4
457: ||'The unit address IS ' || l_consol_rec.unit_address_req_5);
458:
459: fnd_file.put_line
460: (which => fnd_file.log,
461: buff => 'Reported field IN the EEO1 Specific Data Extra '
462: ||'Information Type ');
463:
464: fnd_file.put_line
460: (which => fnd_file.log,
461: buff => 'Reported field IN the EEO1 Specific Data Extra '
462: ||'Information Type ');
463:
464: fnd_file.put_line
465: (which => fnd_file.log,
466: buff => ' ');
467:
468: END IF; --l_consol_rec.unit_name_4 IS NULL
461: buff => 'Reported field IN the EEO1 Specific Data Extra '
462: ||'Information Type ');
463:
464: fnd_file.put_line
465: (which => fnd_file.log,
466: buff => ' ');
467:
468: END IF; --l_consol_rec.unit_name_4 IS NULL
469:
870: lpad(l_consol_rec.o_10_grand_total,7,0);
871: --
872: /* g_message_text := 'd1) l_consol_rec.a_1_total_mf IN string '
873: ||l_consol_rec.a_1_total_mf;
874: fnd_file.put_line
875: (which => fnd_file.log,
876: buff => g_message_text);
877: g_message_text := ' ';
878: fnd_file.put_line
871: --
872: /* g_message_text := 'd1) l_consol_rec.a_1_total_mf IN string '
873: ||l_consol_rec.a_1_total_mf;
874: fnd_file.put_line
875: (which => fnd_file.log,
876: buff => g_message_text);
877: g_message_text := ' ';
878: fnd_file.put_line
879: (which => fnd_file.log,
874: fnd_file.put_line
875: (which => fnd_file.log,
876: buff => g_message_text);
877: g_message_text := ' ';
878: fnd_file.put_line
879: (which => fnd_file.log,
880: buff => g_message_text);
881: g_message_text := 'e1) put line for l_string for consolidated RECORD ';
882: fnd_file.put_line
875: (which => fnd_file.log,
876: buff => g_message_text);
877: g_message_text := ' ';
878: fnd_file.put_line
879: (which => fnd_file.log,
880: buff => g_message_text);
881: g_message_text := 'e1) put line for l_string for consolidated RECORD ';
882: fnd_file.put_line
883: (which => fnd_file.log,
878: fnd_file.put_line
879: (which => fnd_file.log,
880: buff => g_message_text);
881: g_message_text := 'e1) put line for l_string for consolidated RECORD ';
882: fnd_file.put_line
883: (which => fnd_file.log,
884: buff => g_message_text);
885: g_message_text := ' ';
886: fnd_file.put_line
879: (which => fnd_file.log,
880: buff => g_message_text);
881: g_message_text := 'e1) put line for l_string for consolidated RECORD ';
882: fnd_file.put_line
883: (which => fnd_file.log,
884: buff => g_message_text);
885: g_message_text := ' ';
886: fnd_file.put_line
887: (which => fnd_file.log,
882: fnd_file.put_line
883: (which => fnd_file.log,
884: buff => g_message_text);
885: g_message_text := ' ';
886: fnd_file.put_line
887: (which => fnd_file.log,
888: buff => g_message_text); */
889: fnd_file.put_line
890: (which => fnd_file.output,
883: (which => fnd_file.log,
884: buff => g_message_text);
885: g_message_text := ' ';
886: fnd_file.put_line
887: (which => fnd_file.log,
888: buff => g_message_text); */
889: fnd_file.put_line
890: (which => fnd_file.output,
891: buff => l_string);
885: g_message_text := ' ';
886: fnd_file.put_line
887: (which => fnd_file.log,
888: buff => g_message_text); */
889: fnd_file.put_line
890: (which => fnd_file.output,
891: buff => l_string);
892:
893: END IF; -- l_org_rec.form_type = 'M'
886: fnd_file.put_line
887: (which => fnd_file.log,
888: buff => g_message_text); */
889: fnd_file.put_line
890: (which => fnd_file.output,
891: buff => l_string);
892:
893: END IF; -- l_org_rec.form_type = 'M'
894: hr_utility.set_location('Leaving..' || l_proc,100);
907: hr_utility.trace('l_estab_rec.unit_number_3 : '||l_estab_rec.unit_number_3);
908: hr_utility.trace('l_estab_rec.unit_name_4 : '||l_estab_rec.unit_name_4);
909: hr_utility.trace('l_estab_rec.unit_address_5: '||l_estab_rec.unit_address_req_5);
910:
911: /* fnd_file.put_line
912: (which => fnd_file.log,
913: buff => ' ');
914: fnd_file.put_line
915: (which => fnd_file.log,
908: hr_utility.trace('l_estab_rec.unit_name_4 : '||l_estab_rec.unit_name_4);
909: hr_utility.trace('l_estab_rec.unit_address_5: '||l_estab_rec.unit_address_req_5);
910:
911: /* fnd_file.put_line
912: (which => fnd_file.log,
913: buff => ' ');
914: fnd_file.put_line
915: (which => fnd_file.log,
916: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
910:
911: /* fnd_file.put_line
912: (which => fnd_file.log,
913: buff => ' ');
914: fnd_file.put_line
915: (which => fnd_file.log,
916: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
917: fnd_file.put_line
918: (which => fnd_file.log,
911: /* fnd_file.put_line
912: (which => fnd_file.log,
913: buff => ' ');
914: fnd_file.put_line
915: (which => fnd_file.log,
916: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
917: fnd_file.put_line
918: (which => fnd_file.log,
919: buff => ' PROCEDURE write_establishment_record ');
913: buff => ' ');
914: fnd_file.put_line
915: (which => fnd_file.log,
916: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
917: fnd_file.put_line
918: (which => fnd_file.log,
919: buff => ' PROCEDURE write_establishment_record ');
920: fnd_file.put_line
921: (which => fnd_file.log,
914: fnd_file.put_line
915: (which => fnd_file.log,
916: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
917: fnd_file.put_line
918: (which => fnd_file.log,
919: buff => ' PROCEDURE write_establishment_record ');
920: fnd_file.put_line
921: (which => fnd_file.log,
922: buff => '-------------------------------------------------------------');
916: buff => 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
917: fnd_file.put_line
918: (which => fnd_file.log,
919: buff => ' PROCEDURE write_establishment_record ');
920: fnd_file.put_line
921: (which => fnd_file.log,
922: buff => '-------------------------------------------------------------');
923: */
924: --
917: fnd_file.put_line
918: (which => fnd_file.log,
919: buff => ' PROCEDURE write_establishment_record ');
920: fnd_file.put_line
921: (which => fnd_file.log,
922: buff => '-------------------------------------------------------------');
923: */
924: --
925: -- Set Status
1005: l_org_rec.l_status_code_2 := '8';
1006: --
1007: -- not HQ AND under 50 emps at location
1008: /*
1009: fnd_file.put_line
1010: (which => fnd_file.log,
1011: buff => 'l_estab_rec.unit_number_3: '||l_estab_rec.unit_number_3);
1012: */
1013: -- END IF;
1006: --
1007: -- not HQ AND under 50 emps at location
1008: /*
1009: fnd_file.put_line
1010: (which => fnd_file.log,
1011: buff => 'l_estab_rec.unit_number_3: '||l_estab_rec.unit_number_3);
1012: */
1013: -- END IF;
1014:
1022:
1023: IF l_estab_rec.unit_number_3 IS NOT NULL
1024: AND l_org_rec.l_status_code_2 IN ('8','9') THEN
1025:
1026: fnd_file.put_line
1027: (which => fnd_file.log,
1028: buff => ' ');
1029: fnd_file.put_line
1030: (which => fnd_file.log,
1023: IF l_estab_rec.unit_number_3 IS NOT NULL
1024: AND l_org_rec.l_status_code_2 IN ('8','9') THEN
1025:
1026: fnd_file.put_line
1027: (which => fnd_file.log,
1028: buff => ' ');
1029: fnd_file.put_line
1030: (which => fnd_file.log,
1031: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1025:
1026: fnd_file.put_line
1027: (which => fnd_file.log,
1028: buff => ' ');
1029: fnd_file.put_line
1030: (which => fnd_file.log,
1031: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1032: || l_estab_rec.unit_name_4 || ') HAS EITHER '
1033: ||'NOT YET BEEN REPORTED OR IS UNDER 50 EMPS');
1026: fnd_file.put_line
1027: (which => fnd_file.log,
1028: buff => ' ');
1029: fnd_file.put_line
1030: (which => fnd_file.log,
1031: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1032: || l_estab_rec.unit_name_4 || ') HAS EITHER '
1033: ||'NOT YET BEEN REPORTED OR IS UNDER 50 EMPS');
1034: fnd_file.put_line
1030: (which => fnd_file.log,
1031: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1032: || l_estab_rec.unit_name_4 || ') HAS EITHER '
1033: ||'NOT YET BEEN REPORTED OR IS UNDER 50 EMPS');
1034: fnd_file.put_line
1035: (which => fnd_file.log,
1036: buff => ' ');
1037:
1038: ELSIF l_estab_rec.unit_number_3 IS NULL
1031: buff => ' UNIT NUMBER SHOULD BE NULL AS THIS LOCATION('
1032: || l_estab_rec.unit_name_4 || ') HAS EITHER '
1033: ||'NOT YET BEEN REPORTED OR IS UNDER 50 EMPS');
1034: fnd_file.put_line
1035: (which => fnd_file.log,
1036: buff => ' ');
1037:
1038: ELSIF l_estab_rec.unit_number_3 IS NULL
1039: AND l_org_rec.l_status_code_2 IN ('1','3','4','5') THEN
1037:
1038: ELSIF l_estab_rec.unit_number_3 IS NULL
1039: AND l_org_rec.l_status_code_2 IN ('1','3','4','5') THEN
1040:
1041: fnd_file.put_line
1042: (which => fnd_file.log,
1043: buff => ' ');
1044: fnd_file.put_line
1045: (which => fnd_file.log,
1038: ELSIF l_estab_rec.unit_number_3 IS NULL
1039: AND l_org_rec.l_status_code_2 IN ('1','3','4','5') THEN
1040:
1041: fnd_file.put_line
1042: (which => fnd_file.log,
1043: buff => ' ');
1044: fnd_file.put_line
1045: (which => fnd_file.log,
1046: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1040:
1041: fnd_file.put_line
1042: (which => fnd_file.log,
1043: buff => ' ');
1044: fnd_file.put_line
1045: (which => fnd_file.log,
1046: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1047: ||'THIS LOCATION HAS BEEN REPORTED ACCORDING TO THE Previously ');
1048: fnd_file.put_line
1041: fnd_file.put_line
1042: (which => fnd_file.log,
1043: buff => ' ');
1044: fnd_file.put_line
1045: (which => fnd_file.log,
1046: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1047: ||'THIS LOCATION HAS BEEN REPORTED ACCORDING TO THE Previously ');
1048: fnd_file.put_line
1049: (which => fnd_file.log,
1044: fnd_file.put_line
1045: (which => fnd_file.log,
1046: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1047: ||'THIS LOCATION HAS BEEN REPORTED ACCORDING TO THE Previously ');
1048: fnd_file.put_line
1049: (which => fnd_file.log,
1050: buff => 'Reported field IN the EEO1 Specific Data Extra '
1051: ||'Information Type. '
1052: ||' The unit NUMBER IS ' || l_estab_rec.unit_number_3
1045: (which => fnd_file.log,
1046: buff => '********** UNIT NAME AND NUMBER SHOULD NOT BE NULL AS '
1047: ||'THIS LOCATION HAS BEEN REPORTED ACCORDING TO THE Previously ');
1048: fnd_file.put_line
1049: (which => fnd_file.log,
1050: buff => 'Reported field IN the EEO1 Specific Data Extra '
1051: ||'Information Type. '
1052: ||' The unit NUMBER IS ' || l_estab_rec.unit_number_3
1053: ||' The unit name IS ' || l_estab_rec.unit_name_4
1052: ||' The unit NUMBER IS ' || l_estab_rec.unit_number_3
1053: ||' The unit name IS ' || l_estab_rec.unit_name_4
1054: ||' The unit address IS ' || l_estab_rec.unit_address_req_5
1055: || ' **********');
1056: fnd_file.put_line
1057: (which => fnd_file.log,
1058: buff => ' ');
1059:
1060: END IF; --l_estab_rec.unit_number_3 IS NOT NULL
1053: ||' The unit name IS ' || l_estab_rec.unit_name_4
1054: ||' The unit address IS ' || l_estab_rec.unit_address_req_5
1055: || ' **********');
1056: fnd_file.put_line
1057: (which => fnd_file.log,
1058: buff => ' ');
1059:
1060: END IF; --l_estab_rec.unit_number_3 IS NOT NULL
1061:
1060: END IF; --l_estab_rec.unit_number_3 IS NOT NULL
1061:
1062:
1063: g_message_text := '*2-for estab rec write form TYPE IS* '||l_org_rec.form_type;
1064: fnd_file.put_line
1065: (which => fnd_file.log,
1066: buff => g_message_text);
1067: g_message_text := '*2-l_estab_rec.reported_last_year_11 IS* '||l_estab_rec.reported_last_year_11;
1068: fnd_file.put_line
1061:
1062:
1063: g_message_text := '*2-for estab rec write form TYPE IS* '||l_org_rec.form_type;
1064: fnd_file.put_line
1065: (which => fnd_file.log,
1066: buff => g_message_text);
1067: g_message_text := '*2-l_estab_rec.reported_last_year_11 IS* '||l_estab_rec.reported_last_year_11;
1068: fnd_file.put_line
1069: (which => fnd_file.log,
1064: fnd_file.put_line
1065: (which => fnd_file.log,
1066: buff => g_message_text);
1067: g_message_text := '*2-l_estab_rec.reported_last_year_11 IS* '||l_estab_rec.reported_last_year_11;
1068: fnd_file.put_line
1069: (which => fnd_file.log,
1070: buff => g_message_text);
1071: g_message_text := '*2-l_estab_rec.hq IS* '||l_estab_rec.hq ;
1072: fnd_file.put_line
1065: (which => fnd_file.log,
1066: buff => g_message_text);
1067: g_message_text := '*2-l_estab_rec.reported_last_year_11 IS* '||l_estab_rec.reported_last_year_11;
1068: fnd_file.put_line
1069: (which => fnd_file.log,
1070: buff => g_message_text);
1071: g_message_text := '*2-l_estab_rec.hq IS* '||l_estab_rec.hq ;
1072: fnd_file.put_line
1073: (which => fnd_file.log,
1068: fnd_file.put_line
1069: (which => fnd_file.log,
1070: buff => g_message_text);
1071: g_message_text := '*2-l_estab_rec.hq IS* '||l_estab_rec.hq ;
1072: fnd_file.put_line
1073: (which => fnd_file.log,
1074: buff => g_message_text);
1075: g_message_text := '*2-status code IS* '||l_org_rec.l_status_code_2;
1076: fnd_file.put_line
1069: (which => fnd_file.log,
1070: buff => g_message_text);
1071: g_message_text := '*2-l_estab_rec.hq IS* '||l_estab_rec.hq ;
1072: fnd_file.put_line
1073: (which => fnd_file.log,
1074: buff => g_message_text);
1075: g_message_text := '*2-status code IS* '||l_org_rec.l_status_code_2;
1076: fnd_file.put_line
1077: (which => fnd_file.log,
1072: fnd_file.put_line
1073: (which => fnd_file.log,
1074: buff => g_message_text);
1075: g_message_text := '*2-status code IS* '||l_org_rec.l_status_code_2;
1076: fnd_file.put_line
1077: (which => fnd_file.log,
1078: buff => g_message_text);
1079: g_message_text := ' '||l_org_rec.l_status_code_2;
1080: fnd_file.put_line
1073: (which => fnd_file.log,
1074: buff => g_message_text);
1075: g_message_text := '*2-status code IS* '||l_org_rec.l_status_code_2;
1076: fnd_file.put_line
1077: (which => fnd_file.log,
1078: buff => g_message_text);
1079: g_message_text := ' '||l_org_rec.l_status_code_2;
1080: fnd_file.put_line
1081: (which => fnd_file.log,
1076: fnd_file.put_line
1077: (which => fnd_file.log,
1078: buff => g_message_text);
1079: g_message_text := ' '||l_org_rec.l_status_code_2;
1080: fnd_file.put_line
1081: (which => fnd_file.log,
1082: buff => g_message_text);
1083: END IF; ----l_org_rec.form_type = 'S'
1084: --
1077: (which => fnd_file.log,
1078: buff => g_message_text);
1079: g_message_text := ' '||l_org_rec.l_status_code_2;
1080: fnd_file.put_line
1081: (which => fnd_file.log,
1082: buff => g_message_text);
1083: END IF; ----l_org_rec.form_type = 'S'
1084: --
1085: -- include hawaii IN main processing
1107: hr_utility.trace('l_consol_rec.a_10_grand_total : '||l_consol_rec.a_10_grand_total);
1108: /*
1109: g_message_text := 'grand total for estab rep column a '
1110: ||'(total males AND females) ';
1111: fnd_file.put_line
1112: (which => fnd_file.log,
1113: buff => g_message_text);
1114: g_message_text := 'l_estab_rec.a_10_grand_total *'
1115: ||l_estab_rec.a_10_grand_total;
1108: /*
1109: g_message_text := 'grand total for estab rep column a '
1110: ||'(total males AND females) ';
1111: fnd_file.put_line
1112: (which => fnd_file.log,
1113: buff => g_message_text);
1114: g_message_text := 'l_estab_rec.a_10_grand_total *'
1115: ||l_estab_rec.a_10_grand_total;
1116: fnd_file.put_line
1112: (which => fnd_file.log,
1113: buff => g_message_text);
1114: g_message_text := 'l_estab_rec.a_10_grand_total *'
1115: ||l_estab_rec.a_10_grand_total;
1116: fnd_file.put_line
1117: (which => fnd_file.log,
1118: buff => g_message_text);
1119: fnd_file.put_line
1120: (which => fnd_file.log,
1113: buff => g_message_text);
1114: g_message_text := 'l_estab_rec.a_10_grand_total *'
1115: ||l_estab_rec.a_10_grand_total;
1116: fnd_file.put_line
1117: (which => fnd_file.log,
1118: buff => g_message_text);
1119: fnd_file.put_line
1120: (which => fnd_file.log,
1121: buff => ' '); */
1115: ||l_estab_rec.a_10_grand_total;
1116: fnd_file.put_line
1117: (which => fnd_file.log,
1118: buff => g_message_text);
1119: fnd_file.put_line
1120: (which => fnd_file.log,
1121: buff => ' '); */
1122: --
1123: -- grand total for column b (Hispanic or Latino Female)
1116: fnd_file.put_line
1117: (which => fnd_file.log,
1118: buff => g_message_text);
1119: fnd_file.put_line
1120: (which => fnd_file.log,
1121: buff => ' '); */
1122: --
1123: -- grand total for column b (Hispanic or Latino Female)
1124: --
1801: lpad(l_estab_rec.j_11_last_year_grand_total,6,0) ||
1802: lpad(l_estab_rec.k_11_last_year_grand_total,6,0); */
1803:
1804: /*g_message_text := 'l_estab_rec.a_1_total_mf -> '|| l_estab_rec.a_1_total_mf;
1805: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1806:
1807: g_message_text := 'l_estab_rec.a_2_total_mf -> '|| l_estab_rec.a_2_total_mf;
1808: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1809:
1804: /*g_message_text := 'l_estab_rec.a_1_total_mf -> '|| l_estab_rec.a_1_total_mf;
1805: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1806:
1807: g_message_text := 'l_estab_rec.a_2_total_mf -> '|| l_estab_rec.a_2_total_mf;
1808: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1809:
1810: g_message_text := 'l_estab_rec.a_3_total_mf -> '|| l_estab_rec.a_3_total_mf;
1811: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1812:
1807: g_message_text := 'l_estab_rec.a_2_total_mf -> '|| l_estab_rec.a_2_total_mf;
1808: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1809:
1810: g_message_text := 'l_estab_rec.a_3_total_mf -> '|| l_estab_rec.a_3_total_mf;
1811: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1812:
1813: g_message_text := 'l_estab_rec.a_4_total_mf -> '|| l_estab_rec.a_4_total_mf;
1814: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1815:
1810: g_message_text := 'l_estab_rec.a_3_total_mf -> '|| l_estab_rec.a_3_total_mf;
1811: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1812:
1813: g_message_text := 'l_estab_rec.a_4_total_mf -> '|| l_estab_rec.a_4_total_mf;
1814: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1815:
1816: g_message_text := 'l_estab_rec.a_5_total_mf -> '|| l_estab_rec.a_5_total_mf;
1817: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1818:
1813: g_message_text := 'l_estab_rec.a_4_total_mf -> '|| l_estab_rec.a_4_total_mf;
1814: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1815:
1816: g_message_text := 'l_estab_rec.a_5_total_mf -> '|| l_estab_rec.a_5_total_mf;
1817: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1818:
1819: g_message_text := 'l_estab_rec.a_6_total_mf -> '|| l_estab_rec.a_6_total_mf;
1820: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1821:
1816: g_message_text := 'l_estab_rec.a_5_total_mf -> '|| l_estab_rec.a_5_total_mf;
1817: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1818:
1819: g_message_text := 'l_estab_rec.a_6_total_mf -> '|| l_estab_rec.a_6_total_mf;
1820: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1821:
1822: g_message_text := 'l_estab_rec.a_7_total_mf -> '|| l_estab_rec.a_7_total_mf;
1823: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1824:
1819: g_message_text := 'l_estab_rec.a_6_total_mf -> '|| l_estab_rec.a_6_total_mf;
1820: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1821:
1822: g_message_text := 'l_estab_rec.a_7_total_mf -> '|| l_estab_rec.a_7_total_mf;
1823: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1824:
1825: g_message_text := 'l_estab_rec.a_8_total_mf -> '|| l_estab_rec.a_8_total_mf;
1826: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1827:
1822: g_message_text := 'l_estab_rec.a_7_total_mf -> '|| l_estab_rec.a_7_total_mf;
1823: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1824:
1825: g_message_text := 'l_estab_rec.a_8_total_mf -> '|| l_estab_rec.a_8_total_mf;
1826: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1827:
1828:
1829: g_message_text := 'l_estab_rec.a_9_total_mf -> '|| l_estab_rec.a_9_total_mf;
1830: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);*/
1826: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1827:
1828:
1829: g_message_text := 'l_estab_rec.a_9_total_mf -> '|| l_estab_rec.a_9_total_mf;
1830: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);*/
1831:
1832:
1833: g_message_text := 'l_estab_rec.a_10_grand_total -> '||l_estab_rec.a_10_grand_total;
1834: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1830: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);*/
1831:
1832:
1833: g_message_text := 'l_estab_rec.a_10_grand_total -> '||l_estab_rec.a_10_grand_total;
1834: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1835:
1836:
1837: --
1838: fnd_file.put_line
1834: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
1835:
1836:
1837: --
1838: fnd_file.put_line
1839: (which => fnd_file.output,
1840: buff => l_string);
1841: hr_utility.set_location('Leaving..' || l_proc,100);
1842:
1835:
1836:
1837: --
1838: fnd_file.put_line
1839: (which => fnd_file.output,
1840: buff => l_string);
1841: hr_utility.set_location('Leaving..' || l_proc,100);
1842:
1843: END write_establishment_record;
2229: l_min_year VARCHAR2(4) := NULL;
2230:
2231: BEGIN --insert_location_eit
2232:
2233: fnd_file.put_line(which => fnd_file.log,buff =>'insert INTO location eit ');
2234:
2235: BEGIN --Local1
2236: SELECT eloc.location_id,
2237: eloc.location_code
2244: AND hierarchy_version_id = p_hierarchy_version_id
2245: AND pgn.node_type = 'EST'
2246: AND eloc.location_id = pgn.entity_id;
2247: END; --Local1
2248: fnd_file.put_line
2249: (which => fnd_file.log,
2250: buff => 'location code IS '||l_location_code);
2251: --
2252: BEGIN --Local2
2245: AND pgn.node_type = 'EST'
2246: AND eloc.location_id = pgn.entity_id;
2247: END; --Local1
2248: fnd_file.put_line
2249: (which => fnd_file.log,
2250: buff => 'location code IS '||l_location_code);
2251: --
2252: BEGIN --Local2
2253: SELECT 'U',
2260: AND location_id = l_location_id;
2261: EXCEPTION
2262: WHEN no_data_found THEN
2263: p_update := 'C';
2264: fnd_file.put_line
2265: (which => fnd_file.log,
2266: buff => ' ');
2267: fnd_file.put_line
2268: (which => fnd_file.log,
2261: EXCEPTION
2262: WHEN no_data_found THEN
2263: p_update := 'C';
2264: fnd_file.put_line
2265: (which => fnd_file.log,
2266: buff => ' ');
2267: fnd_file.put_line
2268: (which => fnd_file.log,
2269: buff => 'Need to create new eit for location '
2263: p_update := 'C';
2264: fnd_file.put_line
2265: (which => fnd_file.log,
2266: buff => ' ');
2267: fnd_file.put_line
2268: (which => fnd_file.log,
2269: buff => 'Need to create new eit for location '
2270: ||l_location_id ||' '|| l_location_code);
2271:
2264: fnd_file.put_line
2265: (which => fnd_file.log,
2266: buff => ' ');
2267: fnd_file.put_line
2268: (which => fnd_file.log,
2269: buff => 'Need to create new eit for location '
2270: ||l_location_id ||' '|| l_location_code);
2271:
2272: WHEN OTHERS THEN
2273: NULL;
2274: END;--Local2
2275:
2276: IF p_update = 'U' THEN
2277: fnd_file.put_line
2278: (which => fnd_file.log,
2279: buff => ' ');
2280: fnd_file.put_line
2281: (which => fnd_file.log,
2274: END;--Local2
2275:
2276: IF p_update = 'U' THEN
2277: fnd_file.put_line
2278: (which => fnd_file.log,
2279: buff => ' ');
2280: fnd_file.put_line
2281: (which => fnd_file.log,
2282: buff => 'p_update '||p_update||' location_id to update IS '
2276: IF p_update = 'U' THEN
2277: fnd_file.put_line
2278: (which => fnd_file.log,
2279: buff => ' ');
2280: fnd_file.put_line
2281: (which => fnd_file.log,
2282: buff => 'p_update '||p_update||' location_id to update IS '
2283: ||l_location_id ||' '|| l_location_code);
2284:
2277: fnd_file.put_line
2278: (which => fnd_file.log,
2279: buff => ' ');
2280: fnd_file.put_line
2281: (which => fnd_file.log,
2282: buff => 'p_update '||p_update||' location_id to update IS '
2283: ||l_location_id ||' '|| l_location_code);
2284:
2285: BEGIN--Local3
2302:
2303: END IF; --p_update = 'U'
2304:
2305: IF p_update = 'C' THEN
2306: fnd_file.put_line
2307: (which => fnd_file.log,
2308: buff => 'p_update '||p_update||' location_id '||l_location_id);
2309: fnd_file.put_line
2310: (which => fnd_file.log,
2303: END IF; --p_update = 'U'
2304:
2305: IF p_update = 'C' THEN
2306: fnd_file.put_line
2307: (which => fnd_file.log,
2308: buff => 'p_update '||p_update||' location_id '||l_location_id);
2309: fnd_file.put_line
2310: (which => fnd_file.log,
2311: buff => 'need to create new eit');
2305: IF p_update = 'C' THEN
2306: fnd_file.put_line
2307: (which => fnd_file.log,
2308: buff => 'p_update '||p_update||' location_id '||l_location_id);
2309: fnd_file.put_line
2310: (which => fnd_file.log,
2311: buff => 'need to create new eit');
2312:
2313: BEGIN--Local5
2306: fnd_file.put_line
2307: (which => fnd_file.log,
2308: buff => 'p_update '||p_update||' location_id '||l_location_id);
2309: fnd_file.put_line
2310: (which => fnd_file.log,
2311: buff => 'need to create new eit');
2312:
2313: BEGIN--Local5
2314: hr_location_extra_info_api.create_location_extra_info
2338: ,p_object_version_number => l_object_version_number
2339: );
2340: END;--Local5
2341: COMMIT;
2342: fnd_file.put_line
2343: (which => fnd_file.log,
2344: buff => ' ');
2345: fnd_file.put_line
2346: (which => fnd_file.log,
2339: );
2340: END;--Local5
2341: COMMIT;
2342: fnd_file.put_line
2343: (which => fnd_file.log,
2344: buff => ' ');
2345: fnd_file.put_line
2346: (which => fnd_file.log,
2347: buff => 'eit created for location_id '||l_location_id ||' year '
2341: COMMIT;
2342: fnd_file.put_line
2343: (which => fnd_file.log,
2344: buff => ' ');
2345: fnd_file.put_line
2346: (which => fnd_file.log,
2347: buff => 'eit created for location_id '||l_location_id ||' year '
2348: ||p_report_year);
2349: /*fnd_file.put_line
2342: fnd_file.put_line
2343: (which => fnd_file.log,
2344: buff => ' ');
2345: fnd_file.put_line
2346: (which => fnd_file.log,
2347: buff => 'eit created for location_id '||l_location_id ||' year '
2348: ||p_report_year);
2349: /*fnd_file.put_line
2350: (which => fnd_file.log,
2345: fnd_file.put_line
2346: (which => fnd_file.log,
2347: buff => 'eit created for location_id '||l_location_id ||' year '
2348: ||p_report_year);
2349: /*fnd_file.put_line
2350: (which => fnd_file.log,
2351: buff => 'grand total IS '||l_estab_rec.a_11_last_year_grand_total); */
2352: fnd_file.put_line
2353: (which => fnd_file.log,
2346: (which => fnd_file.log,
2347: buff => 'eit created for location_id '||l_location_id ||' year '
2348: ||p_report_year);
2349: /*fnd_file.put_line
2350: (which => fnd_file.log,
2351: buff => 'grand total IS '||l_estab_rec.a_11_last_year_grand_total); */
2352: fnd_file.put_line
2353: (which => fnd_file.log,
2354: buff => ' ');
2348: ||p_report_year);
2349: /*fnd_file.put_line
2350: (which => fnd_file.log,
2351: buff => 'grand total IS '||l_estab_rec.a_11_last_year_grand_total); */
2352: fnd_file.put_line
2353: (which => fnd_file.log,
2354: buff => ' ');
2355: END IF; -- IF p_update = 'C'
2356: --
2349: /*fnd_file.put_line
2350: (which => fnd_file.log,
2351: buff => 'grand total IS '||l_estab_rec.a_11_last_year_grand_total); */
2352: fnd_file.put_line
2353: (which => fnd_file.log,
2354: buff => ' ');
2355: END IF; -- IF p_update = 'C'
2356: --
2357: -- IF over 4 eits delete the earliest
2395: ,p_location_extra_info_id => l_location_extra_info_id
2396: ,p_object_version_number => l_object_version_number
2397: );
2398: END;--Local10
2399: fnd_file.put_line
2400: (which => fnd_file.log,
2401: buff => '* there are over 4 Archive EITs for location id '
2402: ||l_location_id||' so deleting for year '||l_min_year);
2403: END IF;--l_eit_count > 4
2396: ,p_object_version_number => l_object_version_number
2397: );
2398: END;--Local10
2399: fnd_file.put_line
2400: (which => fnd_file.log,
2401: buff => '* there are over 4 Archive EITs for location id '
2402: ||l_location_id||' so deleting for year '||l_min_year);
2403: END IF;--l_eit_count > 4
2404:
2439: WHEN NO_DATA_FOUND THEN
2440: p_update := 'C';
2441: l_organization_id := l_org_rec.par_ent_org_id;
2442: --
2443: fnd_file.put_line
2444: (which => fnd_file.log,
2445: buff => ' ');
2446: fnd_file.put_line
2447: (which => fnd_file.log,
2440: p_update := 'C';
2441: l_organization_id := l_org_rec.par_ent_org_id;
2442: --
2443: fnd_file.put_line
2444: (which => fnd_file.log,
2445: buff => ' ');
2446: fnd_file.put_line
2447: (which => fnd_file.log,
2448: buff => 'need to create new eit for '||l_organization_id);
2442: --
2443: fnd_file.put_line
2444: (which => fnd_file.log,
2445: buff => ' ');
2446: fnd_file.put_line
2447: (which => fnd_file.log,
2448: buff => 'need to create new eit for '||l_organization_id);
2449: fnd_file.put_line
2450: (which => fnd_file.log,
2443: fnd_file.put_line
2444: (which => fnd_file.log,
2445: buff => ' ');
2446: fnd_file.put_line
2447: (which => fnd_file.log,
2448: buff => 'need to create new eit for '||l_organization_id);
2449: fnd_file.put_line
2450: (which => fnd_file.log,
2451: buff => ' ');
2445: buff => ' ');
2446: fnd_file.put_line
2447: (which => fnd_file.log,
2448: buff => 'need to create new eit for '||l_organization_id);
2449: fnd_file.put_line
2450: (which => fnd_file.log,
2451: buff => ' ');
2452: fnd_file.put_line
2453: (which => fnd_file.log,
2446: fnd_file.put_line
2447: (which => fnd_file.log,
2448: buff => 'need to create new eit for '||l_organization_id);
2449: fnd_file.put_line
2450: (which => fnd_file.log,
2451: buff => ' ');
2452: fnd_file.put_line
2453: (which => fnd_file.log,
2454: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2448: buff => 'need to create new eit for '||l_organization_id);
2449: fnd_file.put_line
2450: (which => fnd_file.log,
2451: buff => ' ');
2452: fnd_file.put_line
2453: (which => fnd_file.log,
2454: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2455: fnd_file.put_line
2456: (which => fnd_file.log,
2449: fnd_file.put_line
2450: (which => fnd_file.log,
2451: buff => ' ');
2452: fnd_file.put_line
2453: (which => fnd_file.log,
2454: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2455: fnd_file.put_line
2456: (which => fnd_file.log,
2457: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2451: buff => ' ');
2452: fnd_file.put_line
2453: (which => fnd_file.log,
2454: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2455: fnd_file.put_line
2456: (which => fnd_file.log,
2457: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2458: fnd_file.put_line
2459: (which => fnd_file.log,
2452: fnd_file.put_line
2453: (which => fnd_file.log,
2454: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2455: fnd_file.put_line
2456: (which => fnd_file.log,
2457: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2458: fnd_file.put_line
2459: (which => fnd_file.log,
2460: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2454: buff => 'IMPORTANT. IF YOU FILED LAST YEAR BUT LAST YEARS DATES');
2455: fnd_file.put_line
2456: (which => fnd_file.log,
2457: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2458: fnd_file.put_line
2459: (which => fnd_file.log,
2460: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2461: fnd_file.put_line
2462: (which => fnd_file.log,
2455: fnd_file.put_line
2456: (which => fnd_file.log,
2457: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2458: fnd_file.put_line
2459: (which => fnd_file.log,
2460: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2461: fnd_file.put_line
2462: (which => fnd_file.log,
2463: buff => 'MODE FOR LAST YEARS DATES. ');
2457: buff => 'ARE NOT BEING PRINTED, PLEASE EITHER MANUALLY ENTER DATA');
2458: fnd_file.put_line
2459: (which => fnd_file.log,
2460: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2461: fnd_file.put_line
2462: (which => fnd_file.log,
2463: buff => 'MODE FOR LAST YEARS DATES. ');
2464: fnd_file.put_line
2465: (which => fnd_file.log,
2458: fnd_file.put_line
2459: (which => fnd_file.log,
2460: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2461: fnd_file.put_line
2462: (which => fnd_file.log,
2463: buff => 'MODE FOR LAST YEARS DATES. ');
2464: fnd_file.put_line
2465: (which => fnd_file.log,
2466: buff => ' ');
2460: buff => 'IN THE ORGANIZATION EIT, OR RE-RUN THIS REPORT IN FINAL ');
2461: fnd_file.put_line
2462: (which => fnd_file.log,
2463: buff => 'MODE FOR LAST YEARS DATES. ');
2464: fnd_file.put_line
2465: (which => fnd_file.log,
2466: buff => ' ');
2467: WHEN OTHERS THEN
2468: NULL;
2461: fnd_file.put_line
2462: (which => fnd_file.log,
2463: buff => 'MODE FOR LAST YEARS DATES. ');
2464: fnd_file.put_line
2465: (which => fnd_file.log,
2466: buff => ' ');
2467: WHEN OTHERS THEN
2468: NULL;
2469: END;--Local1
2468: NULL;
2469: END;--Local1
2470:
2471: IF p_update = 'U' THEN
2472: fnd_file.put_line
2473: (which => fnd_file.log,
2474: buff => 'p_update '||p_update||' org_id to update IS '
2475: ||l_organization_id||' IN bus grp '
2476: ||p_business_group_id);
2469: END;--Local1
2470:
2471: IF p_update = 'U' THEN
2472: fnd_file.put_line
2473: (which => fnd_file.log,
2474: buff => 'p_update '||p_update||' org_id to update IS '
2475: ||l_organization_id||' IN bus grp '
2476: ||p_business_group_id);
2477:
2498: --
2499: END IF; --p_update = 'U'
2500:
2501: IF p_update = 'C' THEN
2502: fnd_file.put_line
2503: (which => fnd_file.log,
2504: buff => ' ');
2505: fnd_file.put_line
2506: (which => fnd_file.log,
2499: END IF; --p_update = 'U'
2500:
2501: IF p_update = 'C' THEN
2502: fnd_file.put_line
2503: (which => fnd_file.log,
2504: buff => ' ');
2505: fnd_file.put_line
2506: (which => fnd_file.log,
2507: buff => 'p_update '||p_update||' org id '||l_organization_id);
2501: IF p_update = 'C' THEN
2502: fnd_file.put_line
2503: (which => fnd_file.log,
2504: buff => ' ');
2505: fnd_file.put_line
2506: (which => fnd_file.log,
2507: buff => 'p_update '||p_update||' org id '||l_organization_id);
2508: fnd_file.put_line
2509: (which => fnd_file.log,
2502: fnd_file.put_line
2503: (which => fnd_file.log,
2504: buff => ' ');
2505: fnd_file.put_line
2506: (which => fnd_file.log,
2507: buff => 'p_update '||p_update||' org id '||l_organization_id);
2508: fnd_file.put_line
2509: (which => fnd_file.log,
2510: buff => 'need to create new eit');
2504: buff => ' ');
2505: fnd_file.put_line
2506: (which => fnd_file.log,
2507: buff => 'p_update '||p_update||' org id '||l_organization_id);
2508: fnd_file.put_line
2509: (which => fnd_file.log,
2510: buff => 'need to create new eit');
2511:
2512: BEGIN --Local4
2505: fnd_file.put_line
2506: (which => fnd_file.log,
2507: buff => 'p_update '||p_update||' org id '||l_organization_id);
2508: fnd_file.put_line
2509: (which => fnd_file.log,
2510: buff => 'need to create new eit');
2511:
2512: BEGIN --Local4
2513: hr_organization_api.create_org_information
2538: );
2539: END;--Local4
2540: COMMIT;
2541:
2542: fnd_file.put_line
2543: (which => fnd_file.log,
2544: buff => ' ');
2545: fnd_file.put_line
2546: (which => fnd_file.log,
2539: END;--Local4
2540: COMMIT;
2541:
2542: fnd_file.put_line
2543: (which => fnd_file.log,
2544: buff => ' ');
2545: fnd_file.put_line
2546: (which => fnd_file.log,
2547: buff => 'eit created for org id '||l_organization_id
2541:
2542: fnd_file.put_line
2543: (which => fnd_file.log,
2544: buff => ' ');
2545: fnd_file.put_line
2546: (which => fnd_file.log,
2547: buff => 'eit created for org id '||l_organization_id
2548: ||' year '||p_report_year);
2549: END IF; --p_update = 'C'
2542: fnd_file.put_line
2543: (which => fnd_file.log,
2544: buff => ' ');
2545: fnd_file.put_line
2546: (which => fnd_file.log,
2547: buff => 'eit created for org id '||l_organization_id
2548: ||' year '||p_report_year);
2549: END IF; --p_update = 'C'
2550:
2592: ,p_org_information_id => l_org_information_id
2593: ,p_object_version_number => l_object_version_number
2594: );
2595: END;--Local9
2596: fnd_file.put_line
2597: (which => fnd_file.log,
2598: buff => ' there are over 4 Archive EITs for organization id '
2599: ||p_business_group_id||' so deleting for year '||l_min_year);
2600: END IF;--l_eit_count > 4
2593: ,p_object_version_number => l_object_version_number
2594: );
2595: END;--Local9
2596: fnd_file.put_line
2597: (which => fnd_file.log,
2598: buff => ' there are over 4 Archive EITs for organization id '
2599: ||p_business_group_id||' so deleting for year '||l_min_year);
2600: END IF;--l_eit_count > 4
2601: END; --Local5
2612: BEGIN -- unit name AND address are required.
2613: IF (l_c_estab_details.unit_name_4 IS NULL OR
2614: l_c_estab_details.unit_address_req_5 IS NULL)
2615: THEN
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2618: buff => '======================================================');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2613: IF (l_c_estab_details.unit_name_4 IS NULL OR
2614: l_c_estab_details.unit_address_req_5 IS NULL)
2615: THEN
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2618: buff => '======================================================');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => ' ');
2615: THEN
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2618: buff => '======================================================');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => ' ');
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2616: fnd_file.put_line
2617: (which => fnd_file.log,
2618: buff => '======================================================');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => ' ');
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2624: buff => 'Unit name AND address are '
2618: buff => '======================================================');
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => ' ');
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2624: buff => 'Unit name AND address are '
2625: ||'required fields - ');
2626: fnd_file.put_line
2619: fnd_file.put_line
2620: (which => fnd_file.log,
2621: buff => ' ');
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2624: buff => 'Unit name AND address are '
2625: ||'required fields - ');
2626: fnd_file.put_line
2627: (which => fnd_file.log,
2622: fnd_file.put_line
2623: (which => fnd_file.log,
2624: buff => 'Unit name AND address are '
2625: ||'required fields - ');
2626: fnd_file.put_line
2627: (which => fnd_file.log,
2628: buff => 'Please enter ''Reporting Name'' IN location/extra '
2629: ||'info/eeo1 specific information for unit/establishment '
2630: ||l_c_estab_details.unit_name_4||' '
2623: (which => fnd_file.log,
2624: buff => 'Unit name AND address are '
2625: ||'required fields - ');
2626: fnd_file.put_line
2627: (which => fnd_file.log,
2628: buff => 'Please enter ''Reporting Name'' IN location/extra '
2629: ||'info/eeo1 specific information for unit/establishment '
2630: ||l_c_estab_details.unit_name_4||' '
2631: ||l_c_estab_details.unit_address_req_5);
2628: buff => 'Please enter ''Reporting Name'' IN location/extra '
2629: ||'info/eeo1 specific information for unit/establishment '
2630: ||l_c_estab_details.unit_name_4||' '
2631: ||l_c_estab_details.unit_address_req_5);
2632: fnd_file.put_line
2633: (which => fnd_file.log,
2634: buff => ' ');
2635: fnd_file.put_line
2636: (which => fnd_file.log,
2629: ||'info/eeo1 specific information for unit/establishment '
2630: ||l_c_estab_details.unit_name_4||' '
2631: ||l_c_estab_details.unit_address_req_5);
2632: fnd_file.put_line
2633: (which => fnd_file.log,
2634: buff => ' ');
2635: fnd_file.put_line
2636: (which => fnd_file.log,
2637: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2631: ||l_c_estab_details.unit_address_req_5);
2632: fnd_file.put_line
2633: (which => fnd_file.log,
2634: buff => ' ');
2635: fnd_file.put_line
2636: (which => fnd_file.log,
2637: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2638: fnd_file.put_line
2639: (which => fnd_file.log,
2632: fnd_file.put_line
2633: (which => fnd_file.log,
2634: buff => ' ');
2635: fnd_file.put_line
2636: (which => fnd_file.log,
2637: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2638: fnd_file.put_line
2639: (which => fnd_file.log,
2640: buff => ' ');
2634: buff => ' ');
2635: fnd_file.put_line
2636: (which => fnd_file.log,
2637: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2638: fnd_file.put_line
2639: (which => fnd_file.log,
2640: buff => ' ');
2641: fnd_file.put_line
2642: (which => fnd_file.log,
2635: fnd_file.put_line
2636: (which => fnd_file.log,
2637: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2638: fnd_file.put_line
2639: (which => fnd_file.log,
2640: buff => ' ');
2641: fnd_file.put_line
2642: (which => fnd_file.log,
2643: buff => '======================================================');
2637: buff => 'Nav path = location/extra info/EEO1 Specific Data');
2638: fnd_file.put_line
2639: (which => fnd_file.log,
2640: buff => ' ');
2641: fnd_file.put_line
2642: (which => fnd_file.log,
2643: buff => '======================================================');
2644: RAISE hr_utility.hr_error;
2645: ELSIF
2638: fnd_file.put_line
2639: (which => fnd_file.log,
2640: buff => ' ');
2641: fnd_file.put_line
2642: (which => fnd_file.log,
2643: buff => '======================================================');
2644: RAISE hr_utility.hr_error;
2645: ELSIF
2646: (l_c_estab_details.city_7 IS NULL OR
2647: l_c_estab_details.state_8 IS NULL OR
2648: l_c_estab_details.zip_code_9 IS NULL OR
2649: l_c_estab_details.county_17 IS NULL)
2650: THEN
2651: fnd_file.put_line
2652: (which => fnd_file.log,
2653: buff => '==================================');
2654: fnd_file.put_line
2655: (which => fnd_file.log,
2648: l_c_estab_details.zip_code_9 IS NULL OR
2649: l_c_estab_details.county_17 IS NULL)
2650: THEN
2651: fnd_file.put_line
2652: (which => fnd_file.log,
2653: buff => '==================================');
2654: fnd_file.put_line
2655: (which => fnd_file.log,
2656: buff => ' ');
2650: THEN
2651: fnd_file.put_line
2652: (which => fnd_file.log,
2653: buff => '==================================');
2654: fnd_file.put_line
2655: (which => fnd_file.log,
2656: buff => ' ');
2657: fnd_file.put_line
2658: (which => fnd_file.log,
2651: fnd_file.put_line
2652: (which => fnd_file.log,
2653: buff => '==================================');
2654: fnd_file.put_line
2655: (which => fnd_file.log,
2656: buff => ' ');
2657: fnd_file.put_line
2658: (which => fnd_file.log,
2659: buff => 'The Location/Establishment City, State, County AND '
2653: buff => '==================================');
2654: fnd_file.put_line
2655: (which => fnd_file.log,
2656: buff => ' ');
2657: fnd_file.put_line
2658: (which => fnd_file.log,
2659: buff => 'The Location/Establishment City, State, County AND '
2660: ||'Zip Code are required fields ');
2661: fnd_file.put_line
2654: fnd_file.put_line
2655: (which => fnd_file.log,
2656: buff => ' ');
2657: fnd_file.put_line
2658: (which => fnd_file.log,
2659: buff => 'The Location/Establishment City, State, County AND '
2660: ||'Zip Code are required fields ');
2661: fnd_file.put_line
2662: (which => fnd_file.log,
2657: fnd_file.put_line
2658: (which => fnd_file.log,
2659: buff => 'The Location/Establishment City, State, County AND '
2660: ||'Zip Code are required fields ');
2661: fnd_file.put_line
2662: (which => fnd_file.log,
2663: buff => ' ');
2664: fnd_file.put_line
2665: (which => fnd_file.log,
2658: (which => fnd_file.log,
2659: buff => 'The Location/Establishment City, State, County AND '
2660: ||'Zip Code are required fields ');
2661: fnd_file.put_line
2662: (which => fnd_file.log,
2663: buff => ' ');
2664: fnd_file.put_line
2665: (which => fnd_file.log,
2666: buff => 'Please enter IN location form for unit '
2660: ||'Zip Code are required fields ');
2661: fnd_file.put_line
2662: (which => fnd_file.log,
2663: buff => ' ');
2664: fnd_file.put_line
2665: (which => fnd_file.log,
2666: buff => 'Please enter IN location form for unit '
2667: ||l_c_estab_details.unit_name_4);
2668: fnd_file.put_line
2661: fnd_file.put_line
2662: (which => fnd_file.log,
2663: buff => ' ');
2664: fnd_file.put_line
2665: (which => fnd_file.log,
2666: buff => 'Please enter IN location form for unit '
2667: ||l_c_estab_details.unit_name_4);
2668: fnd_file.put_line
2669: (which => fnd_file.log,
2664: fnd_file.put_line
2665: (which => fnd_file.log,
2666: buff => 'Please enter IN location form for unit '
2667: ||l_c_estab_details.unit_name_4);
2668: fnd_file.put_line
2669: (which => fnd_file.log,
2670: buff => '==================================');
2671: RAISE hr_utility.hr_error;
2672: END IF;
2665: (which => fnd_file.log,
2666: buff => 'Please enter IN location form for unit '
2667: ||l_c_estab_details.unit_name_4);
2668: fnd_file.put_line
2669: (which => fnd_file.log,
2670: buff => '==================================');
2671: RAISE hr_utility.hr_error;
2672: END IF;
2673: END; -- unit name AND address are required.
2690: OR l_c_estab_details.gov_contract_15 = 1) THEN
2691:
2692:
2693: IF (l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL) THEN
2694: fnd_file.put_line
2695: (which => fnd_file.log,
2696: buff => '*==================================================*');
2697: fnd_file.put_line
2698: (which => fnd_file.log,
2691:
2692:
2693: IF (l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL) THEN
2694: fnd_file.put_line
2695: (which => fnd_file.log,
2696: buff => '*==================================================*');
2697: fnd_file.put_line
2698: (which => fnd_file.log,
2699: buff => ' ');
2693: IF (l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL) THEN
2694: fnd_file.put_line
2695: (which => fnd_file.log,
2696: buff => '*==================================================*');
2697: fnd_file.put_line
2698: (which => fnd_file.log,
2699: buff => ' ');
2700: fnd_file.put_line
2701: (which => fnd_file.log,
2694: fnd_file.put_line
2695: (which => fnd_file.log,
2696: buff => '*==================================================*');
2697: fnd_file.put_line
2698: (which => fnd_file.log,
2699: buff => ' ');
2700: fnd_file.put_line
2701: (which => fnd_file.log,
2702: buff => 'The Location/Establishment NAICS NUMBER '
2696: buff => '*==================================================*');
2697: fnd_file.put_line
2698: (which => fnd_file.log,
2699: buff => ' ');
2700: fnd_file.put_line
2701: (which => fnd_file.log,
2702: buff => 'The Location/Establishment NAICS NUMBER '
2703: ||'IS a required field ');
2704: fnd_file.put_line
2697: fnd_file.put_line
2698: (which => fnd_file.log,
2699: buff => ' ');
2700: fnd_file.put_line
2701: (which => fnd_file.log,
2702: buff => 'The Location/Establishment NAICS NUMBER '
2703: ||'IS a required field ');
2704: fnd_file.put_line
2705: (which => fnd_file.log,
2700: fnd_file.put_line
2701: (which => fnd_file.log,
2702: buff => 'The Location/Establishment NAICS NUMBER '
2703: ||'IS a required field ');
2704: fnd_file.put_line
2705: (which => fnd_file.log,
2706: buff => 'Please enter IN either location/extra info'
2707: ||'/eeo1 specific information ');
2708: fnd_file.put_line
2701: (which => fnd_file.log,
2702: buff => 'The Location/Establishment NAICS NUMBER '
2703: ||'IS a required field ');
2704: fnd_file.put_line
2705: (which => fnd_file.log,
2706: buff => 'Please enter IN either location/extra info'
2707: ||'/eeo1 specific information ');
2708: fnd_file.put_line
2709: (which => fnd_file.log,
2704: fnd_file.put_line
2705: (which => fnd_file.log,
2706: buff => 'Please enter IN either location/extra info'
2707: ||'/eeo1 specific information ');
2708: fnd_file.put_line
2709: (which => fnd_file.log,
2710: buff => 'for unit/establishment: ');
2711: fnd_file.put_line
2712: (which => fnd_file.log,
2705: (which => fnd_file.log,
2706: buff => 'Please enter IN either location/extra info'
2707: ||'/eeo1 specific information ');
2708: fnd_file.put_line
2709: (which => fnd_file.log,
2710: buff => 'for unit/establishment: ');
2711: fnd_file.put_line
2712: (which => fnd_file.log,
2713: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2707: ||'/eeo1 specific information ');
2708: fnd_file.put_line
2709: (which => fnd_file.log,
2710: buff => 'for unit/establishment: ');
2711: fnd_file.put_line
2712: (which => fnd_file.log,
2713: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2714: fnd_file.put_line
2715: (which => fnd_file.log,
2708: fnd_file.put_line
2709: (which => fnd_file.log,
2710: buff => 'for unit/establishment: ');
2711: fnd_file.put_line
2712: (which => fnd_file.log,
2713: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2714: fnd_file.put_line
2715: (which => fnd_file.log,
2716: buff => 'address: ');
2710: buff => 'for unit/establishment: ');
2711: fnd_file.put_line
2712: (which => fnd_file.log,
2713: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2714: fnd_file.put_line
2715: (which => fnd_file.log,
2716: buff => 'address: ');
2717: fnd_file.put_line
2718: (which => fnd_file.log,
2711: fnd_file.put_line
2712: (which => fnd_file.log,
2713: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2714: fnd_file.put_line
2715: (which => fnd_file.log,
2716: buff => 'address: ');
2717: fnd_file.put_line
2718: (which => fnd_file.log,
2719: buff => '<<'||l_c_estab_details.unit_address_req_5||' '
2713: buff => '<<'||l_c_estab_details.unit_name_4||'>>');
2714: fnd_file.put_line
2715: (which => fnd_file.log,
2716: buff => 'address: ');
2717: fnd_file.put_line
2718: (which => fnd_file.log,
2719: buff => '<<'||l_c_estab_details.unit_address_req_5||' '
2720: ||l_c_estab_details.unit_address_6||' '
2721: ||l_c_estab_details.city_7||' '
2714: fnd_file.put_line
2715: (which => fnd_file.log,
2716: buff => 'address: ');
2717: fnd_file.put_line
2718: (which => fnd_file.log,
2719: buff => '<<'||l_c_estab_details.unit_address_req_5||' '
2720: ||l_c_estab_details.unit_address_6||' '
2721: ||l_c_estab_details.city_7||' '
2722: ||l_c_estab_details.state_8||' '
2720: ||l_c_estab_details.unit_address_6||' '
2721: ||l_c_estab_details.city_7||' '
2722: ||l_c_estab_details.state_8||' '
2723: ||l_c_estab_details.zip_code_9||'>>');
2724: fnd_file.put_line
2725: (which => fnd_file.log,
2726: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2727: fnd_file.put_line
2728: (which => fnd_file.log,
2721: ||l_c_estab_details.city_7||' '
2722: ||l_c_estab_details.state_8||' '
2723: ||l_c_estab_details.zip_code_9||'>>');
2724: fnd_file.put_line
2725: (which => fnd_file.log,
2726: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2727: fnd_file.put_line
2728: (which => fnd_file.log,
2729: buff => ' ');
2723: ||l_c_estab_details.zip_code_9||'>>');
2724: fnd_file.put_line
2725: (which => fnd_file.log,
2726: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2727: fnd_file.put_line
2728: (which => fnd_file.log,
2729: buff => ' ');
2730: fnd_file.put_line
2731: (which => fnd_file.log,
2724: fnd_file.put_line
2725: (which => fnd_file.log,
2726: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2727: fnd_file.put_line
2728: (which => fnd_file.log,
2729: buff => ' ');
2730: fnd_file.put_line
2731: (which => fnd_file.log,
2732: buff => '~OR~');
2726: buff => '*Nav path = location/extra info/EEO1/VETS Generic Data*');
2727: fnd_file.put_line
2728: (which => fnd_file.log,
2729: buff => ' ');
2730: fnd_file.put_line
2731: (which => fnd_file.log,
2732: buff => '~OR~');
2733: fnd_file.put_line
2734: (which => fnd_file.log,
2727: fnd_file.put_line
2728: (which => fnd_file.log,
2729: buff => ' ');
2730: fnd_file.put_line
2731: (which => fnd_file.log,
2732: buff => '~OR~');
2733: fnd_file.put_line
2734: (which => fnd_file.log,
2735: buff => ' ');
2729: buff => ' ');
2730: fnd_file.put_line
2731: (which => fnd_file.log,
2732: buff => '~OR~');
2733: fnd_file.put_line
2734: (which => fnd_file.log,
2735: buff => ' ');
2736: fnd_file.put_line
2737: (which => fnd_file.log,
2730: fnd_file.put_line
2731: (which => fnd_file.log,
2732: buff => '~OR~');
2733: fnd_file.put_line
2734: (which => fnd_file.log,
2735: buff => ' ');
2736: fnd_file.put_line
2737: (which => fnd_file.log,
2738: buff => 'enter at organization level - for the '
2732: buff => '~OR~');
2733: fnd_file.put_line
2734: (which => fnd_file.log,
2735: buff => ' ');
2736: fnd_file.put_line
2737: (which => fnd_file.log,
2738: buff => 'enter at organization level - for the '
2739: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2740: fnd_file.put_line
2733: fnd_file.put_line
2734: (which => fnd_file.log,
2735: buff => ' ');
2736: fnd_file.put_line
2737: (which => fnd_file.log,
2738: buff => 'enter at organization level - for the '
2739: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2740: fnd_file.put_line
2741: (which => fnd_file.log,
2736: fnd_file.put_line
2737: (which => fnd_file.log,
2738: buff => 'enter at organization level - for the '
2739: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2740: fnd_file.put_line
2741: (which => fnd_file.log,
2742: buff => 'IN parent entity EEO1/VETS Establishment Data');
2743: fnd_file.put_line
2744: (which => fnd_file.log,
2737: (which => fnd_file.log,
2738: buff => 'enter at organization level - for the '
2739: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2740: fnd_file.put_line
2741: (which => fnd_file.log,
2742: buff => 'IN parent entity EEO1/VETS Establishment Data');
2743: fnd_file.put_line
2744: (which => fnd_file.log,
2745: buff => '*Nav path = Organization/Description/Parent Entity/'||
2739: ||'top organization IN this hierarchy (ie.GRE/Parent Entity)');
2740: fnd_file.put_line
2741: (which => fnd_file.log,
2742: buff => 'IN parent entity EEO1/VETS Establishment Data');
2743: fnd_file.put_line
2744: (which => fnd_file.log,
2745: buff => '*Nav path = Organization/Description/Parent Entity/'||
2746: 'Others/EEO1/VETS Establishment Data*');
2747: fnd_file.put_line
2740: fnd_file.put_line
2741: (which => fnd_file.log,
2742: buff => 'IN parent entity EEO1/VETS Establishment Data');
2743: fnd_file.put_line
2744: (which => fnd_file.log,
2745: buff => '*Nav path = Organization/Description/Parent Entity/'||
2746: 'Others/EEO1/VETS Establishment Data*');
2747: fnd_file.put_line
2748: (which => fnd_file.log,
2743: fnd_file.put_line
2744: (which => fnd_file.log,
2745: buff => '*Nav path = Organization/Description/Parent Entity/'||
2746: 'Others/EEO1/VETS Establishment Data*');
2747: fnd_file.put_line
2748: (which => fnd_file.log,
2749: buff => ' ');
2750: fnd_file.put_line
2751: (which => fnd_file.log,
2744: (which => fnd_file.log,
2745: buff => '*Nav path = Organization/Description/Parent Entity/'||
2746: 'Others/EEO1/VETS Establishment Data*');
2747: fnd_file.put_line
2748: (which => fnd_file.log,
2749: buff => ' ');
2750: fnd_file.put_line
2751: (which => fnd_file.log,
2752: buff => '*==================================================*');
2746: 'Others/EEO1/VETS Establishment Data*');
2747: fnd_file.put_line
2748: (which => fnd_file.log,
2749: buff => ' ');
2750: fnd_file.put_line
2751: (which => fnd_file.log,
2752: buff => '*==================================================*');
2753: RAISE hr_utility.hr_error;
2754: END IF; --(l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL)
2747: fnd_file.put_line
2748: (which => fnd_file.log,
2749: buff => ' ');
2750: fnd_file.put_line
2751: (which => fnd_file.log,
2752: buff => '*==================================================*');
2753: RAISE hr_utility.hr_error;
2754: END IF; --(l_c_estab_details.naics_21 IS NULL AND l_org_rec.naics_21 IS NULL)
2755:
2755:
2756: IF (l_org_rec.title_cert_off_22 IS NULL OR
2757: l_org_rec.name_cert_off_23 IS NULL OR
2758: l_org_rec.tel_num_24 IS NULL) THEN
2759: fnd_file.put_line
2760: (which => fnd_file.log,
2761: buff => '==================================');
2762: fnd_file.put_line
2763: (which => fnd_file.log,
2756: IF (l_org_rec.title_cert_off_22 IS NULL OR
2757: l_org_rec.name_cert_off_23 IS NULL OR
2758: l_org_rec.tel_num_24 IS NULL) THEN
2759: fnd_file.put_line
2760: (which => fnd_file.log,
2761: buff => '==================================');
2762: fnd_file.put_line
2763: (which => fnd_file.log,
2764: buff => ' ');
2758: l_org_rec.tel_num_24 IS NULL) THEN
2759: fnd_file.put_line
2760: (which => fnd_file.log,
2761: buff => '==================================');
2762: fnd_file.put_line
2763: (which => fnd_file.log,
2764: buff => ' ');
2765: fnd_file.put_line
2766: (which => fnd_file.log,
2759: fnd_file.put_line
2760: (which => fnd_file.log,
2761: buff => '==================================');
2762: fnd_file.put_line
2763: (which => fnd_file.log,
2764: buff => ' ');
2765: fnd_file.put_line
2766: (which => fnd_file.log,
2767: buff => 'Fields 22/23/24 - Title of certifying official AND'
2761: buff => '==================================');
2762: fnd_file.put_line
2763: (which => fnd_file.log,
2764: buff => ' ');
2765: fnd_file.put_line
2766: (which => fnd_file.log,
2767: buff => 'Fields 22/23/24 - Title of certifying official AND'
2768: ||'/or their name AND phone NUMBER IS blank. ');
2769: fnd_file.put_line
2762: fnd_file.put_line
2763: (which => fnd_file.log,
2764: buff => ' ');
2765: fnd_file.put_line
2766: (which => fnd_file.log,
2767: buff => 'Fields 22/23/24 - Title of certifying official AND'
2768: ||'/or their name AND phone NUMBER IS blank. ');
2769: fnd_file.put_line
2770: (which => fnd_file.log,
2765: fnd_file.put_line
2766: (which => fnd_file.log,
2767: buff => 'Fields 22/23/24 - Title of certifying official AND'
2768: ||'/or their name AND phone NUMBER IS blank. ');
2769: fnd_file.put_line
2770: (which => fnd_file.log,
2771: buff => 'These are required fields. Please enter '
2772: ||'at organization level for the Business Group ');
2773: fnd_file.put_line
2766: (which => fnd_file.log,
2767: buff => 'Fields 22/23/24 - Title of certifying official AND'
2768: ||'/or their name AND phone NUMBER IS blank. ');
2769: fnd_file.put_line
2770: (which => fnd_file.log,
2771: buff => 'These are required fields. Please enter '
2772: ||'at organization level for the Business Group ');
2773: fnd_file.put_line
2774: (which => fnd_file.log,
2769: fnd_file.put_line
2770: (which => fnd_file.log,
2771: buff => 'These are required fields. Please enter '
2772: ||'at organization level for the Business Group ');
2773: fnd_file.put_line
2774: (which => fnd_file.log,
2775: buff => ' ');
2776: fnd_file.put_line
2777: (which => fnd_file.log,
2770: (which => fnd_file.log,
2771: buff => 'These are required fields. Please enter '
2772: ||'at organization level for the Business Group ');
2773: fnd_file.put_line
2774: (which => fnd_file.log,
2775: buff => ' ');
2776: fnd_file.put_line
2777: (which => fnd_file.log,
2778: buff => '<<'||l_org_rec.org_name||'>>');
2772: ||'at organization level for the Business Group ');
2773: fnd_file.put_line
2774: (which => fnd_file.log,
2775: buff => ' ');
2776: fnd_file.put_line
2777: (which => fnd_file.log,
2778: buff => '<<'||l_org_rec.org_name||'>>');
2779: fnd_file.put_line
2780: (which => fnd_file.log,
2773: fnd_file.put_line
2774: (which => fnd_file.log,
2775: buff => ' ');
2776: fnd_file.put_line
2777: (which => fnd_file.log,
2778: buff => '<<'||l_org_rec.org_name||'>>');
2779: fnd_file.put_line
2780: (which => fnd_file.log,
2781: buff => ' ');
2775: buff => ' ');
2776: fnd_file.put_line
2777: (which => fnd_file.log,
2778: buff => '<<'||l_org_rec.org_name||'>>');
2779: fnd_file.put_line
2780: (which => fnd_file.log,
2781: buff => ' ');
2782: fnd_file.put_line
2783: (which => fnd_file.log,
2776: fnd_file.put_line
2777: (which => fnd_file.log,
2778: buff => '<<'||l_org_rec.org_name||'>>');
2779: fnd_file.put_line
2780: (which => fnd_file.log,
2781: buff => ' ');
2782: fnd_file.put_line
2783: (which => fnd_file.log,
2784: buff => 'nav path = '
2778: buff => '<<'||l_org_rec.org_name||'>>');
2779: fnd_file.put_line
2780: (which => fnd_file.log,
2781: buff => ' ');
2782: fnd_file.put_line
2783: (which => fnd_file.log,
2784: buff => 'nav path = '
2785: ||'Business Group Organization/Description/Business Group'
2786: ||'/Others/EEO Report Details');
2779: fnd_file.put_line
2780: (which => fnd_file.log,
2781: buff => ' ');
2782: fnd_file.put_line
2783: (which => fnd_file.log,
2784: buff => 'nav path = '
2785: ||'Business Group Organization/Description/Business Group'
2786: ||'/Others/EEO Report Details');
2787: fnd_file.put_line
2783: (which => fnd_file.log,
2784: buff => 'nav path = '
2785: ||'Business Group Organization/Description/Business Group'
2786: ||'/Others/EEO Report Details');
2787: fnd_file.put_line
2788: (which => fnd_file.log,
2789: buff => '(unit name: '
2790: ||l_c_estab_details.unit_name_4||' address: '
2791: ||l_c_estab_details.unit_address_req_5||' '
2784: buff => 'nav path = '
2785: ||'Business Group Organization/Description/Business Group'
2786: ||'/Others/EEO Report Details');
2787: fnd_file.put_line
2788: (which => fnd_file.log,
2789: buff => '(unit name: '
2790: ||l_c_estab_details.unit_name_4||' address: '
2791: ||l_c_estab_details.unit_address_req_5||' '
2792: ||l_c_estab_details.zip_code_9||')');
2789: buff => '(unit name: '
2790: ||l_c_estab_details.unit_name_4||' address: '
2791: ||l_c_estab_details.unit_address_req_5||' '
2792: ||l_c_estab_details.zip_code_9||')');
2793: fnd_file.put_line
2794: (which => fnd_file.log,
2795: buff => ' ');
2796: fnd_file.put_line
2797: (which => fnd_file.log,
2790: ||l_c_estab_details.unit_name_4||' address: '
2791: ||l_c_estab_details.unit_address_req_5||' '
2792: ||l_c_estab_details.zip_code_9||')');
2793: fnd_file.put_line
2794: (which => fnd_file.log,
2795: buff => ' ');
2796: fnd_file.put_line
2797: (which => fnd_file.log,
2798: buff => '==================================');
2792: ||l_c_estab_details.zip_code_9||')');
2793: fnd_file.put_line
2794: (which => fnd_file.log,
2795: buff => ' ');
2796: fnd_file.put_line
2797: (which => fnd_file.log,
2798: buff => '==================================');
2799: RAISE hr_utility.hr_error;
2800: END IF;--l_org_rec.title_cert_off_22 IS NULL
2793: fnd_file.put_line
2794: (which => fnd_file.log,
2795: buff => ' ');
2796: fnd_file.put_line
2797: (which => fnd_file.log,
2798: buff => '==================================');
2799: RAISE hr_utility.hr_error;
2800: END IF;--l_org_rec.title_cert_off_22 IS NULL
2801:
4197: := nvl(l_consol_rec.a_11_last_year_grand_total,0) +
4198: nvl(l_estab_rec.a_11_last_year_grand_total,0);
4199:
4200: g_message_text := 'l_c_lastyears_details.p_total_a -> '|| l_c_lastyears_details.p_total_a;
4201: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
4202:
4203: g_message_text := 'l_consol_rec.a_11_last_year_grand_total -> '|| l_consol_rec.a_11_last_year_grand_total;
4204: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
4205:
4200: g_message_text := 'l_c_lastyears_details.p_total_a -> '|| l_c_lastyears_details.p_total_a;
4201: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
4202:
4203: g_message_text := 'l_consol_rec.a_11_last_year_grand_total -> '|| l_consol_rec.a_11_last_year_grand_total;
4204: fnd_file.put_line(which => fnd_file.log, buff => g_message_text);
4205:
4206: l_estab_rec.b_11_last_year_grand_total := l_c_lastyears_details.p_wmale_b;
4207: l_consol_rec.b_11_last_year_grand_total
4208: := nvl(l_consol_rec.b_11_last_year_grand_total,0) +
4323: --hr_utility.trace_on(NULL,'ORACLE');
4324: hr_utility.set_location('Entering..'||l_proc,10);
4325:
4326: g_message_text := 'EEO1 Entering...'||l_proc||' 10';
4327: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4328:
4329:
4330:
4331: set_org_details(p_hierarchy_version_id => p_hierarchy_version_id,
4344: END IF;
4345: CLOSE c_nodes;
4346:
4347: g_message_text := 'EEO1 l_org_rec.form_type -> '||l_org_rec.form_type;
4348: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4349:
4350: g_message_text := 'EEO1 p_hierarchy_version_id -> '||p_hierarchy_version_id;
4351: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4352:
4347: g_message_text := 'EEO1 l_org_rec.form_type -> '||l_org_rec.form_type;
4348: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4349:
4350: g_message_text := 'EEO1 p_hierarchy_version_id -> '||p_hierarchy_version_id;
4351: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4352:
4353: g_message_text := 'EEO1 p_business_group_id -> '|| p_business_group_id;
4354: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4355:
4350: g_message_text := 'EEO1 p_hierarchy_version_id -> '||p_hierarchy_version_id;
4351: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4352:
4353: g_message_text := 'EEO1 p_business_group_id -> '|| p_business_group_id;
4354: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4355:
4356: g_message_text := 'EEO1 l_start_date -> '|| l_start_date;
4357: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4358:
4353: g_message_text := 'EEO1 p_business_group_id -> '|| p_business_group_id;
4354: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4355:
4356: g_message_text := 'EEO1 l_start_date -> '|| l_start_date;
4357: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4358:
4359: g_message_text := 'EEO1 l_end_date -> '|| l_end_date;
4360: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4361:
4356: g_message_text := 'EEO1 l_start_date -> '|| l_start_date;
4357: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4358:
4359: g_message_text := 'EEO1 l_end_date -> '|| l_end_date;
4360: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4361:
4362: g_message_text := 'EEO1 p_report_mode -> '|| p_report_mode;
4363: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4364:
4359: g_message_text := 'EEO1 l_end_date -> '|| l_end_date;
4360: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4361:
4362: g_message_text := 'EEO1 p_report_mode -> '|| p_report_mode;
4363: fnd_file.put_line(which => fnd_file.log,buff => g_message_text);
4364:
4365:
4366: loop_through_establishments(p_hierarchy_version_id => p_hierarchy_version_id,
4367: p_business_group_id => p_business_group_id,