DBA Data[Home] [Help]

APPS.PAY_NO_TAX_TABLE_UPLOAD dependencies on HR_UTILITY

Line 45: --hr_utility.trace_on(null,'vsvn1');

41:
42: Legislation_Code PER_BUSINESS_GROUPS.LEGISLATION_CODE%TYPE;
43:
44: BEGIN
45: --hr_utility.trace_on(null,'vsvn1');
46: OPEN CSR_Legislation_Code;
47: FETCH CSR_Legislation_Code into lr_Legislation_Code;
48: close CSR_Legislation_Code;
49:

Line 52: hr_utility.set_location ( 'Entering:' || l_proc, 10);

48: close CSR_Legislation_Code;
49:
50: Legislation_Code := lr_Legislation_Code.LEGISLATION_CODE;
51:
52: hr_utility.set_location ( 'Entering:' || l_proc, 10);
53:
54: hr_utility.set_location ( 'p_business_group'||p_business_group,15);
55: hr_utility.set_location ( 'Legislation = ' || legislation_code, 20);
56: hr_utility.set_location ( 'Effective Start Date = ' || p_effective_start_date, 21);

Line 54: hr_utility.set_location ( 'p_business_group'||p_business_group,15);

50: Legislation_Code := lr_Legislation_Code.LEGISLATION_CODE;
51:
52: hr_utility.set_location ( 'Entering:' || l_proc, 10);
53:
54: hr_utility.set_location ( 'p_business_group'||p_business_group,15);
55: hr_utility.set_location ( 'Legislation = ' || legislation_code, 20);
56: hr_utility.set_location ( 'Effective Start Date = ' || p_effective_start_date, 21);
57: hr_utility.set_location ( 'c_end_of_time = ' || c_end_of_time, 22);
58:

Line 55: hr_utility.set_location ( 'Legislation = ' || legislation_code, 20);

51:
52: hr_utility.set_location ( 'Entering:' || l_proc, 10);
53:
54: hr_utility.set_location ( 'p_business_group'||p_business_group,15);
55: hr_utility.set_location ( 'Legislation = ' || legislation_code, 20);
56: hr_utility.set_location ( 'Effective Start Date = ' || p_effective_start_date, 21);
57: hr_utility.set_location ( 'c_end_of_time = ' || c_end_of_time, 22);
58:
59: -- Check for Sweden Localization.

Line 56: hr_utility.set_location ( 'Effective Start Date = ' || p_effective_start_date, 21);

52: hr_utility.set_location ( 'Entering:' || l_proc, 10);
53:
54: hr_utility.set_location ( 'p_business_group'||p_business_group,15);
55: hr_utility.set_location ( 'Legislation = ' || legislation_code, 20);
56: hr_utility.set_location ( 'Effective Start Date = ' || p_effective_start_date, 21);
57: hr_utility.set_location ( 'c_end_of_time = ' || c_end_of_time, 22);
58:
59: -- Check for Sweden Localization.
60: IF legislation_code= 'NO'

Line 57: hr_utility.set_location ( 'c_end_of_time = ' || c_end_of_time, 22);

53:
54: hr_utility.set_location ( 'p_business_group'||p_business_group,15);
55: hr_utility.set_location ( 'Legislation = ' || legislation_code, 20);
56: hr_utility.set_location ( 'Effective Start Date = ' || p_effective_start_date, 21);
57: hr_utility.set_location ( 'c_end_of_time = ' || c_end_of_time, 22);
58:
59: -- Check for Sweden Localization.
60: IF legislation_code= 'NO'
61: THEN

Line 86: hr_utility.set_location ( 'Leaving:' || l_proc, 40);

82: PURGE(l_errbuf,l_retcode,NULL,NULL,NULL);
83: commit;
84: END IF;
85:
86: hr_utility.set_location ( 'Leaving:' || l_proc, 40);
87: END MAIN;
88:
89: /* */
90:

Line 152: --hr_utility.trace_on(null,'tax');

148: l_RANGE_TABLE_ID PAY_RANGE_TABLES_F.RANGE_TABLE_ID%TYPE;
149:
150: BEGIN
151:
152: --hr_utility.trace_on(null,'tax');
153: hr_utility.set_location ( 'Entering: Purge ', 10);
154: hr_utility.set_location ( 'p_business_group '||p_business_group, 10);
155:
156: hr_utility.set_location ( 'p_effective_start_date'||p_effective_start_date, 10);

