[Home] [Help]
70: debug_print('p_balance_type :'||p_balance_type);
71:
72: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE') THEN
73:
74: INSERT INTO IGI_IAC_BALANCES_REPORT
75: (Asset_ID,
76: Distribution_CCID,
77: Adjustment_CCID,
78: Category_Books_Account,
144: END IF;
145:
146: IF (p_report_type = 'COST') THEN
147:
148: INSERT INTO IGI_IAC_BALANCES_REPORT
149: (Asset_ID,
150: Distribution_CCID,
151: Adjustment_CCID,
152: Category_Books_Account,
195: END IF;
196:
197: IF (p_report_type = 'BL RESERVE' OR p_report_type = 'RESERVE') THEN
198:
199: INSERT INTO IGI_IAC_BALANCES_REPORT
200: (Asset_ID,
201: Distribution_CCID,
202: Adjustment_CCID,
203: Category_Books_Account,
292:
293: IF (l_account_type IN ('COST','GENERAL FUND','BL RESERVE') AND
294: NOT(p_report_type = 'OP EXPENSE' AND l_account_type = 'GENERAL FUND')) THEN
295:
296: INSERT INTO IGI_IAC_BALANCES_REPORT
297: (Asset_ID,
298: Distribution_CCID,
299: Adjustment_CCID,
300: Category_Books_Account,
336: END IF;
337:
338: /* IF l_account_type = 'BL RESERVE' THEN
339:
340: INSERT INTO IGI_IAC_BALANCES_REPORT
341: (Asset_ID,
342: Distribution_CCID,
343: Adjustment_CCID,
344: Category_Books_Account,
391: END IF;*/
392:
393: IF l_account_type = p_report_type THEN
394:
395: INSERT INTO IGI_IAC_BALANCES_REPORT
396: (Asset_ID,
397: Distribution_CCID,
398: Adjustment_CCID,
399: Category_Books_Account,
437:
438: -- 02-Jun-2003, mh start, update source type to retirement for all non general fund
439: -- reinstatement trxs
440:
441: /* UPDATE igi_iac_balances_report
442: SET source_type_code = 'RETIREMENT'
443: WHERE source_type_code = 'REINSTATEMENT'
444: AND data_source <> 'General Fund'; */
445:
446: -- mh end
447:
448:
449:
450: /* UPDATE igi_iac_balances_report BR
451: SET adjustment_ccid = (SELECT adjustment_ccid
452: FROM igi_iac_balances_report SUB_BR
453: WHERE SUB_BR.asset_id = BR.asset_id AND
454: SUB_BR.distribution_ccid = BR.distribution_ccid AND
448:
449:
450: /* UPDATE igi_iac_balances_report BR
451: SET adjustment_ccid = (SELECT adjustment_ccid
452: FROM igi_iac_balances_report SUB_BR
453: WHERE SUB_BR.asset_id = BR.asset_id AND
454: SUB_BR.distribution_ccid = BR.distribution_ccid AND
455: SUB_BR.display_order = DECODE(p_report_type,
456: 'REVAL RESERVE',4,
462: END IF;
463:
464: IF (p_report_type = 'RESERVE') THEN
465:
466: INSERT INTO IGI_IAC_BALANCES_REPORT
467: (Asset_id,
468: Distribution_CCID,
469: Adjustment_CCID,
470: Category_books_account,
487: FA_ASSET_HISTORY AH,
488: FA_DEPRN_DETAIL DD
489: WHERE
490: NOT EXISTS (SELECT ASSET_ID
491: FROM IGI_IAC_BALANCES_REPORT
492: WHERE ASSET_ID = DH.ASSET_ID
493: AND DISTRIBUTION_CCID = DH.CODE_COMBINATION_ID
494: AND SOURCE_TYPE_CODE = 'ADDITION'
495: AND DATA_SOURCE = 'FA')
545: debug_print('p_balance_type :'||p_balance_type);
546: debug_print('p_begin_or_end :'||p_begin_or_end);
547:
548: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE') THEN
549: INSERT INTO IGI_IAC_BALANCES_REPORT
550: (Asset_ID,
551: Distribution_CCID,
552: Adjustment_CCID,
553: Category_Books_Account,
635: END IF;
636:
637: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE' OR p_report_type = 'BL RESERVE') THEN
638:
639: INSERT INTO IGI_IAC_BALANCES_REPORT
640: (Asset_ID,
641: Distribution_CCID,
642: Adjustment_CCID,
643: Category_Books_Account,
738: -- mh,16/06/2003 IF NOT (p_report_type = 'OP EXPENSE' AND l_account_type = 'GENERAL FUND') THEN
739:
740: -- mh, 21/01/2004 bug 3377806 IF NOT l_account_type = 'GENERAL FUND' THEN
741:
742: INSERT INTO IGI_IAC_BALANCES_REPORT
743: (Asset_ID,
744: Distribution_CCID,
745: Adjustment_CCID,
746: Category_Books_Account,
836: 'OP EXPENSE', ICB.Operating_Expense_ccid) is not null;
837:
838: /* mh, 16/06/2003 IF (p_report_type = 'OP EXPENSE') THEN
839: -- This is required for getting the ending balance of inactive distributions
840: INSERT INTO IGI_IAC_BALANCES_REPORT
841: (Asset_ID,
842: Distribution_CCID,
843: Adjustment_CCID,
844: Category_Books_Account,
907: p_balance_type varchar2)
908: IS
909: BEGIN
910:
911: INSERT INTO IGI_IAC_BALANCES_REPORT
912: (Asset_ID,
913: Distribution_CCID,
914: Adjustment_CCID,
915: Category_Books_Account,
1153:
1154:
1155: IF (p_report_type = 'REVAL RESERVE') THEN
1156: Debug_Print('Inserting Reval Reserve records');
1157: INSERT INTO IGI_IAC_BALANCES_REPORT
1158: (Asset_ID,
1159: Distribution_CCID,
1160: Adjustment_CCID,
1161: Category_Books_Account,
1172: l_dist.reval_reserve_cost,
1173: 'Cost',
1174: 1);
1175:
1176: INSERT INTO IGI_IAC_BALANCES_REPORT
1177: (Asset_ID,
1178: Distribution_CCID,
1179: Adjustment_CCID,
1180: Category_Books_Account,
1191: l_dist.general_fund,
1192: 'General Fund',
1193: 2);
1194:
1195: INSERT INTO IGI_IAC_BALANCES_REPORT
1196: (Asset_ID,
1197: Distribution_CCID,
1198: Adjustment_CCID,
1199: Category_Books_Account,
1212: 3);
1213: END IF;
1214:
1215: IF (p_report_type = 'OP EXPENSE') THEN
1216: INSERT INTO IGI_IAC_BALANCES_REPORT
1217: (Asset_ID,
1218: Distribution_CCID,
1219: Adjustment_CCID,
1220: Category_Books_Account,
1231: l_dist.operating_acct_cost,
1232: 'Cost',
1233: 1);
1234:
1235: INSERT INTO IGI_IAC_BALANCES_REPORT
1236: (Asset_ID,
1237: Distribution_CCID,
1238: Adjustment_CCID,
1239: Category_Books_Account,
1282: CLOSE c_get_dist_ccid;
1283:
1284: IF (p_report_type = 'REVAL RESERVE') THEN
1285: Debug_Print('Inserting Reval Reserve records');
1286: INSERT INTO IGI_IAC_BALANCES_REPORT
1287: (Asset_ID,
1288: Distribution_CCID,
1289: Adjustment_CCID,
1290: Category_Books_Account,
1301: l_dist.reval_reserve_cost,
1302: 'Cost',
1303: 1);
1304:
1305: INSERT INTO IGI_IAC_BALANCES_REPORT
1306: (Asset_ID,
1307: Distribution_CCID,
1308: Adjustment_CCID,
1309: Category_Books_Account,
1320: l_dist.general_fund,
1321: 'General Fund',
1322: 2);
1323:
1324: INSERT INTO IGI_IAC_BALANCES_REPORT
1325: (Asset_ID,
1326: Distribution_CCID,
1327: Adjustment_CCID,
1328: Category_Books_Account,
1341: 3);
1342: END IF;
1343:
1344: IF (p_report_type = 'OP EXPENSE') THEN
1345: INSERT INTO IGI_IAC_BALANCES_REPORT
1346: (Asset_ID,
1347: Distribution_CCID,
1348: Adjustment_CCID,
1349: Category_Books_Account,
1360: l_dist.operating_acct_cost,
1361: 'Cost',
1362: 1);
1363:
1364: INSERT INTO IGI_IAC_BALANCES_REPORT
1365: (Asset_ID,
1366: Distribution_CCID,
1367: Adjustment_CCID,
1368: Category_Books_Account,
1412: CLOSE c_get_dist_ccid;
1413:
1414: IF (p_report_type = 'REVAL RESERVE') THEN
1415: Debug_Print('Inserting Reval Reserve records');
1416: INSERT INTO IGI_IAC_BALANCES_REPORT
1417: (Asset_ID,
1418: Distribution_CCID,
1419: Adjustment_CCID,
1420: Category_Books_Account,
1431: l_dist.reval_reserve_cost,
1432: 'Cost',
1433: 1);
1434:
1435: INSERT INTO IGI_IAC_BALANCES_REPORT
1436: (Asset_ID,
1437: Distribution_CCID,
1438: Adjustment_CCID,
1439: Category_Books_Account,
1450: l_dist.general_fund,
1451: 'General Fund',
1452: 2);
1453:
1454: INSERT INTO IGI_IAC_BALANCES_REPORT
1455: (Asset_ID,
1456: Distribution_CCID,
1457: Adjustment_CCID,
1458: Category_Books_Account,
1471: 3);
1472: END IF;
1473:
1474: IF (p_report_type = 'OP EXPENSE') THEN
1475: INSERT INTO IGI_IAC_BALANCES_REPORT
1476: (Asset_ID,
1477: Distribution_CCID,
1478: Adjustment_CCID,
1479: Category_Books_Account,
1490: l_dist.operating_acct_cost,
1491: 'Cost',
1492: 1);
1493:
1494: INSERT INTO IGI_IAC_BALANCES_REPORT
1495: (Asset_ID,
1496: Distribution_CCID,
1497: Adjustment_CCID,
1498: Category_Books_Account,
1544: l_cc_segment number;
1545:
1546: CURSOR c_get_balances IS
1547: SELECT rowid,ibr.*
1548: FROM igi_iac_balances_report ibr;
1549:
1550: PROCEDURE Get_Company_CostCtr(
1551: appl_short_name IN VARCHAR2,
1552: key_flex_code IN VARCHAR2,
1656: l_balance_type := 'CR';
1657: END IF;
1658:
1659: Debug_Print('Before processing for Delete');
1660: DELETE FROM igi_iac_balances_report;
1661:
1662: Debug_Print('Before processing for beginning balances');
1663: Get_Balance(
1664: p_book => p_book,
1716: p_balance_type => l_balance_type);
1717:
1718: END IF;
1719:
1720: DELETE FROM igi_iac_balances_report
1721: WHERE amount = 0;
1722:
1723: SELECT SOB.Chart_of_Accounts_ID
1724: INTO l_chart_of_accounts_id
1777: l_account_segment);
1778:
1779: END IF;
1780:
1781: UPDATE igi_iac_balances_report
1782: SET company = l_company,
1783: cost_center = l_cost_ctr,
1784: account = l_account
1785: WHERE rowid = l_balance.rowid;