70:
71: PROCEDURE Output( p IN ReceiptType ) IS
72: BEGIN
73: IF PG_DEBUG in ('Y', 'C') THEN
74: arp_standard.debug('Output: ' || 'Receipt Type' );
75: arp_standard.debug('Output: ' || 'CashReceiptId:'||p.CashReceiptId );
76: arp_standard.debug('Output: ' || 'ReceiptNumber:'||p.ReceiptNumber );
77: arp_standard.debug('Output: ' || 'DocSequenceId:'||p.DocSequenceId );
78: arp_standard.debug('Output: ' || 'DocSequenceValue:'||p.DocSequenceValue );
71: PROCEDURE Output( p IN ReceiptType ) IS
72: BEGIN
73: IF PG_DEBUG in ('Y', 'C') THEN
74: arp_standard.debug('Output: ' || 'Receipt Type' );
75: arp_standard.debug('Output: ' || 'CashReceiptId:'||p.CashReceiptId );
76: arp_standard.debug('Output: ' || 'ReceiptNumber:'||p.ReceiptNumber );
77: arp_standard.debug('Output: ' || 'DocSequenceId:'||p.DocSequenceId );
78: arp_standard.debug('Output: ' || 'DocSequenceValue:'||p.DocSequenceValue );
79: arp_standard.debug('Output: ' || 'PayFromCustomer:'||p.PayFromCustomer );
72: BEGIN
73: IF PG_DEBUG in ('Y', 'C') THEN
74: arp_standard.debug('Output: ' || 'Receipt Type' );
75: arp_standard.debug('Output: ' || 'CashReceiptId:'||p.CashReceiptId );
76: arp_standard.debug('Output: ' || 'ReceiptNumber:'||p.ReceiptNumber );
77: arp_standard.debug('Output: ' || 'DocSequenceId:'||p.DocSequenceId );
78: arp_standard.debug('Output: ' || 'DocSequenceValue:'||p.DocSequenceValue );
79: arp_standard.debug('Output: ' || 'PayFromCustomer:'||p.PayFromCustomer );
80: arp_standard.debug('Output: ' || 'CurrencyCode:'||p.CurrencyCode );
73: IF PG_DEBUG in ('Y', 'C') THEN
74: arp_standard.debug('Output: ' || 'Receipt Type' );
75: arp_standard.debug('Output: ' || 'CashReceiptId:'||p.CashReceiptId );
76: arp_standard.debug('Output: ' || 'ReceiptNumber:'||p.ReceiptNumber );
77: arp_standard.debug('Output: ' || 'DocSequenceId:'||p.DocSequenceId );
78: arp_standard.debug('Output: ' || 'DocSequenceValue:'||p.DocSequenceValue );
79: arp_standard.debug('Output: ' || 'PayFromCustomer:'||p.PayFromCustomer );
80: arp_standard.debug('Output: ' || 'CurrencyCode:'||p.CurrencyCode );
81: arp_standard.debug('Output: ' || 'ExchangeRate:'||p.ExchangeRate );
74: arp_standard.debug('Output: ' || 'Receipt Type' );
75: arp_standard.debug('Output: ' || 'CashReceiptId:'||p.CashReceiptId );
76: arp_standard.debug('Output: ' || 'ReceiptNumber:'||p.ReceiptNumber );
77: arp_standard.debug('Output: ' || 'DocSequenceId:'||p.DocSequenceId );
78: arp_standard.debug('Output: ' || 'DocSequenceValue:'||p.DocSequenceValue );
79: arp_standard.debug('Output: ' || 'PayFromCustomer:'||p.PayFromCustomer );
80: arp_standard.debug('Output: ' || 'CurrencyCode:'||p.CurrencyCode );
81: arp_standard.debug('Output: ' || 'ExchangeRate:'||p.ExchangeRate );
82: arp_standard.debug('Output: ' || '' );
75: arp_standard.debug('Output: ' || 'CashReceiptId:'||p.CashReceiptId );
76: arp_standard.debug('Output: ' || 'ReceiptNumber:'||p.ReceiptNumber );
77: arp_standard.debug('Output: ' || 'DocSequenceId:'||p.DocSequenceId );
78: arp_standard.debug('Output: ' || 'DocSequenceValue:'||p.DocSequenceValue );
79: arp_standard.debug('Output: ' || 'PayFromCustomer:'||p.PayFromCustomer );
80: arp_standard.debug('Output: ' || 'CurrencyCode:'||p.CurrencyCode );
81: arp_standard.debug('Output: ' || 'ExchangeRate:'||p.ExchangeRate );
82: arp_standard.debug('Output: ' || '' );
83: END IF;
76: arp_standard.debug('Output: ' || 'ReceiptNumber:'||p.ReceiptNumber );
77: arp_standard.debug('Output: ' || 'DocSequenceId:'||p.DocSequenceId );
78: arp_standard.debug('Output: ' || 'DocSequenceValue:'||p.DocSequenceValue );
79: arp_standard.debug('Output: ' || 'PayFromCustomer:'||p.PayFromCustomer );
80: arp_standard.debug('Output: ' || 'CurrencyCode:'||p.CurrencyCode );
81: arp_standard.debug('Output: ' || 'ExchangeRate:'||p.ExchangeRate );
82: arp_standard.debug('Output: ' || '' );
83: END IF;
84: END;
77: arp_standard.debug('Output: ' || 'DocSequenceId:'||p.DocSequenceId );
78: arp_standard.debug('Output: ' || 'DocSequenceValue:'||p.DocSequenceValue );
79: arp_standard.debug('Output: ' || 'PayFromCustomer:'||p.PayFromCustomer );
80: arp_standard.debug('Output: ' || 'CurrencyCode:'||p.CurrencyCode );
81: arp_standard.debug('Output: ' || 'ExchangeRate:'||p.ExchangeRate );
82: arp_standard.debug('Output: ' || '' );
83: END IF;
84: END;
85: --
78: arp_standard.debug('Output: ' || 'DocSequenceValue:'||p.DocSequenceValue );
79: arp_standard.debug('Output: ' || 'PayFromCustomer:'||p.PayFromCustomer );
80: arp_standard.debug('Output: ' || 'CurrencyCode:'||p.CurrencyCode );
81: arp_standard.debug('Output: ' || 'ExchangeRate:'||p.ExchangeRate );
82: arp_standard.debug('Output: ' || '' );
83: END IF;
84: END;
85: --
86: PROCEDURE Output( p IN TrxType ) IS
85: --
86: PROCEDURE Output( p IN TrxType ) IS
87: BEGIN
88: IF PG_DEBUG in ('Y', 'C') THEN
89: arp_standard.debug('Output: ' || 'TrxType' );
90: arp_standard.debug('Output: ' || 'CmPsIdFlag:'||p.CmPsIdFlag );
91: arp_standard.debug('Output: ' || 'PaymentScheduleId:'||p.PaymentScheduleId );
92: arp_standard.debug('Output: ' || 'Class:'||p.Class );
93: arp_standard.debug('Output: ' || 'TrxNumber:'||p.TrxNumber );
86: PROCEDURE Output( p IN TrxType ) IS
87: BEGIN
88: IF PG_DEBUG in ('Y', 'C') THEN
89: arp_standard.debug('Output: ' || 'TrxType' );
90: arp_standard.debug('Output: ' || 'CmPsIdFlag:'||p.CmPsIdFlag );
91: arp_standard.debug('Output: ' || 'PaymentScheduleId:'||p.PaymentScheduleId );
92: arp_standard.debug('Output: ' || 'Class:'||p.Class );
93: arp_standard.debug('Output: ' || 'TrxNumber:'||p.TrxNumber );
94: arp_standard.debug('Output: ' || 'OrgId:'||p.OrgId );
87: BEGIN
88: IF PG_DEBUG in ('Y', 'C') THEN
89: arp_standard.debug('Output: ' || 'TrxType' );
90: arp_standard.debug('Output: ' || 'CmPsIdFlag:'||p.CmPsIdFlag );
91: arp_standard.debug('Output: ' || 'PaymentScheduleId:'||p.PaymentScheduleId );
92: arp_standard.debug('Output: ' || 'Class:'||p.Class );
93: arp_standard.debug('Output: ' || 'TrxNumber:'||p.TrxNumber );
94: arp_standard.debug('Output: ' || 'OrgId:'||p.OrgId );
95: arp_standard.debug('Output: ' || '' );
88: IF PG_DEBUG in ('Y', 'C') THEN
89: arp_standard.debug('Output: ' || 'TrxType' );
90: arp_standard.debug('Output: ' || 'CmPsIdFlag:'||p.CmPsIdFlag );
91: arp_standard.debug('Output: ' || 'PaymentScheduleId:'||p.PaymentScheduleId );
92: arp_standard.debug('Output: ' || 'Class:'||p.Class );
93: arp_standard.debug('Output: ' || 'TrxNumber:'||p.TrxNumber );
94: arp_standard.debug('Output: ' || 'OrgId:'||p.OrgId );
95: arp_standard.debug('Output: ' || '' );
96: END IF;
89: arp_standard.debug('Output: ' || 'TrxType' );
90: arp_standard.debug('Output: ' || 'CmPsIdFlag:'||p.CmPsIdFlag );
91: arp_standard.debug('Output: ' || 'PaymentScheduleId:'||p.PaymentScheduleId );
92: arp_standard.debug('Output: ' || 'Class:'||p.Class );
93: arp_standard.debug('Output: ' || 'TrxNumber:'||p.TrxNumber );
94: arp_standard.debug('Output: ' || 'OrgId:'||p.OrgId );
95: arp_standard.debug('Output: ' || '' );
96: END IF;
97: END;
90: arp_standard.debug('Output: ' || 'CmPsIdFlag:'||p.CmPsIdFlag );
91: arp_standard.debug('Output: ' || 'PaymentScheduleId:'||p.PaymentScheduleId );
92: arp_standard.debug('Output: ' || 'Class:'||p.Class );
93: arp_standard.debug('Output: ' || 'TrxNumber:'||p.TrxNumber );
94: arp_standard.debug('Output: ' || 'OrgId:'||p.OrgId );
95: arp_standard.debug('Output: ' || '' );
96: END IF;
97: END;
98: --
91: arp_standard.debug('Output: ' || 'PaymentScheduleId:'||p.PaymentScheduleId );
92: arp_standard.debug('Output: ' || 'Class:'||p.Class );
93: arp_standard.debug('Output: ' || 'TrxNumber:'||p.TrxNumber );
94: arp_standard.debug('Output: ' || 'OrgId:'||p.OrgId );
95: arp_standard.debug('Output: ' || '' );
96: END IF;
97: END;
98: --
99: PROCEDURE Output( p IN ApplicationType ) IS
98: --
99: PROCEDURE Output( p IN ApplicationType ) IS
100: BEGIN
101: IF PG_DEBUG in ('Y', 'C') THEN
102: arp_standard.debug('Output: ' || 'ApplicationType' );
103: arp_standard.debug('Output: ' || 'ReceivableApplicationId:'||p.ReceivableApplicationId );
104: arp_standard.debug('Output: ' || 'GLDate:'||p.GLDate );
105: arp_standard.debug('Output: ' || 'UssglTransactionCode:'||p.UssglTransactionCode );
106: arp_standard.debug('Output: ' || 'AppType:'||p.AppType );
99: PROCEDURE Output( p IN ApplicationType ) IS
100: BEGIN
101: IF PG_DEBUG in ('Y', 'C') THEN
102: arp_standard.debug('Output: ' || 'ApplicationType' );
103: arp_standard.debug('Output: ' || 'ReceivableApplicationId:'||p.ReceivableApplicationId );
104: arp_standard.debug('Output: ' || 'GLDate:'||p.GLDate );
105: arp_standard.debug('Output: ' || 'UssglTransactionCode:'||p.UssglTransactionCode );
106: arp_standard.debug('Output: ' || 'AppType:'||p.AppType );
107: arp_standard.debug('Output: ' || '' );
100: BEGIN
101: IF PG_DEBUG in ('Y', 'C') THEN
102: arp_standard.debug('Output: ' || 'ApplicationType' );
103: arp_standard.debug('Output: ' || 'ReceivableApplicationId:'||p.ReceivableApplicationId );
104: arp_standard.debug('Output: ' || 'GLDate:'||p.GLDate );
105: arp_standard.debug('Output: ' || 'UssglTransactionCode:'||p.UssglTransactionCode );
106: arp_standard.debug('Output: ' || 'AppType:'||p.AppType );
107: arp_standard.debug('Output: ' || '' );
108: END IF;
101: IF PG_DEBUG in ('Y', 'C') THEN
102: arp_standard.debug('Output: ' || 'ApplicationType' );
103: arp_standard.debug('Output: ' || 'ReceivableApplicationId:'||p.ReceivableApplicationId );
104: arp_standard.debug('Output: ' || 'GLDate:'||p.GLDate );
105: arp_standard.debug('Output: ' || 'UssglTransactionCode:'||p.UssglTransactionCode );
106: arp_standard.debug('Output: ' || 'AppType:'||p.AppType );
107: arp_standard.debug('Output: ' || '' );
108: END IF;
109: END;
102: arp_standard.debug('Output: ' || 'ApplicationType' );
103: arp_standard.debug('Output: ' || 'ReceivableApplicationId:'||p.ReceivableApplicationId );
104: arp_standard.debug('Output: ' || 'GLDate:'||p.GLDate );
105: arp_standard.debug('Output: ' || 'UssglTransactionCode:'||p.UssglTransactionCode );
106: arp_standard.debug('Output: ' || 'AppType:'||p.AppType );
107: arp_standard.debug('Output: ' || '' );
108: END IF;
109: END;
110: --
103: arp_standard.debug('Output: ' || 'ReceivableApplicationId:'||p.ReceivableApplicationId );
104: arp_standard.debug('Output: ' || 'GLDate:'||p.GLDate );
105: arp_standard.debug('Output: ' || 'UssglTransactionCode:'||p.UssglTransactionCode );
106: arp_standard.debug('Output: ' || 'AppType:'||p.AppType );
107: arp_standard.debug('Output: ' || '' );
108: END IF;
109: END;
110: --
111: PROCEDURE Output( p IN ApplicationAmountType ) IS
110: --
111: PROCEDURE Output( p IN ApplicationAmountType ) IS
112: BEGIN
113: IF PG_DEBUG in ('Y', 'C') THEN
114: arp_standard.debug('Output: ' || 'ApplicationAmountType' );
115: arp_standard.debug('Output: ' || 'Amount:'||p.Amount );
116: arp_standard.debug('Output: ' || 'AmountAppfrom :'||p.AmountAppFrom);
117: arp_standard.debug('Output: ' || 'AcctdAmount:'||p.AcctdAmount );
118: arp_standard.debug('Output: ' || 'LineApplied:'||p.LineApplied );
111: PROCEDURE Output( p IN ApplicationAmountType ) IS
112: BEGIN
113: IF PG_DEBUG in ('Y', 'C') THEN
114: arp_standard.debug('Output: ' || 'ApplicationAmountType' );
115: arp_standard.debug('Output: ' || 'Amount:'||p.Amount );
116: arp_standard.debug('Output: ' || 'AmountAppfrom :'||p.AmountAppFrom);
117: arp_standard.debug('Output: ' || 'AcctdAmount:'||p.AcctdAmount );
118: arp_standard.debug('Output: ' || 'LineApplied:'||p.LineApplied );
119: arp_standard.debug('Output: ' || 'TaxApplied:'||p.TaxApplied );
112: BEGIN
113: IF PG_DEBUG in ('Y', 'C') THEN
114: arp_standard.debug('Output: ' || 'ApplicationAmountType' );
115: arp_standard.debug('Output: ' || 'Amount:'||p.Amount );
116: arp_standard.debug('Output: ' || 'AmountAppfrom :'||p.AmountAppFrom);
117: arp_standard.debug('Output: ' || 'AcctdAmount:'||p.AcctdAmount );
118: arp_standard.debug('Output: ' || 'LineApplied:'||p.LineApplied );
119: arp_standard.debug('Output: ' || 'TaxApplied:'||p.TaxApplied );
120: arp_standard.debug('Output: ' || 'FreightApplied:'||p.FreightApplied );
113: IF PG_DEBUG in ('Y', 'C') THEN
114: arp_standard.debug('Output: ' || 'ApplicationAmountType' );
115: arp_standard.debug('Output: ' || 'Amount:'||p.Amount );
116: arp_standard.debug('Output: ' || 'AmountAppfrom :'||p.AmountAppFrom);
117: arp_standard.debug('Output: ' || 'AcctdAmount:'||p.AcctdAmount );
118: arp_standard.debug('Output: ' || 'LineApplied:'||p.LineApplied );
119: arp_standard.debug('Output: ' || 'TaxApplied:'||p.TaxApplied );
120: arp_standard.debug('Output: ' || 'FreightApplied:'||p.FreightApplied );
121: arp_standard.debug('Output: ' || 'ChargesApplied:'||p.ChargesApplied );
114: arp_standard.debug('Output: ' || 'ApplicationAmountType' );
115: arp_standard.debug('Output: ' || 'Amount:'||p.Amount );
116: arp_standard.debug('Output: ' || 'AmountAppfrom :'||p.AmountAppFrom);
117: arp_standard.debug('Output: ' || 'AcctdAmount:'||p.AcctdAmount );
118: arp_standard.debug('Output: ' || 'LineApplied:'||p.LineApplied );
119: arp_standard.debug('Output: ' || 'TaxApplied:'||p.TaxApplied );
120: arp_standard.debug('Output: ' || 'FreightApplied:'||p.FreightApplied );
121: arp_standard.debug('Output: ' || 'ChargesApplied:'||p.ChargesApplied );
122: arp_standard.debug('Output: ' || '' );
115: arp_standard.debug('Output: ' || 'Amount:'||p.Amount );
116: arp_standard.debug('Output: ' || 'AmountAppfrom :'||p.AmountAppFrom);
117: arp_standard.debug('Output: ' || 'AcctdAmount:'||p.AcctdAmount );
118: arp_standard.debug('Output: ' || 'LineApplied:'||p.LineApplied );
119: arp_standard.debug('Output: ' || 'TaxApplied:'||p.TaxApplied );
120: arp_standard.debug('Output: ' || 'FreightApplied:'||p.FreightApplied );
121: arp_standard.debug('Output: ' || 'ChargesApplied:'||p.ChargesApplied );
122: arp_standard.debug('Output: ' || '' );
123: END IF;
116: arp_standard.debug('Output: ' || 'AmountAppfrom :'||p.AmountAppFrom);
117: arp_standard.debug('Output: ' || 'AcctdAmount:'||p.AcctdAmount );
118: arp_standard.debug('Output: ' || 'LineApplied:'||p.LineApplied );
119: arp_standard.debug('Output: ' || 'TaxApplied:'||p.TaxApplied );
120: arp_standard.debug('Output: ' || 'FreightApplied:'||p.FreightApplied );
121: arp_standard.debug('Output: ' || 'ChargesApplied:'||p.ChargesApplied );
122: arp_standard.debug('Output: ' || '' );
123: END IF;
124: END;
117: arp_standard.debug('Output: ' || 'AcctdAmount:'||p.AcctdAmount );
118: arp_standard.debug('Output: ' || 'LineApplied:'||p.LineApplied );
119: arp_standard.debug('Output: ' || 'TaxApplied:'||p.TaxApplied );
120: arp_standard.debug('Output: ' || 'FreightApplied:'||p.FreightApplied );
121: arp_standard.debug('Output: ' || 'ChargesApplied:'||p.ChargesApplied );
122: arp_standard.debug('Output: ' || '' );
123: END IF;
124: END;
125: --
118: arp_standard.debug('Output: ' || 'LineApplied:'||p.LineApplied );
119: arp_standard.debug('Output: ' || 'TaxApplied:'||p.TaxApplied );
120: arp_standard.debug('Output: ' || 'FreightApplied:'||p.FreightApplied );
121: arp_standard.debug('Output: ' || 'ChargesApplied:'||p.ChargesApplied );
122: arp_standard.debug('Output: ' || '' );
123: END IF;
124: END;
125: --
126: --
211: p_interface_rec.reference30
212: );
213: EXCEPTION
214: WHEN OTHERS THEN
215: arp_standard.debug( 'Exception:CreateInterface:' );
216: RAISE;
217: END;
218: --
219: --
305: */
306: PROCEDURE Output( p_RCa IN CCA%ROWTYPE ) IS
307: BEGIN
308: IF PG_DEBUG in ('Y', 'C') THEN
309: arp_standard.debug('Output: ' || 'CCA%ROWTYPE' );
310: arp_standard.debug('Output: ' || 'Amount:'||p_RCa.Amount );
311: arp_standard.debug('Output: ' || 'Source:'||p_RCA.Source );
312: arp_standard.debug('Output: ' || 'SourceId:'||p_RCa.SourceId );
313: arp_standard.debug('Output: ' || '--------------------------------' );
306: PROCEDURE Output( p_RCa IN CCA%ROWTYPE ) IS
307: BEGIN
308: IF PG_DEBUG in ('Y', 'C') THEN
309: arp_standard.debug('Output: ' || 'CCA%ROWTYPE' );
310: arp_standard.debug('Output: ' || 'Amount:'||p_RCa.Amount );
311: arp_standard.debug('Output: ' || 'Source:'||p_RCA.Source );
312: arp_standard.debug('Output: ' || 'SourceId:'||p_RCa.SourceId );
313: arp_standard.debug('Output: ' || '--------------------------------' );
314: END IF;
307: BEGIN
308: IF PG_DEBUG in ('Y', 'C') THEN
309: arp_standard.debug('Output: ' || 'CCA%ROWTYPE' );
310: arp_standard.debug('Output: ' || 'Amount:'||p_RCa.Amount );
311: arp_standard.debug('Output: ' || 'Source:'||p_RCA.Source );
312: arp_standard.debug('Output: ' || 'SourceId:'||p_RCa.SourceId );
313: arp_standard.debug('Output: ' || '--------------------------------' );
314: END IF;
315: END Output;
308: IF PG_DEBUG in ('Y', 'C') THEN
309: arp_standard.debug('Output: ' || 'CCA%ROWTYPE' );
310: arp_standard.debug('Output: ' || 'Amount:'||p_RCa.Amount );
311: arp_standard.debug('Output: ' || 'Source:'||p_RCA.Source );
312: arp_standard.debug('Output: ' || 'SourceId:'||p_RCa.SourceId );
313: arp_standard.debug('Output: ' || '--------------------------------' );
314: END IF;
315: END Output;
316:
309: arp_standard.debug('Output: ' || 'CCA%ROWTYPE' );
310: arp_standard.debug('Output: ' || 'Amount:'||p_RCa.Amount );
311: arp_standard.debug('Output: ' || 'Source:'||p_RCA.Source );
312: arp_standard.debug('Output: ' || 'SourceId:'||p_RCa.SourceId );
313: arp_standard.debug('Output: ' || '--------------------------------' );
314: END IF;
315: END Output;
316:
317: BEGIN
330: l_TotalUnallocatedAmt := l_TotalUnallocatedAmt + RCA.UnallocatedAmt;
331:
332: EXCEPTION
333: WHEN OTHERS THEN
334: arp_standard.debug( 'Exception:CurrentCBDApplications.Loop:');
335: Output( Rca );
336: RAISE;
337: END;
338: END LOOP;
354: l_TotalUnallocatedAmt := l_TotalUnallocatedAmt + RCA.UnallocatedAmt;
355:
356: EXCEPTION
357: WHEN OTHERS THEN
358: arp_standard.debug( 'Exception:CurrentCBDApplications.Loop:');
359: Output( Rca );
360: RAISE;
361: END;
362: END LOOP;
363: */
364: END IF;
365: EXCEPTION
366: WHEN OTHERS THEN
367: arp_standard.debug( ' Exception:CurrentCBDApplications:' );
368: arp_standard.debug( 'l_NextElement:'||l_NextElement );
369: arp_standard.debug( 'l_TotalAmount:'||l_TotalAmount );
370: RAISE;
371: END;
364: END IF;
365: EXCEPTION
366: WHEN OTHERS THEN
367: arp_standard.debug( ' Exception:CurrentCBDApplications:' );
368: arp_standard.debug( 'l_NextElement:'||l_NextElement );
369: arp_standard.debug( 'l_TotalAmount:'||l_TotalAmount );
370: RAISE;
371: END;
372: --
365: EXCEPTION
366: WHEN OTHERS THEN
367: arp_standard.debug( ' Exception:CurrentCBDApplications:' );
368: arp_standard.debug( 'l_NextElement:'||l_NextElement );
369: arp_standard.debug( 'l_TotalAmount:'||l_TotalAmount );
370: RAISE;
371: END;
372: --
373: --
545: ps.amount_due_original,
546: tl.sequence_num;
547: EXCEPTION
548: WHEN OTHERS THEN
549: arp_standard.debug( 'Exception:CurrentRevDistribution.Select PS Details:' );
550: RAISE;
551: END;
552:
553: FOR GlDistRecord IN gl_dist_cursor( l_customer_trx_id, p_type ) LOOP
607: NextElement := l_NextElement;
608:
609: EXCEPTION
610: WHEN OTHERS THEN
611: arp_standard.debug( 'Exception:CurrentRevDistribution:' );
612: arp_standard.debug( 'l_customer_trx_id:'||l_customer_trx_id );
613: arp_standard.debug( 'l_term_fraction:'||l_term_fraction );
614: arp_standard.debug( 'l_currency_code:'||l_currency_code );
615: arp_standard.debug( 'l_Amount:'||l_Amount );
608:
609: EXCEPTION
610: WHEN OTHERS THEN
611: arp_standard.debug( 'Exception:CurrentRevDistribution:' );
612: arp_standard.debug( 'l_customer_trx_id:'||l_customer_trx_id );
613: arp_standard.debug( 'l_term_fraction:'||l_term_fraction );
614: arp_standard.debug( 'l_currency_code:'||l_currency_code );
615: arp_standard.debug( 'l_Amount:'||l_Amount );
616: arp_standard.debug( 'l_AmountReconcile:'||l_AmountReconcile );
609: EXCEPTION
610: WHEN OTHERS THEN
611: arp_standard.debug( 'Exception:CurrentRevDistribution:' );
612: arp_standard.debug( 'l_customer_trx_id:'||l_customer_trx_id );
613: arp_standard.debug( 'l_term_fraction:'||l_term_fraction );
614: arp_standard.debug( 'l_currency_code:'||l_currency_code );
615: arp_standard.debug( 'l_Amount:'||l_Amount );
616: arp_standard.debug( 'l_AmountReconcile:'||l_AmountReconcile );
617: arp_standard.debug( 'l_FirstInstallmentCode:'||l_FirstInstallmentCode );
610: WHEN OTHERS THEN
611: arp_standard.debug( 'Exception:CurrentRevDistribution:' );
612: arp_standard.debug( 'l_customer_trx_id:'||l_customer_trx_id );
613: arp_standard.debug( 'l_term_fraction:'||l_term_fraction );
614: arp_standard.debug( 'l_currency_code:'||l_currency_code );
615: arp_standard.debug( 'l_Amount:'||l_Amount );
616: arp_standard.debug( 'l_AmountReconcile:'||l_AmountReconcile );
617: arp_standard.debug( 'l_FirstInstallmentCode:'||l_FirstInstallmentCode );
618: arp_standard.debug( 'l_NextElement:'||l_NextElement );
611: arp_standard.debug( 'Exception:CurrentRevDistribution:' );
612: arp_standard.debug( 'l_customer_trx_id:'||l_customer_trx_id );
613: arp_standard.debug( 'l_term_fraction:'||l_term_fraction );
614: arp_standard.debug( 'l_currency_code:'||l_currency_code );
615: arp_standard.debug( 'l_Amount:'||l_Amount );
616: arp_standard.debug( 'l_AmountReconcile:'||l_AmountReconcile );
617: arp_standard.debug( 'l_FirstInstallmentCode:'||l_FirstInstallmentCode );
618: arp_standard.debug( 'l_NextElement:'||l_NextElement );
619: arp_standard.debug( 'l_TotalAmount:'||l_TotalAmount );
612: arp_standard.debug( 'l_customer_trx_id:'||l_customer_trx_id );
613: arp_standard.debug( 'l_term_fraction:'||l_term_fraction );
614: arp_standard.debug( 'l_currency_code:'||l_currency_code );
615: arp_standard.debug( 'l_Amount:'||l_Amount );
616: arp_standard.debug( 'l_AmountReconcile:'||l_AmountReconcile );
617: arp_standard.debug( 'l_FirstInstallmentCode:'||l_FirstInstallmentCode );
618: arp_standard.debug( 'l_NextElement:'||l_NextElement );
619: arp_standard.debug( 'l_TotalAmount:'||l_TotalAmount );
620: arp_standard.debug( 'l_FirstInstallmentFlag:'||l_FirstInstallmentFlag );
613: arp_standard.debug( 'l_term_fraction:'||l_term_fraction );
614: arp_standard.debug( 'l_currency_code:'||l_currency_code );
615: arp_standard.debug( 'l_Amount:'||l_Amount );
616: arp_standard.debug( 'l_AmountReconcile:'||l_AmountReconcile );
617: arp_standard.debug( 'l_FirstInstallmentCode:'||l_FirstInstallmentCode );
618: arp_standard.debug( 'l_NextElement:'||l_NextElement );
619: arp_standard.debug( 'l_TotalAmount:'||l_TotalAmount );
620: arp_standard.debug( 'l_FirstInstallmentFlag:'||l_FirstInstallmentFlag );
621: RAISE;
614: arp_standard.debug( 'l_currency_code:'||l_currency_code );
615: arp_standard.debug( 'l_Amount:'||l_Amount );
616: arp_standard.debug( 'l_AmountReconcile:'||l_AmountReconcile );
617: arp_standard.debug( 'l_FirstInstallmentCode:'||l_FirstInstallmentCode );
618: arp_standard.debug( 'l_NextElement:'||l_NextElement );
619: arp_standard.debug( 'l_TotalAmount:'||l_TotalAmount );
620: arp_standard.debug( 'l_FirstInstallmentFlag:'||l_FirstInstallmentFlag );
621: RAISE;
622: END;
615: arp_standard.debug( 'l_Amount:'||l_Amount );
616: arp_standard.debug( 'l_AmountReconcile:'||l_AmountReconcile );
617: arp_standard.debug( 'l_FirstInstallmentCode:'||l_FirstInstallmentCode );
618: arp_standard.debug( 'l_NextElement:'||l_NextElement );
619: arp_standard.debug( 'l_TotalAmount:'||l_TotalAmount );
620: arp_standard.debug( 'l_FirstInstallmentFlag:'||l_FirstInstallmentFlag );
621: RAISE;
622: END;
623:
616: arp_standard.debug( 'l_AmountReconcile:'||l_AmountReconcile );
617: arp_standard.debug( 'l_FirstInstallmentCode:'||l_FirstInstallmentCode );
618: arp_standard.debug( 'l_NextElement:'||l_NextElement );
619: arp_standard.debug( 'l_TotalAmount:'||l_TotalAmount );
620: arp_standard.debug( 'l_FirstInstallmentFlag:'||l_FirstInstallmentFlag );
621: RAISE;
622: END;
623:
624: --
769: END IF;
770:
771: EXCEPTION
772: WHEN OTHERS THEN
773: arp_standard.debug( 'Exception:CreateDistribution.InsertCBD:' );
774: RAISE;
775: END;
776:
777: --{BUG4301323
877: CreateInterface( l_gl_interface );
878:
879: EXCEPTION
880: WHEN OTHERS THEN
881: arp_standard.debug( 'Exception:CreateDistribution.InsertGl:' );
882: RAISE;
883: END;
884:
885: END IF;
886: --}
887:
888: EXCEPTION
889: WHEN OTHERS THEN
890: arp_standard.debug( 'Exception:CreateDistribution:' );
891: RAISE;
892: END;
893: --
894: --
1115: END IF;
1116: END IF;
1117: EXCEPTION
1118: WHEN OTHERS THEN
1119: arp_standard.debug( 'Exception:DistributeApplicationType:' );
1120: RAISE;
1121: END;
1122: --
1123: --
1198: --
1199: --
1200: EXCEPTION
1201: WHEN OTHERS THEN
1202: arp_standard.debug( 'Exception:DistributeLTFApplication:' );
1203: RAISE;
1204: END;
1205: --
1206: --
1307:
1308: l_gl_interface gl_interface%ROWTYPE;
1309: l_gl_interface_null gl_interface%ROWTYPE;
1310: BEGIN
1311: arp_standard.debug( ' ' );
1312: arp_standard.debug( ' AR_RECEIVABLE_APPLICATIONS (non-app)...' );
1313:
1314: -- bug3769452 modified IF condition
1315: IF (p_Post.SetOfBooksType <> 'R')
1308: l_gl_interface gl_interface%ROWTYPE;
1309: l_gl_interface_null gl_interface%ROWTYPE;
1310: BEGIN
1311: arp_standard.debug( ' ' );
1312: arp_standard.debug( ' AR_RECEIVABLE_APPLICATIONS (non-app)...' );
1313:
1314: -- bug3769452 modified IF condition
1315: IF (p_Post.SetOfBooksType <> 'R')
1316: THEN
1314: -- bug3769452 modified IF condition
1315: IF (p_Post.SetOfBooksType <> 'R')
1316: THEN
1317:
1318: arp_standard.debug(' Primary sob');
1319:
1320: FOR RRa IN CRa
1321: LOOP
1322: BEGIN
1414: CreateInterface(l_gl_interface) ;
1415:
1416: EXCEPTION
1417: WHEN OTHERS THEN
1418: arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1419: arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1420: arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1421: arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1422: arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1415:
1416: EXCEPTION
1417: WHEN OTHERS THEN
1418: arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1419: arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1420: arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1421: arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1422: arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1423: arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1416: EXCEPTION
1417: WHEN OTHERS THEN
1418: arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1419: arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1420: arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1421: arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1422: arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1423: arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1424: arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1417: WHEN OTHERS THEN
1418: arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1419: arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1420: arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1421: arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1422: arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1423: arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1424: arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1425: arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1418: arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1419: arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1420: arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1421: arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1422: arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1423: arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1424: arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1425: arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1426: arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1419: arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1420: arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1421: arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1422: arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1423: arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1424: arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1425: arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1426: arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1427: arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1420: arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1421: arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1422: arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1423: arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1424: arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1425: arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1426: arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1427: arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1428: arp_standard.debug('RRa.Amount:'||RRa.Amount );
1421: arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1422: arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1423: arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1424: arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1425: arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1426: arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1427: arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1428: arp_standard.debug('RRa.Amount:'||RRa.Amount );
1429: arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1422: arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1423: arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1424: arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1425: arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1426: arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1427: arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1428: arp_standard.debug('RRa.Amount:'||RRa.Amount );
1429: arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1430: arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1423: arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1424: arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1425: arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1426: arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1427: arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1428: arp_standard.debug('RRa.Amount:'||RRa.Amount );
1429: arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1430: arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1431: arp_standard.debug('RRa.Status:'||RRa.Status );
1424: arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1425: arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1426: arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1427: arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1428: arp_standard.debug('RRa.Amount:'||RRa.Amount );
1429: arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1430: arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1431: arp_standard.debug('RRa.Status:'||RRa.Status );
1432: RAISE;
1425: arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1426: arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1427: arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1428: arp_standard.debug('RRa.Amount:'||RRa.Amount );
1429: arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1430: arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1431: arp_standard.debug('RRa.Status:'||RRa.Status );
1432: RAISE;
1433: END;
1426: arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1427: arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1428: arp_standard.debug('RRa.Amount:'||RRa.Amount );
1429: arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1430: arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1431: arp_standard.debug('RRa.Status:'||RRa.Status );
1432: RAISE;
1433: END;
1434:
1427: arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1428: arp_standard.debug('RRa.Amount:'||RRa.Amount );
1429: arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1430: arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1431: arp_standard.debug('RRa.Status:'||RRa.Status );
1432: RAISE;
1433: END;
1434:
1435: UPDATE ar_receivable_applications
1443: /* reporting sob */
1444: ELSE
1445: NULL;
1446:
1447: -- arp_standard.debug(' Reporting sob');
1448: -- FOR RRa IN CRa_mrc
1449: -- LOOP
1450: -- BEGIN
1451: /* bug3692482 replace insert stmt with CreateInterface procedure */
1544: -- CreateInterface(l_gl_interface) ;
1545:
1546: -- EXCEPTION
1547: -- WHEN OTHERS THEN
1548: -- arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1549: -- arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1550: -- arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1551: -- arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1552: -- arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1545:
1546: -- EXCEPTION
1547: -- WHEN OTHERS THEN
1548: -- arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1549: -- arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1550: -- arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1551: -- arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1552: -- arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1553: -- arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1546: -- EXCEPTION
1547: -- WHEN OTHERS THEN
1548: -- arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1549: -- arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1550: -- arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1551: -- arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1552: -- arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1553: -- arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1554: -- arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1547: -- WHEN OTHERS THEN
1548: -- arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1549: -- arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1550: -- arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1551: -- arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1552: -- arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1553: -- arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1554: -- arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1555: -- arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1548: -- arp_standard.debug( 'Exception:PostNonDistApplications.INSERT:' );
1549: -- arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1550: -- arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1551: -- arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1552: -- arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1553: -- arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1554: -- arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1555: -- arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1556: -- arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1549: -- arp_standard.debug('RRa.CashReceiptId:'||RRa.CashReceiptId );
1550: -- arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1551: -- arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1552: -- arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1553: -- arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1554: -- arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1555: -- arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1556: -- arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1557: -- arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1550: -- arp_standard.debug('RRa.ReceiptNumber:'||RRa.ReceiptNumber );
1551: -- arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1552: -- arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1553: -- arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1554: -- arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1555: -- arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1556: -- arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1557: -- arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1558: -- arp_standard.debug('RRa.Amount:'||RRa.Amount );
1551: -- arp_standard.debug('RRa.CrDocSequenceId:'||RRa.CrDocSequenceId );
1552: -- arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1553: -- arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1554: -- arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1555: -- arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1556: -- arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1557: -- arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1558: -- arp_standard.debug('RRa.Amount:'||RRa.Amount );
1559: -- arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1552: -- arp_standard.debug('RRa.CrDocSequenceValue:'||RRa.CrDocSequenceValue );
1553: -- arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1554: -- arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1555: -- arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1556: -- arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1557: -- arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1558: -- arp_standard.debug('RRa.Amount:'||RRa.Amount );
1559: -- arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1560: -- arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1553: -- arp_standard.debug('RRa.PayFromCustomer:'||RRa.PayFromCustomer );
1554: -- arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1555: -- arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1556: -- arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1557: -- arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1558: -- arp_standard.debug('RRa.Amount:'||RRa.Amount );
1559: -- arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1560: -- arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1561: -- arp_standard.debug('RRa.Status:'||RRa.Status );
1554: -- arp_standard.debug('RRa.CurrencyCode:'||RRa.CurrencyCode );
1555: -- arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1556: -- arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1557: -- arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1558: -- arp_standard.debug('RRa.Amount:'||RRa.Amount );
1559: -- arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1560: -- arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1561: -- arp_standard.debug('RRa.Status:'||RRa.Status );
1562: -- RAISE;
1555: -- arp_standard.debug('RRa.ReceivableApplicationId:'||RRa.ReceivableApplicationId );
1556: -- arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1557: -- arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1558: -- arp_standard.debug('RRa.Amount:'||RRa.Amount );
1559: -- arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1560: -- arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1561: -- arp_standard.debug('RRa.Status:'||RRa.Status );
1562: -- RAISE;
1563: -- END;
1556: -- arp_standard.debug('RRa.GlDate:'||RRa.GlDate );
1557: -- arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1558: -- arp_standard.debug('RRa.Amount:'||RRa.Amount );
1559: -- arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1560: -- arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1561: -- arp_standard.debug('RRa.Status:'||RRa.Status );
1562: -- RAISE;
1563: -- END;
1564:
1557: -- arp_standard.debug('RRa.UssglTransactionCode:'||RRa.UssglTransactionCode );
1558: -- arp_standard.debug('RRa.Amount:'||RRa.Amount );
1559: -- arp_standard.debug('RRa.AcctdAmount:'||RRa.AcctdAmount );
1560: -- arp_standard.debug('RRa.CodeCombinationId:'||RRa.CodeCombinationId );
1561: -- arp_standard.debug('RRa.Status:'||RRa.Status );
1562: -- RAISE;
1563: -- END;
1564:
1565: -- UPDATE ar_mc_receivable_apps
1572: -- END LOOP;
1573: --}
1574: END IF;
1575:
1576: arp_standard.debug( ' '||l_Count||' lines posted' );
1577: EXCEPTION
1578: WHEN OTHERS THEN
1579: arp_standard.debug( 'Exception:PostNonDistApplications:' );
1580: RAISE;
1575:
1576: arp_standard.debug( ' '||l_Count||' lines posted' );
1577: EXCEPTION
1578: WHEN OTHERS THEN
1579: arp_standard.debug( 'Exception:PostNonDistApplications:' );
1580: RAISE;
1581: END;
1582: --
1583: /*---------------------------------------------------------------------------*
1858: l_App ApplicationType;
1859: l_AppAmount ApplicationAmountType;
1860: l_Count NUMBER :=0;
1861: BEGIN
1862: arp_standard.debug( ' ' );
1863: arp_standard.debug( ' AR_RECEIVABLE_APPLICATION (app)...' );
1864:
1865: -- bug3769452 modified IF condition
1866: IF (NVL(p_Post.SetOfBooksType,'P') <> 'R')
1859: l_AppAmount ApplicationAmountType;
1860: l_Count NUMBER :=0;
1861: BEGIN
1862: arp_standard.debug( ' ' );
1863: arp_standard.debug( ' AR_RECEIVABLE_APPLICATION (app)...' );
1864:
1865: -- bug3769452 modified IF condition
1866: IF (NVL(p_Post.SetOfBooksType,'P') <> 'R')
1867: THEN
1864:
1865: -- bug3769452 modified IF condition
1866: IF (NVL(p_Post.SetOfBooksType,'P') <> 'R')
1867: THEN
1868: arp_standard.debug(' Primary sob');
1869:
1870: OPEN CRa;
1871: LOOP
1872: FETCH CRa
1922: /* reporting sob */
1923: ELSE
1924: --{BUG4301323
1925: NULL;
1926: -- arp_standard.debug(' Reporting sob');
1927: -- OPEN CRa_mrc;
1928: -- LOOP
1929: -- FETCH CRa_mrc
1930: -- INTO l_rowid,
1976: -- CLOSE Cra_mrc;
1977: --}
1978: END IF;
1979:
1980: arp_standard.debug( ' '||l_Count||' lines posted' );
1981: EXCEPTION
1982: WHEN OTHERS THEN
1983: arp_standard.debug( 'Exception:PostDistributedApplications:' );
1984: Output( l_AppAmount );
1979:
1980: arp_standard.debug( ' '||l_Count||' lines posted' );
1981: EXCEPTION
1982: WHEN OTHERS THEN
1983: arp_standard.debug( 'Exception:PostDistributedApplications:' );
1984: Output( l_AppAmount );
1985: Output( l_App );
1986: Output( l_Trx );
1987: Output( l_Receipt );
2162: CreateInterface( l_gl_interface );
2163:
2164: EXCEPTION
2165: WHEN OTHERS THEN
2166: arp_standard.debug( 'InsertIntoGl:' );
2167: RAISE;
2168: END;
2169: --
2170: -- This is the actual PostCashReceiptHistory body
2169: --
2170: -- This is the actual PostCashReceiptHistory body
2171: --
2172: BEGIN
2173: arp_standard.debug( ' ' );
2174: arp_standard.debug( ' AR_CASH_RECEIPT_HISTORY...' );
2175:
2176: -- bug3769452 modified IF condition
2177: IF (p_Post.SetOfBooksType <> 'R')
2170: -- This is the actual PostCashReceiptHistory body
2171: --
2172: BEGIN
2173: arp_standard.debug( ' ' );
2174: arp_standard.debug( ' AR_CASH_RECEIPT_HISTORY...' );
2175:
2176: -- bug3769452 modified IF condition
2177: IF (p_Post.SetOfBooksType <> 'R')
2178: THEN
2175:
2176: -- bug3769452 modified IF condition
2177: IF (p_Post.SetOfBooksType <> 'R')
2178: THEN
2179: arp_standard.debug(' Primary sob');
2180: OPEN CCrh;
2181: LOOP
2182: FETCH CCrh
2183: INTO RCrh;
2194: /* reporting sob */
2195: ELSE
2196: --{BUG4301323
2197: NULL;
2198: -- arp_standard.debug(' Reporting sob');
2199: -- OPEN CCrh_rsob;
2200: -- LOOP
2201: -- FETCH CCrh_rsob
2202: -- INTO RCrh;
2213: END IF;
2214:
2215: EXCEPTION
2216: WHEN OTHERS THEN
2217: arp_standard.debug( 'PostCashReceiptHistory:' );
2218: RAISE;
2219: END;
2220: --
2221: --
2297: l_gl_interface gl_interface%ROWTYPE;
2298: l_gl_interface_null gl_interface%ROWTYPE;
2299:
2300: BEGIN
2301: arp_standard.debug( ' ' );
2302: arp_standard.debug( ' AR_MISC_CASH_DISTRIBUTIONS...' );
2303:
2304: -- bug3769452 modified IF condition
2305: IF (p_Post.SetOfBooksType <> 'R')
2298: l_gl_interface_null gl_interface%ROWTYPE;
2299:
2300: BEGIN
2301: arp_standard.debug( ' ' );
2302: arp_standard.debug( ' AR_MISC_CASH_DISTRIBUTIONS...' );
2303:
2304: -- bug3769452 modified IF condition
2305: IF (p_Post.SetOfBooksType <> 'R')
2306: THEN
2303:
2304: -- bug3769452 modified IF condition
2305: IF (p_Post.SetOfBooksType <> 'R')
2306: THEN
2307: arp_standard.debug(' Primary sob');
2308: FOR RMcd IN CMcd
2309: LOOP
2310: /* bug3692482 replace insert stmt with CreateInterface procedure */
2311: l_gl_interface := l_gl_interface_null;
2367: gl_posted_date = p_Post.GlPostedDate
2368: WHERE ROWID = RMcd.McdRowid;
2369: l_Count := l_Count + 1;
2370: END LOOP;
2371: arp_standard.debug( ' '||l_Count||' lines posted' );
2372: ELSE
2373: /* Reporting SOB */
2374: --{BUG4301323
2375: NULL;
2373: /* Reporting SOB */
2374: --{BUG4301323
2375: NULL;
2376:
2377: -- arp_standard.debug(' Reporting sob');
2378: -- FOR RMcd IN CMcd_mrc
2379: -- LOOP
2380: /* bug3692482 replace insert stmt with CreateInterface procedure */
2381: l_gl_interface := l_gl_interface_null ;
2438: -- gl_posted_date = p_Post.GlPostedDate
2439: -- WHERE ROWID = RMcd.McdRowid;
2440: -- l_Count := l_Count + 1;
2441: -- END LOOP;
2442: -- arp_standard.debug( ' '||l_Count||' lines posted' );
2443: --}
2444: END IF;
2445:
2446: EXCEPTION
2444: END IF;
2445:
2446: EXCEPTION
2447: WHEN OTHERS THEN
2448: arp_standard.debug( 'PostMiscCashDistributions:' );
2449: RAISE;
2450: END;
2451: --
2452: --
2620: --
2621: EXCEPTION
2622: WHEN OTHERS THEN
2623: IF PG_DEBUG in ('Y', 'C') THEN
2624: arp_standard.debug( 'ClearOOB' );
2625: END IF;
2626: RAISE;
2627: END ClearOOB;
2628:
2636: | DESCRIPTION |
2637: | Checks that the records inserted into gl_interface balance for each |
2638: | BalanceId (reference22). |
2639: | Any BalanceId that fails to balance will be reported on |
2640: | (via arp_standard.debug), and will be deleted with ClearOOB |
2641: | PARAMETERS |
2642: | |
2643: | EXCEPTIONS RAISED |
2644: | |
2691: --
2692: l_ReceivableApplicationId ar_receivable_applications.receivable_application_id%TYPE;
2693: BEGIN
2694: --
2695: arp_standard.debug( ' ----------------------------------------------------' );
2696: arp_standard.debug( ' Checking DR/CR balance...' );
2697: arp_standard.debug( '' );
2698: --
2699: FOR RBal IN CBal
2692: l_ReceivableApplicationId ar_receivable_applications.receivable_application_id%TYPE;
2693: BEGIN
2694: --
2695: arp_standard.debug( ' ----------------------------------------------------' );
2696: arp_standard.debug( ' Checking DR/CR balance...' );
2697: arp_standard.debug( '' );
2698: --
2699: FOR RBal IN CBal
2700: LOOP
2693: BEGIN
2694: --
2695: arp_standard.debug( ' ----------------------------------------------------' );
2696: arp_standard.debug( ' Checking DR/CR balance...' );
2697: arp_standard.debug( '' );
2698: --
2699: FOR RBal IN CBal
2700: LOOP
2701: arp_standard.debug( 'Out Of balance:'||Rbal.CurrencyCode||' BalanceId:'||RBal.BalanceId );
2697: arp_standard.debug( '' );
2698: --
2699: FOR RBal IN CBal
2700: LOOP
2701: arp_standard.debug( 'Out Of balance:'||Rbal.CurrencyCode||' BalanceId:'||RBal.BalanceId );
2702: FOR RInt IN CInt( RBal.BalanceId, Rbal.CategoryCode )
2703: LOOP
2704: IF RInt.TableName = 'AR_CASH_BASIS_DISTRIBUTIONS'
2705: THEN
2724: END IF;
2725: ELSE
2726: l_ReceivableApplicationId := NULL;
2727: END IF;
2728: arp_standard.debug( RPAD( Rint.TableName, 30)||
2729: RPAD( RInt.Id, 15 )||
2730: LPAD( NVL(TO_CHAR(RInt.EnteredDr), ' '),15)||
2731: LPAD( NVL(TO_CHAR(RInt.EnteredCr), ' '),15)||
2732: LPAD( NVL(TO_CHAR(RInt.AccountedDr), ' '),15)||
2732: LPAD( NVL(TO_CHAR(RInt.AccountedDr), ' '),15)||
2733: LPAD( NVL(TO_CHAR(RInt.AccountedCr), ' '),15)||
2734: ' '||l_ReceivableApplicationId );
2735: END LOOP;
2736: arp_standard.debug( RPAD( 'SUM:', 30)||
2737: RPAD( ' ', 15 )||
2738: LPAD( NVL(TO_CHAR(RBal.SumEnteredDr), ' '),15)||
2739: LPAD( NVL(TO_CHAR(RBal.SumEnteredCr), ' '),15)||
2740: LPAD( NVL(TO_CHAR(RBal.SumAccountedDr), ' '),15)||
2738: LPAD( NVL(TO_CHAR(RBal.SumEnteredDr), ' '),15)||
2739: LPAD( NVL(TO_CHAR(RBal.SumEnteredCr), ' '),15)||
2740: LPAD( NVL(TO_CHAR(RBal.SumAccountedDr), ' '),15)||
2741: LPAD( NVL(TO_CHAR(RBal.SumAccountedCr), ' '),15) );
2742: arp_standard.debug( '--------------------------------------------------------------------------------------------------------------------' );
2743: ClearOOB( p_Post, RBal.BalanceId, RBal.CategoryCode );
2744: END LOOP;
2745: EXCEPTION
2746: WHEN OTHERS THEN
2743: ClearOOB( p_Post, RBal.BalanceId, RBal.CategoryCode );
2744: END LOOP;
2745: EXCEPTION
2746: WHEN OTHERS THEN
2747: arp_standard.debug( 'CheckBalance:' );
2748: RAISE;
2749: END;
2750: --
2751: PROCEDURE CheckUpgradedCustomer(p_FromRel9 OUT NOCOPY VARCHAR2) IS
2770: END IF;
2771: CLOSE SelColumn;
2772: EXCEPTION
2773: WHEN OTHERS THEN
2774: arp_standard.debug( 'CheckUpgradedCustomer:' );
2775: RAISE;
2776: END;
2777:
2778: --
2782: BEGIN
2783: CheckUpgradedCustomer( l_FromRel9 );
2784: IF l_FromRel9 = 'Y'
2785: THEN
2786: arp_standard.fnd_message('AR_WWS_CASH_BASIS');
2787: ELSE
2788:
2789: /* Bug 2977037 - set p_Post.SetOfBooksType here */
2790: SELECT nvl(mrc_sob_type_code,'P')
2810: END IF;
2811: END IF;
2812: EXCEPTION
2813: WHEN OTHERS THEN
2814: arp_standard.debug( 'Exception:arp_cash_basis_accounting.Post( p_Post ):'||sqlerrm );
2815: RAISE_APPLICATION_ERROR( -20000, sqlerrm||'$Revision: 120.15 $:Post( p_Post ):' );
2816: END;
2817: --
2818: --
2889: --
2890: Post( l_Post );
2891: EXCEPTION
2892: WHEN OTHERS THEN
2893: arp_standard.debug( 'Exception:arp_cash_basis_accounting.Post( ... ):'||sqlerrm );
2894: RAISE_APPLICATION_ERROR( -20000, sqlerrm||'$Revision: 120.15 $:Post( ... ):' );
2895: END;
2896: --
2897: END arp_cash_basis_accounting;