Line 153: hr_utility.set_location ( 'Entering: Purge ', 10);

149:
150: BEGIN
151:
152: --hr_utility.trace_on(null,'tax');
153: hr_utility.set_location ( 'Entering: Purge ', 10);
154: hr_utility.set_location ( 'p_business_group '||p_business_group, 10);
155:
156: hr_utility.set_location ( 'p_effective_start_date'||p_effective_start_date, 10);
157: hr_utility.set_location ( 'p_effective_end_date'||p_effective_end_date, 10);

Line 154: hr_utility.set_location ( 'p_business_group '||p_business_group, 10);

150: BEGIN
151:
152: --hr_utility.trace_on(null,'tax');
153: hr_utility.set_location ( 'Entering: Purge ', 10);
154: hr_utility.set_location ( 'p_business_group '||p_business_group, 10);
155:
156: hr_utility.set_location ( 'p_effective_start_date'||p_effective_start_date, 10);
157: hr_utility.set_location ( 'p_effective_end_date'||p_effective_end_date, 10);
158:

Line 156: hr_utility.set_location ( 'p_effective_start_date'||p_effective_start_date, 10);

152: --hr_utility.trace_on(null,'tax');
153: hr_utility.set_location ( 'Entering: Purge ', 10);
154: hr_utility.set_location ( 'p_business_group '||p_business_group, 10);
155:
156: hr_utility.set_location ( 'p_effective_start_date'||p_effective_start_date, 10);
157: hr_utility.set_location ( 'p_effective_end_date'||p_effective_end_date, 10);
158:
159: IF p_effective_start_date is NULL AND p_effective_end_date IS NULL
160: THEN

Line 157: hr_utility.set_location ( 'p_effective_end_date'||p_effective_end_date, 10);

153: hr_utility.set_location ( 'Entering: Purge ', 10);
154: hr_utility.set_location ( 'p_business_group '||p_business_group, 10);
155:
156: hr_utility.set_location ( 'p_effective_start_date'||p_effective_start_date, 10);
157: hr_utility.set_location ( 'p_effective_end_date'||p_effective_end_date, 10);
158:
159: IF p_effective_start_date is NULL AND p_effective_end_date IS NULL
160: THEN
161: DELETE FROM PAY_RANGE_TEMP;

Line 171: hr_utility.set_location ( 'Legislation_Code'||Legislation_Code, 10);

167: close CSR_Legislation_Code;
168:
169: Legislation_Code := lr_Legislation_Code.LEGISLATION_CODE;
170:
171: hr_utility.set_location ( 'Legislation_Code'||Legislation_Code, 10);
172:
173: OPEN csr_RANGE_TABLE_ID(Legislation_Code);
174: LOOP
175: FETCH csr_RANGE_TABLE_ID into l_RANGE_TABLE_ID,l_Prf_OBJECT_VERSION_NUMBER;

Line 435: hr_utility.set_location ( 'UPLOAD PROCESS',10);

431: l_Check := ' ';
432:
433: select max(range_id) into l_max_range_id from PAY_RANGE_TEMP;
434:
435: hr_utility.set_location ( 'UPLOAD PROCESS',10);
436:
437: l_object_version_number := 1;
438:
439:

Line 482: hr_utility.set_location ( 'PROCESS',10);

