eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PAY_GB_EPS dependencies on HR_UTILITY

Line 144: hr_utility.set_location(' Entering :' || l_proc,160);

140: l_profile varchar2(10);
141: l_approver_id number;
142:
143: BEGIN
144: hr_utility.set_location(' Entering :' || l_proc,160);
145: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
146:
147: l_approver_id := p_approver_id;
148: profile_option_value(l_profile);

Line 145: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);

141: l_approver_id number;
142:
143: BEGIN
144: hr_utility.set_location(' Entering :' || l_proc,160);
145: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
146:
147: l_approver_id := p_approver_id;
148: profile_option_value(l_profile);
149:

Line 245: hr_utility.set_location('Inserted the EPS record',100);

241: p_update_date
242: );
243:
244:
245: hr_utility.set_location('Inserted the EPS record',100);
246: HR_UTILITY.SET_LOCATION(' Leaving :' || L_PROC,100);
247:
248: END insert_eps_record;
249:

Line 246: HR_UTILITY.SET_LOCATION(' Leaving :' || L_PROC,100);

242: );
243:
244:
245: hr_utility.set_location('Inserted the EPS record',100);
246: HR_UTILITY.SET_LOCATION(' Leaving :' || L_PROC,100);
247:
248: END insert_eps_record;
249:
250: PROCEDURE delete_eps_record

Line 264: hr_utility.set_location(' Entering :' || l_proc,160);

260:
261:
262: BEGIN
263:
264: hr_utility.set_location(' Entering :' || l_proc,160);
265:
266: DELETE
267: FROM pay_gb_eps_details
268: WHERE EMP_PAYE_REFERENCE = p_emp_paye_reference

Line 275: hr_utility.set_location('Deleted the EPS record',100);

271:
272: COMMIT;
273:
274: p_return_status := 'S';
275: hr_utility.set_location('Deleted the EPS record',100);
276: hr_utility.set_location(' Leaving :' || l_proc,100);
277:
278:
279: exception

Line 276: hr_utility.set_location(' Leaving :' || l_proc,100);

272: COMMIT;
273:
274: p_return_status := 'S';
275: hr_utility.set_location('Deleted the EPS record',100);
276: hr_utility.set_location(' Leaving :' || l_proc,100);
277:
278:
279: exception
280: when others then

Line 308: hr_utility.set_location(' Entering :' || l_proc,160);

304: l_paye_ref varchar2(100);
305:
306: BEGIN
307:
308: hr_utility.set_location(' Entering :' || l_proc,160);
309:
310: p_return_status := 'N';
311:
312: open csr_check_seq;

Line 319: hr_utility.set_location(' Leaving :' || l_proc,100);

315: p_return_status := 'Y';
316: end if;
317: close csr_check_seq;
318:
319: hr_utility.set_location(' Leaving :' || l_proc,100);
320: exception
321: when others then
322: raise_application_error(-20001,SQLERRM);
323:

Line 341: hr_utility.set_location(' Entering :' || l_proc,160);

