[Home] [Help]
55: debug_print('p_balance_type :'||p_balance_type);
56:
57: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE') THEN
58:
59: INSERT INTO IGI_IAC_BALANCES_REPORT
60: (Asset_ID,
61: Distribution_CCID,
62: Adjustment_CCID,
63: Category_Books_Account,
129: END IF;
130:
131: IF (p_report_type = 'COST') THEN
132:
133: INSERT INTO IGI_IAC_BALANCES_REPORT
134: (Asset_ID,
135: Distribution_CCID,
136: Adjustment_CCID,
137: Category_Books_Account,
180: END IF;
181:
182: IF (p_report_type = 'BL RESERVE' OR p_report_type = 'RESERVE') THEN
183:
184: INSERT INTO IGI_IAC_BALANCES_REPORT
185: (Asset_ID,
186: Distribution_CCID,
187: Adjustment_CCID,
188: Category_Books_Account,
277:
278: IF (l_account_type IN ('COST','GENERAL FUND','BL RESERVE') AND
279: NOT(p_report_type = 'OP EXPENSE' AND l_account_type = 'GENERAL FUND')) THEN
280:
281: INSERT INTO IGI_IAC_BALANCES_REPORT
282: (Asset_ID,
283: Distribution_CCID,
284: Adjustment_CCID,
285: Category_Books_Account,
321: END IF;
322:
323: /* IF l_account_type = 'BL RESERVE' THEN
324:
325: INSERT INTO IGI_IAC_BALANCES_REPORT
326: (Asset_ID,
327: Distribution_CCID,
328: Adjustment_CCID,
329: Category_Books_Account,
376: END IF;*/
377:
378: IF l_account_type = p_report_type THEN
379:
380: INSERT INTO IGI_IAC_BALANCES_REPORT
381: (Asset_ID,
382: Distribution_CCID,
383: Adjustment_CCID,
384: Category_Books_Account,
422:
423: -- 02-Jun-2003, mh start, update source type to retirement for all non general fund
424: -- reinstatement trxs
425:
426: /* UPDATE igi_iac_balances_report
427: SET source_type_code = 'RETIREMENT'
428: WHERE source_type_code = 'REINSTATEMENT'
429: AND data_source <> 'General Fund'; */
430:
431: -- mh end
432:
433:
434:
435: /* UPDATE igi_iac_balances_report BR
436: SET adjustment_ccid = (SELECT adjustment_ccid
437: FROM igi_iac_balances_report SUB_BR
438: WHERE SUB_BR.asset_id = BR.asset_id AND
439: SUB_BR.distribution_ccid = BR.distribution_ccid AND
433:
434:
435: /* UPDATE igi_iac_balances_report BR
436: SET adjustment_ccid = (SELECT adjustment_ccid
437: FROM igi_iac_balances_report SUB_BR
438: WHERE SUB_BR.asset_id = BR.asset_id AND
439: SUB_BR.distribution_ccid = BR.distribution_ccid AND
440: SUB_BR.display_order = DECODE(p_report_type,
441: 'REVAL RESERVE',4,
447: END IF;
448:
449: IF (p_report_type = 'RESERVE') THEN
450:
451: INSERT INTO IGI_IAC_BALANCES_REPORT
452: (Asset_id,
453: Distribution_CCID,
454: Adjustment_CCID,
455: Category_books_account,
472: FA_ASSET_HISTORY AH,
473: FA_DEPRN_DETAIL DD
474: WHERE
475: NOT EXISTS (SELECT ASSET_ID
476: FROM IGI_IAC_BALANCES_REPORT
477: WHERE ASSET_ID = DH.ASSET_ID
478: AND DISTRIBUTION_CCID = DH.CODE_COMBINATION_ID
479: AND SOURCE_TYPE_CODE = 'ADDITION'
480: AND DATA_SOURCE = 'FA')
530: debug_print('p_balance_type :'||p_balance_type);
531: debug_print('p_begin_or_end :'||p_begin_or_end);
532:
533: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE') THEN
534: INSERT INTO IGI_IAC_BALANCES_REPORT
535: (Asset_ID,
536: Distribution_CCID,
537: Adjustment_CCID,
538: Category_Books_Account,
620: END IF;
621:
622: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE' OR p_report_type = 'BL RESERVE') THEN
623:
624: INSERT INTO IGI_IAC_BALANCES_REPORT
625: (Asset_ID,
626: Distribution_CCID,
627: Adjustment_CCID,
628: Category_Books_Account,
723: -- mh,16/06/2003 IF NOT (p_report_type = 'OP EXPENSE' AND l_account_type = 'GENERAL FUND') THEN
724:
725: -- mh, 21/01/2004 bug 3377806 IF NOT l_account_type = 'GENERAL FUND' THEN
726:
727: INSERT INTO IGI_IAC_BALANCES_REPORT
728: (Asset_ID,
729: Distribution_CCID,
730: Adjustment_CCID,
731: Category_Books_Account,
821: 'OP EXPENSE', ICB.Operating_Expense_ccid) is not null;
822:
823: /* mh, 16/06/2003 IF (p_report_type = 'OP EXPENSE') THEN
824: -- This is required for getting the ending balance of inactive distributions
825: INSERT INTO IGI_IAC_BALANCES_REPORT
826: (Asset_ID,
827: Distribution_CCID,
828: Adjustment_CCID,
829: Category_Books_Account,
892: p_balance_type varchar2)
893: IS
894: BEGIN
895:
896: INSERT INTO IGI_IAC_BALANCES_REPORT
897: (Asset_ID,
898: Distribution_CCID,
899: Adjustment_CCID,
900: Category_Books_Account,
1138:
1139:
1140: IF (p_report_type = 'REVAL RESERVE') THEN
1141: Debug_Print('Inserting Reval Reserve records');
1142: INSERT INTO IGI_IAC_BALANCES_REPORT
1143: (Asset_ID,
1144: Distribution_CCID,
1145: Adjustment_CCID,
1146: Category_Books_Account,
1157: l_dist.reval_reserve_cost,
1158: 'Cost',
1159: 1);
1160:
1161: INSERT INTO IGI_IAC_BALANCES_REPORT
1162: (Asset_ID,
1163: Distribution_CCID,
1164: Adjustment_CCID,
1165: Category_Books_Account,
1176: l_dist.general_fund,
1177: 'General Fund',
1178: 2);
1179:
1180: INSERT INTO IGI_IAC_BALANCES_REPORT
1181: (Asset_ID,
1182: Distribution_CCID,
1183: Adjustment_CCID,
1184: Category_Books_Account,
1197: 3);
1198: END IF;
1199:
1200: IF (p_report_type = 'OP EXPENSE') THEN
1201: INSERT INTO IGI_IAC_BALANCES_REPORT
1202: (Asset_ID,
1203: Distribution_CCID,
1204: Adjustment_CCID,
1205: Category_Books_Account,
1216: l_dist.operating_acct_cost,
1217: 'Cost',
1218: 1);
1219:
1220: INSERT INTO IGI_IAC_BALANCES_REPORT
1221: (Asset_ID,
1222: Distribution_CCID,
1223: Adjustment_CCID,
1224: Category_Books_Account,
1267: CLOSE c_get_dist_ccid;
1268:
1269: IF (p_report_type = 'REVAL RESERVE') THEN
1270: Debug_Print('Inserting Reval Reserve records');
1271: INSERT INTO IGI_IAC_BALANCES_REPORT
1272: (Asset_ID,
1273: Distribution_CCID,
1274: Adjustment_CCID,
1275: Category_Books_Account,
1286: l_dist.reval_reserve_cost,
1287: 'Cost',
1288: 1);
1289:
1290: INSERT INTO IGI_IAC_BALANCES_REPORT
1291: (Asset_ID,
1292: Distribution_CCID,
1293: Adjustment_CCID,
1294: Category_Books_Account,
1305: l_dist.general_fund,
1306: 'General Fund',
1307: 2);
1308:
1309: INSERT INTO IGI_IAC_BALANCES_REPORT
1310: (Asset_ID,
1311: Distribution_CCID,
1312: Adjustment_CCID,
1313: Category_Books_Account,
1326: 3);
1327: END IF;
1328:
1329: IF (p_report_type = 'OP EXPENSE') THEN
1330: INSERT INTO IGI_IAC_BALANCES_REPORT
1331: (Asset_ID,
1332: Distribution_CCID,
1333: Adjustment_CCID,
1334: Category_Books_Account,
1345: l_dist.operating_acct_cost,
1346: 'Cost',
1347: 1);
1348:
1349: INSERT INTO IGI_IAC_BALANCES_REPORT
1350: (Asset_ID,
1351: Distribution_CCID,
1352: Adjustment_CCID,
1353: Category_Books_Account,
1397: CLOSE c_get_dist_ccid;
1398:
1399: IF (p_report_type = 'REVAL RESERVE') THEN
1400: Debug_Print('Inserting Reval Reserve records');
1401: INSERT INTO IGI_IAC_BALANCES_REPORT
1402: (Asset_ID,
1403: Distribution_CCID,
1404: Adjustment_CCID,
1405: Category_Books_Account,
1416: l_dist.reval_reserve_cost,
1417: 'Cost',
1418: 1);
1419:
1420: INSERT INTO IGI_IAC_BALANCES_REPORT
1421: (Asset_ID,
1422: Distribution_CCID,
1423: Adjustment_CCID,
1424: Category_Books_Account,
1435: l_dist.general_fund,
1436: 'General Fund',
1437: 2);
1438:
1439: INSERT INTO IGI_IAC_BALANCES_REPORT
1440: (Asset_ID,
1441: Distribution_CCID,
1442: Adjustment_CCID,
1443: Category_Books_Account,
1456: 3);
1457: END IF;
1458:
1459: IF (p_report_type = 'OP EXPENSE') THEN
1460: INSERT INTO IGI_IAC_BALANCES_REPORT
1461: (Asset_ID,
1462: Distribution_CCID,
1463: Adjustment_CCID,
1464: Category_Books_Account,
1475: l_dist.operating_acct_cost,
1476: 'Cost',
1477: 1);
1478:
1479: INSERT INTO IGI_IAC_BALANCES_REPORT
1480: (Asset_ID,
1481: Distribution_CCID,
1482: Adjustment_CCID,
1483: Category_Books_Account,
1529: l_cc_segment number;
1530:
1531: CURSOR c_get_balances IS
1532: SELECT rowid,ibr.*
1533: FROM igi_iac_balances_report ibr;
1534:
1535: PROCEDURE Get_Company_CostCtr(
1536: appl_short_name IN VARCHAR2,
1537: key_flex_code IN VARCHAR2,
1641: l_balance_type := 'CR';
1642: END IF;
1643:
1644: Debug_Print('Before processing for Delete');
1645: DELETE FROM igi_iac_balances_report;
1646:
1647: Debug_Print('Before processing for beginning balances');
1648: Get_Balance(
1649: p_book => p_book,
1701: p_balance_type => l_balance_type);
1702:
1703: END IF;
1704:
1705: DELETE FROM igi_iac_balances_report
1706: WHERE amount = 0;
1707:
1708: SELECT SOB.Chart_of_Accounts_ID
1709: INTO l_chart_of_accounts_id
1762: l_account_segment);
1763:
1764: END IF;
1765:
1766: UPDATE igi_iac_balances_report
1767: SET company = l_company,
1768: cost_center = l_cost_ctr,
1769: account = l_account
1770: WHERE rowid = l_balance.rowid;