DBA Data[Home] [Help]

APPS.AR_TRX_SUMMARY_PKG dependencies on AR_TRX_SUMMARY

Line 1: PACKAGE BODY AR_TRX_SUMMARY_PKG AS

1: PACKAGE BODY AR_TRX_SUMMARY_PKG AS
2: /* $Header: ARCMUPGB.pls 120.25.12020000.2 2012/07/11 18:10:23 rravikir ship $ */
3:
4: /* Globals */
5: PG_DEBUG VARCHAR2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');

Line 38: fnd_file.put_line(fnd_file.log,'AR_TRX_SUMMARY_PKG.refresh_all(+)');

34: l_string VARCHAR2(4000);
35: l_po_value VARCHAR2(10);
36: l_at_risk_exists VARCHAR2(1);
37: BEGIN
38: fnd_file.put_line(fnd_file.log,'AR_TRX_SUMMARY_PKG.refresh_all(+)');
39: l_po_value := fnd_profile.value('AR_CMGT_ALLOW_SUMMARY_TABLE_REFRESH');
40:
41: IF nvl(l_po_value,'N') IN ('Y','A') THEN
42:

Line 46: clear_summary_tables('S'); -- only clear ar_trx_summary

42:
43: /* 6149811 - clear summary table data */
44: block_events('BLOCK',FND_GLOBAL.conc_request_id);
45:
46: clear_summary_tables('S'); -- only clear ar_trx_summary
47:
48: l_program_start_date := sysdate;
49:
50: /* 6149811 - start parallel query */

Line 309: (-1 * ar_trx_summary_hist_s.nextval,

305: LAST_PAYMENT_AMOUNT,
306: LAST_PAYMENT_DATE,
307: LAST_PAYMENT_NUMBER)
308: VALUES
309: (-1 * ar_trx_summary_hist_s.nextval,
310: -999,
311: a.currency,
312: -999,
313: sysdate,

Line 396: (-1 * ar_trx_summary_hist_s.nextval,

392: CREATED_BY,
393: LAST_UPDATE_LOGIN,
394: RECEIPTS_AT_RISK_VALUE)
395: VALUES
396: (-1 * ar_trx_summary_hist_s.nextval,
397: -888,
398: a.currency,
399: -999,
400: sysdate,

Line 415: INSERT into ar_trx_summary

411:
412: IF AR_CMGT_CREDIT_REQUEST_API.is_Credit_Management_Installed()
413: THEN
414:
415: INSERT into ar_trx_summary
416: (CUST_ACCOUNT_ID,
417: SITE_USE_ID,
418: CURRENCY,
419: ORG_ID,

Line 819: | AR_TRX_SUMMARY TABLE |

815:
816: /*--------------------------------------------+
817: | |
818: | LOGIC TO UPDATE THE LARGEST INV INFO IN |
819: | AR_TRX_SUMMARY TABLE |
820: | |
821: +--------------------------------------------*/
822:
823: declare

Line 864: text_update := 'Update ar_trx_summary

860: )
861: )
862: WHERE rank_amount = 1';
863:
864: text_update := 'Update ar_trx_summary
865: set LARGEST_INV_AMOUNT = :amount,
866: LARGEST_INV_CUST_TRX_ID = :cust_trx_id,
867: LARGEST_INV_DATE = :trx_date,
868: LAST_UPDATE_DATE = sysdate,

Line 944: | IN AR_TRX_SUMMARY |

940:
941: /*--------------------------------------------+
942: | |
943: | LOGIC TO UPDATE THE HIGHWATER MARK BALANCE |
944: | IN AR_TRX_SUMMARY |
945: | |
946: +--------------------------------------------*/
947:
948: declare

Line 1033: 'Update ar_trx_summary

1029: )
1030: where as_of_date > add_months(sysdate , -24)';
1031:
1032: text_update :=
1033: 'Update ar_trx_summary
1034: set OP_BAL_HIGH_WATERMARK = :cum_balance,
1035: OP_BAL_HIGH_WATERMARK_DATE = :as_of_date,
1036: LAST_UPDATE_DATE = sysdate,
1037: LAST_UPDATED_BY = FND_GLOBAL.user_id,

Line 1133: fnd_file.put_line(fnd_file.log,'AR_TRX_SUMMARY_PKG.refresh_all(-)');

1129:
1130: /* over commit to insure that deleted rows are recorded */
1131: COMMIT;
1132:
1133: fnd_file.put_line(fnd_file.log,'AR_TRX_SUMMARY_PKG.refresh_all(-)');
1134: EXCEPTION
1135: WHEN others THEN
1136: raise;
1137: END refresh_all;