337: and fpo.PROFILE_OPTION_NAME = 'GB_EPS_APPROVAL';
338: */
339: BEGIN
340:
341: hr_utility.set_location(' Entering :' || l_proc,160);
342:
343: /* p_return_status := 'Y';
344: open csr_get_profile;
345: fetch csr_get_profile into p_return_status;

Line 354: hr_utility.trace('Profile Value : '||p_return_status);

350: if p_return_status is null then
351: p_return_status := 'Y';
352: end if;
353:
354: hr_utility.trace('Profile Value : '||p_return_status);
355: hr_utility.set_location(' Leaving :' || l_proc,100);
356:
357: exception
358: when others then

Line 355: hr_utility.set_location(' Leaving :' || l_proc,100);

351: p_return_status := 'Y';
352: end if;
353:
354: hr_utility.trace('Profile Value : '||p_return_status);
355: hr_utility.set_location(' Leaving :' || l_proc,100);
356:
357: exception
358: when others then
359: raise_application_error(-20001,SQLERRM);

Line 428: hr_utility.set_location(' Entering :' || l_proc,160);

424:
425: BEGIN
426:
427:
428: hr_utility.set_location(' Entering :' || l_proc,160);
429:
430: hr_utility.set_location('PAYE REf : '||p_emp_paye_reference,90);
431: hr_utility.set_location('Eff Date : '||p_effective_date,90);
432:

Line 430: hr_utility.set_location('PAYE REf : '||p_emp_paye_reference,90);

426:
427:
428: hr_utility.set_location(' Entering :' || l_proc,160);
429:
430: hr_utility.set_location('PAYE REf : '||p_emp_paye_reference,90);
431: hr_utility.set_location('Eff Date : '||p_effective_date,90);
432:
433: l_status := p_status;
434:

Line 431: hr_utility.set_location('Eff Date : '||p_effective_date,90);

427:
428: hr_utility.set_location(' Entering :' || l_proc,160);
429:
430: hr_utility.set_location('PAYE REf : '||p_emp_paye_reference,90);
431: hr_utility.set_location('Eff Date : '||p_effective_date,90);
432:
433: l_status := p_status;
434:
435: open csr_get_ovn;

Line 439: hr_utility.set_location(' p_object_version_number :' || p_object_version_number,160);

435: open csr_get_ovn;
436: fetch csr_get_ovn into l_object_version_number;
437: close csr_get_ovn;
438:
439: hr_utility.set_location(' p_object_version_number :' || p_object_version_number,160);
440: hr_utility.set_location(' l_object_version_number :' || l_object_version_number,160);
441:
442: if (p_object_version_number <> l_object_version_number) then
443: --p_return_status := 'E';

Line 440: hr_utility.set_location(' l_object_version_number :' || l_object_version_number,160);

436: fetch csr_get_ovn into l_object_version_number;
437: close csr_get_ovn;
438:
439: hr_utility.set_location(' p_object_version_number :' || p_object_version_number,160);
440: hr_utility.set_location(' l_object_version_number :' || l_object_version_number,160);
441:
442: if (p_object_version_number <> l_object_version_number) then
443: --p_return_status := 'E';
444: raise l_exp;

Line 449: hr_utility.trace('Profile Value : '||l_profile);

445: end if;
446:
447: profile_option_value(l_profile);
448:
449: hr_utility.trace('Profile Value : '||l_profile);
450:
451: --if l_profile = 'N' then
452: if l_profile = 'N' AND l_status = 'Completed' then
453: l_status := 'Verified';

Line 455: hr_utility.set_location('Status : '||l_status,40);

451: --if l_profile = 'N' then
452: if l_profile = 'N' AND l_status = 'Completed' then
453: l_status := 'Verified';
454: end if;
455: hr_utility.set_location('Status : '||l_status,40);
456: UPDATE
457: PAY_GB_EPS_DETAILS
458: SET STATUS = l_status,
459: REQUEST_ID = DECODE(FND_GLOBAL.CONC_REQUEST_ID, -1, request_id, FND_GLOBAL.CONC_REQUEST_ID),

Line 498: hr_utility.set_location('eps_id : '||l_eps_id,40);

494: fetch c_get_user_name into l_user_name;
495: close c_get_user_name;
496: end if;
497:
498: hr_utility.set_location('eps_id : '||l_eps_id,40);
499: hr_utility.set_location('Status : '||p_status,40);
500: hr_utility.set_location('email_address : '||email_address,40);
501:
502: -- Calling Workflow to send Notification

Line 499: hr_utility.set_location('Status : '||p_status,40);

495: close c_get_user_name;
496: end if;
497:
498: hr_utility.set_location('eps_id : '||l_eps_id,40);
499: hr_utility.set_location('Status : '||p_status,40);
500: hr_utility.set_location('email_address : '||email_address,40);
501:
502: -- Calling Workflow to send Notification
503: pay_gb_eps.start_eps_wf(eps_id => l_eps_id,status => p_status,email_address => email_address,user_name => l_user_name );

Line 500: hr_utility.set_location('email_address : '||email_address,40);

496: end if;
497:
498: hr_utility.set_location('eps_id : '||l_eps_id,40);
499: hr_utility.set_location('Status : '||p_status,40);
500: hr_utility.set_location('email_address : '||email_address,40);
501:
502: -- Calling Workflow to send Notification
503: pay_gb_eps.start_eps_wf(eps_id => l_eps_id,status => p_status,email_address => email_address,user_name => l_user_name );
504: end if;

Line 507: hr_utility.set_location('Updated the status of the EPS record',100);

503: pay_gb_eps.start_eps_wf(eps_id => l_eps_id,status => p_status,email_address => email_address,user_name => l_user_name );
504: end if;
505:
506: p_return_status := 'S';
507: hr_utility.set_location('Updated the status of the EPS record',100);
508: hr_utility.set_location(' Leaving :' || l_proc,100);
509:
510: exception
511: when l_exp then

Line 508: hr_utility.set_location(' Leaving :' || l_proc,100);

504: end if;
505:
506: p_return_status := 'S';
507: hr_utility.set_location('Updated the status of the EPS record',100);
508: hr_utility.set_location(' Leaving :' || l_proc,100);
509:
510: exception
511: when l_exp then
512: p_return_status := 'E';

Line 568: hr_utility.set_location(' Entering :' || l_proc,160);

564:
565: BEGIN
566:
567:
568: hr_utility.set_location(' Entering :' || l_proc,160);
569: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
570:
571: open csr_get_ovn;
572: fetch csr_get_ovn into l_object_version_number;

Line 569: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);

565: BEGIN
566:
567:
568: hr_utility.set_location(' Entering :' || l_proc,160);
569: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
570:
571: open csr_get_ovn;
572: fetch csr_get_ovn into l_object_version_number;
573: close csr_get_ovn;

Line 575: hr_utility.set_location(' p_object_version_number :' || p_object_version_number,160);

571: open csr_get_ovn;
572: fetch csr_get_ovn into l_object_version_number;
573: close csr_get_ovn;
574:
575: hr_utility.set_location(' p_object_version_number :' || p_object_version_number,160);
576: hr_utility.set_location(' l_object_version_number :' || l_object_version_number,160);
577:
578: if (p_object_version_number <> l_object_version_number) then
579: --p_return_status := 'E';

Line 576: hr_utility.set_location(' l_object_version_number :' || l_object_version_number,160);

572: fetch csr_get_ovn into l_object_version_number;
573: close csr_get_ovn;
574:
575: hr_utility.set_location(' p_object_version_number :' || p_object_version_number,160);
576: hr_utility.set_location(' l_object_version_number :' || l_object_version_number,160);
577:
578: if (p_object_version_number <> l_object_version_number) then
579: --p_return_status := 'E';
580: raise l_exp;

Line 624: hr_utility.set_location('Updated the EPS record',100);

620:
621: COMMIT;
622:
623: p_return_status := 'S';
624: hr_utility.set_location('Updated the EPS record',100);
625: hr_utility.set_location(' Leaving :' || l_proc,100);
626: exception
627: when l_exp then
628: p_return_status := 'E';

Line 625: hr_utility.set_location(' Leaving :' || l_proc,100);

621: COMMIT;
622:
623: p_return_status := 'S';
624: hr_utility.set_location('Updated the EPS record',100);
625: hr_utility.set_location(' Leaving :' || l_proc,100);
626: exception
627: when l_exp then
628: p_return_status := 'E';
629: hr_utility.set_location(' Exception :' || l_proc,100);

Line 629: hr_utility.set_location(' Exception :' || l_proc,100);

625: hr_utility.set_location(' Leaving :' || l_proc,100);
626: exception
627: when l_exp then
628: p_return_status := 'E';
629: hr_utility.set_location(' Exception :' || l_proc,100);
630: when others then
631: raise_application_error(-20001,SQLERRM);
632:
633: END update_eps_record;

Line 646: hr_utility.set_location(' Entering :' || l_proc,160);

642: is
643: l_proc varchar2(72) := g_package||'update_final_submission';
644:
645: begin
646: hr_utility.set_location(' Entering :' || l_proc,160);
647:
648: UPDATE
649: PAY_GB_EPS_DETAILS
650: SET FINAL_SUBMISSION_CEASED = p_final_submission_ceased,

Line 681: hr_utility.set_location('l_itemtype : '||l_itemtype,50);

677: description := 'Your EPS record has been Approved';
678: end if;
679:
680: -- Trace Messages
681: hr_utility.set_location('l_itemtype : '||l_itemtype,50);
682: hr_utility.set_location('l_itemkey : '||l_itemkey,50);
683: hr_utility.set_location('send_email_to : '||send_email_to,50);
684: hr_utility.set_location('description : '||description,50);
685:

Line 682: hr_utility.set_location('l_itemkey : '||l_itemkey,50);

678: end if;
679:
680: -- Trace Messages
681: hr_utility.set_location('l_itemtype : '||l_itemtype,50);
682: hr_utility.set_location('l_itemkey : '||l_itemkey,50);
683: hr_utility.set_location('send_email_to : '||send_email_to,50);
684: hr_utility.set_location('description : '||description,50);
685:
686:

Line 683: hr_utility.set_location('send_email_to : '||send_email_to,50);

679:
680: -- Trace Messages
681: hr_utility.set_location('l_itemtype : '||l_itemtype,50);
682: hr_utility.set_location('l_itemkey : '||l_itemkey,50);
683: hr_utility.set_location('send_email_to : '||send_email_to,50);
684: hr_utility.set_location('description : '||description,50);
685:
686:
687: wf_engine.createprocess(l_itemtype, l_itemkey, 'MAIN_PROCESS');

Line 684: hr_utility.set_location('description : '||description,50);

680: -- Trace Messages
681: hr_utility.set_location('l_itemtype : '||l_itemtype,50);
682: hr_utility.set_location('l_itemkey : '||l_itemkey,50);
683: hr_utility.set_location('send_email_to : '||send_email_to,50);
684: hr_utility.set_location('description : '||description,50);
685:
686:
687: wf_engine.createprocess(l_itemtype, l_itemkey, 'MAIN_PROCESS');
688:

Line 739: hr_utility.set_location('v_role_email : '||v_role_email,50);

735: v_role_email := upper(wf_engine.getitemattrtext(itemtype => itemtype
736: ,itemkey => itemkey
737: ,aname => 'SEND_TO_EMAIL'));
738:
739: hr_utility.set_location('v_role_email : '||v_role_email,50);
740:
741: SELECT COUNT(*)
742: INTO n_ctr
743: FROM wf_local_roles

Line 812: hr_utility.set_location(' Entering :' || l_proc,160);

808:
809: begin
810:
811:
812: hr_utility.set_location(' Entering :' || l_proc,160);
813:
814: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);
815: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
816: hr_utility.set_location(' p_final_submission :' || p_final_submission,160);

Line 814: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);

810:
811:
812: hr_utility.set_location(' Entering :' || l_proc,160);
813:
814: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);
815: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
816: hr_utility.set_location(' p_final_submission :' || p_final_submission,160);
817: hr_utility.set_location(' p_test_submission :' || p_test_submission,160);
818: hr_utility.set_location(' p_business_group_id :' || p_business_group_id,160);

Line 815: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);

811:
812: hr_utility.set_location(' Entering :' || l_proc,160);
813:
814: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);
815: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
816: hr_utility.set_location(' p_final_submission :' || p_final_submission,160);
817: hr_utility.set_location(' p_test_submission :' || p_test_submission,160);
818: hr_utility.set_location(' p_business_group_id :' || p_business_group_id,160);
819:

Line 816: hr_utility.set_location(' p_final_submission :' || p_final_submission,160);

812: hr_utility.set_location(' Entering :' || l_proc,160);
813:
814: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);
815: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
816: hr_utility.set_location(' p_final_submission :' || p_final_submission,160);
817: hr_utility.set_location(' p_test_submission :' || p_test_submission,160);
818: hr_utility.set_location(' p_business_group_id :' || p_business_group_id,160);
819:
820: select to_char(to_date(substr(p_effective_date,0,10),'YYYY-MM-DD'),'DD-MON-YYYY') into l_effective_date from dual;

Line 817: hr_utility.set_location(' p_test_submission :' || p_test_submission,160);

813:
814: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);
815: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
816: hr_utility.set_location(' p_final_submission :' || p_final_submission,160);
817: hr_utility.set_location(' p_test_submission :' || p_test_submission,160);
818: hr_utility.set_location(' p_business_group_id :' || p_business_group_id,160);
819:
820: select to_char(to_date(substr(p_effective_date,0,10),'YYYY-MM-DD'),'DD-MON-YYYY') into l_effective_date from dual;
821:

Line 818: hr_utility.set_location(' p_business_group_id :' || p_business_group_id,160);

814: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);
815: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
816: hr_utility.set_location(' p_final_submission :' || p_final_submission,160);
817: hr_utility.set_location(' p_test_submission :' || p_test_submission,160);
818: hr_utility.set_location(' p_business_group_id :' || p_business_group_id,160);
819:
820: select to_char(to_date(substr(p_effective_date,0,10),'YYYY-MM-DD'),'DD-MON-YYYY') into l_effective_date from dual;
821:
822: open csr_reqid;

Line 826: hr_utility.set_location(' l_req_id :'||l_req_id.request_id,160);

822: open csr_reqid;
823: fetch csr_reqid into l_req_id;
824: close csr_reqid;
825:
826: hr_utility.set_location(' l_req_id :'||l_req_id.request_id,160);
827:
828: if p_test_submission = 'Y' then
829: l_test_submission := '1';
830: else l_test_submission := ' ';

Line 857: hr_utility.set_location('This is a eText report, Spawn the BI Publisher process',1);

853:
854: -- To update Final Submission ceased and Final Submission Year
855: update_final_submission(l_effective_date,p_emp_paye_reference,p_business_group_id,l_final_submission_ceased,l_final_submission_year);
856:
857: hr_utility.set_location('This is a eText report, Spawn the BI Publisher process',1);
858: xml_layout := FND_REQUEST.ADD_LAYOUT('PAY','PYGBRTIEPSOP','en','US','ETEXT');
859:
860: IF xml_layout = true
861: THEN

Line 876: hr_utility.set_location('Error spawning new process',1);

872:
873: --check for process submit error
874: IF l_request_id = 0
875: THEN
876: hr_utility.set_location('Error spawning new process',1);
877: ELSE
878: -- Update the status of the EPS Record to 'Sent'
879: update_status_eps_record(l_effective_date,l_csr_eps.emp_paye_reference,p_business_group_id,'Sent',l_csr_eps.ovn+1,'N',l_result);
880: if(l_result = 'E') then

Line 883: hr_utility.set_location('The Record has been modified.Please resubmit the concurrent program.',100);

879: update_status_eps_record(l_effective_date,l_csr_eps.emp_paye_reference,p_business_group_id,'Sent',l_csr_eps.ovn+1,'N',l_result);
880: if(l_result = 'E') then
881: -- Someone modified the record
882: fnd_file.put_line(fnd_file.output,'The EPS Record has been modified.Please resubmit the concurrent program. ');
883: hr_utility.set_location('The Record has been modified.Please resubmit the concurrent program.',100);
884: elsif l_result = 'S' then
885: --Success
886: fnd_file.put_line(fnd_file.output,'The EPS Record has been processed. ');
887: hr_utility.set_location('The record has been Updated successfully',100);

Line 887: hr_utility.set_location('The record has been Updated successfully',100);

883: hr_utility.set_location('The Record has been modified.Please resubmit the concurrent program.',100);
884: elsif l_result = 'S' then
885: --Success
886: fnd_file.put_line(fnd_file.output,'The EPS Record has been processed. ');
887: hr_utility.set_location('The record has been Updated successfully',100);
888: end if;
889:
890: END IF;
891: END IF;

Line 921: hr_utility.set_location('PAYE REF : '||l_csr_eps_all_paye.emp_paye_reference,1);

917: l_count := 1;
918: -- To update Final Submission ceased and Final Submission Year
919: update_final_submission(l_effective_date,l_csr_eps_all_paye.emp_paye_reference,p_business_group_id,l_final_submission_ceased,l_final_submission_year);
920:
921: hr_utility.set_location('PAYE REF : '||l_csr_eps_all_paye.emp_paye_reference,1);
922: hr_utility.set_location('This is a eText report, Spawn the BI Publisher process',1);
923:
924: xml_layout := FND_REQUEST.ADD_LAYOUT('PAY','PYGBRTIEPSOP','en','US','ETEXT');
925:

Line 922: hr_utility.set_location('This is a eText report, Spawn the BI Publisher process',1);

918: -- To update Final Submission ceased and Final Submission Year
919: update_final_submission(l_effective_date,l_csr_eps_all_paye.emp_paye_reference,p_business_group_id,l_final_submission_ceased,l_final_submission_year);
920:
921: hr_utility.set_location('PAYE REF : '||l_csr_eps_all_paye.emp_paye_reference,1);
922: hr_utility.set_location('This is a eText report, Spawn the BI Publisher process',1);
923:
924: xml_layout := FND_REQUEST.ADD_LAYOUT('PAY','PYGBRTIEPSOP','en','US','ETEXT');
925:
926: IF xml_layout = true

Line 942: hr_utility.set_location('Error spawning new process',1);

938:
939: --check for process submit error
940: IF l_request_id = 0
941: THEN
942: hr_utility.set_location('Error spawning new process',1);
943: ELSE
944: -- Update the status of the EPS Record to 'Sent'
945: update_status_eps_record(l_effective_date,l_csr_eps_all_paye.emp_paye_reference,p_business_group_id,'Sent',l_csr_eps_all_paye.ovn+1,'N',l_result);
946: if(l_result = 'E') then

Line 948: hr_utility.set_location('The Record has been modified.Please resubmit the concurrent program.',100);

944: -- Update the status of the EPS Record to 'Sent'
945: update_status_eps_record(l_effective_date,l_csr_eps_all_paye.emp_paye_reference,p_business_group_id,'Sent',l_csr_eps_all_paye.ovn+1,'N',l_result);
946: if(l_result = 'E') then
947: -- Someone modified the record
948: hr_utility.set_location('The Record has been modified.Please resubmit the concurrent program.',100);
949: elsif l_result = 'S' then
950: --Success
951: fnd_file.put_line(fnd_file.output,'The EPS Record with PAYE Reference '||l_csr_eps_all_paye.emp_paye_reference||' has been processed. ');
952: hr_utility.set_location('The record has been Updated successfully',100);

Line 952: hr_utility.set_location('The record has been Updated successfully',100);

948: hr_utility.set_location('The Record has been modified.Please resubmit the concurrent program.',100);
949: elsif l_result = 'S' then
950: --Success
951: fnd_file.put_line(fnd_file.output,'The EPS Record with PAYE Reference '||l_csr_eps_all_paye.emp_paye_reference||' has been processed. ');
952: hr_utility.set_location('The record has been Updated successfully',100);
953: end if;
954:
955: END IF;
956: END IF;

Line 994: hr_utility.set_location(' Entering :' || l_proc,160);

990: l_result varchar2(1);
991: l_effective_date varchar2(15);
992: begin
993:
994: hr_utility.set_location(' Entering :' || l_proc,160);
995: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);
996: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
997:
998: select to_char(to_date(substr(p_effective_date,0,10),'YYYY-MM-DD'),'DD-MON-YYYY') into l_effective_date from dual;

Line 995: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);

991: l_effective_date varchar2(15);
992: begin
993:
994: hr_utility.set_location(' Entering :' || l_proc,160);
995: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);
996: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
997:
998: select to_char(to_date(substr(p_effective_date,0,10),'YYYY-MM-DD'),'DD-MON-YYYY') into l_effective_date from dual;
999:

Line 996: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);

992: begin
993:
994: hr_utility.set_location(' Entering :' || l_proc,160);
995: hr_utility.set_location(' p_paye_ref :' || p_emp_paye_reference,160);
996: hr_utility.set_location(' p_effective_date :' || p_effective_date,160);
997:
998: select to_char(to_date(substr(p_effective_date,0,10),'YYYY-MM-DD'),'DD-MON-YYYY') into l_effective_date from dual;
999:
1000: fnd_file.put_line(fnd_file.output,rpad('PAYE Reference : ',20) || p_emp_paye_reference);

Line 1015: hr_utility.set_location('The EPS record has been modified.Please resubmit the concurrent program.',100);

1011: update_status_eps_record(l_effective_date,p_emp_paye_reference,p_business_group_id,'Verified',l_csr_eps.ovn+1,'N',l_result);
1012:
1013: if(l_result = 'E') then
1014: -- Someone modified the record
1015: hr_utility.set_location('The EPS record has been modified.Please resubmit the concurrent program.',100);
1016: fnd_file.put_line(fnd_file.output,'The EPS record has been modified.Please resubmit the concurrent program.');
1017: elsif l_result = 'S' then
1018: --Success
1019: hr_utility.set_location('The record has been rolled back successfully',100);

Line 1019: hr_utility.set_location('The record has been rolled back successfully',100);

1015: hr_utility.set_location('The EPS record has been modified.Please resubmit the concurrent program.',100);
1016: fnd_file.put_line(fnd_file.output,'The EPS record has been modified.Please resubmit the concurrent program.');
1017: elsif l_result = 'S' then
1018: --Success
1019: hr_utility.set_location('The record has been rolled back successfully',100);
1020: fnd_file.put_line(fnd_file.output,'The EPS Record has been rolled back. ');
1021: end if;
1022: else
1023: fnd_file.put_line(fnd_file.output,'No Records found. ');

Line 1057: hr_utility.set_location('r',100);

1053: l_exp EXCEPTION;
1054: l_err boolean :=FALSE;
1055:
1056: begin
1057: hr_utility.set_location('r',100);
1058:
1059: open csr_eps;
1060: fetch csr_eps into l_csr_eps;
1061: close csr_eps;

Line 1064: hr_utility.set_location('Negative Grand Total of SMP for PAYE Reference '||p_emp_paye_reference||'.',10);

1060: fetch csr_eps into l_csr_eps;
1061: close csr_eps;
1062:
1063: if l_csr_eps.smp_amt_recovered_calc < 0 then
1064: hr_utility.set_location('Negative Grand Total of SMP for PAYE Reference '||p_emp_paye_reference||'.',10);
1065: fnd_file.put_line(fnd_file.output,'Negative Grand Total of SMP for PAYE Reference '||p_emp_paye_reference||'.');
1066: l_err := true;
1067: end if;
1068:

Line 1070: hr_utility.set_location('Negative Grand Total of SAP for PAYE Reference '||p_emp_paye_reference||'.',10);

1066: l_err := true;
1067: end if;
1068:
1069: if l_csr_eps.sap_amt_recovered_calc < 0 then
1070: hr_utility.set_location('Negative Grand Total of SAP for PAYE Reference '||p_emp_paye_reference||'.',10);
1071: fnd_file.put_line(fnd_file.output,'Negative Grand Total of SAP for PAYE Reference '||p_emp_paye_reference||'.');
1072: l_err := true;
1073: end if;
1074:

Line 1076: hr_utility.set_location('Negative Grand Total of OSPP for PAYE Reference '||p_emp_paye_reference||'.',10);

1072: l_err := true;
1073: end if;
1074:
1075: if l_csr_eps.ospp_amt_recovered_calc < 0 then
1076: hr_utility.set_location('Negative Grand Total of OSPP for PAYE Reference '||p_emp_paye_reference||'.',10);
1077: fnd_file.put_line(fnd_file.output,'Negative Grand Total of OSPP for PAYE Reference '||p_emp_paye_reference||'.');
1078: l_err := true;
1079: end if;
1080:

Line 1082: hr_utility.set_location('Negative Grand Total of ASPP for PAYE Reference '||p_emp_paye_reference||'.',10);

1078: l_err := true;
1079: end if;
1080:
1081: if l_csr_eps.aspp_amt_recovered_calc < 0 then
1082: hr_utility.set_location('Negative Grand Total of ASPP for PAYE Reference '||p_emp_paye_reference||'.',10);
1083: fnd_file.put_line(fnd_file.output,'Negative Grand Total of ASPP for PAYE Reference '||p_emp_paye_reference||'.');
1084: l_err := true;
1085: end if;
1086:

Line 1088: hr_utility.set_location('Negative Grand Total of SSP for PAYE Reference '||p_emp_paye_reference||'.',10);

1084: l_err := true;
1085: end if;
1086:
1087: if l_csr_eps.ssp_amt_recovered_calc < 0 then
1088: hr_utility.set_location('Negative Grand Total of SSP for PAYE Reference '||p_emp_paye_reference||'.',10);
1089: fnd_file.put_line(fnd_file.output,'Negative Grand Total of SSP for PAYE Reference '||p_emp_paye_reference||'.');
1090: l_err := true;
1091: end if;
1092:

Line 1094: hr_utility.set_location('Negative NIC Recovery on SMP for PAYE Reference '||p_emp_paye_reference||'.',10);

1090: l_err := true;
1091: end if;
1092:
1093: if l_csr_eps.nic_comp_smp_calc < 0 then
1094: hr_utility.set_location('Negative NIC Recovery on SMP for PAYE Reference '||p_emp_paye_reference||'.',10);
1095: fnd_file.put_line(fnd_file.output,'Negative NIC Recovery on SMP for PAYE Reference '||p_emp_paye_reference||'.');
1096: l_err := true;
1097: end if;
1098:

Line 1100: hr_utility.set_location('Negative NIC Recovery on SAP for PAYE Reference '||p_emp_paye_reference||'.',10);

1096: l_err := true;
1097: end if;
1098:
1099: if l_csr_eps.nic_comp_sap_calc < 0 then
1100: hr_utility.set_location('Negative NIC Recovery on SAP for PAYE Reference '||p_emp_paye_reference||'.',10);
1101: fnd_file.put_line(fnd_file.output,'Negative NIC Recovery on SAP for PAYE Reference '||p_emp_paye_reference||'.');
1102: l_err := true;
1103: end if;
1104:

Line 1106: hr_utility.set_location('Negative NIC Recovery on OSPP for PAYE Reference '||p_emp_paye_reference||'.',10);

1102: l_err := true;
1103: end if;
1104:
1105: if l_csr_eps.nic_comp_ospp_calc < 0 then
1106: hr_utility.set_location('Negative NIC Recovery on OSPP for PAYE Reference '||p_emp_paye_reference||'.',10);
1107: fnd_file.put_line(fnd_file.output,'Negative NIC Recovery on OSPP for PAYE Reference '||p_emp_paye_reference||'.');
1108: l_err := true;
1109: end if;
1110:

Line 1112: hr_utility.set_location('Negative NIC Recovery on ASPP for PAYE Reference '||p_emp_paye_reference||'.',10);

1108: l_err := true;
1109: end if;
1110:
1111: if l_csr_eps.nic_comp_aspp_calc < 0 then
1112: hr_utility.set_location('Negative NIC Recovery on ASPP for PAYE Reference '||p_emp_paye_reference||'.',10);
1113: fnd_file.put_line(fnd_file.output,'Negative NIC Recovery on ASPP for PAYE Reference '||p_emp_paye_reference||'.');
1114: l_err := true;
1115: end if;
1116:

Line 1118: hr_utility.set_location('Negative CIS Deductions Suffered for PAYE Reference '||p_emp_paye_reference||'.',10);

1114: l_err := true;
1115: end if;
1116:
1117: if l_csr_eps.cis_deductions_stuff < 0 then
1118: hr_utility.set_location('Negative CIS Deductions Suffered for PAYE Reference '||p_emp_paye_reference||'.',10);
1119: fnd_file.put_line(fnd_file.output,'Negative CIS Deductions Suffered for PAYE Reference '||p_emp_paye_reference||'.');
1120: l_err := true;
1121: end if;
1122:

Line 1124: hr_utility.set_location('Negative NICs Holiday value for PAYE Reference '||p_emp_paye_reference||'.',10);

1120: l_err := true;
1121: end if;
1122:
1123: if l_csr_eps.nic_holiday_val < 0 then
1124: hr_utility.set_location('Negative NICs Holiday value for PAYE Reference '||p_emp_paye_reference||'.',10);
1125: fnd_file.put_line(fnd_file.output,'Negative NICs Holiday value for PAYE Reference '||p_emp_paye_reference||'.');
1126: l_err := true;
1127: end if;
1128:

Line 1130: hr_utility.set_location('Negative Advance Received from HMRC for PAYE Reference '||p_emp_paye_reference||'.',10);

1126: l_err := true;
1127: end if;
1128:
1129: if l_csr_eps.adv_from_hmrc < 0 then
1130: hr_utility.set_location('Negative Advance Received from HMRC for PAYE Reference '||p_emp_paye_reference||'.',10);
1131: fnd_file.put_line(fnd_file.output,'Negative Advance Received from HMRC for PAYE Reference '||p_emp_paye_reference||'.');
1132: l_err := true;
1133: end if;
1134:

Line 1175: hr_utility.set_location('The HMRC Office Number is missing.',10);

1171: hmrc_office_no := nvl(substr(emp_paye_reference,0,instr(emp_paye_reference,'/')-1),' ');
1172: emp_paye_ref := nvl(upper(substr(ltrim(substr(emp_paye_reference,4,11),'/'),1,10)),' ');
1173:
1174: if hmrc_office_no = ' ' or hmrc_office_no is null then
1175: hr_utility.set_location('The HMRC Office Number is missing.',10);
1176: fnd_file.put_line(fnd_file.output,'The HMRC Office Number is missing.');
1177: l_err := true;
1178: elsif validate_input(substr(hmrc_office_no,1,3),'NUMBER') > 0
1179: then

Line 1180: hr_utility.set_location('The HMRC Office Number '||hmrc_office_no||' has invalid characters.',10);

1176: fnd_file.put_line(fnd_file.output,'The HMRC Office Number is missing.');
1177: l_err := true;
1178: elsif validate_input(substr(hmrc_office_no,1,3),'NUMBER') > 0
1179: then
1180: hr_utility.set_location('The HMRC Office Number '||hmrc_office_no||' has invalid characters.',10);
1181: fnd_file.put_line(fnd_file.output,'The HMRC Office Number '||hmrc_office_no||' has invalid characters.');
1182: l_err := true;
1183: end if;
1184:

Line 1186: hr_utility.set_location('The Employer PAYE Reference is missing.',10);

1182: l_err := true;
1183: end if;
1184:
1185: if emp_paye_ref = ' ' or emp_paye_ref is null then
1186: hr_utility.set_location('The Employer PAYE Reference is missing.',10);
1187: fnd_file.put_line(fnd_file.output,'The Employer PAYE Reference is missing.');
1188: l_err := true;
1189: elsif validate_input(emp_paye_ref,'FULL_EDI') > 0 then
1190: hr_utility.set_location('The Employer PAYE Reference '||emp_paye_reference|| ' has invalid characters.',10);

Line 1190: hr_utility.set_location('The Employer PAYE Reference '||emp_paye_reference|| ' has invalid characters.',10);

1186: hr_utility.set_location('The Employer PAYE Reference is missing.',10);
1187: fnd_file.put_line(fnd_file.output,'The Employer PAYE Reference is missing.');
1188: l_err := true;
1189: elsif validate_input(emp_paye_ref,'FULL_EDI') > 0 then
1190: hr_utility.set_location('The Employer PAYE Reference '||emp_paye_reference|| ' has invalid characters.',10);
1191: fnd_file.put_line(fnd_file.output,'The Employer PAYE Reference '||emp_paye_reference||' has invalid characters.');
1192: l_err := true;
1193: end if;
1194:

Line 1196: hr_utility.set_location('The Employer Name for PAYE Reference '||emp_paye_reference||' is missing.',10);

1192: l_err := true;
1193: end if;
1194:
1195: if employer_name = ' ' or employer_name is null then
1196: hr_utility.set_location('The Employer Name for PAYE Reference '||emp_paye_reference||' is missing.',10);
1197: fnd_file.put_line(fnd_file.output,'The Employer Name for PAYE Reference '||emp_paye_reference||' is missing.');
1198: l_err := true;
1199: elsif validate_input(employer_name,'EMP_NAME') > 0 then
1200: hr_utility.set_location('The Employer Name '||employer_name||' for PAYE Reference '||emp_paye_reference||' has invalid characters .',10);

Line 1200: hr_utility.set_location('The Employer Name '||employer_name||' for PAYE Reference '||emp_paye_reference||' has invalid characters .',10);

1196: hr_utility.set_location('The Employer Name for PAYE Reference '||emp_paye_reference||' is missing.',10);
1197: fnd_file.put_line(fnd_file.output,'The Employer Name for PAYE Reference '||emp_paye_reference||' is missing.');
1198: l_err := true;
1199: elsif validate_input(employer_name,'EMP_NAME') > 0 then
1200: hr_utility.set_location('The Employer Name '||employer_name||' for PAYE Reference '||emp_paye_reference||' has invalid characters .',10);
1201: fnd_file.put_line(fnd_file.output,'The Employer Name '||employer_name||' for PAYE Reference '||emp_paye_reference||' has invalid characters .');
1202: l_err := true;
1203: end if;
1204:

Line 1206: hr_utility.set_location('The Account Office Reference Number for PAYE Reference '||emp_paye_reference||' is missing.',10);

1202: l_err := true;
1203: end if;
1204:
1205: if acc_off_no = ' ' or acc_off_no is null then
1206: hr_utility.set_location('The Account Office Reference Number for PAYE Reference '||emp_paye_reference||' is missing.',10);
1207: fnd_file.put_line(fnd_file.output,'The Account Office Reference Number for PAYE Reference '||emp_paye_reference||' is missing.');
1208: l_err := true;
1209:
1210: elsif (length(acc_off_no) > 13

Line 1213: hr_utility.set_location ('Incorrect format entered for Accounts Office Ref Num field for PAYE Reference '||emp_paye_reference||'.Valid format is NNNPANNNNNNNX.',10);

1209:
1210: elsif (length(acc_off_no) > 13
1211: OR REGEXP_INSTR(acc_off_no,'^([[:digit:]]{1,3})P([[:alpha:]]{1})([[:digit:]]{1,7})([[:digit:]]|X)$') = 0 ) THEN
1212:
1213: hr_utility.set_location ('Incorrect format entered for Accounts Office Ref Num field for PAYE Reference '||emp_paye_reference||'.Valid format is NNNPANNNNNNNX.',10);
1214: fnd_file.put_line(fnd_file.output,'Incorrect format entered for Accounts Office Ref Num field for PAYE Reference '||emp_paye_reference||'.Valid format is NNNPANNNNNNNX.');
1215: l_err := true;
1216: END IF;
1217:

Line 1222: hr_utility.set_location ('ECON for PAYE Reference '||emp_paye_reference||' is missing.',10);

1218:
1219: -- ECON Validations
1220: IF (final_submission = 'Yes - Final for the Year' OR final_submission = 'Yes - Final for Ceased PAYE Ref') THEN
1221: IF econ = ' ' OR econ IS NULL THEN
1222: hr_utility.set_location ('ECON for PAYE Reference '||emp_paye_reference||' is missing.',10);
1223: fnd_file.put_line(fnd_file.output,'ECON for PAYE Reference '||emp_paye_reference||' is missing.');
1224: l_err := true;
1225: END IF;
1226: END IF;

Line 1229: hr_utility.set_location ('ECON for PAYE Reference '||emp_paye_reference||' is invalid.',10);

1225: END IF;
1226: END IF;
1227:
1228: IF (econ is not null AND econ <> ' ' ) AND econ_validate(econ) = 0 THEN
1229: hr_utility.set_location ('ECON for PAYE Reference '||emp_paye_reference||' is invalid.',10);
1230: fnd_file.put_line(fnd_file.output,'ECON for PAYE Reference '||emp_paye_reference||' is invalid.');
1231: l_err := true;
1232: END IF;
1233:

Line 1236: hr_utility.set_location('The EDI Sender ID for PAYE Reference '||emp_paye_reference||' is missing.',10);

1232: END IF;
1233:
1234: if final_submission is not null then
1235: if l_sender_id is null or l_sender_id = ' ' then
1236: hr_utility.set_location('The EDI Sender ID for PAYE Reference '||emp_paye_reference||' is missing.',10);
1237: fnd_file.put_line(fnd_file.output,'The EDI Sender ID for PAYE Reference '||emp_paye_reference||' is missing.');
1238: l_err := true;
1239: end if;
1240: end if;

Line 1244: hr_utility.set_location('The Tax Year of Effective Date must be 2013 or later.',10);

1240: end if;
1241:
1242: -- Tax Year Validations
1243: if tax_year < 2013 then
1244: hr_utility.set_location('The Tax Year of Effective Date must be 2013 or later.',10);
1245: fnd_file.put_line(fnd_file.output,'The Tax Year of Effective Date must be 2013 or later.');
1246: l_err := true;
1247: end if;
1248:

Line 1256: hr_utility.trace('tax year = '||tax_year);

1252: Else
1253: l_current_tax_year := substr(to_char(sysdate,'YYYY/MON/DD'),1,4) ;
1254: End If;
1255:
1256: hr_utility.trace('tax year = '||tax_year);
1257: hr_utility.trace('Current year = '||l_current_tax_year);
1258: if( tax_year < (l_current_tax_year - 2 ) or tax_year > l_current_tax_year ) then
1259: hr_utility.set_location('The Tax Year of Effective Date must be within the Current Tax Year - 2 to Current Tax Year.',10);
1260: fnd_file.put_line(fnd_file.output,'The Tax Year of Effective Date must be within the Current Tax Year - 2 to Current Tax Year.');

Line 1257: hr_utility.trace('Current year = '||l_current_tax_year);

1253: l_current_tax_year := substr(to_char(sysdate,'YYYY/MON/DD'),1,4) ;
1254: End If;
1255:
1256: hr_utility.trace('tax year = '||tax_year);
1257: hr_utility.trace('Current year = '||l_current_tax_year);
1258: if( tax_year < (l_current_tax_year - 2 ) or tax_year > l_current_tax_year ) then
1259: hr_utility.set_location('The Tax Year of Effective Date must be within the Current Tax Year - 2 to Current Tax Year.',10);
1260: fnd_file.put_line(fnd_file.output,'The Tax Year of Effective Date must be within the Current Tax Year - 2 to Current Tax Year.');
1261: l_err := true;

Line 1259: hr_utility.set_location('The Tax Year of Effective Date must be within the Current Tax Year - 2 to Current Tax Year.',10);

1255:
1256: hr_utility.trace('tax year = '||tax_year);
1257: hr_utility.trace('Current year = '||l_current_tax_year);
1258: if( tax_year < (l_current_tax_year - 2 ) or tax_year > l_current_tax_year ) then
1259: hr_utility.set_location('The Tax Year of Effective Date must be within the Current Tax Year - 2 to Current Tax Year.',10);
1260: fnd_file.put_line(fnd_file.output,'The Tax Year of Effective Date must be within the Current Tax Year - 2 to Current Tax Year.');
1261: l_err := true;
1262: end if;
1263:

Line 1298: hr_utility.trace('Entering validate_input');

1294: l_translated_value varchar2(200); -- Required to output failing char.
1295: --
1296: BEGIN
1297: --
1298: hr_utility.trace('Entering validate_input');
1299: hr_utility.trace('p_validate_mode='||p_validate_mode);
1300: hr_utility.trace('p_input_value='||p_input_value);
1301: --
1302:

Line 1299: hr_utility.trace('p_validate_mode='||p_validate_mode);

1295: --
1296: BEGIN
1297: --
1298: hr_utility.trace('Entering validate_input');
1299: hr_utility.trace('p_validate_mode='||p_validate_mode);
1300: hr_utility.trace('p_input_value='||p_input_value);
1301: --
1302:
1303: if p_validate_mode = 'EMP_NAME' then

Line 1300: hr_utility.trace('p_input_value='||p_input_value);

1296: BEGIN
1297: --
1298: hr_utility.trace('Entering validate_input');
1299: hr_utility.trace('p_validate_mode='||p_validate_mode);
1300: hr_utility.trace('p_input_value='||p_input_value);
1301: --
1302:
1303: if p_validate_mode = 'EMP_NAME' then
1304: if ( substr(p_input_value,1,1) =' ') then

Line 1305: hr_utility.trace('Invalid first char: '||substr(p_input_value,1,1));

1301: --
1302:
1303: if p_validate_mode = 'EMP_NAME' then
1304: if ( substr(p_input_value,1,1) =' ') then
1305: hr_utility.trace('Invalid first char: '||substr(p_input_value,1,1));
1306: l_valid := 2;
1307: else
1308: l_translated_value :=
1309: translate(p_input_value,

Line 1313: hr_utility.trace('Invalid chars found: '||l_translated_value);

1309: translate(p_input_value,
1310: l_invalid_char||l_mix_chars||l_number_chk||l_char_set_A||l_space,l_invalid_char);
1311:
1312: if l_translated_value is not null then
1313: hr_utility.trace('Invalid chars found: '||l_translated_value);
1314: l_valid := 1; -- Not valid
1315: else
1316: l_valid := 0; -- Valid
1317: end if;

Line 1329: hr_utility.trace('Invalid chars found: '||l_translated_value);

1325: translate(p_input_value,
1326: l_invalid_char||l_number_chk,l_invalid_char);
1327:
1328: if l_translated_value is not null then
1329: hr_utility.trace('Invalid chars found: '||l_translated_value);
1330: l_valid := 1; -- Not valid
1331: else
1332: l_valid := 0; -- Valid
1333: end if;

Line 1340: hr_utility.trace('Invalid first char: '||substr(p_input_value,1,1));

1336: --
1337: -- Check for Valid First Char
1338: --
1339: if ( substr(p_input_value,1,1) =' ') then
1340: hr_utility.trace('Invalid first char: '||substr(p_input_value,1,1));
1341: l_valid := 2;
1342: else
1343: l_translated_value :=
1344: translate(p_input_value,

Line 1348: hr_utility.trace('Invalid chars found: '||l_translated_value);

1344: translate(p_input_value,
1345: l_invalid_char||l_mix_chars||l_number_chk||l_char_set_B||l_space,l_invalid_char);
1346:
1347: if l_translated_value is not null then
1348: hr_utility.trace('Invalid chars found: '||l_translated_value);
1349: l_valid := 1; -- Not valid
1350: else
1351: l_valid := 0; -- Valid
1352: end if;

Line 1356: hr_utility.trace('Leaving validate_input');

1352: end if;
1353: end if;
1354: END IF;
1355: --
1356: hr_utility.trace('Leaving validate_input');
1357: return l_valid;
1358: end validate_input;
1359:
1360:

Line 1372: hr_utility.trace('Entering ECON Validate');

1368: l_reminder number;
1369: l_check_letters varchar2(19) := 'ABCDEFHJKLMNPQRTWXY';
1370:
1371: begin
1372: hr_utility.trace('Entering ECON Validate');
1373:
1374: -- Format Check ENNNNNNNA
1375: IF regexp_instr(econ,'^E[[:digit:]]{7}[[:alpha:]]$') = 0 THEN
1376: hr_utility.set_location('ECON Validation Fails',10);

Line 1376: hr_utility.set_location('ECON Validation Fails',10);

1372: hr_utility.trace('Entering ECON Validate');
1373:
1374: -- Format Check ENNNNNNNA
1375: IF regexp_instr(econ,'^E[[:digit:]]{7}[[:alpha:]]$') = 0 THEN
1376: hr_utility.set_location('ECON Validation Fails',10);
1377: return 0;-- Validation fails
1378: END IF;
1379:
1380: -- First Char must be E

Line 1382: hr_utility.set_location('ECON Validation Fails',10);

1378: END IF;
1379:
1380: -- First Char must be E
1381: IF substr(econ,1,1) <> 'E' THEN
1382: hr_utility.set_location('ECON Validation Fails',10);
1383: return 0;-- Validation fails
1384:
1385: -- Next 7 should be numeric ranging 3000000 up to 3999999
1386: ELSIF substr(econ,2,7) < 3000000 OR substr(econ,2,7) > 3999999 THEN

Line 1387: hr_utility.set_location('ECON Validation Fails',20);

1383: return 0;-- Validation fails
1384:
1385: -- Next 7 should be numeric ranging 3000000 up to 3999999
1386: ELSIF substr(econ,2,7) < 3000000 OR substr(econ,2,7) > 3999999 THEN
1387: hr_utility.set_location('ECON Validation Fails',20);
1388: return 0;-- Validation fails
1389: END IF;
1390:
1391: -- Last char must be alpha satifying modulas 19 rule

Line 1401: hr_utility.set_location('ECON Validation Fails',30);

1397: l_sum := l_sum + l_fixed_value;
1398: l_reminder := mod(l_sum,19);
1399:
1400: IF substr(l_check_letters,l_reminder+1,1) <> substr(econ,9,1) THEN
1401: hr_utility.set_location('ECON Validation Fails',30);
1402: return 0; -- Validation Fails
1403: END IF;
1404:
1405: return 1; -- Validation passes

Line 1406: hr_utility.trace('Leaving ECON Validate');

1402: return 0; -- Validation Fails
1403: END IF;
1404:
1405: return 1; -- Validation passes
1406: hr_utility.trace('Leaving ECON Validate');
1407: END econ_validate;
1408:
1409: function tax_year return number
1410: is