[Home] [Help]
1346: /* bug 1947192 */
1347: cursor c_update_ps( l_trx_id NUMBER) is
1348: SELECT ps.payment_schedule_id ps_id,
1349: gld.gl_date gl_date
1350: FROM ar_payment_schedules ps,
1351: ra_cust_trx_line_gl_dist gld
1352: WHERE gld.customer_trx_id = l_trx_id
1353: AND gld.account_class = 'REC'
1354: AND gld.account_set_flag = 'N'
1484: FOR i IN c_update_ps(p_trx_id) LOOP
1485: IF PG_DEBUG in ('Y', 'C') THEN
1486: arp_standard.debug('arp_auto_rule.create_other_receivable(): Change Payment Schedule Gl Date');
1487: END IF;
1488: UPDATE ar_payment_schedules
1489: SET gl_date = i.gl_date ,
1490: last_updated_by = arp_standard.profile.user_id,
1491: last_update_date = sysdate
1492: WHERE payment_schedule_id = i.ps_id;
2947: return_warning BOOLEAN := FALSE;
2948: --Bug#2750340
2949: l_xla_ev_rec arp_xla_events.xla_events_type;
2950:
2951: l_invoice_class ar_payment_schedules.class%TYPE;
2952: l_lock VARCHAR2(30);
2953:
2954: -- Bug 8478031
2955: l_customer_trx ra_customer_trx%ROWTYPE;
3426: * will be called in autoinvoice in bulk by request_id. The call*
3427: * here is restricted to avoid duplicate event/entity creation. *
3428: ****************************************************************/
3429: BEGIN
3430: SELECT max(class) INTO l_invoice_class FROM ar_payment_schedules
3431: WHERE customer_trx_id = trx_id;
3432: EXCEPTION
3433: WHEN OTHERS THEN
3434: l_invoice_class := 'NOT_CM';