Line 1169: but the one for ar_trx_summary only requires active customers.

1165: arp_standard.debug(' p_worker_number = ' || p_worker_number);
1166: arp_standard.debug(' p_list_size = ' || p_list_size);
1167:
1168: /* The processing of ar_trx_bal_summary requires all customers,
1169: but the one for ar_trx_summary only requires active customers.
1170: So we can rebuild the list for each table separately and
1171: significantly cust the discarded data from the ar_trx_summary
1172: routine(s) */
1173: p_cust_id.delete;

Line 1171: significantly cust the discarded data from the ar_trx_summary

1167:
1168: /* The processing of ar_trx_bal_summary requires all customers,
1169: but the one for ar_trx_summary only requires active customers.
1170: So we can rebuild the list for each table separately and
1171: significantly cust the discarded data from the ar_trx_summary
1172: routine(s) */
1173: p_cust_id.delete;
1174:
1175: IF p_list_size = 'ALL'

Line 1215: ar_trx_summary or both ar_trx_bal_summary and ar_trx_summary.

1211: END collect_customers;
1212:
1213:
1214: /* 8784962 - Allow for call to this function that only clears
1215: ar_trx_summary or both ar_trx_bal_summary and ar_trx_summary.
1216:
1217: legal values are A(all), B(bal only), S(summary only) */
1218:
1219: PROCEDURE clear_summary_tables(p_table_to_clear IN VARCHAR2) IS

Line 1253: EXECUTE IMMEDIATE 'truncate table ' || l_schema || '.AR_TRX_SUMMARY';

1249: END IF;
1250:
1251: IF p_table_to_clear IN ('A','S')
1252: THEN
1253: EXECUTE IMMEDIATE 'truncate table ' || l_schema || '.AR_TRX_SUMMARY';
1254: END IF;
1255: END IF;
1256:
1257: END clear_summary_tables;

Line 1263: arp_standard.debug('ar_trx_summary_pkg.clear_summary_by_customer()+');

1259: PROCEDURE clear_summary_by_customer(p_cust_id IN l_cust_id_type) IS
1260: BEGIN
1261: IF PG_DEBUG in ('Y','C')
1262: THEN
1263: arp_standard.debug('ar_trx_summary_pkg.clear_summary_by_customer()+');
1264: END IF;
1265:
1266: FORALL i IN 1..p_cust_id.COUNT
1267: DELETE FROM AR_TRX_BAL_SUMMARY

Line 1271: DELETE FROM AR_TRX_SUMMARY

1267: DELETE FROM AR_TRX_BAL_SUMMARY
1268: WHERE cust_account_id = p_cust_id(i);
1269:
1270: FORALL i IN 1..p_cust_id.COUNT
1271: DELETE FROM AR_TRX_SUMMARY
1272: WHERE cust_account_id = p_cust_id(i);
1273:
1274: IF PG_DEBUG in ('Y','C')
1275: THEN

Line 1276: arp_standard.debug('ar_trx_summary_pkg.clear_summary_by_customer()-');