478: IF l_csr_range_table_id <> -99
479: THEN
480: -- It found the master id is already present which has to be end-dated.
481:
482: hr_utility.set_location ( 'PROCESS',10);
483: pay_range_table_api.update_range_table
484: (
485: p_RANGE_TABLE_ID => l_csr_range_table_id
486: ,p_EFFECTIVE_END_DATE => p_effective_start_date -1

Line 604: hr_utility.set_location (l_proc, 270);

600: WHEN e_SAME_DATE
601: -- Data already availabe on same date
602: THEN
603:
604: hr_utility.set_location (l_proc, 270);
605: -- Set retcode to 2, indicating an ERROR to the ConcMgr
606: retcode := g_error;
607:
608: -- Set the application error

Line 609: hr_utility.set_message (801, 'PAY_376850_NO_DATE_INVALID');

605: -- Set retcode to 2, indicating an ERROR to the ConcMgr
606: retcode := g_error;
607:
608: -- Set the application error
609: hr_utility.set_message (801, 'PAY_376850_NO_DATE_INVALID');
610:
611: -- Return the message to the ConcMgr (This msg will appear in the log file)
612: errbuf := hr_utility.get_message;
613: -- *************************************

Line 612: errbuf := hr_utility.get_message;

608: -- Set the application error
609: hr_utility.set_message (801, 'PAY_376850_NO_DATE_INVALID');
610:
611: -- Return the message to the ConcMgr (This msg will appear in the log file)
612: errbuf := hr_utility.get_message;
613: -- *************************************
614:
615: -- *************************************
616: WHEN e_FUTURE_REC_EXISTS

Line 620: hr_utility.set_location (l_proc, 270);

616: WHEN e_FUTURE_REC_EXISTS
617: -- Data already availabe on same date
618: THEN
619:
620: hr_utility.set_location (l_proc, 270);
621: -- Set retcode to 2, indicating an ERROR to the ConcMgr
622: retcode := g_error;
623:
624: -- Set the application error

Line 625: hr_utility.set_message (801, 'PAY_376851_NO_FUTURE_DATA_EXST');

621: -- Set retcode to 2, indicating an ERROR to the ConcMgr
622: retcode := g_error;
623:
624: -- Set the application error
625: hr_utility.set_message (801, 'PAY_376851_NO_FUTURE_DATA_EXST');
626:
627: -- Return the message to the ConcMgr (This msg will appear in the log file)
628: errbuf := hr_utility.get_message;
629: -- *************************************

Line 628: errbuf := hr_utility.get_message;

624: -- Set the application error
625: hr_utility.set_message (801, 'PAY_376851_NO_FUTURE_DATA_EXST');
626:
627: -- Return the message to the ConcMgr (This msg will appear in the log file)
628: errbuf := hr_utility.get_message;
629: -- *************************************
630:
631:
632:

Line 727: hr_utility.set_location ( 'Entering:' || l_proc, 10);

723: l_amount2 PAY_RANGES_F.AMOUNT2%TYPE;
724:
725: BEGIN
726:
727: hr_utility.set_location ( 'Entering:' || l_proc, 10);
728:
729: hr_utility.set_location('p_data_file_name '||p_data_file_name,1);
730:
731: l_filename := p_data_file_name;

Line 729: hr_utility.set_location('p_data_file_name '||p_data_file_name,1);

725: BEGIN
726:
727: hr_utility.set_location ( 'Entering:' || l_proc, 10);
728:
729: hr_utility.set_location('p_data_file_name '||p_data_file_name,1);
730:
731: l_filename := p_data_file_name;
732: fnd_profile.get (c_data_exchange_dir, l_location);
733:

Line 734: hr_utility.set_location ( 'Directory = ' || l_location, 30);

730:
731: l_filename := p_data_file_name;
732: fnd_profile.get (c_data_exchange_dir, l_location);
733:
734: hr_utility.set_location ( 'Directory = ' || l_location, 30);
735:
736: IF l_location IS NULL
737: THEN
738: hr_utility.set_location ( 'Raising I/O error = ' || l_location, 35);

Line 738: hr_utility.set_location ( 'Raising I/O error = ' || l_location, 35);

734: hr_utility.set_location ( 'Directory = ' || l_location, 30);
735:
736: IF l_location IS NULL
737: THEN
738: hr_utility.set_location ( 'Raising I/O error = ' || l_location, 35);
739: -- error : I/O directory not defined
740: RAISE e_fatal_error;
741: END IF;
742:

Line 759: hr_utility.set_location ( ' line read: ' || l_line_read ,60);

755: BEGIN
756: UTL_FILE.get_line (l_file_type, l_line_read);
757: l_batch_seq := l_batch_seq + 1;
758:
759: hr_utility.set_location ( ' line read: ' || l_line_read ,60);
760:
761: -- Calling the procedure tyo split the line into variables
762:
763: split_line

Line 816: hr_utility.set_message (801, 'PAY_376852_NO_RECORD_TOO_LONG');

812: -- Set retcode to 1, indicating a WARNING to the ConcMgr
813: retcode := g_warning;
814:
815: -- Set the application error
816: hr_utility.set_message (801, 'PAY_376852_NO_RECORD_TOO_LONG');
817: hr_utility.set_message_token (801, 'LINE_NO', l_batch_seq);
818: hr_utility.set_message_token (801, 'LINE', l_line_read);
819: hr_utility.set_location (l_proc, 260);
820:

Line 817: hr_utility.set_message_token (801, 'LINE_NO', l_batch_seq);

813: retcode := g_warning;
814:
815: -- Set the application error
816: hr_utility.set_message (801, 'PAY_376852_NO_RECORD_TOO_LONG');
817: hr_utility.set_message_token (801, 'LINE_NO', l_batch_seq);
818: hr_utility.set_message_token (801, 'LINE', l_line_read);
819: hr_utility.set_location (l_proc, 260);
820:
821: -- Write the message to log file, do not raise an application error but continue

Line 818: hr_utility.set_message_token (801, 'LINE', l_line_read);

814:
815: -- Set the application error
816: hr_utility.set_message (801, 'PAY_376852_NO_RECORD_TOO_LONG');
817: hr_utility.set_message_token (801, 'LINE_NO', l_batch_seq);
818: hr_utility.set_message_token (801, 'LINE', l_line_read);
819: hr_utility.set_location (l_proc, 260);
820:
821: -- Write the message to log file, do not raise an application error but continue
822: -- (with next line)

Line 819: hr_utility.set_location (l_proc, 260);

815: -- Set the application error
816: hr_utility.set_message (801, 'PAY_376852_NO_RECORD_TOO_LONG');
817: hr_utility.set_message_token (801, 'LINE_NO', l_batch_seq);
818: hr_utility.set_message_token (801, 'LINE', l_line_read);
819: hr_utility.set_location (l_proc, 260);
820:
821: -- Write the message to log file, do not raise an application error but continue
822: -- (with next line)
823:

Line 824: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);

