[Home] [Help]
236: END Derive_Acct_Method;
237:
238: ----------------------------------------------------------------------------
239: -- Procedure will Insert distributions tarcked as asset in
240: -- FA_MASS_ADDITIONS_GT table
241: --
242: PROCEDURE Insert_Mass(
243: P_acctg_date IN DATE,
244: P_ledger_id IN NUMBER,
387:
388: --The insert statement below has been modified for Bug 7284987 / 7392117 to use the table
389: --AP_INVOICE_DISTRIBUTIONS_GT (APIDG) instead of AP_INVOICE_DISTRIBUTIONS_ALL (APID)
390: --All occurances of APID have been replaced by APIDG
391: INSERT INTO FA_MASS_ADDITIONS_GT(
392: mass_addition_id,
393: asset_number,
394: tag_number,
395: description,
789:
790: --The insert statement below has been modified for Bug 7284987 / 7392117 to use the table
791: --AP_INVOICE_DISTRIBUTIONS_GT (APIDG) instead of AP_INVOICE_DISTRIBUTIONS_ALL (APID)
792: --All occurances of APID have been replaced by APIDG
793: INSERT INTO FA_MASS_ADDITIONS_GT(
794: mass_addition_id,
795: asset_number,
796: tag_number,
797: description,
1078: (SELECT APIDG.invoice_distribution_id
1079: FROM ap_invoice_distributions_gt APIDG)
1080: AND AID.invoice_distribution_id NOT IN
1081: (SELECT FAGT.invoice_distribution_id
1082: FROM fa_mass_additions_gt FAGT);
1083:
1084: --
1085: EXCEPTION
1086: WHEN OTHERS THEN
1101: END Insert_Mass;
1102:
1103: ----------------------------------------------------------------------------
1104: -- Procedure will Insert Discount related to distributions that are tracked
1105: -- as asset in FA_MASS_ADDITIONS_GT table
1106: --
1107:
1108: PROCEDURE Insert_Discount(
1109: P_acctg_date IN DATE,
1184: FETCH C_Discount
1185: INTO l_invoice_pay_id;
1186: EXIT WHEN C_Discount%NOTFOUND;
1187: --
1188: l_debug_info := 'Insert into FA_MASS_ADDITIONS_GT';
1189: --
1190: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1191: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1192: END IF;
1195: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Invoice Payment_Id: '
1196: ||TO_CHAR(l_invoice_pay_id));
1197: END IF;
1198: --
1199: INSERT INTO FA_MASS_ADDITIONS_GT(
1200: mass_addition_id,
1201: asset_number,
1202: tag_number,
1203: description,
1780: APID.request_id = FND_GLOBAL.conc_request_id,
1781: APID.asset_book_type_code = P_bt_code
1782: WHERE APID.invoice_distribution_id IN
1783: (SELECT FMAG.invoice_distribution_id
1784: FROM fa_mass_additions_gt FMAG
1785: WHERE FMAG.line_status = 'PROCESSED'
1786: AND FMAG.ledger_id = l_ledger_id)
1787: AND APID.assets_addition_flag = 'U'; */
1788: --New Update Stmt addedd
1795: apid.request_id,
1796: apid.asset_book_type_code,
1797: fmag.book_type_code
1798: FROM ap_invoice_distributions_all apid,
1799: fa_mass_additions_gt fmag
1800: WHERE apid.invoice_distribution_id = fmag.invoice_distribution_id
1801: AND fmag.line_status = 'PROCESSED'
1802: AND fmag.ledger_id = l_ledger_id
1803: AND apid.assets_addition_flag = 'U') sq
1825: APID.request_id = FND_GLOBAL.conc_request_id,
1826: APID.asset_book_type_code = P_bt_code
1827: WHERE APID.invoice_distribution_id IN
1828: (SELECT FMAG.invoice_distribution_id
1829: FROM fa_mass_additions_gt FMAG
1830: WHERE FMAG.line_status = 'REJECTED'
1831: AND FMAG.ledger_id = l_ledger_id)
1832: AND APID.assets_addition_flag = 'U';
1833: --
2008: AND APIP.invoice_payment_id IN (
2009: SELECT APHD.invoice_payment_id
2010: FROM ap_payment_hist_dists APHD,
2011: ap_invoice_distributions_all APID,
2012: fa_mass_additions_gt FMAG
2013: WHERE APIP.invoice_payment_id = APHD.invoice_payment_id
2014: AND APHD.invoice_distribution_id =
2015: APID.invoice_distribution_id
2016: AND APID.invoice_distribution_id =
2036: AND APIP.invoice_payment_id IN (
2037: SELECT APHD.invoice_payment_id
2038: FROM ap_payment_hist_dists APHD,
2039: ap_invoice_distributions_all APID,
2040: fa_mass_additions_gt FMAG
2041: WHERE APIP.invoice_payment_id = APHD.invoice_payment_id
2042: AND APHD.invoice_distribution_id =
2043: APID.invoice_distribution_id
2044: AND APID.invoice_distribution_id =