[Home] [Help]
76: debug_print('p_balance_type :'||p_balance_type);
77:
78: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE') THEN
79:
80: INSERT INTO IGI_IAC_BALANCES_REPORT
81: (Asset_ID,
82: Distribution_CCID,
83: Adjustment_CCID,
84: Category_Books_Account,
150: END IF;
151:
152: IF (p_report_type = 'COST') THEN
153:
154: INSERT INTO IGI_IAC_BALANCES_REPORT
155: (Asset_ID,
156: Distribution_CCID,
157: Adjustment_CCID,
158: Category_Books_Account,
201: END IF;
202:
203: IF (p_report_type = 'BL RESERVE' OR p_report_type = 'RESERVE') THEN
204:
205: INSERT INTO IGI_IAC_BALANCES_REPORT
206: (Asset_ID,
207: Distribution_CCID,
208: Adjustment_CCID,
209: Category_Books_Account,
298:
299: IF (l_account_type IN ('COST','GENERAL FUND','BL RESERVE') AND
300: NOT(p_report_type = 'OP EXPENSE' AND l_account_type = 'GENERAL FUND')) THEN
301:
302: INSERT INTO IGI_IAC_BALANCES_REPORT
303: (Asset_ID,
304: Distribution_CCID,
305: Adjustment_CCID,
306: Category_Books_Account,
342: END IF;
343:
344: /* IF l_account_type = 'BL RESERVE' THEN
345:
346: INSERT INTO IGI_IAC_BALANCES_REPORT
347: (Asset_ID,
348: Distribution_CCID,
349: Adjustment_CCID,
350: Category_Books_Account,
397: END IF;*/
398:
399: IF l_account_type = p_report_type THEN
400:
401: INSERT INTO IGI_IAC_BALANCES_REPORT
402: (Asset_ID,
403: Distribution_CCID,
404: Adjustment_CCID,
405: Category_Books_Account,
443:
444: -- 02-Jun-2003, mh start, update source type to retirement for all non general fund
445: -- reinstatement trxs
446:
447: /* UPDATE igi_iac_balances_report
448: SET source_type_code = 'RETIREMENT'
449: WHERE source_type_code = 'REINSTATEMENT'
450: AND data_source <> 'General Fund'; */
451:
452: -- mh end
453:
454:
455:
456: /* UPDATE igi_iac_balances_report BR
457: SET adjustment_ccid = (SELECT adjustment_ccid
458: FROM igi_iac_balances_report SUB_BR
459: WHERE SUB_BR.asset_id = BR.asset_id AND
460: SUB_BR.distribution_ccid = BR.distribution_ccid AND
454:
455:
456: /* UPDATE igi_iac_balances_report BR
457: SET adjustment_ccid = (SELECT adjustment_ccid
458: FROM igi_iac_balances_report SUB_BR
459: WHERE SUB_BR.asset_id = BR.asset_id AND
460: SUB_BR.distribution_ccid = BR.distribution_ccid AND
461: SUB_BR.display_order = DECODE(p_report_type,
462: 'REVAL RESERVE',4,
468: END IF;
469:
470: IF (p_report_type = 'RESERVE') THEN
471:
472: INSERT INTO IGI_IAC_BALANCES_REPORT
473: (Asset_id,
474: Distribution_CCID,
475: Adjustment_CCID,
476: Category_books_account,
493: FA_ASSET_HISTORY AH,
494: FA_DEPRN_DETAIL DD
495: WHERE
496: NOT EXISTS (SELECT ASSET_ID
497: FROM IGI_IAC_BALANCES_REPORT
498: WHERE ASSET_ID = DH.ASSET_ID
499: AND DISTRIBUTION_CCID = DH.CODE_COMBINATION_ID
500: AND SOURCE_TYPE_CODE = 'ADDITION'
501: AND DATA_SOURCE = 'FA')
551: debug_print('p_balance_type :'||p_balance_type);
552: debug_print('p_begin_or_end :'||p_begin_or_end);
553:
554: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE') THEN
555: INSERT INTO IGI_IAC_BALANCES_REPORT
556: (Asset_ID,
557: Distribution_CCID,
558: Adjustment_CCID,
559: Category_Books_Account,
641: END IF;
642:
643: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE' OR p_report_type = 'BL RESERVE') THEN
644:
645: INSERT INTO IGI_IAC_BALANCES_REPORT
646: (Asset_ID,
647: Distribution_CCID,
648: Adjustment_CCID,
649: Category_Books_Account,
744: -- mh,16/06/2003 IF NOT (p_report_type = 'OP EXPENSE' AND l_account_type = 'GENERAL FUND') THEN
745:
746: -- mh, 21/01/2004 bug 3377806 IF NOT l_account_type = 'GENERAL FUND' THEN
747:
748: INSERT INTO IGI_IAC_BALANCES_REPORT
749: (Asset_ID,
750: Distribution_CCID,
751: Adjustment_CCID,
752: Category_Books_Account,
842: 'OP EXPENSE', ICB.Operating_Expense_ccid) is not null;
843:
844: /* mh, 16/06/2003 IF (p_report_type = 'OP EXPENSE') THEN
845: -- This is required for getting the ending balance of inactive distributions
846: INSERT INTO IGI_IAC_BALANCES_REPORT
847: (Asset_ID,
848: Distribution_CCID,
849: Adjustment_CCID,
850: Category_Books_Account,
913: p_balance_type varchar2)
914: IS
915: BEGIN
916:
917: INSERT INTO IGI_IAC_BALANCES_REPORT
918: (Asset_ID,
919: Distribution_CCID,
920: Adjustment_CCID,
921: Category_Books_Account,
1159:
1160:
1161: IF (p_report_type = 'REVAL RESERVE') THEN
1162: Debug_Print('Inserting Reval Reserve records');
1163: INSERT INTO IGI_IAC_BALANCES_REPORT
1164: (Asset_ID,
1165: Distribution_CCID,
1166: Adjustment_CCID,
1167: Category_Books_Account,
1178: l_dist.reval_reserve_cost,
1179: 'Cost',
1180: 1);
1181:
1182: INSERT INTO IGI_IAC_BALANCES_REPORT
1183: (Asset_ID,
1184: Distribution_CCID,
1185: Adjustment_CCID,
1186: Category_Books_Account,
1197: l_dist.general_fund,
1198: 'General Fund',
1199: 2);
1200:
1201: INSERT INTO IGI_IAC_BALANCES_REPORT
1202: (Asset_ID,
1203: Distribution_CCID,
1204: Adjustment_CCID,
1205: Category_Books_Account,
1218: 3);
1219: END IF;
1220:
1221: IF (p_report_type = 'OP EXPENSE') THEN
1222: INSERT INTO IGI_IAC_BALANCES_REPORT
1223: (Asset_ID,
1224: Distribution_CCID,
1225: Adjustment_CCID,
1226: Category_Books_Account,
1237: l_dist.operating_acct_cost,
1238: 'Cost',
1239: 1);
1240:
1241: INSERT INTO IGI_IAC_BALANCES_REPORT
1242: (Asset_ID,
1243: Distribution_CCID,
1244: Adjustment_CCID,
1245: Category_Books_Account,
1288: CLOSE c_get_dist_ccid;
1289:
1290: IF (p_report_type = 'REVAL RESERVE') THEN
1291: Debug_Print('Inserting Reval Reserve records');
1292: INSERT INTO IGI_IAC_BALANCES_REPORT
1293: (Asset_ID,
1294: Distribution_CCID,
1295: Adjustment_CCID,
1296: Category_Books_Account,
1307: l_dist.reval_reserve_cost,
1308: 'Cost',
1309: 1);
1310:
1311: INSERT INTO IGI_IAC_BALANCES_REPORT
1312: (Asset_ID,
1313: Distribution_CCID,
1314: Adjustment_CCID,
1315: Category_Books_Account,
1326: l_dist.general_fund,
1327: 'General Fund',
1328: 2);
1329:
1330: INSERT INTO IGI_IAC_BALANCES_REPORT
1331: (Asset_ID,
1332: Distribution_CCID,
1333: Adjustment_CCID,
1334: Category_Books_Account,
1347: 3);
1348: END IF;
1349:
1350: IF (p_report_type = 'OP EXPENSE') THEN
1351: INSERT INTO IGI_IAC_BALANCES_REPORT
1352: (Asset_ID,
1353: Distribution_CCID,
1354: Adjustment_CCID,
1355: Category_Books_Account,
1366: l_dist.operating_acct_cost,
1367: 'Cost',
1368: 1);
1369:
1370: INSERT INTO IGI_IAC_BALANCES_REPORT
1371: (Asset_ID,
1372: Distribution_CCID,
1373: Adjustment_CCID,
1374: Category_Books_Account,
1418: CLOSE c_get_dist_ccid;
1419:
1420: IF (p_report_type = 'REVAL RESERVE') THEN
1421: Debug_Print('Inserting Reval Reserve records');
1422: INSERT INTO IGI_IAC_BALANCES_REPORT
1423: (Asset_ID,
1424: Distribution_CCID,
1425: Adjustment_CCID,
1426: Category_Books_Account,
1437: l_dist.reval_reserve_cost,
1438: 'Cost',
1439: 1);
1440:
1441: INSERT INTO IGI_IAC_BALANCES_REPORT
1442: (Asset_ID,
1443: Distribution_CCID,
1444: Adjustment_CCID,
1445: Category_Books_Account,
1456: l_dist.general_fund,
1457: 'General Fund',
1458: 2);
1459:
1460: INSERT INTO IGI_IAC_BALANCES_REPORT
1461: (Asset_ID,
1462: Distribution_CCID,
1463: Adjustment_CCID,
1464: Category_Books_Account,
1477: 3);
1478: END IF;
1479:
1480: IF (p_report_type = 'OP EXPENSE') THEN
1481: INSERT INTO IGI_IAC_BALANCES_REPORT
1482: (Asset_ID,
1483: Distribution_CCID,
1484: Adjustment_CCID,
1485: Category_Books_Account,
1496: l_dist.operating_acct_cost,
1497: 'Cost',
1498: 1);
1499:
1500: INSERT INTO IGI_IAC_BALANCES_REPORT
1501: (Asset_ID,
1502: Distribution_CCID,
1503: Adjustment_CCID,
1504: Category_Books_Account,
1550: l_cc_segment number;
1551:
1552: CURSOR c_get_balances IS
1553: SELECT rowid,ibr.*
1554: FROM igi_iac_balances_report ibr;
1555:
1556: PROCEDURE Get_Company_CostCtr(
1557: appl_short_name IN VARCHAR2,
1558: key_flex_code IN VARCHAR2,
1662: l_balance_type := 'CR';
1663: END IF;
1664:
1665: Debug_Print('Before processing for Delete');
1666: DELETE FROM igi_iac_balances_report;
1667:
1668: Debug_Print('Before processing for beginning balances');
1669: Get_Balance(
1670: p_book => p_book,
1722: p_balance_type => l_balance_type);
1723:
1724: END IF;
1725:
1726: DELETE FROM igi_iac_balances_report
1727: WHERE amount = 0;
1728:
1729: SELECT SOB.Chart_of_Accounts_ID
1730: INTO l_chart_of_accounts_id
1783: l_account_segment);
1784:
1785: END IF;
1786:
1787: UPDATE igi_iac_balances_report
1788: SET company = l_company,
1789: cost_center = l_cost_ctr,
1790: account = l_account
1791: WHERE rowid = l_balance.rowid;