1272: WHERE cust_account_id = p_cust_id(i);
1273:
1274: IF PG_DEBUG in ('Y','C')
1275: THEN
1276: arp_standard.debug('ar_trx_summary_pkg.clear_summary_by_customer()-');
1277: END IF;
1278: END clear_summary_by_customer;
1279:
1280: PROCEDURE submit_child_workers(p_max_workers IN NUMBER,

Line 1290: arp_standard.debug('ar_trx_summary_pkg.submit_child_workers()+');

1286:
1287: BEGIN
1288: IF PG_DEBUG in ('Y','C')
1289: THEN
1290: arp_standard.debug('ar_trx_summary_pkg.submit_child_workers()+');
1291: END IF;
1292:
1293: FOR i IN 1..(p_max_workers - 1) LOOP
1294: l_reqid := FND_REQUEST.SUBMIT_REQUEST (

Line 1309: arp_standard.debug('ar_trx_summary_pkg.submit_child_workers()-');

1305: COMMIT;
1306:
1307: IF PG_DEBUG in ('Y','C')
1308: THEN
1309: arp_standard.debug('ar_trx_summary_pkg.submit_child_workers()-');
1310: END IF;
1311:
1312: END submit_child_workers;
1313:

Line 1322: arp_standard.debug('ar_trx_summary_pkg.submit_held_events()+');

1318:
1319: BEGIN
1320: IF PG_DEBUG in ('Y','C')
1321: THEN
1322: arp_standard.debug('ar_trx_summary_pkg.submit_held_events()+');
1323: END IF;
1324:
1325: l_reqid := FND_REQUEST.SUBMIT_REQUEST (
1326: application=>l_appl_short,

Line 1333: arp_standard.debug('ar_trx_summary_pkg.submit_held_events()-');

1329:
1330: IF PG_DEBUG in ('Y','C')
1331: THEN
1332: arp_standard.debug(' request_id = ' || l_reqid);
1333: arp_standard.debug('ar_trx_summary_pkg.submit_held_events()-');
1334: END IF;
1335:
1336: END submit_held_events;
1337:

Line 1343: arp_standard.debug('ar_trx_summary_pkg.block_events()+');

1339: p_request_id IN NUMBER) IS
1340: BEGIN
1341: IF PG_DEBUG in ('Y','C')
1342: THEN
1343: arp_standard.debug('ar_trx_summary_pkg.block_events()+');
1344: arp_standard.debug(' p_action = ' || p_action);
1345: arp_standard.debug(' p_request_id = ' || p_request_id);
1346: END IF;
1347:

Line 1369: arp_standard.debug('ar_trx_summary_pkg.block_events()-');

1365: COMMIT;
1366:
1367: IF PG_DEBUG in ('Y','C')
1368: THEN
1369: arp_standard.debug('ar_trx_summary_pkg.block_events()-');
1370: END IF;
1371: END;
1372:
1373: PROCEDURE load_trx_bal_summary(p_cust_id IN l_cust_id_type)

Line 1378: arp_standard.debug('ar_trx_summary_pkg.load_trx_bal_summary()+');

1374: IS
1375: BEGIN
1376: IF PG_DEBUG in ('Y','C')
1377: THEN
1378: arp_standard.debug('ar_trx_summary_pkg.load_trx_bal_summary()+');
1379: END IF;
1380:
1381: FORALL i IN 1..p_cust_id.COUNT
1382: INSERT INTO AR_TRX_BAL_SUMMARY

Line 1611: arp_standard.debug('ar_trx_summary_pkg.load_trx_bal_summary()-');

1607: GROUP BY D.CUSTOMER_ID,D.CUSTOMER_SITE_USE_ID,D.CURRENCY_CODE,D.ORG_ID);
1608:
1609: IF PG_DEBUG in ('Y','C')
1610: THEN
1611: arp_standard.debug('ar_trx_summary_pkg.load_trx_bal_summary()-');
1612: END IF;
1613:
1614: END load_trx_bal_summary;
1615:

Line 1621: arp_standard.debug('ar_trx_summary_pkg.load_trx_summary()+');

1617: IS
1618: BEGIN
1619: IF PG_DEBUG in ('Y','C')
1620: THEN
1621: arp_standard.debug('ar_trx_summary_pkg.load_trx_summary()+');
1622: END IF;
1623:
1624: /* Dev Note: I think I can further simplify this code .. particularly
1625: the logic for:

Line 1631: INSERT into ar_trx_summary

1627: COUNT_OF_TOT_INV_INST_PAID
1628: INV_PAID_AMOUNT */
1629:
1630: FORALL i IN 1..p_cust_id.COUNT
1631: INSERT into ar_trx_summary
1632: (CUST_ACCOUNT_ID,
1633: SITE_USE_ID,
1634: CURRENCY,
1635: ORG_ID,

Line 2024: arp_standard.debug('ar_trx_summary_pkg.load_trx_summary()-');

2020: D.as_of_date);
2021:
2022: IF PG_DEBUG in ('Y','C')
2023: THEN
2024: arp_standard.debug('ar_trx_summary_pkg.load_trx_summary()-');
2025: END IF;
2026: END load_trx_summary;
2027:
2028: PROCEDURE load_largest_inv_info

Line 2047: arp_standard.debug('ar_trx_summary_pkg.load_largest_inv_info()+');

2043:
2044: BEGIN
2045: IF PG_DEBUG in ('Y','C')
2046: THEN
2047: arp_standard.debug('ar_trx_summary_pkg.load_largest_inv_info()+');
2048: END IF;
2049:
2050: text_select :=
2051: 'SELECT customer_id, customer_site_use_id,

Line 2082: text_update := 'Update /*+ INDEX(ats AR_TRX_SUMMARY_U1) */ ar_trx_summary ats

2078: THEN
2079: arp_standard.debug(text_select);
2080: END IF;
2081:
2082: text_update := 'Update /*+ INDEX(ats AR_TRX_SUMMARY_U1) */ ar_trx_summary ats
2083: set LARGEST_INV_AMOUNT = :amount,
2084: LARGEST_INV_CUST_TRX_ID = :cust_trx_id,
2085: LARGEST_INV_DATE = :trx_date,
2086: LAST_UPDATE_DATE = sysdate,

Line 2157: arp_standard.debug('ar_trx_summary_pkg.load_largest_inv_info()-');

2153: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
2154:
2155: IF PG_DEBUG in ('Y','C')
2156: THEN
2157: arp_standard.debug('ar_trx_summary_pkg.load_largest_inv_info()-');
2158: END IF;
2159: END load_largest_inv_info;
2160:
2161: PROCEDURE load_high_watermark IS

Line 2178: arp_standard.debug('ar_trx_summary_pkg.load_high_watermark()+');

2174:
2175: BEGIN
2176: IF PG_DEBUG in ('Y','C')
2177: THEN
2178: arp_standard.debug('ar_trx_summary_pkg.load_high_watermark()+');
2179: END IF;
2180:
2181: /* 7518998 - Changed first subquery to UNION ALL, forced
2182: ra rows to be CASH, and completely removed CM app subquery */

Line 2261: 'Update /*+ INDEX(ats AR_TRX_SUMMARY_U1) */ ar_trx_summary ats

2257: arp_standard.debug(text_select);
2258: END IF;
2259:
2260: text_update :=
2261: 'Update /*+ INDEX(ats AR_TRX_SUMMARY_U1) */ ar_trx_summary ats
2262: set OP_BAL_HIGH_WATERMARK = :cum_balance,
2263: OP_BAL_HIGH_WATERMARK_DATE = :as_of_date,
2264: LAST_UPDATE_DATE = sysdate,
2265: LAST_UPDATED_BY = FND_GLOBAL.user_id,

Line 2333: arp_standard.debug('ar_trx_summary_pkg.load_high_watermark()-');

2329: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
2330:
2331: IF PG_DEBUG in ('Y','C')
2332: THEN
2333: arp_standard.debug('ar_trx_summary_pkg.load_high_watermark()-');
2334: END IF;
2335:
2336: END load_high_watermark;
2337:

Line 2354: arp_standard.debug('ar_trx_summary_pkg.refresh_summary_data()+');

2350: l_return BOOLEAN;
2351: BEGIN
2352: IF PG_DEBUG in ('Y','C')
2353: THEN
2354: arp_standard.debug('ar_trx_summary_pkg.refresh_summary_data()+');
2355: arp_standard.debug(' p_skip_secondary_processes = ' || p_skip_secondary_processes);
2356: END IF;
2357:
2358: /* Check profile, if set to N, then terminate program */

Line 2368: arp_standard.debug('ar_trx_summary_pkg.refresh_summary_data()-');

2364: 'The profile AR_CMGT_ALLOW_SUMMARY_TABLE_REFRESH = N');
2365: IF PG_DEBUG in ('Y','C')
2366: THEN
2367: arp_standard.debug(' AR_CMGT_ALLOW_SUMMARY_TABLE_REFRESH = N');
2368: arp_standard.debug('ar_trx_summary_pkg.refresh_summary_data()-');
2369: END IF;
2370:
2371: retcode := SUCCESS;
2372: RETURN;

