10: g_legal_employer_id NUMBER;
11: g_report_date DATE;
12: g_effective_date DATE;
13: g_archive VARCHAR2(30);
14: g_debug boolean := hr_utility.debug_enabled;
15: g_payroll_action_id NUMBER;
16: g_package VARCHAR2(30) := 'pay_se_stat_office_archive.';
17: g_version VARCHAR2(10);
18: g_start_date DATE;
94: CLOSE csr_parameter_info;
95:
96:
97: IF g_debug THEN
98: hr_utility.set_location(' Leaving Procedure GET_ALL_PARAMETERS',30);
99: END IF;
100: END GET_ALL_PARAMETERS;
101:
102: --
187: -- Archive report information.
188: --
189: --
190: IF g_debug THEN
191: hr_utility.set_location(' Entering Procedure RANGE_CODE',40);
192: END IF;
193:
194: p_sql := 'SELECT DISTINCT person_id
195: FROM per_people_f ppf
322:
323: END IF; -- G_Archive End
324:
325: IF g_debug THEN
326: hr_utility.set_location(' Leaving Procedure RANGE_CODE',50);
327: END IF; --
328: END range_code;
329: --
330: -- ---------------------------------------------------------------------
349: l_defined_balance_id ff_user_entities.user_entity_id%TYPE;
350:
351: BEGIN
352: IF g_debug THEN
353: hr_utility.set_location(' Entering Function GET_DEFINED_BALANCE_ID',240);
354: END IF;
355:
356: OPEN csr_def_bal_id(p_user_name);
357: FETCH csr_def_bal_id INTO l_defined_balance_id;
359:
360: RETURN l_defined_balance_id;
361:
362: IF g_debug THEN
363: hr_utility.set_location(' Leaving Function GET_DEFINED_BALANCE_ID',250);
364: END IF;
365: END GET_DEFINED_BALANCE_ID;
366:
367:
999: current_index pls_integer;
1000:
1001: BEGIN
1002:
1003: hr_utility.set_location('Entering WritetoCLOB ',10);
1004:
1005:
1006: l_IANA_charset := HR_SE_UTILITY.get_IANA_charset ;
1007: l_str1 := '
1076: END IF;
1077:
1078: p_xfdf_clob := l_xfdf_string;
1079:
1080: hr_utility.set_location('Leaving WritetoCLOB ',20);
1081:
1082: EXCEPTION
1083: WHEN OTHERS then
1084: HR_UTILITY.TRACE('sqlerrm ' || SQLERRM);
1080: hr_utility.set_location('Leaving WritetoCLOB ',20);
1081:
1082: EXCEPTION
1083: WHEN OTHERS then
1084: HR_UTILITY.TRACE('sqlerrm ' || SQLERRM);
1085: HR_UTILITY.RAISE_ERROR;
1086: END WritetoCLOB;
1087:
1088:
1081:
1082: EXCEPTION
1083: WHEN OTHERS then
1084: HR_UTILITY.TRACE('sqlerrm ' || SQLERRM);
1085: HR_UTILITY.RAISE_ERROR;
1086: END WritetoCLOB;
1087:
1088:
1089: --
1210: ,g_end_date
1211: ,g_archive
1212: );
1213:
1214: hr_utility.set_location('Entered Procedure GETDATA',10);
1215:
1216:
1217: /* Get the File Header Information */
1218: OPEN csr_legal_employer_details(l_payroll_action_id);
1218: OPEN csr_legal_employer_details(l_payroll_action_id);
1219: FETCH csr_legal_employer_details INTO l_legal_employer_details_rec;
1220: CLOSE csr_legal_employer_details;
1221:
1222: hr_utility.set_location('Before populating pl/sql table',20);
1223:
1224: xml_tab(l_counter).TagName :='ORG_DETAILS';
1225: xml_tab(l_counter).TagValue :='ORG_DETAILS';
1226: l_counter:=l_counter+1;
1317: xml_tab(l_counter).TagValue :='END_ORG_DETAILS';
1318: l_counter := l_counter + 1;
1319:
1320:
1321: hr_utility.set_location('After populating pl/sql table',30);
1322: hr_utility.set_location('Entered Procedure GETDATA',10);
1323:
1324:
1325: WritetoCLOB (p_xml );
1318: l_counter := l_counter + 1;
1319:
1320:
1321: hr_utility.set_location('After populating pl/sql table',30);
1322: hr_utility.set_location('Entered Procedure GETDATA',10);
1323:
1324:
1325: WritetoCLOB (p_xml );
1326: