[Home] [Help]
57: debug_print('p_balance_type :'||p_balance_type);
58:
59: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE') THEN
60:
61: INSERT INTO IGI_IAC_BALANCES_REPORT
62: (Asset_ID,
63: Distribution_CCID,
64: Adjustment_CCID,
65: Category_Books_Account,
131: END IF;
132:
133: IF (p_report_type = 'COST') THEN
134:
135: INSERT INTO IGI_IAC_BALANCES_REPORT
136: (Asset_ID,
137: Distribution_CCID,
138: Adjustment_CCID,
139: Category_Books_Account,
182: END IF;
183:
184: IF (p_report_type = 'BL RESERVE' OR p_report_type = 'RESERVE') THEN
185:
186: INSERT INTO IGI_IAC_BALANCES_REPORT
187: (Asset_ID,
188: Distribution_CCID,
189: Adjustment_CCID,
190: Category_Books_Account,
279:
280: IF (l_account_type IN ('COST','GENERAL FUND','BL RESERVE') AND
281: NOT(p_report_type = 'OP EXPENSE' AND l_account_type = 'GENERAL FUND')) THEN
282:
283: INSERT INTO IGI_IAC_BALANCES_REPORT
284: (Asset_ID,
285: Distribution_CCID,
286: Adjustment_CCID,
287: Category_Books_Account,
323: END IF;
324:
325: /* IF l_account_type = 'BL RESERVE' THEN
326:
327: INSERT INTO IGI_IAC_BALANCES_REPORT
328: (Asset_ID,
329: Distribution_CCID,
330: Adjustment_CCID,
331: Category_Books_Account,
378: END IF;*/
379:
380: IF l_account_type = p_report_type THEN
381:
382: INSERT INTO IGI_IAC_BALANCES_REPORT
383: (Asset_ID,
384: Distribution_CCID,
385: Adjustment_CCID,
386: Category_Books_Account,
424:
425: -- 02-Jun-2003, mh start, update source type to retirement for all non general fund
426: -- reinstatement trxs
427:
428: /* UPDATE igi_iac_balances_report
429: SET source_type_code = 'RETIREMENT'
430: WHERE source_type_code = 'REINSTATEMENT'
431: AND data_source <> 'General Fund'; */
432:
433: -- mh end
434:
435:
436:
437: /* UPDATE igi_iac_balances_report BR
438: SET adjustment_ccid = (SELECT adjustment_ccid
439: FROM igi_iac_balances_report SUB_BR
440: WHERE SUB_BR.asset_id = BR.asset_id AND
441: SUB_BR.distribution_ccid = BR.distribution_ccid AND
435:
436:
437: /* UPDATE igi_iac_balances_report BR
438: SET adjustment_ccid = (SELECT adjustment_ccid
439: FROM igi_iac_balances_report SUB_BR
440: WHERE SUB_BR.asset_id = BR.asset_id AND
441: SUB_BR.distribution_ccid = BR.distribution_ccid AND
442: SUB_BR.display_order = DECODE(p_report_type,
443: 'REVAL RESERVE',4,
449: END IF;
450:
451: IF (p_report_type = 'RESERVE') THEN
452:
453: INSERT INTO IGI_IAC_BALANCES_REPORT
454: (Asset_id,
455: Distribution_CCID,
456: Adjustment_CCID,
457: Category_books_account,
474: FA_ASSET_HISTORY AH,
475: FA_DEPRN_DETAIL DD
476: WHERE
477: NOT EXISTS (SELECT ASSET_ID
478: FROM IGI_IAC_BALANCES_REPORT
479: WHERE ASSET_ID = DH.ASSET_ID
480: AND DISTRIBUTION_CCID = DH.CODE_COMBINATION_ID
481: AND SOURCE_TYPE_CODE = 'ADDITION'
482: AND DATA_SOURCE = 'FA')
532: debug_print('p_balance_type :'||p_balance_type);
533: debug_print('p_begin_or_end :'||p_begin_or_end);
534:
535: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE') THEN
536: INSERT INTO IGI_IAC_BALANCES_REPORT
537: (Asset_ID,
538: Distribution_CCID,
539: Adjustment_CCID,
540: Category_Books_Account,
622: END IF;
623:
624: IF (p_report_type = 'COST' OR p_report_type = 'RESERVE' OR p_report_type = 'BL RESERVE') THEN
625:
626: INSERT INTO IGI_IAC_BALANCES_REPORT
627: (Asset_ID,
628: Distribution_CCID,
629: Adjustment_CCID,
630: Category_Books_Account,
725: -- mh,16/06/2003 IF NOT (p_report_type = 'OP EXPENSE' AND l_account_type = 'GENERAL FUND') THEN
726:
727: -- mh, 21/01/2004 bug 3377806 IF NOT l_account_type = 'GENERAL FUND' THEN
728:
729: INSERT INTO IGI_IAC_BALANCES_REPORT
730: (Asset_ID,
731: Distribution_CCID,
732: Adjustment_CCID,
733: Category_Books_Account,
823: 'OP EXPENSE', ICB.Operating_Expense_ccid) is not null;
824:
825: /* mh, 16/06/2003 IF (p_report_type = 'OP EXPENSE') THEN
826: -- This is required for getting the ending balance of inactive distributions
827: INSERT INTO IGI_IAC_BALANCES_REPORT
828: (Asset_ID,
829: Distribution_CCID,
830: Adjustment_CCID,
831: Category_Books_Account,
894: p_balance_type varchar2)
895: IS
896: BEGIN
897:
898: INSERT INTO IGI_IAC_BALANCES_REPORT
899: (Asset_ID,
900: Distribution_CCID,
901: Adjustment_CCID,
902: Category_Books_Account,
1140:
1141:
1142: IF (p_report_type = 'REVAL RESERVE') THEN
1143: Debug_Print('Inserting Reval Reserve records');
1144: INSERT INTO IGI_IAC_BALANCES_REPORT
1145: (Asset_ID,
1146: Distribution_CCID,
1147: Adjustment_CCID,
1148: Category_Books_Account,
1159: l_dist.reval_reserve_cost,
1160: 'Cost',
1161: 1);
1162:
1163: INSERT INTO IGI_IAC_BALANCES_REPORT
1164: (Asset_ID,
1165: Distribution_CCID,
1166: Adjustment_CCID,
1167: Category_Books_Account,
1178: l_dist.general_fund,
1179: 'General Fund',
1180: 2);
1181:
1182: INSERT INTO IGI_IAC_BALANCES_REPORT
1183: (Asset_ID,
1184: Distribution_CCID,
1185: Adjustment_CCID,
1186: Category_Books_Account,
1199: 3);
1200: END IF;
1201:
1202: IF (p_report_type = 'OP EXPENSE') THEN
1203: INSERT INTO IGI_IAC_BALANCES_REPORT
1204: (Asset_ID,
1205: Distribution_CCID,
1206: Adjustment_CCID,
1207: Category_Books_Account,
1218: l_dist.operating_acct_cost,
1219: 'Cost',
1220: 1);
1221:
1222: INSERT INTO IGI_IAC_BALANCES_REPORT
1223: (Asset_ID,
1224: Distribution_CCID,
1225: Adjustment_CCID,
1226: Category_Books_Account,
1269: CLOSE c_get_dist_ccid;
1270:
1271: IF (p_report_type = 'REVAL RESERVE') THEN
1272: Debug_Print('Inserting Reval Reserve records');
1273: INSERT INTO IGI_IAC_BALANCES_REPORT
1274: (Asset_ID,
1275: Distribution_CCID,
1276: Adjustment_CCID,
1277: Category_Books_Account,
1288: l_dist.reval_reserve_cost,
1289: 'Cost',
1290: 1);
1291:
1292: INSERT INTO IGI_IAC_BALANCES_REPORT
1293: (Asset_ID,
1294: Distribution_CCID,
1295: Adjustment_CCID,
1296: Category_Books_Account,
1307: l_dist.general_fund,
1308: 'General Fund',
1309: 2);
1310:
1311: INSERT INTO IGI_IAC_BALANCES_REPORT
1312: (Asset_ID,
1313: Distribution_CCID,
1314: Adjustment_CCID,
1315: Category_Books_Account,
1328: 3);
1329: END IF;
1330:
1331: IF (p_report_type = 'OP EXPENSE') THEN
1332: INSERT INTO IGI_IAC_BALANCES_REPORT
1333: (Asset_ID,
1334: Distribution_CCID,
1335: Adjustment_CCID,
1336: Category_Books_Account,
1347: l_dist.operating_acct_cost,
1348: 'Cost',
1349: 1);
1350:
1351: INSERT INTO IGI_IAC_BALANCES_REPORT
1352: (Asset_ID,
1353: Distribution_CCID,
1354: Adjustment_CCID,
1355: Category_Books_Account,
1399: CLOSE c_get_dist_ccid;
1400:
1401: IF (p_report_type = 'REVAL RESERVE') THEN
1402: Debug_Print('Inserting Reval Reserve records');
1403: INSERT INTO IGI_IAC_BALANCES_REPORT
1404: (Asset_ID,
1405: Distribution_CCID,
1406: Adjustment_CCID,
1407: Category_Books_Account,
1418: l_dist.reval_reserve_cost,
1419: 'Cost',
1420: 1);
1421:
1422: INSERT INTO IGI_IAC_BALANCES_REPORT
1423: (Asset_ID,
1424: Distribution_CCID,
1425: Adjustment_CCID,
1426: Category_Books_Account,
1437: l_dist.general_fund,
1438: 'General Fund',
1439: 2);
1440:
1441: INSERT INTO IGI_IAC_BALANCES_REPORT
1442: (Asset_ID,
1443: Distribution_CCID,
1444: Adjustment_CCID,
1445: Category_Books_Account,
1458: 3);
1459: END IF;
1460:
1461: IF (p_report_type = 'OP EXPENSE') THEN
1462: INSERT INTO IGI_IAC_BALANCES_REPORT
1463: (Asset_ID,
1464: Distribution_CCID,
1465: Adjustment_CCID,
1466: Category_Books_Account,
1477: l_dist.operating_acct_cost,
1478: 'Cost',
1479: 1);
1480:
1481: INSERT INTO IGI_IAC_BALANCES_REPORT
1482: (Asset_ID,
1483: Distribution_CCID,
1484: Adjustment_CCID,
1485: Category_Books_Account,
1531: l_cc_segment number;
1532:
1533: CURSOR c_get_balances IS
1534: SELECT rowid,ibr.*
1535: FROM igi_iac_balances_report ibr;
1536:
1537: PROCEDURE Get_Company_CostCtr(
1538: appl_short_name IN VARCHAR2,
1539: key_flex_code IN VARCHAR2,
1643: l_balance_type := 'CR';
1644: END IF;
1645:
1646: Debug_Print('Before processing for Delete');
1647: DELETE FROM igi_iac_balances_report;
1648:
1649: Debug_Print('Before processing for beginning balances');
1650: Get_Balance(
1651: p_book => p_book,
1703: p_balance_type => l_balance_type);
1704:
1705: END IF;
1706:
1707: DELETE FROM igi_iac_balances_report
1708: WHERE amount = 0;
1709:
1710: SELECT SOB.Chart_of_Accounts_ID
1711: INTO l_chart_of_accounts_id
1764: l_account_segment);
1765:
1766: END IF;
1767:
1768: UPDATE igi_iac_balances_report
1769: SET company = l_company,
1770: cost_center = l_cost_ctr,
1771: account = l_account
1772: WHERE rowid = l_balance.rowid;