[Home] [Help]
134: FROM ar_line_conts_all alc
135: WHERE alc.customer_trx_line_id = ctl.customer_trx_line_id
136: AND alc.contingency_id = 5)
137: GROUP BY ctl.customer_trx_line_id, tl.term_id
138: HAVING max(due_days) > arp_standard.sysparm.payment_threshold;
139:
140: ELSE /* Autoinvoice */
141: INSERT INTO ar_line_conts_all
142: (
201: FROM ar_line_conts_all alc
202: WHERE alc.customer_trx_line_id = ctl.customer_trx_line_id
203: AND alc.contingency_id = 5)
204: GROUP BY ctl.customer_trx_line_id, tl.term_id
205: HAVING max(due_days) > arp_standard.sysparm.payment_threshold;
206: END IF;
207: ELSE /* Manual transaction */
208: INSERT INTO ar_line_conts_all
209: (
264: FROM ar_line_conts_all alc
265: WHERE alc.customer_trx_line_id = ctl.customer_trx_line_id
266: AND alc.contingency_id = 5)
267: GROUP BY ctl.customer_trx_line_id, ctl.org_id,tl.term_id
268: HAVING max(tl.due_days) > arp_standard.sysparm.payment_threshold;
269: END IF;
270:
271: l_rows := SQL%ROWCOUNT;
272:
1157: (SELECT customer_trx_line_id
1158: FROM ra_customer_trx_lines ctl
1159: WHERE ctl.request_id = p_request_id)
1160: AND trunc(expiration_date) - trunc(sysdate) <
1161: NVL(arp_standard.sysparm.standard_refund,0)
1162: AND EXISTS
1163: (SELECT 'its a refund contingency'
1164: FROM ar_deferral_reasons dr
1165: WHERE dr.contingency_id = lrc.contingency_id
1209: AND ct.term_id = tl.term_id
1210: AND ctl.request_id = p_request_id
1211: GROUP BY ctl.customer_trx_line_id, tl.term_id
1212: HAVING NVL(max(due_days),0) <=
1213: NVL(arp_standard.sysparm.payment_threshold,0))
1214: AND EXISTS
1215: (SELECT 'its a PAYMENT_TERM'
1216: FROM ar_deferral_reasons dr
1217: WHERE dr.policy_attached = 'PAYMENT_TERM'
1249: /* manual process, based on customer_trx_line_id */
1250: DELETE
1251: FROM ar_line_conts lrc
1252: WHERE trunc(expiration_date) - trunc(sysdate) <
1253: NVL(arp_standard.sysparm.standard_refund,0)
1254: AND lrc.customer_trx_line_id = p_customer_trx_line_id
1255: AND EXISTS
1256: (SELECT 'a refund contingency'
1257: FROM ar_deferral_reasons dr
1309: AND ct.term_id = tl.term_id
1310: AND ctl.customer_trx_line_id = lc.customer_trx_line_id
1311: GROUP BY ctl.customer_trx_line_id, tl.term_id
1312: HAVING NVL(max(due_days),0) <=
1313: NVL(arp_standard.sysparm.payment_threshold,0));
1314:
1315: IF PG_DEBUG IN ('Y','C')
1316: THEN
1317: debug('payment term contingencies deleted: ' || SQL%ROWCOUNT);
1565: not needed */
1566:
1567: /* 8889297 - Only call term and creditworthiness if
1568: those values are set in system options table */
1569: IF arp_standard.sysparm.payment_threshold IS NOT NULL
1570: THEN
1571: insert_term_contingencies(p_request_id, p_customer_trx_line_id);
1572: END IF;
1573:
1570: THEN
1571: insert_term_contingencies(p_request_id, p_customer_trx_line_id);
1572: END IF;
1573:
1574: IF (arp_standard.sysparm.credit_classification1 IS NOT NULL OR
1575: arp_standard.sysparm.credit_classification2 IS NOT NULL OR
1576: arp_standard.sysparm.credit_classification3 IS NOT NULL)
1577: THEN
1578: insert_credit_contingencies(p_request_id, p_customer_trx_line_id);
1571: insert_term_contingencies(p_request_id, p_customer_trx_line_id);
1572: END IF;
1573:
1574: IF (arp_standard.sysparm.credit_classification1 IS NOT NULL OR
1575: arp_standard.sysparm.credit_classification2 IS NOT NULL OR
1576: arp_standard.sysparm.credit_classification3 IS NOT NULL)
1577: THEN
1578: insert_credit_contingencies(p_request_id, p_customer_trx_line_id);
1579: END IF;
1572: END IF;
1573:
1574: IF (arp_standard.sysparm.credit_classification1 IS NOT NULL OR
1575: arp_standard.sysparm.credit_classification2 IS NOT NULL OR
1576: arp_standard.sysparm.credit_classification3 IS NOT NULL)
1577: THEN
1578: insert_credit_contingencies(p_request_id, p_customer_trx_line_id);
1579: END IF;
1580:
2553: SELECT
2554: lgt.trx_header_id,
2555: lgt.trx_line_id,
2556: cgt.trx_contingency_id,
2557: arp_standard.fnd_message('AR_RVMG_INVALID_CONTINGENCY'),
2558: cgt.contingency_id
2559: FROM ar_trx_lines_gt lgt,
2560: ar_trx_header_gt hgt,
2561: ar_trx_contingencies_gt cgt
2594: SELECT
2595: lgt.trx_header_id,
2596: lgt.trx_line_id,
2597: cgt.trx_contingency_id,
2598: arp_standard.fnd_message('AR_RVMG_NO_EXP_DATE'),
2599: cgt.contingency_id
2600: FROM ar_trx_lines_gt lgt,
2601: ar_trx_header_gt hgt,
2602: ar_trx_contingencies_gt cgt,
2657: )
2658: SELECT
2659: l.interface_line_id,
2660: c.interface_contingency_id,
2661: arp_standard.fnd_message('AR_RVMG_INVALID_CONTINGENCY'),
2662: c.contingency_id,
2663: l.org_id
2664: FROM ra_interface_lines l,
2665: ar_interface_conts c
2697: )
2698: SELECT
2699: l.interface_line_id,
2700: c.interface_contingency_id,
2701: arp_standard.fnd_message('AR_RVMG_NO_EXP_DATE'),
2702: c.contingency_id,
2703: l.org_id
2704: FROM ra_interface_lines l,
2705: ar_interface_conts c,
3744: debug('creditworthy()-');
3745: END IF;
3746:
3747: IF g_credit_class_tbl(p_customer_site_use_id) IN (
3748: arp_standard.sysparm.credit_classification1,
3749: arp_standard.sysparm.credit_classification2,
3750: arp_standard.sysparm.credit_classification3) THEN
3751:
3752: l_verdict := defer;
3745: END IF;
3746:
3747: IF g_credit_class_tbl(p_customer_site_use_id) IN (
3748: arp_standard.sysparm.credit_classification1,
3749: arp_standard.sysparm.credit_classification2,
3750: arp_standard.sysparm.credit_classification3) THEN
3751:
3752: l_verdict := defer;
3753:
3746:
3747: IF g_credit_class_tbl(p_customer_site_use_id) IN (
3748: arp_standard.sysparm.credit_classification1,
3749: arp_standard.sysparm.credit_classification2,
3750: arp_standard.sysparm.credit_classification3) THEN
3751:
3752: l_verdict := defer;
3753:
3754: ELSE
3905: BEGIN
3906:
3907: /*------------------------------------------------------------------------
3908: | This function is a generic function to compute the line balance
3909: | using a standard rounding logic. This function is being called
3910: | both for invoice currency and functional currency. It is important
3911: | to understand the meanign of each parameter, so I give a detailed
3912: | explanations explantion for each parameter.
3913: |
5968: retcode := SUCCESS;
5969:
5970: l_request_id := fnd_global.conc_request_id;
5971:
5972: /**allows to skip certain steps like rounding from the standard flow and
5973: process the same in bulk mode for better performance. */
5974: AR_RAAPI_UTIL.g_called_from := 'SWEEPER';
5975:
5976: FOR morgs in cur_orgs
6333: | doubtfult that we may not collect money for it. So, when money
6334: | arrives, we can immediately recognize it.
6335: |
6336: | In the second scneario, it is the very similar to the first one
6337: | however, there may be a non-standard refund clause so we can not
6338: | recognize any revenue until that has expired. At the same time,
6339: | we do not lose track of this receipt. So, we put in pending, and
6340: | as soon as the expiration happens this pending amount will be
6341: | recognized.
6343: | Third scenario is the simplest, we do not do anything. Simply because
6344: | when all expire the periodic sweeper is smart enough to recognize the
6345: | entire amount.
6346: |
6347: | The fourth scenario happens when intially there was a non-standard
6348: | refund policy for this line. And just before this receipt arrived,
6349: | this expired, so now we should do the periodc sweeper's job and
6350: | recognize all revenue.
6351: |