88: END IF; --ln_proc_level>=ln_dbg_level
89:
90: ln_row_count := 0;
91:
92: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO_FILE', Ja_Cn_Utility.GV_TAG_TYPE_START);
93: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO', Ja_Cn_Utility.GV_TAG_TYPE_START);
94: FOR v_row IN electronic_accounting_book_cur(pn_legal_entity_id,
95: pn_ledger_id,
96: pv_bsv) LOOP
89:
90: ln_row_count := 0;
91:
92: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO_FILE', Ja_Cn_Utility.GV_TAG_TYPE_START);
93: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO', Ja_Cn_Utility.GV_TAG_TYPE_START);
94: FOR v_row IN electronic_accounting_book_cur(pn_legal_entity_id,
95: pn_ledger_id,
96: pv_bsv) LOOP
97: ln_row_count := ln_row_count + 1;
95: pn_ledger_id,
96: pv_bsv) LOOP
97: ln_row_count := ln_row_count + 1;
98:
99: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT', v_row.Accounting_Unit);
100: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME',
101: v_row.Accounting_Unit_Name);
102: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER',
103: v_row.organization_id);
96: pv_bsv) LOOP
97: ln_row_count := ln_row_count + 1;
98:
99: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT', v_row.Accounting_Unit);
100: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME',
101: v_row.Accounting_Unit_Name);
102: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER',
103: v_row.organization_id);
104: Ja_Cn_Utility.Add_Fixed_Child_Node('ENTERPRISE_QUALITY',
98:
99: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT', v_row.Accounting_Unit);
100: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME',
101: v_row.Accounting_Unit_Name);
102: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER',
103: v_row.organization_id);
104: Ja_Cn_Utility.Add_Fixed_Child_Node('ENTERPRISE_QUALITY',
105: v_row.ent_quality,
106: 4);
100: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME',
101: v_row.Accounting_Unit_Name);
102: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER',
103: v_row.organization_id);
104: Ja_Cn_Utility.Add_Fixed_Child_Node('ENTERPRISE_QUALITY',
105: v_row.ent_quality,
106: 4);
107: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY',
108: v_row.ent_industry);
103: v_row.organization_id);
104: Ja_Cn_Utility.Add_Fixed_Child_Node('ENTERPRISE_QUALITY',
105: v_row.ent_quality,
106: 4);
107: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY',
108: v_row.ent_industry);
109: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', 'ORACLE');
110: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION',
111: v_row.software_version);
105: v_row.ent_quality,
106: 4);
107: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY',
108: v_row.ent_industry);
109: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', 'ORACLE');
110: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION',
111: v_row.software_version);
112: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', v_row.name);
113: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', pn_accounting_year);
106: 4);
107: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY',
108: v_row.ent_industry);
109: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', 'ORACLE');
110: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION',
111: v_row.software_version);
112: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', v_row.name);
113: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', pn_accounting_year);
114: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION',
108: v_row.ent_industry);
109: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', 'ORACLE');
110: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION',
111: v_row.software_version);
112: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', v_row.name);
113: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', pn_accounting_year);
114: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION',
115: v_row.cnao_stand_ver);
116: END LOOP;
109: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', 'ORACLE');
110: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION',
111: v_row.software_version);
112: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', v_row.name);
113: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', pn_accounting_year);
114: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION',
115: v_row.cnao_stand_ver);
116: END LOOP;
117:
110: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION',
111: v_row.software_version);
112: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', v_row.name);
113: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', pn_accounting_year);
114: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION',
115: v_row.cnao_stand_ver);
116: END LOOP;
117:
118: IF (ln_row_count = 0) THEN
115: v_row.cnao_stand_ver);
116: END LOOP;
117:
118: IF (ln_row_count = 0) THEN
119: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO', Ja_Cn_Utility.GV_TAG_TYPE_START);
120: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT', pv_bsv);
121: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME', NULL);
122: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER', NULL);
123: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_QUALITY', NULL);
116: END LOOP;
117:
118: IF (ln_row_count = 0) THEN
119: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO', Ja_Cn_Utility.GV_TAG_TYPE_START);
120: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT', pv_bsv);
121: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME', NULL);
122: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER', NULL);
123: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_QUALITY', NULL);
124: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY', NULL);
117:
118: IF (ln_row_count = 0) THEN
119: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO', Ja_Cn_Utility.GV_TAG_TYPE_START);
120: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT', pv_bsv);
121: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME', NULL);
122: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER', NULL);
123: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_QUALITY', NULL);
124: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY', NULL);
125: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', NULL);
118: IF (ln_row_count = 0) THEN
119: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO', Ja_Cn_Utility.GV_TAG_TYPE_START);
120: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT', pv_bsv);
121: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME', NULL);
122: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER', NULL);
123: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_QUALITY', NULL);
124: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY', NULL);
125: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', NULL);
126: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION', NULL);
119: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO', Ja_Cn_Utility.GV_TAG_TYPE_START);
120: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT', pv_bsv);
121: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME', NULL);
122: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER', NULL);
123: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_QUALITY', NULL);
124: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY', NULL);
125: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', NULL);
126: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION', NULL);
127: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', NULL);
120: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT', pv_bsv);
121: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME', NULL);
122: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER', NULL);
123: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_QUALITY', NULL);
124: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY', NULL);
125: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', NULL);
126: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION', NULL);
127: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', NULL);
128: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', NULL);
121: Ja_Cn_Utility.Add_Child_Node('ACC_UNIT_NAME', NULL);
122: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER', NULL);
123: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_QUALITY', NULL);
124: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY', NULL);
125: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', NULL);
126: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION', NULL);
127: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', NULL);
128: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', NULL);
129: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION', NULL);
122: Ja_Cn_Utility.Add_Child_Node('ORGANIZATION_NUMBER', NULL);
123: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_QUALITY', NULL);
124: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY', NULL);
125: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', NULL);
126: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION', NULL);
127: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', NULL);
128: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', NULL);
129: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION', NULL);
130: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO',Ja_Cn_Utility.GV_TAG_TYPE_END);
123: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_QUALITY', NULL);
124: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY', NULL);
125: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', NULL);
126: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION', NULL);
127: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', NULL);
128: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', NULL);
129: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION', NULL);
130: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO',Ja_Cn_Utility.GV_TAG_TYPE_END);
131: FND_MESSAGE.SET_NAME('JA','JA_CN_MISSING_BOOK_INFO') ;
124: Ja_Cn_Utility.Add_Child_Node('ENTERPRISE_INDUSTRY', NULL);
125: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', NULL);
126: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION', NULL);
127: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', NULL);
128: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', NULL);
129: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION', NULL);
130: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO',Ja_Cn_Utility.GV_TAG_TYPE_END);
131: FND_MESSAGE.SET_NAME('JA','JA_CN_MISSING_BOOK_INFO') ;
132: l_mes := FND_MESSAGE.GET;
125: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VENDOR', NULL);
126: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION', NULL);
127: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', NULL);
128: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', NULL);
129: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION', NULL);
130: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO',Ja_Cn_Utility.GV_TAG_TYPE_END);
131: FND_MESSAGE.SET_NAME('JA','JA_CN_MISSING_BOOK_INFO') ;
132: l_mes := FND_MESSAGE.GET;
133: FND_FILE.put_line(FND_FILE.log,'Warning:'||pv_bsv||','||l_mes);
126: Ja_Cn_Utility.Add_Child_Node('ERP_SOFTWARE_VERSION', NULL);
127: Ja_Cn_Utility.Add_Child_Node('FUNCTIONAL_CURRENCY', NULL);
128: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_YEAR', NULL);
129: Ja_Cn_Utility.Add_Child_Node('CNAO_STANDARD_VERSION', NULL);
130: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO',Ja_Cn_Utility.GV_TAG_TYPE_END);
131: FND_MESSAGE.SET_NAME('JA','JA_CN_MISSING_BOOK_INFO') ;
132: l_mes := FND_MESSAGE.GET;
133: FND_FILE.put_line(FND_FILE.log,'Warning:'||pv_bsv||','||l_mes);
134: END IF; --ln_row_count = 0
132: l_mes := FND_MESSAGE.GET;
133: FND_FILE.put_line(FND_FILE.log,'Warning:'||pv_bsv||','||l_mes);
134: END IF; --ln_row_count = 0
135:
136: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO', Ja_Cn_Utility.GV_TAG_TYPE_END);
137: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO_FILE', Ja_Cn_Utility.GV_TAG_TYPE_END);
138:
139: --logging for debug
140: IF (ln_proc_level >= ln_dbg_level) THEN
133: FND_FILE.put_line(FND_FILE.log,'Warning:'||pv_bsv||','||l_mes);
134: END IF; --ln_row_count = 0
135:
136: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO', Ja_Cn_Utility.GV_TAG_TYPE_END);
137: --Ja_Cn_Utility.Add_Sub_Root_Node('ACC_UNIT_INFO_FILE', Ja_Cn_Utility.GV_TAG_TYPE_END);
138:
139: --logging for debug
140: IF (ln_proc_level >= ln_dbg_level) THEN
141: FND_LOG.STRING(ln_proc_level,
297: '.begin',
298: 'Enter procedure');
299:
300: END IF; --ln_proc_level>=ln_dbg_level
301: Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
302: OPEN CUR_BANKING;
303: LOOP
304: FETCH CUR_BANKING
305: INTO l_bank;
309: FND_FILE.put_line(FND_FILE.log, GV_MODULE_PREFIX || '.' || lv_procedure_name ||', Warning:'|| l_bank.sub_flex_value
310: ||' has over one direct parent value, please validate the hierarchy of the valueset .');
311: EXIT;
312: END IF;
313: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
314: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER',
315: l_bank.sub_flex_value);
316: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_bank.description);
317: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM',
310: ||' has over one direct parent value, please validate the hierarchy of the valueset .');
311: EXIT;
312: END IF;
313: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
314: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER',
315: l_bank.sub_flex_value);
316: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_bank.description);
317: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM',
318: l_bank.parent_flex_value);
312: END IF;
313: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
314: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER',
315: l_bank.sub_flex_value);
316: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_bank.description);
317: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM',
318: l_bank.parent_flex_value);
319: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
320: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
313: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
314: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER',
315: l_bank.sub_flex_value);
316: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_bank.description);
317: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM',
318: l_bank.parent_flex_value);
319: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
320: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
321: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_bank.HIERARCHY_LEVEL);
315: l_bank.sub_flex_value);
316: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_bank.description);
317: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM',
318: l_bank.parent_flex_value);
319: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
320: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
321: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_bank.HIERARCHY_LEVEL);
322: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_END);
323:
316: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_bank.description);
317: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM',
318: l_bank.parent_flex_value);
319: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
320: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
321: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_bank.HIERARCHY_LEVEL);
322: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_END);
323:
324: END LOOP;
317: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM',
318: l_bank.parent_flex_value);
319: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
320: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
321: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_bank.HIERARCHY_LEVEL);
322: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_END);
323:
324: END LOOP;
325: CLOSE CUR_BANKING;
318: l_bank.parent_flex_value);
319: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
320: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
321: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_bank.HIERARCHY_LEVEL);
322: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_END);
323:
324: END LOOP;
325: CLOSE CUR_BANKING;
326:
346: FROM gl_ledgers gls
347: where gls.ledger_id = pn_ledger_id))
348: and ffv.FLEX_VALUE = pv_bsv;
349:
350: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
351: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER', l_single_vale);
352: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_single_desc);
353: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM', '');
354: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
347: where gls.ledger_id = pn_ledger_id))
348: and ffv.FLEX_VALUE = pv_bsv;
349:
350: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
351: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER', l_single_vale);
352: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_single_desc);
353: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM', '');
354: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
355: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
348: and ffv.FLEX_VALUE = pv_bsv;
349:
350: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
351: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER', l_single_vale);
352: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_single_desc);
353: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM', '');
354: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
355: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
356: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_level);
349:
350: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
351: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER', l_single_vale);
352: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_single_desc);
353: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM', '');
354: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
355: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
356: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_level);
357: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG',Ja_Cn_Utility.GV_TAG_TYPE_END);
350: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG', Ja_Cn_Utility.GV_TAG_TYPE_START);
351: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER', l_single_vale);
352: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_single_desc);
353: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM', '');
354: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
355: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
356: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_level);
357: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG',Ja_Cn_Utility.GV_TAG_TYPE_END);
358: END IF;
351: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NUMBER', l_single_vale);
352: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_single_desc);
353: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM', '');
354: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
355: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
356: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_level);
357: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG',Ja_Cn_Utility.GV_TAG_TYPE_END);
358: END IF;
359:
352: Ja_Cn_Utility.Add_Child_Node('BANK_ORG_NAME', l_single_desc);
353: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM', '');
354: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
355: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
356: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_level);
357: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG',Ja_Cn_Utility.GV_TAG_TYPE_END);
358: END IF;
359:
360: Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG',Ja_Cn_Utility.GV_TAG_TYPE_END);
353: Ja_Cn_Utility.Add_Child_Node('SUPERIOR_ORG_NUM', '');
354: --Ja_Cn_Utility.Add_Child_Node('PAY_SYS_BABK_NUM', ''); updated by jar.wang for bug 16655327
355: --Ja_Cn_Utility.Add_Child_Node('ELECTRONIC_BANK_NUM', '');
356: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_level);
357: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG',Ja_Cn_Utility.GV_TAG_TYPE_END);
358: END IF;
359:
360: Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG',Ja_Cn_Utility.GV_TAG_TYPE_END);
361: Exception
356: Ja_Cn_Utility.Add_Child_Node('BANK_LEVEL', l_level);
357: --Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG',Ja_Cn_Utility.GV_TAG_TYPE_END);
358: END IF;
359:
360: Ja_Cn_Utility.Add_Sub_Root_Node('COMMERCIAL_BANK_ORG',Ja_Cn_Utility.GV_TAG_TYPE_END);
361: Exception
362: WHEN OTHERS THEN
363: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
364: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
544: GV_MODULE_PREFIX || '.' || lv_procedure_name ||
545: '.begin',
546: 'Enter procedure');
547: END IF; --ln_proc_level>=ln_dbg_level
548: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY_FILE',
549: Ja_Cn_Utility.GV_TAG_TYPE_START);
550: FOR v_row IN CUR_Currency LOOP
551: ln_row_count := ln_row_count + 1;
552: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
545: '.begin',
546: 'Enter procedure');
547: END IF; --ln_proc_level>=ln_dbg_level
548: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY_FILE',
549: Ja_Cn_Utility.GV_TAG_TYPE_START);
550: FOR v_row IN CUR_Currency LOOP
551: ln_row_count := ln_row_count + 1;
552: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
553: Ja_Cn_Utility.GV_TAG_TYPE_START);
548: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY_FILE',
549: Ja_Cn_Utility.GV_TAG_TYPE_START);
550: FOR v_row IN CUR_Currency LOOP
551: ln_row_count := ln_row_count + 1;
552: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
553: Ja_Cn_Utility.GV_TAG_TYPE_START);
554: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE', v_row.currency_code);
555: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME', v_row.CURRENCY_NAME);
556: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME', v_row.CURRENCY_ENG_NAME);
549: Ja_Cn_Utility.GV_TAG_TYPE_START);
550: FOR v_row IN CUR_Currency LOOP
551: ln_row_count := ln_row_count + 1;
552: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
553: Ja_Cn_Utility.GV_TAG_TYPE_START);
554: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE', v_row.currency_code);
555: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME', v_row.CURRENCY_NAME);
556: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME', v_row.CURRENCY_ENG_NAME);
557: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
550: FOR v_row IN CUR_Currency LOOP
551: ln_row_count := ln_row_count + 1;
552: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
553: Ja_Cn_Utility.GV_TAG_TYPE_START);
554: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE', v_row.currency_code);
555: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME', v_row.CURRENCY_NAME);
556: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME', v_row.CURRENCY_ENG_NAME);
557: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
558: Ja_Cn_Utility.GV_TAG_TYPE_END);
551: ln_row_count := ln_row_count + 1;
552: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
553: Ja_Cn_Utility.GV_TAG_TYPE_START);
554: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE', v_row.currency_code);
555: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME', v_row.CURRENCY_NAME);
556: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME', v_row.CURRENCY_ENG_NAME);
557: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
558: Ja_Cn_Utility.GV_TAG_TYPE_END);
559: END LOOP;
552: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
553: Ja_Cn_Utility.GV_TAG_TYPE_START);
554: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE', v_row.currency_code);
555: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME', v_row.CURRENCY_NAME);
556: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME', v_row.CURRENCY_ENG_NAME);
557: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
558: Ja_Cn_Utility.GV_TAG_TYPE_END);
559: END LOOP;
560:
553: Ja_Cn_Utility.GV_TAG_TYPE_START);
554: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE', v_row.currency_code);
555: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME', v_row.CURRENCY_NAME);
556: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME', v_row.CURRENCY_ENG_NAME);
557: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
558: Ja_Cn_Utility.GV_TAG_TYPE_END);
559: END LOOP;
560:
561: IF ln_row_count=0 THEN
554: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE', v_row.currency_code);
555: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME', v_row.CURRENCY_NAME);
556: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME', v_row.CURRENCY_ENG_NAME);
557: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
558: Ja_Cn_Utility.GV_TAG_TYPE_END);
559: END LOOP;
560:
561: IF ln_row_count=0 THEN
562: FND_FILE.put_line(FND_FILE.log,
560:
561: IF ln_row_count=0 THEN
562: FND_FILE.put_line(FND_FILE.log,
563: GV_MODULE_PREFIX || '.' || lv_procedure_name ||':ln_row_count='||ln_row_count);
564: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
565: Ja_Cn_Utility.GV_TAG_TYPE_START);
566: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE',NULL);
567: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME',NULL);
568: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME',NULL);
561: IF ln_row_count=0 THEN
562: FND_FILE.put_line(FND_FILE.log,
563: GV_MODULE_PREFIX || '.' || lv_procedure_name ||':ln_row_count='||ln_row_count);
564: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
565: Ja_Cn_Utility.GV_TAG_TYPE_START);
566: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE',NULL);
567: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME',NULL);
568: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME',NULL);
569: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
562: FND_FILE.put_line(FND_FILE.log,
563: GV_MODULE_PREFIX || '.' || lv_procedure_name ||':ln_row_count='||ln_row_count);
564: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
565: Ja_Cn_Utility.GV_TAG_TYPE_START);
566: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE',NULL);
567: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME',NULL);
568: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME',NULL);
569: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
570: Ja_Cn_Utility.GV_TAG_TYPE_END);
563: GV_MODULE_PREFIX || '.' || lv_procedure_name ||':ln_row_count='||ln_row_count);
564: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
565: Ja_Cn_Utility.GV_TAG_TYPE_START);
566: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE',NULL);
567: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME',NULL);
568: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME',NULL);
569: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
570: Ja_Cn_Utility.GV_TAG_TYPE_END);
571: END IF;
564: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
565: Ja_Cn_Utility.GV_TAG_TYPE_START);
566: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE',NULL);
567: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME',NULL);
568: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME',NULL);
569: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
570: Ja_Cn_Utility.GV_TAG_TYPE_END);
571: END IF;
572:
565: Ja_Cn_Utility.GV_TAG_TYPE_START);
566: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE',NULL);
567: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME',NULL);
568: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME',NULL);
569: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
570: Ja_Cn_Utility.GV_TAG_TYPE_END);
571: END IF;
572:
573: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY_FILE',
566: Ja_Cn_Utility.Add_Child_Node('CURRENCY_CODE',NULL);
567: Ja_Cn_Utility.Add_Child_Node('CURRENCY_NAME',NULL);
568: Ja_Cn_Utility.Add_Child_Node('CURRENCY_ENG_NAME',NULL);
569: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
570: Ja_Cn_Utility.GV_TAG_TYPE_END);
571: END IF;
572:
573: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY_FILE',
574: Ja_Cn_Utility.GV_TAG_TYPE_END);
569: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY',
570: Ja_Cn_Utility.GV_TAG_TYPE_END);
571: END IF;
572:
573: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY_FILE',
574: Ja_Cn_Utility.GV_TAG_TYPE_END);
575: --logging for debug
576: IF (ln_proc_level >= ln_dbg_level) THEN
577: FND_LOG.STRING(ln_proc_level,
570: Ja_Cn_Utility.GV_TAG_TYPE_END);
571: END IF;
572:
573: Ja_Cn_Utility.Add_Sub_Root_Node('CURRENCY_FILE',
574: Ja_Cn_Utility.GV_TAG_TYPE_END);
575: --logging for debug
576: IF (ln_proc_level >= ln_dbg_level) THEN
577: FND_LOG.STRING(ln_proc_level,
578: GV_MODULE_PREFIX || '.' || lv_procedure_name || '.end',
623: WHERE ledger_id = pn_ledger_id
624: AND PERIOD_YEAR = pn_accounting_year)
625:
626: )
627: AND ja_cn_utility.get_balancing_segment(gjl.code_combination_id) =
628: pv_bsv;
629: l_currency_en varchar2(20);
630: BEGIN
631: --logging for debug
709: GV_MODULE_PREFIX || '.' || lv_procedure_name ||
710: '.begin',
711: 'Enter procedure');
712: END IF; --l_proc_level>=l_dbg_level
713: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_PERIOD_FILE',
714: Ja_Cn_Utility.GV_TAG_TYPE_START);
715: FOR v_row IN accounting_periods_cur(pn_accounting_year, pn_ledger_id) LOOP
716: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNTING_PERIOD',
717: Ja_Cn_Utility.GV_TAG_TYPE_START);
710: '.begin',
711: 'Enter procedure');
712: END IF; --l_proc_level>=l_dbg_level
713: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_PERIOD_FILE',
714: Ja_Cn_Utility.GV_TAG_TYPE_START);
715: FOR v_row IN accounting_periods_cur(pn_accounting_year, pn_ledger_id) LOOP
716: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNTING_PERIOD',
717: Ja_Cn_Utility.GV_TAG_TYPE_START);
718: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_YEAR',
712: END IF; --l_proc_level>=l_dbg_level
713: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_PERIOD_FILE',
714: Ja_Cn_Utility.GV_TAG_TYPE_START);
715: FOR v_row IN accounting_periods_cur(pn_accounting_year, pn_ledger_id) LOOP
716: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNTING_PERIOD',
717: Ja_Cn_Utility.GV_TAG_TYPE_START);
718: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_YEAR',
719: v_row.period_year,
720: 4);
713: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_PERIOD_FILE',
714: Ja_Cn_Utility.GV_TAG_TYPE_START);
715: FOR v_row IN accounting_periods_cur(pn_accounting_year, pn_ledger_id) LOOP
716: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNTING_PERIOD',
717: Ja_Cn_Utility.GV_TAG_TYPE_START);
718: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_YEAR',
719: v_row.period_year,
720: 4);
721: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_PERIOD_START_DATE',
714: Ja_Cn_Utility.GV_TAG_TYPE_START);
715: FOR v_row IN accounting_periods_cur(pn_accounting_year, pn_ledger_id) LOOP
716: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNTING_PERIOD',
717: Ja_Cn_Utility.GV_TAG_TYPE_START);
718: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_YEAR',
719: v_row.period_year,
720: 4);
721: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_PERIOD_START_DATE',
722: to_char(v_row.start_date,
717: Ja_Cn_Utility.GV_TAG_TYPE_START);
718: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_YEAR',
719: v_row.period_year,
720: 4);
721: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_PERIOD_START_DATE',
722: to_char(v_row.start_date,
723: 'YYYYMMDD'),
724: 8);
725: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_PERIOD_END_DATE',
721: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_PERIOD_START_DATE',
722: to_char(v_row.start_date,
723: 'YYYYMMDD'),
724: 8);
725: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_PERIOD_END_DATE',
726: to_char(v_row.end_date, 'YYYYMMDD'),
727: 8);
728: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_PERIOD_NUMBER',
729: v_row.period_num);
724: 8);
725: Ja_Cn_Utility.Add_Fixed_Child_Node('ACCOUNTING_PERIOD_END_DATE',
726: to_char(v_row.end_date, 'YYYYMMDD'),
727: 8);
728: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_PERIOD_NUMBER',
729: v_row.period_num);
730: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNTING_PERIOD',
731: Ja_Cn_Utility.GV_TAG_TYPE_END);
732:
726: to_char(v_row.end_date, 'YYYYMMDD'),
727: 8);
728: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_PERIOD_NUMBER',
729: v_row.period_num);
730: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNTING_PERIOD',
731: Ja_Cn_Utility.GV_TAG_TYPE_END);
732:
733: END LOOP;
734: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_PERIOD_FILE',
727: 8);
728: Ja_Cn_Utility.Add_Child_Node('ACCOUNTING_PERIOD_NUMBER',
729: v_row.period_num);
730: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNTING_PERIOD',
731: Ja_Cn_Utility.GV_TAG_TYPE_END);
732:
733: END LOOP;
734: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_PERIOD_FILE',
735: Ja_Cn_Utility.GV_TAG_TYPE_END);
730: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNTING_PERIOD',
731: Ja_Cn_Utility.GV_TAG_TYPE_END);
732:
733: END LOOP;
734: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_PERIOD_FILE',
735: Ja_Cn_Utility.GV_TAG_TYPE_END);
736: OPEN accounting_periods_cur(pn_accounting_year, pn_ledger_id);
737: IF (accounting_periods_cur%ROWCOUNT = 0) THEN
738: RAISE NO_DATA;
731: Ja_Cn_Utility.GV_TAG_TYPE_END);
732:
733: END LOOP;
734: Ja_Cn_Utility.Add_Sub_Root_Node('ACC_PERIOD_FILE',
735: Ja_Cn_Utility.GV_TAG_TYPE_END);
736: OPEN accounting_periods_cur(pn_accounting_year, pn_ledger_id);
737: IF (accounting_periods_cur%ROWCOUNT = 0) THEN
738: RAISE NO_DATA;
739: END IF;
789: '.begin',
790: 'Enter procedure');
791: END IF; --l_proc_level>=l_dbg_level
792:
793: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNT_STRUC_FILE',
794: Ja_Cn_Utility.GV_TAG_TYPE_START);
795: OPEN CUR_CODE;
796: LOOP
797: FETCH cur_code
790: 'Enter procedure');
791: END IF; --l_proc_level>=l_dbg_level
792:
793: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNT_STRUC_FILE',
794: Ja_Cn_Utility.GV_TAG_TYPE_START);
795: OPEN CUR_CODE;
796: LOOP
797: FETCH cur_code
798: into l_code;
802: l_code.ACCOUNTING_STRUCTURE_FLEX_NUM,
803: l_code.ACCOUNTING_STRUCT_ID)
804: into l_rule
805: from dual;
806: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRUCTURE', l_rule);
807: l_row := l_row + 1;
808: END LOOP;
809: CLOSE CUR_CODE;
810:
808: END LOOP;
809: CLOSE CUR_CODE;
810:
811: IF l_row = 0 THEN
812: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRUCTURE', l_rule);
813: END IF;
814:
815: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNT_STRUC_FILE',
816: Ja_Cn_Utility.GV_TAG_TYPE_END);
811: IF l_row = 0 THEN
812: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRUCTURE', l_rule);
813: END IF;
814:
815: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNT_STRUC_FILE',
816: Ja_Cn_Utility.GV_TAG_TYPE_END);
817: --logging for debug
818: IF (ln_proc_level >= ln_dbg_level) THEN
819: FND_LOG.STRING(ln_proc_level,
812: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRUCTURE', l_rule);
813: END IF;
814:
815: Ja_Cn_Utility.Add_Sub_Root_Node('ACCOUNT_STRUC_FILE',
816: Ja_Cn_Utility.GV_TAG_TYPE_END);
817: --logging for debug
818: IF (ln_proc_level >= ln_dbg_level) THEN
819: FND_LOG.STRING(ln_proc_level,
820: GV_MODULE_PREFIX || '.' || lv_procedure_name || '.end',
915: (SELECT chart_of_accounts_id
916: FROM gl_ledgers gls
917: where gls.ledger_id = pn_ledger_id);
918:
919: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACC_FILE',
920: Ja_Cn_Utility.GV_TAG_TYPE_START);
921:
922: OPEN CUR_INNER(l_valueset_id);
923: LOOP
916: FROM gl_ledgers gls
917: where gls.ledger_id = pn_ledger_id);
918:
919: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACC_FILE',
920: Ja_Cn_Utility.GV_TAG_TYPE_START);
921:
922: OPEN CUR_INNER(l_valueset_id);
923: LOOP
924: FETCH CUR_INNER
924: FETCH CUR_INNER
925: INTO l_inner;
926: EXIT WHEN CUR_INNER%NOTFOUND;
927: l_row := l_row +1;
928: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
929: Ja_Cn_Utility.GV_TAG_TYPE_START);
930: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', l_inner.flex_value);
931: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', l_inner.description);
932: --calculate level
925: INTO l_inner;
926: EXIT WHEN CUR_INNER%NOTFOUND;
927: l_row := l_row +1;
928: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
929: Ja_Cn_Utility.GV_TAG_TYPE_START);
930: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', l_inner.flex_value);
931: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', l_inner.description);
932: --calculate level
933: select count(1)
926: EXIT WHEN CUR_INNER%NOTFOUND;
927: l_row := l_row +1;
928: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
929: Ja_Cn_Utility.GV_TAG_TYPE_START);
930: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', l_inner.flex_value);
931: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', l_inner.description);
932: --calculate level
933: select count(1)
934: into l_parent_count
927: l_row := l_row +1;
928: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
929: Ja_Cn_Utility.GV_TAG_TYPE_START);
930: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', l_inner.flex_value);
931: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', l_inner.description);
932: --calculate level
933: select count(1)
934: into l_parent_count
935: from FND_FLEX_VALUE_CHILDREN_V ffvc
935: from FND_FLEX_VALUE_CHILDREN_V ffvc
936: where ffvc.flex_value_set_id = l_valueset_id
937: and ffvc.flex_value = l_inner.flex_value;
938: if l_parent_count > 1 then
939: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
940: else
941: l_level := Get_Level(l_valueset_id, l_inner.flex_value);
942: IF l_level= -1 THEN
943: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
939: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
940: else
941: l_level := Get_Level(l_valueset_id, l_inner.flex_value);
942: IF l_level= -1 THEN
943: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
944: ELSE
945: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', l_level);
946: END IF;
947: end if;
941: l_level := Get_Level(l_valueset_id, l_inner.flex_value);
942: IF l_level= -1 THEN
943: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
944: ELSE
945: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', l_level);
946: END IF;
947: end if;
948: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', l_inner.acc_type);
949: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', l_inner.balance_side);
944: ELSE
945: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', l_level);
946: END IF;
947: end if;
948: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', l_inner.acc_type);
949: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', l_inner.balance_side);
950: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE',
951: l_inner.START_DATE_ACTIVE);
952: --updated by jar.wang for bug 16655327
945: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', l_level);
946: END IF;
947: end if;
948: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', l_inner.acc_type);
949: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', l_inner.balance_side);
950: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE',
951: l_inner.START_DATE_ACTIVE);
952: --updated by jar.wang for bug 16655327
953: IF l_inner.End_Date_Active IS NOT NULL THEN
946: END IF;
947: end if;
948: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', l_inner.acc_type);
949: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', l_inner.balance_side);
950: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE',
951: l_inner.START_DATE_ACTIVE);
952: --updated by jar.wang for bug 16655327
953: IF l_inner.End_Date_Active IS NOT NULL THEN
954: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
950: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE',
951: l_inner.START_DATE_ACTIVE);
952: --updated by jar.wang for bug 16655327
953: IF l_inner.End_Date_Active IS NOT NULL THEN
954: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
955: l_inner.End_Date_Active);
956: END IF;
957: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
958: Ja_Cn_Utility.GV_TAG_TYPE_END);
953: IF l_inner.End_Date_Active IS NOT NULL THEN
954: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
955: l_inner.End_Date_Active);
956: END IF;
957: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
958: Ja_Cn_Utility.GV_TAG_TYPE_END);
959: END LOOP;
960: CLOSE CUR_INNER;
961:
954: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
955: l_inner.End_Date_Active);
956: END IF;
957: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
958: Ja_Cn_Utility.GV_TAG_TYPE_END);
959: END LOOP;
960: CLOSE CUR_INNER;
961:
962: IF l_row = 0 THEN
959: END LOOP;
960: CLOSE CUR_INNER;
961:
962: IF l_row = 0 THEN
963: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
964: Ja_Cn_Utility.GV_TAG_TYPE_START);
965: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
966: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
967: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
960: CLOSE CUR_INNER;
961:
962: IF l_row = 0 THEN
963: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
964: Ja_Cn_Utility.GV_TAG_TYPE_START);
965: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
966: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
967: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
968: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
961:
962: IF l_row = 0 THEN
963: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
964: Ja_Cn_Utility.GV_TAG_TYPE_START);
965: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
966: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
967: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
968: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
969: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
962: IF l_row = 0 THEN
963: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
964: Ja_Cn_Utility.GV_TAG_TYPE_START);
965: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
966: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
967: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
968: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
969: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
970: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
963: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
964: Ja_Cn_Utility.GV_TAG_TYPE_START);
965: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
966: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
967: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
968: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
969: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
970: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
971: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
964: Ja_Cn_Utility.GV_TAG_TYPE_START);
965: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
966: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
967: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
968: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
969: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
970: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
971: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
972: l_inner.End_Date_Active);
965: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
966: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
967: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
968: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
969: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
970: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
971: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
972: l_inner.End_Date_Active);
973: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
966: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
967: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
968: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
969: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
970: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
971: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
972: l_inner.End_Date_Active);
973: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
974: Ja_Cn_Utility.GV_TAG_TYPE_END);
967: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
968: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
969: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
970: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
971: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
972: l_inner.End_Date_Active);
973: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
974: Ja_Cn_Utility.GV_TAG_TYPE_END);
975: END IF;
969: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
970: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
971: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
972: l_inner.End_Date_Active);
973: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
974: Ja_Cn_Utility.GV_TAG_TYPE_END);
975: END IF;
976:
977: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACC_FILE',
970: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
971: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
972: l_inner.End_Date_Active);
973: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
974: Ja_Cn_Utility.GV_TAG_TYPE_END);
975: END IF;
976:
977: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACC_FILE',
978: Ja_Cn_Utility.GV_TAG_TYPE_END);
973: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACCOUNT',
974: Ja_Cn_Utility.GV_TAG_TYPE_END);
975: END IF;
976:
977: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACC_FILE',
978: Ja_Cn_Utility.GV_TAG_TYPE_END);
979: --logging for debug
980: IF (ln_proc_level >= ln_dbg_level) THEN
981: FND_LOG.STRING(ln_proc_level,
974: Ja_Cn_Utility.GV_TAG_TYPE_END);
975: END IF;
976:
977: Ja_Cn_Utility.Add_Sub_Root_Node('INTER_SHEET_ACC_FILE',
978: Ja_Cn_Utility.GV_TAG_TYPE_END);
979: --logging for debug
980: IF (ln_proc_level >= ln_dbg_level) THEN
981: FND_LOG.STRING(ln_proc_level,
982: GV_MODULE_PREFIX || '.' || lv_procedure_name || '.end',
1087: AND fifsv.ID_FLEX_NUM in
1088: (SELECT chart_of_accounts_id
1089: FROM gl_ledgers gls
1090: where gls.ledger_id = pn_ledger_id);
1091: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACC_FILE',
1092: Ja_Cn_Utility.GV_TAG_TYPE_START);
1093:
1094: OPEN CUR_EXTRA(l_valueset_id);
1095: LOOP
1088: (SELECT chart_of_accounts_id
1089: FROM gl_ledgers gls
1090: where gls.ledger_id = pn_ledger_id);
1091: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACC_FILE',
1092: Ja_Cn_Utility.GV_TAG_TYPE_START);
1093:
1094: OPEN CUR_EXTRA(l_valueset_id);
1095: LOOP
1096: FETCH CUR_EXTRA
1095: LOOP
1096: FETCH CUR_EXTRA
1097: INTO l_extra;
1098: EXIT WHEN CUR_EXTRA%NOTFOUND;
1099: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1100: Ja_Cn_Utility.GV_TAG_TYPE_START);
1101: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', l_extra.flex_value);
1102: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', l_extra.description);
1103: --calculate level
1096: FETCH CUR_EXTRA
1097: INTO l_extra;
1098: EXIT WHEN CUR_EXTRA%NOTFOUND;
1099: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1100: Ja_Cn_Utility.GV_TAG_TYPE_START);
1101: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', l_extra.flex_value);
1102: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', l_extra.description);
1103: --calculate level
1104: select count(1)
1097: INTO l_extra;
1098: EXIT WHEN CUR_EXTRA%NOTFOUND;
1099: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1100: Ja_Cn_Utility.GV_TAG_TYPE_START);
1101: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', l_extra.flex_value);
1102: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', l_extra.description);
1103: --calculate level
1104: select count(1)
1105: into l_parent_count
1098: EXIT WHEN CUR_EXTRA%NOTFOUND;
1099: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1100: Ja_Cn_Utility.GV_TAG_TYPE_START);
1101: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', l_extra.flex_value);
1102: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', l_extra.description);
1103: --calculate level
1104: select count(1)
1105: into l_parent_count
1106: from FND_FLEX_VALUE_CHILDREN_V ffvc
1107: where ffvc.flex_value_set_id = l_valueset_id
1108: and ffvc.flex_value = l_extra.flex_value;
1109:
1110: if l_parent_count > 1 then
1111: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
1112: else
1113: l_level := Get_Level(l_valueset_id, l_extra.flex_value);
1114: IF l_level= -1 THEN
1115: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
1111: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
1112: else
1113: l_level := Get_Level(l_valueset_id, l_extra.flex_value);
1114: IF l_level= -1 THEN
1115: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
1116: ELSE
1117: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', l_level);
1118: END IF;
1119: end if;
1113: l_level := Get_Level(l_valueset_id, l_extra.flex_value);
1114: IF l_level= -1 THEN
1115: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '0');
1116: ELSE
1117: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', l_level);
1118: END IF;
1119: end if;
1120:
1121: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', l_extra.acc_type);
1117: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', l_level);
1118: END IF;
1119: end if;
1120:
1121: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', l_extra.acc_type);
1122: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM',
1123: l_extra.account_unit);
1124: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', l_extra.balance_side);
1125: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE',
1118: END IF;
1119: end if;
1120:
1121: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', l_extra.acc_type);
1122: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM',
1123: l_extra.account_unit);
1124: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', l_extra.balance_side);
1125: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE',
1126: l_extra.START_DATE_ACTIVE);
1120:
1121: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', l_extra.acc_type);
1122: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM',
1123: l_extra.account_unit);
1124: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', l_extra.balance_side);
1125: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE',
1126: l_extra.START_DATE_ACTIVE);
1127: IF l_extra.End_Date_Active IS NOT NULL THEN
1128: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1121: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', l_extra.acc_type);
1122: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM',
1123: l_extra.account_unit);
1124: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', l_extra.balance_side);
1125: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE',
1126: l_extra.START_DATE_ACTIVE);
1127: IF l_extra.End_Date_Active IS NOT NULL THEN
1128: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1129: l_extra.end_date_active);
1124: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', l_extra.balance_side);
1125: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE',
1126: l_extra.START_DATE_ACTIVE);
1127: IF l_extra.End_Date_Active IS NOT NULL THEN
1128: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1129: l_extra.end_date_active);
1130: END IF;
1131: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1132: Ja_Cn_Utility.GV_TAG_TYPE_END);
1127: IF l_extra.End_Date_Active IS NOT NULL THEN
1128: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1129: l_extra.end_date_active);
1130: END IF;
1131: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1132: Ja_Cn_Utility.GV_TAG_TYPE_END);
1133: l_row := l_row + 1;
1134: END LOOP;
1135: CLOSE CUR_EXTRA;
1128: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1129: l_extra.end_date_active);
1130: END IF;
1131: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1132: Ja_Cn_Utility.GV_TAG_TYPE_END);
1133: l_row := l_row + 1;
1134: END LOOP;
1135: CLOSE CUR_EXTRA;
1136:
1134: END LOOP;
1135: CLOSE CUR_EXTRA;
1136:
1137: if l_row = 0 then
1138: Ja_Cn_Utility.Print_No_Data_Found_For_Log('CURRENCY');
1139: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1140: Ja_Cn_Utility.GV_TAG_TYPE_START);
1141: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
1142: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
1135: CLOSE CUR_EXTRA;
1136:
1137: if l_row = 0 then
1138: Ja_Cn_Utility.Print_No_Data_Found_For_Log('CURRENCY');
1139: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1140: Ja_Cn_Utility.GV_TAG_TYPE_START);
1141: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
1142: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
1143: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
1136:
1137: if l_row = 0 then
1138: Ja_Cn_Utility.Print_No_Data_Found_For_Log('CURRENCY');
1139: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1140: Ja_Cn_Utility.GV_TAG_TYPE_START);
1141: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
1142: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
1143: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
1144:
1137: if l_row = 0 then
1138: Ja_Cn_Utility.Print_No_Data_Found_For_Log('CURRENCY');
1139: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1140: Ja_Cn_Utility.GV_TAG_TYPE_START);
1141: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
1142: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
1143: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
1144:
1145: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
1138: Ja_Cn_Utility.Print_No_Data_Found_For_Log('CURRENCY');
1139: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1140: Ja_Cn_Utility.GV_TAG_TYPE_START);
1141: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
1142: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
1143: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
1144:
1145: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
1146: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM', '');
1139: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1140: Ja_Cn_Utility.GV_TAG_TYPE_START);
1141: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
1142: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
1143: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
1144:
1145: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
1146: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM', '');
1147: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
1141: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NUMBER', '');
1142: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
1143: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
1144:
1145: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
1146: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM', '');
1147: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
1148: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
1149: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1142: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_NAME', '');
1143: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
1144:
1145: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
1146: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM', '');
1147: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
1148: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
1149: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1150: '');
1143: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_LEVEL', '');
1144:
1145: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
1146: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM', '');
1147: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
1148: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
1149: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1150: '');
1151: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1144:
1145: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
1146: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM', '');
1147: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
1148: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
1149: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1150: '');
1151: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1152: Ja_Cn_Utility.GV_TAG_TYPE_END);
1145: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_TYPE', '');
1146: Ja_Cn_Utility.Add_Child_Node('EXTRA_SHEET_ACCOUNT_UOM', '');
1147: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
1148: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
1149: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1150: '');
1151: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1152: Ja_Cn_Utility.GV_TAG_TYPE_END);
1153: end if;
1147: Ja_Cn_Utility.Add_Child_Node('BALANCE_SIDE', '');
1148: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
1149: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1150: '');
1151: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1152: Ja_Cn_Utility.GV_TAG_TYPE_END);
1153: end if;
1154:
1155: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACC_FILE',
1148: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_STRAT_DATE', '');
1149: Ja_Cn_Utility.Add_Child_Node('ACCOUNT_END_DATE',
1150: '');
1151: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1152: Ja_Cn_Utility.GV_TAG_TYPE_END);
1153: end if;
1154:
1155: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACC_FILE',
1156: Ja_Cn_Utility.GV_TAG_TYPE_END);
1151: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACCOUNT',
1152: Ja_Cn_Utility.GV_TAG_TYPE_END);
1153: end if;
1154:
1155: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACC_FILE',
1156: Ja_Cn_Utility.GV_TAG_TYPE_END);
1157: --logging for debug
1158: IF (ln_proc_level >= ln_dbg_level) THEN
1159: FND_LOG.STRING(ln_proc_level,
1152: Ja_Cn_Utility.GV_TAG_TYPE_END);
1153: end if;
1154:
1155: Ja_Cn_Utility.Add_Sub_Root_Node('EXTRA_SHEET_ACC_FILE',
1156: Ja_Cn_Utility.GV_TAG_TYPE_END);
1157: --logging for debug
1158: IF (ln_proc_level >= ln_dbg_level) THEN
1159: FND_LOG.STRING(ln_proc_level,
1160: GV_MODULE_PREFIX || '.' || lv_procedure_name || '.end',