70: arp_standard.debug(' p_parent_id:' || to_char(p_parent_id));
71: arp_standard.debug(' p_source_table: ' || p_source_table);
72: END IF;
73:
74: /* should we initialize arp_global before use?? */
75: -- arp_global.init;
76:
77: /* based upon parameters coming in, we have to update specific tables
78: to correct the CCID. The tables will be determined by several
71: arp_standard.debug(' p_source_table: ' || p_source_table);
72: END IF;
73:
74: /* should we initialize arp_global before use?? */
75: -- arp_global.init;
76:
77: /* based upon parameters coming in, we have to update specific tables
78: to correct the CCID. The tables will be determined by several
79: Columns */
84: /* update the distribution record */
85: UPDATE RA_CUST_TRX_LINE_GL_DIST
86: SET code_combination_id = nvl(p_new_ccid, code_combination_id),
87: last_update_date = SYSDATE,
88: last_updated_by = arp_global.last_updated_by,
89: last_update_login = arp_global.last_update_login
90: WHERE
91: cust_trx_line_gl_dist_id = p_distribution_id
92: AND code_combination_id = p_old_ccid;
85: UPDATE RA_CUST_TRX_LINE_GL_DIST
86: SET code_combination_id = nvl(p_new_ccid, code_combination_id),
87: last_update_date = SYSDATE,
88: last_updated_by = arp_global.last_updated_by,
89: last_update_login = arp_global.last_update_login
90: WHERE
91: cust_trx_line_gl_dist_id = p_distribution_id
92: AND code_combination_id = p_old_ccid;
93:
98:
99: update AR_DISTRIBUTIONS
100: SET code_combination_id = NVL( p_new_ccid, code_combination_id),
101: last_update_date = sysdate,
102: last_updated_by = arp_global.last_updated_by,
103: last_update_login = arp_global.last_update_login
104: WHERE code_combination_id = p_old_ccid
105: and line_id = p_distribution_id;
106:
99: update AR_DISTRIBUTIONS
100: SET code_combination_id = NVL( p_new_ccid, code_combination_id),
101: last_update_date = sysdate,
102: last_updated_by = arp_global.last_updated_by,
103: last_update_login = arp_global.last_update_login
104: WHERE code_combination_id = p_old_ccid
105: and line_id = p_distribution_id;
106:
107: IF ( p_source_table = 'ADJ' and p_dist_type = 'ADJ' ) THEN
110:
111: update AR_ADJUSTMENTS
112: SET code_combination_id = NVL(p_new_ccid, code_combination_id),
113: last_update_date = sysdate,
114: last_updated_by = arp_global.last_updated_by,
115: last_update_login = arp_global.last_update_login
116: WHERE adjustment_id = p_parent_id
117: AND code_combination_id = p_old_ccid;
118: END IF;
111: update AR_ADJUSTMENTS
112: SET code_combination_id = NVL(p_new_ccid, code_combination_id),
113: last_update_date = sysdate,
114: last_updated_by = arp_global.last_updated_by,
115: last_update_login = arp_global.last_update_login
116: WHERE adjustment_id = p_parent_id
117: AND code_combination_id = p_old_ccid;
118: END IF;
119:
120: IF (p_source_table = 'MCD' and p_dist_type = 'MISCCASH') then
121: UPDATE AR_MISC_CASH_DISTRIBUTIONS
122: SET code_combination_id = NVL(p_new_ccid, code_combination_id),
123: last_update_date = SYSDATE,
124: last_updated_by = arp_global.last_updated_by,
125: last_update_login = arp_global.last_update_login
126: where misc_cash_distribution_id = p_parent_id
127: and code_combination_id = p_old_ccid;
128: END IF;
121: UPDATE AR_MISC_CASH_DISTRIBUTIONS
122: SET code_combination_id = NVL(p_new_ccid, code_combination_id),
123: last_update_date = SYSDATE,
124: last_updated_by = arp_global.last_updated_by,
125: last_update_login = arp_global.last_update_login
126: where misc_cash_distribution_id = p_parent_id
127: and code_combination_id = p_old_ccid;
128: END IF;
129:
131: UPDATE AR_CASH_RECEIPT_HISTORY
132: SET account_code_combination_id = NVL(p_new_ccid,
133: account_code_combination_id),
134: last_update_date = SYSDATE,
135: last_updated_by = arp_global.last_updated_by,
136: last_update_login = arp_global.last_update_login
137: WHERE account_code_combination_id = p_old_ccid
138: AND cash_Receipt_history_id = p_parent_id
139: AND current_record_flag = 'Y';
132: SET account_code_combination_id = NVL(p_new_ccid,
133: account_code_combination_id),
134: last_update_date = SYSDATE,
135: last_updated_by = arp_global.last_updated_by,
136: last_update_login = arp_global.last_update_login
137: WHERE account_code_combination_id = p_old_ccid
138: AND cash_Receipt_history_id = p_parent_id
139: AND current_record_flag = 'Y';
140: END IF;
276:
277: /* Correct GL_DIST ccids */
278: UPDATE RA_CUST_TRX_LINE_GL_DIST gld
279: SET last_update_date = SYSDATE,
280: last_updated_by = arp_global.last_updated_by,
281: last_update_login = arp_global.last_update_login,
282: code_combination_id = (
283: SELECT nvl(new_code_combination_id, code_combination_id)
284: FROM ar_ccid_corrections acc
277: /* Correct GL_DIST ccids */
278: UPDATE RA_CUST_TRX_LINE_GL_DIST gld
279: SET last_update_date = SYSDATE,
280: last_updated_by = arp_global.last_updated_by,
281: last_update_login = arp_global.last_update_login,
282: code_combination_id = (
283: SELECT nvl(new_code_combination_id, code_combination_id)
284: FROM ar_ccid_corrections acc
285: WHERE acc.submission_id = p_submission_id
299:
300: /* Correct AR_DISTRIBUTION ccids */
301: UPDATE AR_DISTRIBUTIONS ard
302: SET last_update_date = SYSDATE,
303: last_updated_by = arp_global.last_updated_by,
304: last_update_login = arp_global.last_update_login,
305: code_combination_id = (
306: SELECT nvl(new_code_combination_id, code_combination_id)
307: FROM ar_ccid_corrections acc
300: /* Correct AR_DISTRIBUTION ccids */
301: UPDATE AR_DISTRIBUTIONS ard
302: SET last_update_date = SYSDATE,
303: last_updated_by = arp_global.last_updated_by,
304: last_update_login = arp_global.last_update_login,
305: code_combination_id = (
306: SELECT nvl(new_code_combination_id, code_combination_id)
307: FROM ar_ccid_corrections acc
308: WHERE acc.submission_id = p_submission_id
322:
323: /* correct parent ADJ records */
324: UPDATE AR_ADJUSTMENTS adj
325: SET last_update_date = SYSDATE,
326: last_updated_by = arp_global.last_updated_by,
327: last_update_login = arp_global.last_update_login,
328: code_combination_id = (
329: SELECT nvl(new_code_combination_id, code_combination_id)
330: FROM ar_ccid_corrections acc
323: /* correct parent ADJ records */
324: UPDATE AR_ADJUSTMENTS adj
325: SET last_update_date = SYSDATE,
326: last_updated_by = arp_global.last_updated_by,
327: last_update_login = arp_global.last_update_login,
328: code_combination_id = (
329: SELECT nvl(new_code_combination_id, code_combination_id)
330: FROM ar_ccid_corrections acc
331: WHERE acc.submission_id = p_submission_id
346:
347: /* correct parent CRH records */
348: UPDATE AR_CASH_RECEIPT_HISTORY crh
349: SET last_update_date = SYSDATE,
350: last_updated_by = arp_global.last_updated_by,
351: last_update_login = arp_global.last_update_login,
352: account_code_combination_id = (
353: SELECT nvl(new_code_combination_id, account_code_combination_id)
354: FROM ar_ccid_corrections acc
347: /* correct parent CRH records */
348: UPDATE AR_CASH_RECEIPT_HISTORY crh
349: SET last_update_date = SYSDATE,
350: last_updated_by = arp_global.last_updated_by,
351: last_update_login = arp_global.last_update_login,
352: account_code_combination_id = (
353: SELECT nvl(new_code_combination_id, account_code_combination_id)
354: FROM ar_ccid_corrections acc
355: WHERE acc.submission_id = p_submission_id
370:
371: /* correct parent MCD records */
372: UPDATE AR_MISC_CASH_DISTRIBUTIONS mcd
373: SET last_update_date = SYSDATE,
374: last_updated_by = arp_global.last_updated_by,
375: last_update_login = arp_global.last_update_login,
376: code_combination_id = (
377: SELECT nvl(new_code_combination_id, code_combination_id)
378: FROM ar_ccid_corrections acc
371: /* correct parent MCD records */
372: UPDATE AR_MISC_CASH_DISTRIBUTIONS mcd
373: SET last_update_date = SYSDATE,
374: last_updated_by = arp_global.last_updated_by,
375: last_update_login = arp_global.last_update_login,
376: code_combination_id = (
377: SELECT nvl(new_code_combination_id, code_combination_id)
378: FROM ar_ccid_corrections acc
379: WHERE acc.submission_id = p_submission_id