820:
821: -- Write the message to log file, do not raise an application error but continue
822: -- (with next line)
823:
824: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);
825: -- *************************************
826: WHEN e_empty_line THEN
827: -- Set retcode to 1, indicating a WARNING to the ConcMgr
828: retcode := g_warning;

Line 832: hr_utility.set_message (800, 'PAY_376853_NO_EMPTY_LINE');

828: retcode := g_warning;
829:
830: -- Set the application error
831:
832: hr_utility.set_message (800, 'PAY_376853_NO_EMPTY_LINE');
833: hr_utility.set_message_token (800, 'LINE_NO', l_batch_seq);
834:
835:
836: -- Write the message to log file, do not raise an application error but continue

Line 833: hr_utility.set_message_token (800, 'LINE_NO', l_batch_seq);

829:
830: -- Set the application error
831:
832: hr_utility.set_message (800, 'PAY_376853_NO_EMPTY_LINE');
833: hr_utility.set_message_token (800, 'LINE_NO', l_batch_seq);
834:
835:
836: -- Write the message to log file, do not raise an application error but continue
837: -- (with next line)

Line 839: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);

835:
836: -- Write the message to log file, do not raise an application error but continue
837: -- (with next line)
838:
839: fnd_file.put_line (fnd_file.LOG, hr_utility.get_message);
840: END; -- file reading Begin
841:
842: END LOOP read_lines_in_file;
843:

Line 848: hr_utility.set_location ( 'Leaving:'|| l_proc, 260);

844: -- Commit the outstanding records
845: COMMIT;
846:
847: UTL_FILE.fclose (l_file_type);
848: hr_utility.set_location ( 'Leaving:'|| l_proc, 260);
849:
850:
851: EXCEPTION
852: -- When file location is not proper

Line 863: hr_utility.set_location (l_proc, 270);

859: THEN
860: UTL_FILE.fclose (l_file_type);
861: END IF;
862:
863: hr_utility.set_location (l_proc, 270);
864: -- Set retcode to 2, indicating an ERROR to the ConcMgr
865: retcode := g_error;
866:
867: -- Set the application error

Line 868: hr_utility.set_message (801, 'PAY_376826_NO_DATA_EXC_DIR_MIS');