Line 2492: arp_standard.debug('ar_trx_summary_pkg.refresh_summary_data()-');

2488: COMMIT;
2489:
2490: IF PG_DEBUG in ('Y','C')
2491: THEN
2492: arp_standard.debug('ar_trx_summary_pkg.refresh_summary_data()-');
2493: END IF;
2494:
2495: retcode := SUCCESS;
2496: RETURN;

Line 2518: arp_standard.debug('ar_trx_summary_pkg.process_held_events()+');

2514: fnd_file.put_line(fnd_file.log,'arp_trx_summary_pkg.process_held_events()+');
2515:
2516: IF PG_DEBUG in ('Y','C')
2517: THEN
2518: arp_standard.debug('ar_trx_summary_pkg.process_held_events()+');
2519: END IF;
2520:
2521: /* Process the business events that have been raised running the run of this
2522: concurrent program so far */

Line 2633: arp_standard.debug('ar_trx_summary_pkg.process_held_events()-');

2629: fnd_file.put_line(fnd_file.log,'arp_trx_summary_pkg.process_held_events()-');
2630:
2631: IF PG_DEBUG in ('Y','C')
2632: THEN
2633: arp_standard.debug('ar_trx_summary_pkg.process_held_events()-');
2634: END IF;
2635: END process_held_events;
2636:
2637: END AR_TRX_SUMMARY_PKG;

Line 2637: END AR_TRX_SUMMARY_PKG;

2633: arp_standard.debug('ar_trx_summary_pkg.process_held_events()-');
2634: END IF;
2635: END process_held_events;
2636:
2637: END AR_TRX_SUMMARY_PKG;