[Home] [Help]
49: WHILE ( l_any_rows_to_process = TRUE )
50: LOOP
51:
52: -- 1) UPgrade Multi Fund AdJustment REversal AR distributions
53: INSERT INTO ar_distributions_all (
54: LINE_ID
55: , SOURCE_ID
56: , SOURCE_TABLE
57: , SOURCE_TYPE
140: , ard.FROM_ACCTD_AMOUNT_CR
141: , ard.REF_MF_DIST_FLAG
142: , ard.REF_DIST_CCID
143: FROM ar_adjustments_all adj,
144: ar_distributions_all ard
145: WHERE adj.rowid >= l_start_rowid
146: AND adj.rowid <= l_end_rowid
147: AND ard.source_table = 'ADJ'
148: AND ard.source_id = adj.adjustment_id
152: l_rows_processed := l_rows_processed + SQL%ROWCOUNT;
153:
154: -- 2) UPgrade Multi Fund AdJustment MIgrated to AR
155:
156: INSERT INTO ar_distributions_all (
157: LINE_ID
158: , SOURCE_ID
159: , SOURCE_TABLE
160: , SOURCE_TYPE
361: LOOP
362:
363: -- UPgrade Multi Fund Receivable Application REverse AR distributions
364:
365: INSERT INTO ar_distributions_all
366: ( LINE_ID
367: , SOURCE_ID
368: , SOURCE_TABLE
369: , SOURCE_TYPE
510: --
511: , DECODE(double.side,'CASH','N','Y') -- REF_MF_DIST_FLAG
512: , ard.REF_DIST_CCID
513: FROM ar_receivable_applications_all app,
514: ar_distributions_all ard,
515: (SELECT 'CASH' side FROM DUAL UNION
516: SELECT 'APP' side FROM DUAL ) double,
517: ar_cash_receipt_history_all crh
518: WHERE app.rowid >= l_start_rowid
530: l_rows_processed := l_rows_processed + SQL%ROWCOUNT;
531:
532: -- UPgrade Multi Fund Receipt Application MIgrated to AR
533:
534: INSERT INTO ar_distributions_all (
535: LINE_ID
536: , SOURCE_ID
537: , SOURCE_TABLE
538: , SOURCE_TYPE
1045:
1046:
1047: -- UPgrade Multi Fund Misc Cash distributions MIgrated to AR
1048: -- Only the posted MCD need to be upgraded - non posted AAD will do it
1049: INSERT INTO ar_distributions_all (
1050: LINE_ID
1051: , SOURCE_ID
1052: , SOURCE_TABLE
1053: , SOURCE_TYPE