864: -- Set retcode to 2, indicating an ERROR to the ConcMgr
865: retcode := g_error;
866:
867: -- Set the application error
868: hr_utility.set_message (801, 'PAY_376826_NO_DATA_EXC_DIR_MIS');
869:
870: -- Return the message to the ConcMgr (This msg will appear in the log file)
871: errbuf := hr_utility.get_message;
872:

Line 871: errbuf := hr_utility.get_message;

867: -- Set the application error
868: hr_utility.set_message (801, 'PAY_376826_NO_DATA_EXC_DIR_MIS');
869:
870: -- Return the message to the ConcMgr (This msg will appear in the log file)
871: errbuf := hr_utility.get_message;
872:
873: -- ***********************************************
874:
875: WHEN UTL_FILE.invalid_operation

Line 886: hr_utility.set_location (l_proc, 280);

882: THEN
883: UTL_FILE.fclose (l_file_type);
884: END IF;
885:
886: hr_utility.set_location (l_proc, 280);
887: retcode := g_error;
888: errbuf := 'Reading File ('||l_location ||' -> ' || l_filename || ') - Invalid Operation.';
889:
890: -- ***********************************************

Line 900: hr_utility.set_location (l_proc, 290);

896: THEN
897: UTL_FILE.fclose (l_file_type);
898: END IF;
899:
900: hr_utility.set_location (l_proc, 290);
901: retcode := g_error;
902: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Internal Error.';
903:
904: -- ***********************************************

Line 914: hr_utility.set_location (l_proc, 300);

910: THEN
911: UTL_FILE.fclose (l_file_type);
912: END IF;
913:
914: hr_utility.set_location (l_proc, 300);
915: retcode := g_error;
916: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Invalid Mode.';
917:
918: -- ***********************************************

Line 930: hr_utility.set_location (l_proc, 310);

926: END IF;
927:
928: retcode := g_error;
929: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Invalid Path or Filename.';
930: hr_utility.set_location (l_proc, 310);
931:
932: -- ***********************************************
933:
934: WHEN UTL_FILE.invalid_filehandle

Line 942: hr_utility.set_location (l_proc, 320);

938: THEN
939: UTL_FILE.fclose (l_file_type);
940: END IF;
941:
942: hr_utility.set_location (l_proc, 320);
943: retcode := g_error;
944: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Invalid File Type.';
945: WHEN UTL_FILE.read_error
946:

Line 956: hr_utility.set_location (l_proc, 330);

952: THEN
953: UTL_FILE.fclose (l_file_type);
954: END IF;
955:
956: hr_utility.set_location (l_proc, 330);
957: retcode := g_error;
958: errbuf := 'Reading File (' || l_location || ' -> ' || l_filename || ') - Read Error.';
959:
960: -- ***********************************************

Line 1002: hr_utility.set_location ( 'Entering:'|| l_proc, 70);

998: -- Procedure name
999: l_proc CONSTANT VARCHAR2 (72) := g_package|| '.split_line';
1000: l_record_length NUMBER := 16;
1001: BEGIN
1002: hr_utility.set_location ( 'Entering:'|| l_proc, 70);
1003:
1004: --Set record length
1005: l_record_length := 16;
1006: IF p_line is NULL

Line 1014: hr_utility.set_location ( ' Record too long', 110);

1010: ELSE
1011: -- Error in record if it is too long according to given format
1012: /*IF (length(p_line)> l_record_length)
1013: THEN
1014: hr_utility.set_location ( ' Record too long', 110);
1015: RAISE e_record_too_long;
1016: END IF;*/
1017:
1018:

Line 1025: hr_utility.set_location ( ' p_RANGE_TABLE_NUMBER' || p_RANGE_TABLE_NUMBER, 110);

1021: p_EARNINGS_TYPE := substr( p_line ,6,1);
1022: p_LOW_BAND := substr( p_line ,7,5);
1023: p_AMOUNT1 := substr( p_line ,12,5);
1024:
1025: hr_utility.set_location ( ' p_RANGE_TABLE_NUMBER' || p_RANGE_TABLE_NUMBER, 110);
1026: hr_utility.set_location ( ' p_EARNINGS_TYPE ' || p_EARNINGS_TYPE, 110);
1027: hr_utility.set_location ( ' p_PERIOD_FREQUENCY ' || p_PERIOD_FREQUENCY, 110);
1028: hr_utility.set_location ( ' p_LOW_BAND ' ||p_LOW_BAND , 110);
1029: hr_utility.set_location ( ' p_AMOUNT1 ' ||p_AMOUNT1 , 110);

