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