[Home] [Help]
28: SELECT COUNT(*) as CTR
29: FROM JL_BR_CUSTOMER_TRX_EXTS
30: WHERE ELECTRONIC_INV_STATUS IN ('2','7')
31: AND CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID
32: AND NOT EXISTS ( SELECT 'X' FROM AR_PAYMENT_SCHEDULES
33: WHERE CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID
34: AND SELECTED_FOR_RECEIPT_BATCH_ID = -999);
35:
36: l_proceed_flag VARCHAR2(1) := 'F';
85: IF (l_country_code = 'BR') THEN
86:
87: FOR BATCH_SOURCE_REC IN C_BATCH_SOURCE LOOP
88: IF BATCH_SOURCE_REC.GLOBAL_ATTRIBUTE5 = 'Y' THEN
89: UPDATE AR_PAYMENT_SCHEDULES_ALL
90: SET SELECTED_FOR_RECEIPT_BATCH_ID = -999
91: WHERE CUSTOMER_TRX_ID = p_customer_trx_id;
92: END IF;
93: END LOOP;
436: l_trx_amount NUMBER;
437: l_CM_type VARCHAR2(20);
438: l_CM_status VARCHAR2(20);
439: CURSOR C_trx_details( p_trx_id IN NUMBER ) IS
440: SELECT selected_for_receipt_batch_id, sum(amount_due_remaining) FROM ar_payment_schedules WHERE customer_trx_id = p_trx_id
441: GROUP BY customer_trx_id,selected_for_receipt_batch_id;
442: CURSOR C_CM_Details( p_type_id IN NUMBER ) IS
443: SELECT TYPE, DEFAULT_STATUS FROM ra_cust_trx_types WHERE cust_trx_type_id = p_type_id;
444: L_COUNTRY_CODE varchar2(30);
455: CLOSE C_CM_Details;
456:
457: IF l_trx_status = -999 THEN
458: IF l_CM_type = 'CM' AND l_CM_status = 'VD' AND (l_trx_amount + p_CM_amount) = 0 THEN
459: UPDATE ar_payment_schedules
460: SET selected_for_receipt_batch_id = NULL
461: WHERE selected_for_receipt_batch_id = -999 AND
462: customer_trx_id = p_inv_customer_trx_id;
463: RETURN 1;