[Home] [Help]
1143: p_process_status := jai_constants.unexpected_error;
1144: p_process_message := SUBSTR(SQLERRM,1,300);
1145: END maintain_mrc;
1146: --=========================================================================================--
1147: --This procedure maintains the history of ar_receivable_applications_all in jai_ar_rec_appl_audits
1148: --=========================================================================================--
1149:
1150: PROCEDURE maintain_applications(p_customer_trx_id IN ra_customer_trx_all.customer_trx_id%TYPE,
1151: p_receivable_application_id IN jai_ar_rec_appl_audits.receivable_application_id%TYPE,
1147: --This procedure maintains the history of ar_receivable_applications_all in jai_ar_rec_appl_audits
1148: --=========================================================================================--
1149:
1150: PROCEDURE maintain_applications(p_customer_trx_id IN ra_customer_trx_all.customer_trx_id%TYPE,
1151: p_receivable_application_id IN jai_ar_rec_appl_audits.receivable_application_id%TYPE,
1152: p_concurrent_req_num IN NUMBER,
1153: p_request_id IN NUMBER,
1154: p_operation_type IN VARCHAR2,
1155: p_rec_appl_audit_id IN OUT NOCOPY NUMBER,
1157: p_process_message OUT NOCOPY VARCHAR2)
1158: IS
1159: CURSOR cur_rec_appl_audits_s
1160: IS
1161: SELECT jai_ar_rec_appl_audits_s.nextval
1162: FROM dual;
1163:
1164: ln_created_by jai_ar_payment_audits.created_by%TYPE;
1165: ld_creation_date jai_ar_payment_audits.creation_date%TYPE;
1189: -- Date 17/09/2007 by sacsethi for bug 6407648
1190: ln_created_by := ln_last_updated_by;
1191: ld_creation_date := ld_last_update_date;
1192:
1193: INSERT INTO jai_ar_rec_appl_audits(
1194: rec_appl_audit_id,
1195: concurrent_req_num,
1196: customer_trx_id,
1197: receivable_application_id,
1224: WHERE customer_trx_id = p_customer_trx_id
1225: AND receivable_application_id = p_receivable_application_id;
1226:
1227: ELSIF p_operation_type = 'UPDATE' THEN
1228: UPDATE jai_ar_rec_appl_audits a
1229: SET (aapp_new,
1230: acctd_aapp_applied_from_new,
1231: acctd_aapp_applied_to_new,
1232: tapp_new,
2172: ln_line_applied NUMBER;
2173: ln_frt_amt_cashrcpt NUMBER;
2174: ln_tax_amt_cashrcpt NUMBER;
2175: ln_payment_audit_id jai_ar_payment_audits.payment_audit_id%TYPE;
2176: ln_rec_appl_audit_id jai_ar_rec_appl_audits.rec_appl_audit_id%TYPE;
2177: lv_process_status VARCHAR2(2);
2178: lv_process_message VARCHAR2(1000);
2179: v_upd_created_from VARCHAR2(15);
2180: ln_event_id NUMBER; --added for bug#7645588
2892: FETCH cur_recv_appl_id INTO ln_recv_appln_id;
2893: CLOSE cur_recv_appl_id;
2894:
2895:
2896: --This procedure maintains the history of ar_receivable_applications_all in jai_ar_rec_appl_audits
2897: maintain_applications(p_customer_trx_id => p_customer_trx_id,
2898: p_receivable_application_id => ln_recv_appln_id,
2899: p_concurrent_req_num => NULL,
2900: p_request_id => NULL,