2: /* $Header: pydkstatsr.pkb 120.36 2012/01/19 09:10:45 rpahune ship $ */
3:
4: --Global parameters
5: g_package CONSTANT varchar2(33) := 'PAY_DK_STATSR_PKG.';
6: g_debug BOOLEAN := hr_utility.debug_enabled;
7: g_err_num NUMBER;
8:
9:
10: -----------------------------------------------------------------------------
43: l_delimiter VARCHAR2(1):=' ';
44:
45: BEGIN
46: IF g_debug THEN
47: hr_utility.set_location(' Entering Function GET_PARAMETER',10);
48: END IF;
49:
50: l_start_pos := instr(' '||p_parameter_string,l_delimiter||p_token||'=');
51:
69: END IF;
70:
71: RETURN l_parameter;
72: IF g_debug THEN
73: hr_utility.set_location(' Leaving Function GET_PARAMETER',20);
74: END IF;
75:
76: END GET_PARAMETER;
77:
105: --
106: BEGIN
107:
108: IF g_debug THEN
109: hr_utility.set_location(' Entering procedure '||l_proc,10);
110: END IF;
111:
112: OPEN csr_parameter_info (p_payroll_action_id);
113:
121: ,p_business_group_id;
122: CLOSE csr_parameter_info;
123: --
124: IF g_debug THEN
125: hr_utility.set_location(' Leaving procedure '||l_proc,20);
126: END IF;
127: END GET_ALL_PARAMETERS;
128:
129: ----------------------------------------------------
146: l_proc varchar2(72) := g_package||'get_global_value';
147:
148: BEGIN
149: IF g_debug THEN
150: hr_utility.set_location('Entering:'|| l_proc, 1);
151: END IF;
152:
153: OPEN csr_globals;
154: FETCH csr_globals INTO l_global_value;
154: FETCH csr_globals INTO l_global_value;
155: CLOSE csr_globals;
156:
157: IF g_debug THEN
158: hr_utility.set_location('Entering:'|| l_proc, 2);
159: END IF;
160:
161: RETURN l_global_value;
162: END GET_GLOBAL_VALUE;
410:
411: BEGIN
412:
413: IF g_debug THEN
414: hr_utility.set_location(' Entering Procedure RANGE_CODE',10);
415: END IF;
416:
417:
418: -- The sql string to return
583:
584: END IF;
585:
586: IF g_debug THEN
587: hr_utility.set_location(' Leaving Procedure RANGE_CODE',20);
588: END IF;
589:
590: EXCEPTION WHEN e_no_da_sys_no THEN
591: fnd_message.set_name('PAY','PAY_377058_DK_NO_DA_CODE_ERR');
1132:
1133: --8848543
1134: --
1135: BEGIN
1136: hr_utility.trace('Inside the Statistics Report');
1137:
1138: IF g_debug THEN
1139: hr_utility.set_location(' Entering Procedure ASSIGNMENT_ACTION_CODE',10);
1140: END IF;
1135: BEGIN
1136: hr_utility.trace('Inside the Statistics Report');
1137:
1138: IF g_debug THEN
1139: hr_utility.set_location(' Entering Procedure ASSIGNMENT_ACTION_CODE',10);
1140: END IF;
1141:
1142: SELECT PAY_DK_STATSR_PKG.GET_PARAMETER(legislative_parameters,'SPAN_RPT')
1143: ,fnd_date.canonical_to_date(PAY_DK_STATSR_PKG.GET_PARAMETER(legislative_parameters,'REPORT_END_DATE')) --8848543
1284: and for Archiving the data Bug Fix-5003220*/
1285: -- nprasath added for Multiple Records
1286: IF (csr_rec.asg_id <> l_asgid) THEN
1287:
1288: hr_utility.trace(' ***** Intializing the old variables **** ');
1289:
1290: l_old_iltype_0010_bal := 0;
1291: l_old_iltype_0011_bal := 0;
1292: l_old_iltype_0013_bal := 0;
2195: END LOOP;
2196:
2197:
2198: IF g_debug THEN
2199: hr_utility.set_location(' Leaving Procedure ASSIGNMENT_ACTION_CODE',20);
2200: END IF;
2201:
2202: EXCEPTION
2203: WHEN e_too_many_hours THEN
2222:
2223: NULL;
2224:
2225: IF g_debug THEN
2226: hr_utility.set_location(' Entering Procedure INITIALIZATION_CODE',10);
2227: END IF;
2228:
2229:
2230: IF g_debug THEN
2227: END IF;
2228:
2229:
2230: IF g_debug THEN
2231: hr_utility.set_location(' Leaving Procedure INITIALIZATION_CODE',20);
2232: END IF;
2233:
2234: EXCEPTION WHEN OTHERS THEN
2235: g_err_num := SQLCODE;
2234: EXCEPTION WHEN OTHERS THEN
2235: g_err_num := SQLCODE;
2236:
2237: IF g_debug THEN
2238: hr_utility.set_location('ORA_ERR: ' || g_err_num || 'In INITIALIZATION_CODE',30);
2239: END IF;
2240:
2241: END INITIALIZATION_CODE;
2242:
2248: IS
2249:
2250: BEGIN
2251: IF g_debug THEN
2252: hr_utility.set_location(' Entering Procedure ARCHIVE_CODE',10);
2253: END IF;
2254:
2255: IF g_debug THEN
2256: hr_utility.set_location(' Leaving Procedure ARCHIVE_CODE',20);
2252: hr_utility.set_location(' Entering Procedure ARCHIVE_CODE',10);
2253: END IF;
2254:
2255: IF g_debug THEN
2256: hr_utility.set_location(' Leaving Procedure ARCHIVE_CODE',20);
2257: END IF;
2258:
2259: END ARCHIVE_CODE;
2260:
2412:
2413: l_payroll_action_id :=p_payroll_action_id;
2414:
2415: END IF;
2416: hr_utility.set_location('Entered Procedure GETDATA',10);
2417:
2418: /* Get the File Start and End Record Information */
2419: OPEN csr_get_hdr_info(l_payroll_action_id);
2420: FETCH csr_get_hdr_info INTO rec_get_hdr_info;
2419: OPEN csr_get_hdr_info(l_payroll_action_id);
2420: FETCH csr_get_hdr_info INTO rec_get_hdr_info;
2421: CLOSE csr_get_hdr_info;
2422:
2423: hr_utility.set_location('Before populating pl/sql table',20);
2424:
2425: xml_tab(l_counter).TagName :='FILE_HEADER_FOOTER_START';
2426: xml_tab(l_counter).TagValue :='FILE_HEADER_FOOTER_START';
2427: l_counter := l_counter + 1;
2882: xml_tab(l_counter).TagName :='FILE_HEADER_FOOTER_START';
2883: xml_tab(l_counter).TagValue :='FILE_HEADER_FOOTER_END';
2884: l_counter := l_counter + 1;
2885:
2886: hr_utility.set_location('After populating pl/sql table',30);
2887: hr_utility.set_location('Entered Procedure GETDATA',10);
2888:
2889:
2890: WritetoCLOB (p_xml );
2883: xml_tab(l_counter).TagValue :='FILE_HEADER_FOOTER_END';
2884: l_counter := l_counter + 1;
2885:
2886: hr_utility.set_location('After populating pl/sql table',30);
2887: hr_utility.set_location('Entered Procedure GETDATA',10);
2888:
2889:
2890: WritetoCLOB (p_xml );
2891:
2911: current_index pls_integer;
2912:
2913: BEGIN
2914:
2915: hr_utility.set_location('Entering WritetoCLOB ',10);
2916: l_IANA_charset :=PAY_DK_GENERAL.get_IANA_charset ;
2917: --l_str1 := '
2918: l_str1 := '
2919: l_str2 := '<';
2988: END IF;
2989:
2990: p_xfdf_clob := l_xfdf_string;
2991:
2992: hr_utility.set_location('Leaving WritetoCLOB ',20);
2993:
2994:
2995: EXCEPTION
2996: WHEN OTHERS then
2993:
2994:
2995: EXCEPTION
2996: WHEN OTHERS then
2997: HR_UTILITY.TRACE('sqlerrm ' || SQLERRM);
2998: HR_UTILITY.RAISE_ERROR;
2999: END WritetoCLOB;
3000:
3001: END PAY_DK_STATSR_PKG;
2994:
2995: EXCEPTION
2996: WHEN OTHERS then
2997: HR_UTILITY.TRACE('sqlerrm ' || SQLERRM);
2998: HR_UTILITY.RAISE_ERROR;
2999: END WritetoCLOB;
3000:
3001: END PAY_DK_STATSR_PKG;