Line 1026: hr_utility.set_location ( ' p_EARNINGS_TYPE ' || p_EARNINGS_TYPE, 110);

1022: p_LOW_BAND := substr( p_line ,7,5);
1023: p_AMOUNT1 := substr( p_line ,12,5);
1024:
1025: hr_utility.set_location ( ' p_RANGE_TABLE_NUMBER' || p_RANGE_TABLE_NUMBER, 110);
1026: hr_utility.set_location ( ' p_EARNINGS_TYPE ' || p_EARNINGS_TYPE, 110);
1027: hr_utility.set_location ( ' p_PERIOD_FREQUENCY ' || p_PERIOD_FREQUENCY, 110);
1028: hr_utility.set_location ( ' p_LOW_BAND ' ||p_LOW_BAND , 110);
1029: hr_utility.set_location ( ' p_AMOUNT1 ' ||p_AMOUNT1 , 110);
1030:

Line 1027: hr_utility.set_location ( ' p_PERIOD_FREQUENCY ' || p_PERIOD_FREQUENCY, 110);

1023: p_AMOUNT1 := substr( p_line ,12,5);
1024:
1025: hr_utility.set_location ( ' p_RANGE_TABLE_NUMBER' || p_RANGE_TABLE_NUMBER, 110);
1026: hr_utility.set_location ( ' p_EARNINGS_TYPE ' || p_EARNINGS_TYPE, 110);
1027: hr_utility.set_location ( ' p_PERIOD_FREQUENCY ' || p_PERIOD_FREQUENCY, 110);
1028: hr_utility.set_location ( ' p_LOW_BAND ' ||p_LOW_BAND , 110);
1029: hr_utility.set_location ( ' p_AMOUNT1 ' ||p_AMOUNT1 , 110);
1030:
1031: END IF;

Line 1028: hr_utility.set_location ( ' p_LOW_BAND ' ||p_LOW_BAND , 110);

1024:
1025: hr_utility.set_location ( ' p_RANGE_TABLE_NUMBER' || p_RANGE_TABLE_NUMBER, 110);
1026: hr_utility.set_location ( ' p_EARNINGS_TYPE ' || p_EARNINGS_TYPE, 110);
1027: hr_utility.set_location ( ' p_PERIOD_FREQUENCY ' || p_PERIOD_FREQUENCY, 110);
1028: hr_utility.set_location ( ' p_LOW_BAND ' ||p_LOW_BAND , 110);
1029: hr_utility.set_location ( ' p_AMOUNT1 ' ||p_AMOUNT1 , 110);
1030:
1031: END IF;
1032:

Line 1029: hr_utility.set_location ( ' p_AMOUNT1 ' ||p_AMOUNT1 , 110);

1025: hr_utility.set_location ( ' p_RANGE_TABLE_NUMBER' || p_RANGE_TABLE_NUMBER, 110);
1026: hr_utility.set_location ( ' p_EARNINGS_TYPE ' || p_EARNINGS_TYPE, 110);
1027: hr_utility.set_location ( ' p_PERIOD_FREQUENCY ' || p_PERIOD_FREQUENCY, 110);
1028: hr_utility.set_location ( ' p_LOW_BAND ' ||p_LOW_BAND , 110);
1029: hr_utility.set_location ( ' p_AMOUNT1 ' ||p_AMOUNT1 , 110);
1030:
1031: END IF;
1032:
1033: hr_utility.set_location ( 'Leaving:'|| l_proc, 120);

Line 1033: hr_utility.set_location ( 'Leaving:'|| l_proc, 120);

1029: hr_utility.set_location ( ' p_AMOUNT1 ' ||p_AMOUNT1 , 110);
1030:
1031: END IF;
1032:
1033: hr_utility.set_location ( 'Leaving:'|| l_proc, 120);
1034: END;
1035: END pay_no_tax_table_upload;