DBA Data[Home] [Help]

APPS.ARP_ROUNDING dependencies on STANDARD

Line 460: arp_standard.debug('Rows that need truing: ' || l_rows_needing_truing);

456: END IF;
457:
458: /* Now update all the rows that require it */
459:
460: arp_standard.debug('Rows that need truing: ' || l_rows_needing_truing);
461:
462: IF (l_rows_needing_truing > 0) THEN
463:
464: FORALL i IN t_true_line_id.FIRST .. t_true_line_id.LAST

Line 494: arp_standard.debug('Mismatch between lines found and lines updated for truing (see below)');

490: /* There was a problem and we did not update the correct number
491: of rows. Display the rows requiring update and indicate if they were
492: updated. */
493:
494: arp_standard.debug('Mismatch between lines found and lines updated for truing (see below)');
495:
496: arp_standard.debug('Rows targeted for truing:');
497:
498: FOR err in t_true_line_id.FIRST .. t_true_line_id.LAST LOOP

Line 496: arp_standard.debug('Rows targeted for truing:');

492: updated. */
493:
494: arp_standard.debug('Mismatch between lines found and lines updated for truing (see below)');
495:
496: arp_standard.debug('Rows targeted for truing:');
497:
498: FOR err in t_true_line_id.FIRST .. t_true_line_id.LAST LOOP
499:
500: arp_standard.debug( t_true_line_id(err) || ' ' ||

Line 500: arp_standard.debug( t_true_line_id(err) || ' ' ||

496: arp_standard.debug('Rows targeted for truing:');
497:
498: FOR err in t_true_line_id.FIRST .. t_true_line_id.LAST LOOP
499:
500: arp_standard.debug( t_true_line_id(err) || ' ' ||
501: t_true_gl_date(err) || ' ' ||
502: t_true_amount(err) || ' ' ||
503: t_true_acctd(err) || ' ' ||
504: t_true_percent(err) || ' ' ||

Line 512: the standard rounding code where we will make sure the transaction

508:
509: /* While I am concerned if we were unable to find a row for truing,
510: I don't think it is grounds for failing the process because it
511: could be some unforeseen situation. So, I let it fall into
512: the standard rounding code where we will make sure the transaction
513: line balances. */
514:
515: END IF;
516:

Line 608: arp_standard.debug('doing rounding for MRC if necessary');

604: * MRC Processing Bug 4018317 Added the call *
605: * required for new procedure correct_suspense *
606: **********************************************/
607: IF PG_DEBUG in ('Y', 'C') THEN
608: arp_standard.debug('doing rounding for MRC if necessary');
609: END IF;
610: ar_mrc_engine2.mrc_correct_rounding(
611: 'CORRECT_SUSPENSE',
612: NULL, /*P_REQUEST_ID */

Line 703: arp_standard.enable_debug;

699: +-------------------------------*/
700:
701: IF (p_debug_mode = 'Y')
702: THEN
703: arp_standard.enable_debug;
704: ELSE IF (p_debug_mode = 'N')
705: THEN
706: arp_standard.disable_debug;
707: END IF;

Line 706: arp_standard.disable_debug;

702: THEN
703: arp_standard.enable_debug;
704: ELSE IF (p_debug_mode = 'N')
705: THEN
706: arp_standard.disable_debug;
707: END IF;
708: END IF;
709:
710: IF PG_DEBUG in ('Y', 'C') THEN

Line 711: arp_standard.debug(' arp_rounding.do_setup()+ ' ||

707: END IF;
708: END IF;
709:
710: IF PG_DEBUG in ('Y', 'C') THEN
711: arp_standard.debug(' arp_rounding.do_setup()+ ' ||
712: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
713: END IF;
714:
715: /*----------------------+

Line 719: arp_standard.debug('Request_id: ' || p_request_id ||

715: /*----------------------+
716: | Validate parameters |
717: +---------------------*/
718: IF PG_DEBUG in ('Y', 'C') THEN
719: arp_standard.debug('Request_id: ' || p_request_id ||
720: ' ctid: '|| p_customer_trx_id ||' ctlid: '||
721: p_customer_trx_line_id || ' class: ' ||
722: trx_class_to_process || ' Rules: '||
723: check_rules_flag);

Line 736: arp_standard.fnd_message('AR_CUST_INVALID_PARAMETER', 'PARAMETER', p_trx_header_level_rounding, 'P_TRX_HEADER_LEVEL_ROUNDING');

732: p_trx_header_level_rounding not in ('Y', 'N')
733: )
734: then
735: p_error_message := 'arp_rounding - ' ||
736: arp_standard.fnd_message('AR_CUST_INVALID_PARAMETER', 'PARAMETER', p_trx_header_level_rounding, 'P_TRX_HEADER_LEVEL_ROUNDING');
737:
738: return(iFALSE);
739: end if;
740:

Line 780: arp_standard.fnd_message(arp_standard.MD_MSG_NUMBER,

776: )
777: )
778: THEN
779: p_error_message := 'arp_rounding - ' ||
780: arp_standard.fnd_message(arp_standard.MD_MSG_NUMBER,
781: 'AR-PLCRE-PARAM-ID') || ' - ' ||
782: arp_standard.fnd_message('AR-PLCRE-PARAM-ID');
783: RETURN( iFALSE );
784:

Line 782: arp_standard.fnd_message('AR-PLCRE-PARAM-ID');

778: THEN
779: p_error_message := 'arp_rounding - ' ||
780: arp_standard.fnd_message(arp_standard.MD_MSG_NUMBER,
781: 'AR-PLCRE-PARAM-ID') || ' - ' ||
782: arp_standard.fnd_message('AR-PLCRE-PARAM-ID');
783: RETURN( iFALSE );
784:
785: END IF;
786:

Line 799: arp_standard.fnd_message(arp_standard.MD_MSG_NUMBER,

795: p_trx_class_to_process NOT IN ('REGULAR_CM', 'INV', 'ALL')
796: )
797: THEN
798: p_error_message := 'arp_rounding - ' ||
799: arp_standard.fnd_message(arp_standard.MD_MSG_NUMBER,
800: 'AR-PLCRE-PARAM-CLASS') || ' - ' ||
801: arp_standard.fnd_message('AR-PLCRE-PARAM-CLASS');
802: RETURN( iFALSE );
803: ELSE

Line 801: arp_standard.fnd_message('AR-PLCRE-PARAM-CLASS');

797: THEN
798: p_error_message := 'arp_rounding - ' ||
799: arp_standard.fnd_message(arp_standard.MD_MSG_NUMBER,
800: 'AR-PLCRE-PARAM-CLASS') || ' - ' ||
801: arp_standard.fnd_message('AR-PLCRE-PARAM-CLASS');
802: RETURN( iFALSE );
803: ELSE
804: trx_class_to_process := p_trx_class_to_process;
805: END IF;

Line 818: arp_standard.fnd_message(arp_standard.MD_MSG_NUMBER,

814: p_check_rules_flag NOT IN ('Y', 'N')
815: )
816: THEN
817: p_error_message := 'arp_rounding - ' ||
818: arp_standard.fnd_message(arp_standard.MD_MSG_NUMBER,
819: 'AR-PLCRE-PARAM-RULES') || ' - ' ||
820: arp_standard.fnd_message('AR-PLCRE-PARAM-RULES');
821: RETURN( iFALSE );
822: ELSE

Line 820: arp_standard.fnd_message('AR-PLCRE-PARAM-RULES');

816: THEN
817: p_error_message := 'arp_rounding - ' ||
818: arp_standard.fnd_message(arp_standard.MD_MSG_NUMBER,
819: 'AR-PLCRE-PARAM-RULES') || ' - ' ||
820: arp_standard.fnd_message('AR-PLCRE-PARAM-RULES');
821: RETURN( iFALSE );
822: ELSE
823: check_rules_flag := p_check_rules_flag;
824: END IF;

Line 836: arp_standard.fnd_message('AR_CUST_INVALID_PARAMETER', 'PARAMETER', p_activity_flag, 'PARAMETER', 'P_ACTIVITY_FLAG');

832: p_activity_flag not in ('Y', 'N','G')
833: )
834: then
835: p_error_message := 'arp_rounding - ' ||
836: arp_standard.fnd_message('AR_CUST_INVALID_PARAMETER', 'PARAMETER', p_activity_flag, 'PARAMETER', 'P_ACTIVITY_FLAG');
837:
838: return(iFALSE);
839: else
840: activity_flag := p_activity_flag;

Line 913: arp_standard.debug( 'arp_rounding.do_setup()- ' ||

909: return(iFALSE);
910: end if;
911:
912: IF PG_DEBUG in ('Y', 'C') THEN
913: arp_standard.debug( 'arp_rounding.do_setup()- ' ||
914: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
915: END IF;
916:
917: RETURN( iTRUE );

Line 980: arp_standard.debug('arp_rounding.insert_round_record()+ ' ||

976: begin
977:
978: rows := 0;
979: IF PG_DEBUG in ('Y', 'C') THEN
980: arp_standard.debug('arp_rounding.insert_round_record()+ ' ||
981: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
982: END IF;
983:
984: if (p_request_id is not null )

Line 987: arp_standard.debug('p_request_id is not null ....' || to_char(p_request_id));

983:
984: if (p_request_id is not null )
985: then
986: IF PG_DEBUG in ('Y', 'C') THEN
987: arp_standard.debug('p_request_id is not null ....' || to_char(p_request_id));
988: END IF;
989:
990: insert into ra_cust_trx_line_gl_dist
991: (POST_REQUEST_ID ,

Line 1110: arp_standard.debug('calling mrc engine for insertion of gl dist data');

1106: rows := SQL%ROWCOUNT;
1107:
1108: IF (rows > 0) THEN
1109: IF PG_DEBUG in ('Y', 'C') THEN
1110: arp_standard.debug('calling mrc engine for insertion of gl dist data');
1111: END IF;
1112: ar_mrc_engine.mrc_bulk_process(
1113: p_request_id => p_request_id,
1114: p_table_name => 'GL_DIST');

Line 1121: arp_standard.debug('customer trx id is not null.... === ' || to_char(p_customer_trx_id));

1117:
1118: if p_customer_trx_id is not null
1119: then
1120: IF PG_DEBUG in ('Y', 'C') THEN
1121: arp_standard.debug('customer trx id is not null.... === ' || to_char(p_customer_trx_id));
1122: END IF;
1123:
1124: insert into ra_cust_trx_line_gl_dist
1125: (POST_REQUEST_ID ,

Line 1244: arp_standard.debug('Rows were inserted into gl dist ');

1240: rows := SQL%ROWCOUNT;
1241:
1242: IF ( rows > 0 ) THEN
1243: IF PG_DEBUG in ('Y', 'C') THEN
1244: arp_standard.debug('Rows were inserted into gl dist ');
1245: END IF;
1246:
1247: SELECT cust_trx_line_gl_dist_id
1248: BULK COLLECT INTO l_gl_dist_key_value_list

Line 1258: arp_standard.debug('before calling maintain_mrc ');

1254: /*-----------------------------------------------------+
1255: | call mrc engine to insert RA_CUST_TRX_LINES_GL_DIST |
1256: +-----------------------------------------------------*/
1257: IF PG_DEBUG in ('Y', 'C') THEN
1258: arp_standard.debug('before calling maintain_mrc ');
1259: END IF;
1260:
1261: ar_mrc_engine.maintain_mrc_data(
1262: p_event_mode => 'INSERT',

Line 1281: arp_standard.debug('after mrc if customer trx id is not null');

1277: arp_xla_events.create_events(l_xla_ev_rec);
1278:
1279: END IF;
1280: IF PG_DEBUG in ('Y', 'C') THEN
1281: arp_standard.debug('after mrc if customer trx id is not null');
1282: END IF;
1283:
1284: end if;
1285:

Line 1287: arp_standard.debug(

1283:
1284: end if;
1285:
1286: IF PG_DEBUG in ('Y', 'C') THEN
1287: arp_standard.debug(
1288: 'Rows Processed: '||
1289: rows);
1290: END IF;
1291:

Line 1295: arp_standard.debug('arp_rounding.insert_round_record()- ' ||

1291:
1292: p_rows_processed := p_rows_processed + rows;
1293:
1294: IF PG_DEBUG in ('Y', 'C') THEN
1295: arp_standard.debug('arp_rounding.insert_round_record()- ' ||
1296: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
1297: END IF;
1298:
1299: return(iTRUE);

Line 1449: arp_standard.debug('arp_rounding.correct_round_record()+ ' ||

1445:
1446: begin
1447:
1448: IF PG_DEBUG in ('Y', 'C') THEN
1449: arp_standard.debug('arp_rounding.correct_round_record()+ ' ||
1450: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
1451: arp_standard.debug('P_CUSTOMER_TRX_ID: ' || P_CUSTOMER_TRX_ID);
1452: END IF;
1453:

Line 1451: arp_standard.debug('P_CUSTOMER_TRX_ID: ' || P_CUSTOMER_TRX_ID);

1447:
1448: IF PG_DEBUG in ('Y', 'C') THEN
1449: arp_standard.debug('arp_rounding.correct_round_record()+ ' ||
1450: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
1451: arp_standard.debug('P_CUSTOMER_TRX_ID: ' || P_CUSTOMER_TRX_ID);
1452: END IF;
1453:
1454:
1455: update ra_cust_trx_line_gl_dist dist

Line 1480: arp_standard.debug('Rows Processed: '||

1476:
1477: l_count := SQL%ROWCOUNT;
1478:
1479: IF PG_DEBUG in ('Y', 'C') THEN
1480: arp_standard.debug('Rows Processed: '||
1481: l_count);
1482: END IF;
1483:
1484: p_rows_processed := p_rows_processed + l_count;

Line 1488: arp_standard.debug(' doing rounding for MRC if necessary');

1484: p_rows_processed := p_rows_processed + l_count;
1485:
1486: /* MRC Processing */
1487: IF PG_DEBUG in ('Y', 'C') THEN
1488: arp_standard.debug(' doing rounding for MRC if necessary');
1489: END IF;
1490: ar_mrc_engine2.mrc_correct_rounding(
1491: 'CORRECT_ROUND_RECORDS',
1492: P_REQUEST_ID,

Line 1501: arp_standard.debug( 'arp_rounding.correct_round_record()- ' ||

1497: balanced_round_ccid
1498: );
1499:
1500: IF PG_DEBUG in ('Y', 'C') THEN
1501: arp_standard.debug( 'arp_rounding.correct_round_record()- ' ||
1502: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
1503: END IF;
1504:
1505: return(iTRUE);

Line 1550: arp_standard.debug('arp_rounding.correct_receivables_header()+ ' ||

1546:
1547: begin
1548:
1549: IF PG_DEBUG in ('Y', 'C') THEN
1550: arp_standard.debug('arp_rounding.correct_receivables_header()+ ' ||
1551: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
1552: END IF;
1553:
1554: if (p_request_id is not null)

Line 1824: arp_standard.debug('Rows Processed: '||

1820:
1821: l_count := SQL%ROWCOUNT;
1822:
1823: IF PG_DEBUG in ('Y', 'C') THEN
1824: arp_standard.debug('Rows Processed: '||
1825: l_count);
1826: END IF;
1827:
1828: p_rows_processed := p_rows_processed + l_count;

Line 1831: arp_standard.debug( 'arp_rounding.correct_receivables_header()- ' ||

1827:
1828: p_rows_processed := p_rows_processed + l_count;
1829:
1830: IF PG_DEBUG in ('Y', 'C') THEN
1831: arp_standard.debug( 'arp_rounding.correct_receivables_header()- ' ||
1832: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
1833: END IF;
1834:
1835: /* MRC Processing */

Line 1837: arp_standard.debug(' doing rounding for MRC if necessary');

1833: END IF;
1834:
1835: /* MRC Processing */
1836: IF PG_DEBUG in ('Y', 'C') THEN
1837: arp_standard.debug(' doing rounding for MRC if necessary');
1838: END IF;
1839: ar_mrc_engine2.mrc_correct_rounding(
1840: 'CORRECT_RECEIVABLES_HEADER',
1841: P_REQUEST_ID,

Line 1895: arp_standard.debug('arp_rounding.correct_receivables_record()+ ' ||

1891: l_count number;
1892: BEGIN
1893:
1894: IF PG_DEBUG in ('Y', 'C') THEN
1895: arp_standard.debug('arp_rounding.correct_receivables_record()+ ' ||
1896: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
1897: END IF;
1898:
1899: IF (p_request_id IS NOT NULL)

Line 2083: arp_standard.debug(

2079:
2080: l_count := sql%rowcount;
2081:
2082: IF PG_DEBUG in ('Y', 'C') THEN
2083: arp_standard.debug(
2084: 'Rows Processed: '||
2085: l_count);
2086: END IF;
2087:

Line 2091: arp_standard.debug('arp_rounding.correct_receivables_record()- ' ||

2087:
2088: p_rows_processed := p_rows_processed + l_count;
2089:
2090: IF PG_DEBUG in ('Y', 'C') THEN
2091: arp_standard.debug('arp_rounding.correct_receivables_record()- ' ||
2092: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
2093: END IF;
2094:
2095: /* MRC Processing */

Line 2097: arp_standard.debug('doing rounding for MRC if necessary');

2093: END IF;
2094:
2095: /* MRC Processing */
2096: IF PG_DEBUG in ('Y', 'C') THEN
2097: arp_standard.debug('doing rounding for MRC if necessary');
2098: END IF;
2099: ar_mrc_engine2.mrc_correct_rounding(
2100: 'CORRECT_RECEIVABLES_RECORDS',
2101: P_REQUEST_ID,

Line 2112: arp_standard.debug('EXCEPTION: arp_rounding.correct_receivables_record()- '||

2108: EXCEPTION
2109: WHEN others THEN
2110: p_error_message := SQLERRM;
2111: IF PG_DEBUG in ('Y', 'C') THEN
2112: arp_standard.debug('EXCEPTION: arp_rounding.correct_receivables_record()- '||
2113: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
2114: END IF;
2115: RETURN(iFALSE);
2116:

Line 2184: arp_standard.debug('arp_rounding.correct_nonrule_line_records()+ ' ||

2180:
2181: BEGIN
2182:
2183: IF PG_DEBUG in ('Y', 'C') THEN
2184: arp_standard.debug('arp_rounding.correct_nonrule_line_records()+ ' ||
2185: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
2186: END IF;
2187:
2188: IF (p_request_id IS NOT NULL)

Line 3111: arp_standard.debug(

3107:
3108: l_count := sql%rowcount;
3109:
3110: IF PG_DEBUG in ('Y', 'C') THEN
3111: arp_standard.debug(
3112: 'Rows Processed: '||
3113: l_count);
3114: END IF;
3115:

Line 3119: arp_standard.debug( 'arp_rounding.correct_nonrule_line_records()- ' ||

3115:
3116: p_rows_processed := p_rows_processed + l_count;
3117:
3118: IF PG_DEBUG in ('Y', 'C') THEN
3119: arp_standard.debug( 'arp_rounding.correct_nonrule_line_records()- ' ||
3120: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
3121: END IF;
3122:
3123: /* MRC Processing */

Line 3125: arp_standard.debug('doing rounding for MRC if necessary');

3121: END IF;
3122:
3123: /* MRC Processing */
3124: IF PG_DEBUG in ('Y', 'C') THEN
3125: arp_standard.debug('doing rounding for MRC if necessary');
3126: END IF;
3127: ar_mrc_engine2.mrc_correct_rounding(
3128: 'CORRECT_NONRULE_LINE_RECORDS',
3129: P_REQUEST_ID,

Line 3140: arp_standard.debug('EXCEPTION: arp_rounding.correct_nonrule_line_records failed()- '||

3136: EXCEPTION
3137: WHEN others THEN
3138: p_error_message := SQLERRM;
3139: IF PG_DEBUG in ('Y', 'C') THEN
3140: arp_standard.debug('EXCEPTION: arp_rounding.correct_nonrule_line_records failed()- '||
3141: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
3142: END IF;
3143: RETURN(iFALSE);
3144:

Line 3455: arp_standard.debug( 'arp_rounding.correct_rule_records_by_line()+ ' ||

3451:
3452: BEGIN
3453:
3454: IF PG_DEBUG in ('Y', 'C') THEN
3455: arp_standard.debug( 'arp_rounding.correct_rule_records_by_line()+ ' ||
3456: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
3457: END IF;
3458:
3459: IF (P_CUSTOMER_TRX_ID IS NOT NULL) THEN

Line 3468: arp_standard.debug(' result from set_rec_offset_flag() call : ' || l_result);

3464: and set them if they are not */
3465: set_rec_offset_flag(p_customer_trx_id, null, l_result);
3466:
3467: IF PG_DEBUG in ('Y', 'C') THEN
3468: arp_standard.debug(' result from set_rec_offset_flag() call : ' || l_result);
3469: END IF;
3470:
3471: END IF;
3472:

Line 3536: arp_standard.debug('Rows that need rounding: ' || l_rows_needing_rounding);

3532:
3533: /* Now update all the rows that require it */
3534:
3535: IF PG_DEBUG in ('Y', 'C') THEN
3536: arp_standard.debug('Rows that need rounding: ' || l_rows_needing_rounding);
3537: END IF;
3538:
3539: IF (l_rows_needing_rounding > 0) THEN
3540:

Line 3543: arp_standard.debug(err || ' ' || t_line_id(err)|| ' ' ||

3539: IF (l_rows_needing_rounding > 0) THEN
3540:
3541: /* DEBUG CODE +/
3542: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
3543: arp_standard.debug(err || ' ' || t_line_id(err)|| ' ' ||
3544: t_account_class(err) ||
3545: ' ' || t_rec_offset(err) ||
3546: ' ' || t_round_amount(err) ||
3547: ' ' || t_round_acctd(err) || ' ' ||

Line 3559: arp_standard.debug(' Pass = ' || l_phase);

3555:
3556: l_phase := l_phase + 1;
3557:
3558: IF PG_DEBUG in ('Y', 'C') THEN
3559: arp_standard.debug(' Pass = ' || l_phase);
3560: END IF;
3561:
3562: IF l_phase <= 3
3563: THEN

Line 3788: arp_standard.debug(' Target: ' || t_line_id(upd) ||

3784: rows from the table, we cause the update to fail.
3785: */
3786:
3787: IF PG_DEBUG in ('Y', 'C') THEN
3788: arp_standard.debug(' Target: ' || t_line_id(upd) ||
3789: ' ' || t_account_class(upd) ||
3790: ' ' || t_rec_offset(upd) ||
3791: ' ' || t_round_amount(upd) ||
3792: ' ' || t_round_acctd(upd) ||

Line 3842: arp_standard.debug(t_line_id(err)|| ' ' ||

3838: IF PG_DEBUG in ('Y', 'C')
3839: THEN
3840:
3841: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
3842: arp_standard.debug(t_line_id(err)|| ' ' ||
3843: t_account_class(err) ||
3844: ' ' || t_rec_offset(err) ||
3845: ' ' || t_round_amount(err) ||
3846: ' ' || t_round_acctd(err) || ' ' ||

Line 3861: arp_standard.debug(' Rows rounded this pass : ' || l_rows_rounded_this_pass);

3857:
3858: END LOOP; /* END - Cleanup loop */
3859:
3860: IF PG_DEBUG in ('Y', 'C') THEN
3861: arp_standard.debug(' Rows rounded this pass : ' || l_rows_rounded_this_pass);
3862: END IF;
3863:
3864: l_rows_rounded := l_rows_rounded + l_rows_rounded_this_pass;
3865:

Line 3881: arp_standard.debug('Mismatch between lines found and lines updated (see below)');

3877: and corrected.
3878: */
3879:
3880: IF PG_DEBUG in ('Y', 'C') THEN
3881: arp_standard.debug('Mismatch between lines found and lines updated (see below)');
3882: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
3883: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
3884:
3885: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP

Line 3882: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);

3878: */
3879:
3880: IF PG_DEBUG in ('Y', 'C') THEN
3881: arp_standard.debug('Mismatch between lines found and lines updated (see below)');
3882: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
3883: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
3884:
3885: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
3886:

Line 3883: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);

3879:
3880: IF PG_DEBUG in ('Y', 'C') THEN
3881: arp_standard.debug('Mismatch between lines found and lines updated (see below)');
3882: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
3883: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
3884:
3885: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
3886:
3887: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||

Line 3887: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||

3883: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
3884:
3885: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
3886:
3887: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||
3888: ' ' || t_rec_offset(err) ||
3889: ' ' || t_round_amount(err) || ' ' || t_round_acctd(err) || ' ' ||
3890: t_round_percent(err) || ' ' || SQL%BULK_ROWCOUNT(err));
3891:

Line 3904: arp_standard.debug('Total number of rows updated: ' || l_rows_rounded);

3900: END IF;
3901:
3902: p_rows_processed := p_rows_processed + l_rows_rounded;
3903: IF PG_DEBUG in ('Y', 'C') THEN
3904: arp_standard.debug('Total number of rows updated: ' || l_rows_rounded);
3905: END IF;
3906:
3907: /* MRC Processing */
3908: IF PG_DEBUG in ('Y', 'C') THEN

Line 3909: arp_standard.debug('doing rounding for MRC if necessary');

3905: END IF;
3906:
3907: /* MRC Processing */
3908: IF PG_DEBUG in ('Y', 'C') THEN
3909: arp_standard.debug('doing rounding for MRC if necessary');
3910: END IF;
3911: ar_mrc_engine2.mrc_correct_rounding(
3912: 'CORRECT_RULE_RECORDS_BY_LINE',
3913: P_REQUEST_ID,

Line 3926: arp_standard.debug('arp_rounding.correct_rule_records_by_line()- ' ||

3922:
3923: END IF;
3924:
3925: IF PG_DEBUG in ('Y', 'C') THEN
3926: arp_standard.debug('arp_rounding.correct_rule_records_by_line()- ' ||
3927: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
3928: END IF;
3929:
3930: RETURN(iTRUE);

Line 4038: arp_standard.debug('arp_rounding.correct_rev_adj_by_line()+ ');

4034:
4035: BEGIN
4036:
4037: IF PG_DEBUG in ('Y', 'C') THEN
4038: arp_standard.debug('arp_rounding.correct_rev_adj_by_line()+ ');
4039: END IF;
4040:
4041: /* This is phase 1 of rounding.
4042: Here, we make sure that debits equal credits (REV and UNEARN dists)

Line 4080: arp_standard.debug('Rows that need rounding: ' || l_rows_needing_rounding);

4076:
4077: /* Now update all the rows that require it */
4078:
4079: IF PG_DEBUG in ('Y', 'C') THEN
4080: arp_standard.debug('Rows that need rounding: ' || l_rows_needing_rounding);
4081: END IF;
4082:
4083: IF (l_rows_needing_rounding > 0) THEN
4084:

Line 4087: arp_standard.debug(err || ' ' || t_line_id(err)|| ' ' ||

4083: IF (l_rows_needing_rounding > 0) THEN
4084:
4085: /* DEBUG CODE +/
4086: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4087: arp_standard.debug(err || ' ' || t_line_id(err)|| ' ' ||
4088: t_account_class(err) ||
4089: ' ' || t_round_amount(err) ||
4090: ' ' || t_round_acctd(err) || ' ' ||
4091: t_round_percent(err) );

Line 4102: arp_standard.debug(' Pass = ' || l_phase);

4098:
4099: l_phase := l_phase + 1;
4100:
4101: IF PG_DEBUG in ('Y', 'C') THEN
4102: arp_standard.debug(' Pass = ' || l_phase);
4103: END IF;
4104:
4105: IF l_phase <=3
4106: THEN

Line 4353: arp_standard.debug(' Target: ' || t_line_id(upd) ||

4349: */
4350:
4351:
4352: IF PG_DEBUG in ('Y', 'C') THEN
4353: arp_standard.debug(' Target: ' || t_line_id(upd) ||
4354: ' ' || t_account_class(upd) ||
4355: ' ' || t_round_amount(upd) ||
4356: ' ' || t_round_acctd(upd) ||
4357: ' ' || t_round_percent(upd) ||

Line 4406: arp_standard.debug(t_line_id(err)|| ' ' ||

4402: IF PG_DEBUG in ('Y', 'C')
4403: THEN
4404:
4405: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4406: arp_standard.debug(t_line_id(err)|| ' ' ||
4407: t_account_class(err) ||
4408: ' ' || t_round_amount(err) ||
4409: ' ' || t_round_acctd(err) || ' ' ||
4410: t_round_percent(err) || ' ' || SQL%BULK_ROWCOUNT(err));

Line 4422: arp_standard.debug(' Rows rounded (this pass) : ' || l_rows_rounded_this_pass);

4418:
4419: END LOOP; /* END - Cleanup loop */
4420:
4421: IF PG_DEBUG in ('Y', 'C') THEN
4422: arp_standard.debug(' Rows rounded (this pass) : ' || l_rows_rounded_this_pass);
4423: END IF;
4424:
4425: l_rows_rounded := l_rows_rounded + l_rows_rounded_this_pass;
4426:

Line 4442: arp_standard.debug('Mismatch between lines found and lines updated [see below]');

4438: and corrected.
4439: */
4440:
4441: IF PG_DEBUG in ('Y', 'C') THEN
4442: arp_standard.debug('Mismatch between lines found and lines updated [see below]');
4443: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
4444: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
4445:
4446: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP

Line 4443: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);

4439: */
4440:
4441: IF PG_DEBUG in ('Y', 'C') THEN
4442: arp_standard.debug('Mismatch between lines found and lines updated [see below]');
4443: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
4444: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
4445:
4446: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4447:

Line 4444: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);

4440:
4441: IF PG_DEBUG in ('Y', 'C') THEN
4442: arp_standard.debug('Mismatch between lines found and lines updated [see below]');
4443: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
4444: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
4445:
4446: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4447:
4448: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||

Line 4448: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||

4444: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
4445:
4446: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4447:
4448: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||
4449: ' ' || t_round_amount(err) || ' ' || t_round_acctd(err) || ' ' ||
4450: t_round_percent(err) || ' ' || SQL%BULK_ROWCOUNT(err));
4451:
4452: END LOOP;

Line 4460: arp_standard.debug('Total number of rows updated: ' || l_rows_rounded);

4456: RETURN(iFALSE);
4457: END IF;
4458:
4459: IF PG_DEBUG in ('Y', 'C') THEN
4460: arp_standard.debug('Total number of rows updated: ' || l_rows_rounded);
4461: END IF;
4462:
4463: /* MRC Processing */
4464: IF PG_DEBUG in ('Y', 'C') THEN

Line 4465: arp_standard.debug('doing rounding for MRC if necessary');

4461: END IF;
4462:
4463: /* MRC Processing */
4464: IF PG_DEBUG in ('Y', 'C') THEN
4465: arp_standard.debug('doing rounding for MRC if necessary');
4466: END IF;
4467:
4468: /* This call to the MRC wrapper will eventually call a clone of this
4469: routine that was designed to round MRC gld table data. The MRC

Line 4489: arp_standard.debug('arp_rounding.correct_rev_adj_by_line()-');

4485: );
4486: END IF;
4487:
4488: IF PG_DEBUG in ('Y', 'C') THEN
4489: arp_standard.debug('arp_rounding.correct_rev_adj_by_line()-');
4490: END IF;
4491:
4492: RETURN(iTRUE);
4493: END correct_rev_adj_by_line;

Line 4534: arp_standard.debug('arp_rounding.do_line_level_rounding()+ ' ||

4530:
4531: begin
4532:
4533: IF PG_DEBUG in ('Y', 'C') THEN
4534: arp_standard.debug('arp_rounding.do_line_level_rounding()+ ' ||
4535: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4536: END IF;
4537:
4538: /*--------------------------------------------------------------+

Line 4587: arp_standard.debug( 'arp_rounding.do_line_level_rounding()- ' ||

4583:
4584: correct_suspense(p_customer_trx_id);
4585:
4586: IF PG_DEBUG in ('Y', 'C') THEN
4587: arp_standard.debug( 'arp_rounding.do_line_level_rounding()- ' ||
4588: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4589: END IF;
4590:
4591: return(iTRUE);

Line 4636: arp_standard.debug( 'arp_rounding.replace_balancing_segment()+ ' ||

4632:
4633: begin
4634:
4635: IF PG_DEBUG in ('Y', 'C') THEN
4636: arp_standard.debug( 'arp_rounding.replace_balancing_segment()+ ' ||
4637: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4638: END IF;
4639:
4640: if not AR_FLEXBUILDER_WF_PKG.SUBSTITUTE_BALANCING_SEGMENT(

Line 4652: arp_standard.debug('EXCEPTION: substitute_balancing_segment failed ' ||

4648: error_message )
4649: then
4650:
4651: IF PG_DEBUG in ('Y', 'C') THEN
4652: arp_standard.debug('EXCEPTION: substitute_balancing_segment failed ' ||
4653: return_ccid);
4654: END IF;
4655: return(iFALSE);
4656: end if;

Line 4659: arp_standard.debug(' original_ccid: ' || original_ccid ||

4655: return(iFALSE);
4656: end if;
4657:
4658: IF PG_DEBUG in ('Y', 'C') THEN
4659: arp_standard.debug(' original_ccid: ' || original_ccid ||
4660: ' balancing_ccid: ' || balancing_ccid ||
4661: ' return_ccid: ' || return_ccid ||
4662: ' concat_segs: ' || concat_segs
4663: );

Line 4664: arp_standard.debug( 'arp_rounding.replace_balancing_segment()- ' ||

4660: ' balancing_ccid: ' || balancing_ccid ||
4661: ' return_ccid: ' || return_ccid ||
4662: ' concat_segs: ' || concat_segs
4663: );
4664: arp_standard.debug( 'arp_rounding.replace_balancing_segment()- ' ||
4665: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4666: END IF;
4667:
4668: return(iTRUE);

Line 4716: arp_standard.debug('arp_rounding.correct_header_level_rounding()+ ' ||

4712:
4713: begin
4714:
4715: IF PG_DEBUG in ('Y', 'C') THEN
4716: arp_standard.debug('arp_rounding.correct_header_level_rounding()+ ' ||
4717: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4718: END IF;
4719:
4720: /*--------------------------------------------------------------+

Line 4802: arp_standard.debug( 'arp_rounding.correct_header_level_rounding()- ' ||

4798: then return(iFALSE);
4799: end If;
4800:
4801: IF PG_DEBUG in ('Y', 'C') THEN
4802: arp_standard.debug( 'arp_rounding.correct_header_level_rounding()- ' ||
4803: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4804: END IF;
4805:
4806: return(iTRUE);

Line 4816: arp_standard.debug( 'arp_rounding.get_select_column_values()+' );

4812: P_SELECT_REC IN OUT NOCOPY SELECT_REC_TYPE ) IS
4813: BEGIN
4814:
4815: IF PG_DEBUG in ('Y', 'C') THEN
4816: arp_standard.debug( 'arp_rounding.get_select_column_values()+' );
4817: END IF;
4818:
4819: dbms_sql.column_value( p_select_sql_c, 1,
4820: p_select_rec.rec_customer_trx_id);

Line 4827: arp_standard.debug( 'arp_rounding.get_select_column_values()-' );

4823: dbms_sql.column_value( p_select_sql_c, 3,
4824: p_select_rec.round_customer_trx_id);
4825:
4826: IF PG_DEBUG in ('Y', 'C') THEN
4827: arp_standard.debug( 'arp_rounding.get_select_column_values()-' );
4828: END IF;
4829:
4830: EXCEPTION
4831: WHEN OTHERS THEN

Line 4833: arp_standard.debug('EXCEPTION: arp_rounding.get_select_column_values()');

4829:
4830: EXCEPTION
4831: WHEN OTHERS THEN
4832: IF PG_DEBUG in ('Y', 'C') THEN
4833: arp_standard.debug('EXCEPTION: arp_rounding.get_select_column_values()');
4834: END IF;
4835: RAISE;
4836: END get_select_column_values;
4837:

Line 4842: arp_standard.debug( 'arp_rounding.dump_select_rec()+' );

4838: PROCEDURE dump_select_rec( P_SELECT_REC IN SELECT_REC_TYPE ) IS
4839: BEGIN
4840:
4841: IF PG_DEBUG in ('Y', 'C') THEN
4842: arp_standard.debug( 'arp_rounding.dump_select_rec()+' );
4843: arp_standard.debug(' Dumping select record: ');
4844: arp_standard.debug(' rec_customer_trx_id=' ||
4845: p_select_rec.rec_customer_trx_id);
4846: arp_standard.debug(' rec_code_combination_id=' ||

Line 4843: arp_standard.debug(' Dumping select record: ');

4839: BEGIN
4840:
4841: IF PG_DEBUG in ('Y', 'C') THEN
4842: arp_standard.debug( 'arp_rounding.dump_select_rec()+' );
4843: arp_standard.debug(' Dumping select record: ');
4844: arp_standard.debug(' rec_customer_trx_id=' ||
4845: p_select_rec.rec_customer_trx_id);
4846: arp_standard.debug(' rec_code_combination_id=' ||
4847: p_select_rec.rec_code_combination_id);

Line 4844: arp_standard.debug(' rec_customer_trx_id=' ||

4840:
4841: IF PG_DEBUG in ('Y', 'C') THEN
4842: arp_standard.debug( 'arp_rounding.dump_select_rec()+' );
4843: arp_standard.debug(' Dumping select record: ');
4844: arp_standard.debug(' rec_customer_trx_id=' ||
4845: p_select_rec.rec_customer_trx_id);
4846: arp_standard.debug(' rec_code_combination_id=' ||
4847: p_select_rec.rec_code_combination_id);
4848: arp_standard.debug(' round_customer_trx_id=' ||

Line 4846: arp_standard.debug(' rec_code_combination_id=' ||

4842: arp_standard.debug( 'arp_rounding.dump_select_rec()+' );
4843: arp_standard.debug(' Dumping select record: ');
4844: arp_standard.debug(' rec_customer_trx_id=' ||
4845: p_select_rec.rec_customer_trx_id);
4846: arp_standard.debug(' rec_code_combination_id=' ||
4847: p_select_rec.rec_code_combination_id);
4848: arp_standard.debug(' round_customer_trx_id=' ||
4849: p_select_rec.round_customer_trx_id);
4850: arp_standard.debug( 'arp_rounding.dump_select_rec()-' );

Line 4848: arp_standard.debug(' round_customer_trx_id=' ||

4844: arp_standard.debug(' rec_customer_trx_id=' ||
4845: p_select_rec.rec_customer_trx_id);
4846: arp_standard.debug(' rec_code_combination_id=' ||
4847: p_select_rec.rec_code_combination_id);
4848: arp_standard.debug(' round_customer_trx_id=' ||
4849: p_select_rec.round_customer_trx_id);
4850: arp_standard.debug( 'arp_rounding.dump_select_rec()-' );
4851: END IF;
4852:

Line 4850: arp_standard.debug( 'arp_rounding.dump_select_rec()-' );

4846: arp_standard.debug(' rec_code_combination_id=' ||
4847: p_select_rec.rec_code_combination_id);
4848: arp_standard.debug(' round_customer_trx_id=' ||
4849: p_select_rec.round_customer_trx_id);
4850: arp_standard.debug( 'arp_rounding.dump_select_rec()-' );
4851: END IF;
4852:
4853: EXCEPTION
4854: WHEN OTHERS THEN

Line 4856: arp_standard.debug( 'EXCEPTION: arp_rounding.dump_select_rec()' );

4852:
4853: EXCEPTION
4854: WHEN OTHERS THEN
4855: IF PG_DEBUG in ('Y', 'C') THEN
4856: arp_standard.debug( 'EXCEPTION: arp_rounding.dump_select_rec()' );
4857: END IF;
4858: RAISE;
4859: END dump_select_rec;
4860:

Line 4866: arp_standard.debug( 'arp_rounding.define_columns()+' );

4862: PROCEDURE define_columns( P_SELECT_SQL_C IN INTEGER,
4863: P_SELECT_REC IN SELECT_REC_TYPE) IS
4864: BEGIN
4865:
4866: arp_standard.debug( 'arp_rounding.define_columns()+' );
4867:
4868: ------------------------------------------------------------
4869: -- Define columns
4870: ------------------------------------------------------------

Line 4871: arp_standard.debug( ' Defining columns for select_sql_c');

4867:
4868: ------------------------------------------------------------
4869: -- Define columns
4870: ------------------------------------------------------------
4871: arp_standard.debug( ' Defining columns for select_sql_c');
4872:
4873: dbms_sql.define_column( p_select_sql_c, 1,
4874: p_select_rec.rec_customer_trx_id );
4875: dbms_sql.define_column( p_select_sql_c, 2,

Line 4880: arp_standard.debug( 'arp_rounding.define_columns()-' );

4876: p_select_rec.rec_code_combination_id );
4877: dbms_sql.define_column( p_select_sql_c, 3,
4878: p_select_rec.round_customer_trx_id );
4879:
4880: arp_standard.debug( 'arp_rounding.define_columns()-' );
4881:
4882: EXCEPTION
4883: WHEN OTHERS THEN
4884: arp_standard.debug( 'EXCEPTION: Error defining columns for select_sql_c' );

Line 4884: arp_standard.debug( 'EXCEPTION: Error defining columns for select_sql_c' );

4880: arp_standard.debug( 'arp_rounding.define_columns()-' );
4881:
4882: EXCEPTION
4883: WHEN OTHERS THEN
4884: arp_standard.debug( 'EXCEPTION: Error defining columns for select_sql_c' );
4885: RAISE;
4886: END;
4887:
4888:

Line 4900: arp_standard.debug( 'arp_rounding.build_select_sql()+' );

4896:
4897: BEGIN
4898:
4899: IF PG_DEBUG in ('Y', 'C') THEN
4900: arp_standard.debug( 'arp_rounding.build_select_sql()+' );
4901: END IF;
4902:
4903: ------------------------------------------------
4904: -- Construct where predicate

Line 4937: arp_standard.debug('select_sql = ' ||

4933: and rec.latest_rec_flag = ''Y''
4934: and round.account_class(+) = ''ROUND''';
4935:
4936: IF PG_DEBUG in ('Y', 'C') THEN
4937: arp_standard.debug('select_sql = ' ||
4938: l_select_sql);
4939: END IF;
4940:
4941: ------------------------------------------------

Line 4947: arp_standard.debug('Parsing select stmt');

4943: ------------------------------------------------
4944:
4945: BEGIN
4946: IF PG_DEBUG in ('Y', 'C') THEN
4947: arp_standard.debug('Parsing select stmt');
4948: END IF;
4949:
4950: p_select_sql_c := dbms_sql.open_cursor;
4951: dbms_sql.parse( p_select_sql_c, l_select_sql, dbms_sql.v7 );

Line 4968: arp_standard.debug('build_select_sql: ' || 'EXCEPTION: Error parsing select stmt' );

4964:
4965: EXCEPTION
4966: WHEN OTHERS THEN
4967: IF PG_DEBUG in ('Y', 'C') THEN
4968: arp_standard.debug('build_select_sql: ' || 'EXCEPTION: Error parsing select stmt' );
4969: END IF;
4970: RAISE;
4971: END;
4972:

Line 4974: arp_standard.debug( 'arp_rounding.build_select_sql()-' );

4970: RAISE;
4971: END;
4972:
4973: IF PG_DEBUG in ('Y', 'C') THEN
4974: arp_standard.debug( 'arp_rounding.build_select_sql()-' );
4975: END IF;
4976:
4977:
4978: EXCEPTION

Line 4981: arp_standard.debug( 'EXCEPTION: arp_rounding.build_select_sql()' );

4977:
4978: EXCEPTION
4979: WHEN OTHERS THEN
4980: IF PG_DEBUG in ('Y', 'C') THEN
4981: arp_standard.debug( 'EXCEPTION: arp_rounding.build_select_sql()' );
4982: END IF;
4983:
4984: RAISE;
4985: END build_select_sql;

Line 5063: arp_standard.debug(' Creating dynamic sql');

5059: -----------------------------------------------------------------------
5060: -- Create dynamic sql
5061: -----------------------------------------------------------------------
5062: IF PG_DEBUG in ('Y', 'C') THEN
5063: arp_standard.debug(' Creating dynamic sql');
5064: END IF;
5065:
5066: build_select_sql( P_REQUEST_ID,
5067: P_CUSTOMER_TRX_ID,

Line 5079: arp_standard.debug(' Executing select sql' );

5075: ---------------------------------------------------------------
5076: -- Execute sql
5077: ---------------------------------------------------------------
5078: IF PG_DEBUG in ('Y', 'C') THEN
5079: arp_standard.debug(' Executing select sql' );
5080: END IF;
5081:
5082: BEGIN
5083: l_ignore := dbms_sql.execute( select_sql_c );

Line 5088: arp_standard.debug('EXCEPTION: Error executing select sql' );

5084:
5085: EXCEPTION
5086: WHEN OTHERS THEN
5087: IF PG_DEBUG in ('Y', 'C') THEN
5088: arp_standard.debug('EXCEPTION: Error executing select sql' );
5089: END IF;
5090: RAISE;
5091: END;
5092:

Line 5097: arp_standard.debug(' Fetching select stmt');

5093: --------------------------------------------------------------
5094: -- Fetch rows
5095: --------------------------------------------------------------
5096: IF PG_DEBUG in ('Y', 'C') THEN
5097: arp_standard.debug(' Fetching select stmt');
5098: END IF;
5099:
5100: begin
5101: loop

Line 5106: arp_standard.debug(' fetched a row' );

5102: if (dbms_sql.fetch_rows( select_sql_c ) > 0)
5103: then
5104:
5105: IF PG_DEBUG in ('Y', 'C') THEN
5106: arp_standard.debug(' fetched a row' );
5107: END IF;
5108: l_select_rec := l_null_rec;
5109: ------------------------------------------------------
5110: -- Get column values

Line 5117: arp_standard.debug( ' Done fetching');

5113:
5114: dump_select_rec( l_select_rec );
5115: else
5116: IF PG_DEBUG in ('Y', 'C') THEN
5117: arp_standard.debug( ' Done fetching');
5118: END IF;
5119: EXIT;
5120: end if;
5121:

Line 5127: arp_standard.debug( 'rec_customer_trx_id: '|| l_customer_trx_id);

5123:
5124: l_customer_trx_id := l_select_rec.rec_customer_trx_id;
5125:
5126: IF PG_DEBUG in ('Y', 'C') THEN
5127: arp_standard.debug( 'rec_customer_trx_id: '|| l_customer_trx_id);
5128: END IF;
5129:
5130: if (l_select_rec.round_customer_trx_id is null)
5131: then

Line 5173: arp_standard.debug( 'arp_rounding.do_header_level_rounding()- ' ||

5169: dbms_sql.close_cursor(select_sql_c);
5170: end;
5171:
5172: IF PG_DEBUG in ('Y', 'C') THEN
5173: arp_standard.debug( 'arp_rounding.do_header_level_rounding()- ' ||
5174: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
5175: END IF;
5176:
5177: return(iTRUE);

Line 5276: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()+ ' ||

5272: | Print out NOCOPY the parameters in debug mode only |
5273: +----------------------------------------------*/
5274:
5275: IF PG_DEBUG in ('Y', 'C') THEN
5276: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()+ ' ||
5277: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
5278: arp_standard.debug(' Request_id: ' || p_request_id ||
5279: ' ctid: '|| p_customer_trx_id ||' ctlid: '||
5280: p_customer_trx_line_id || ' class: ' ||

Line 5278: arp_standard.debug(' Request_id: ' || p_request_id ||

5274:
5275: IF PG_DEBUG in ('Y', 'C') THEN
5276: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()+ ' ||
5277: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
5278: arp_standard.debug(' Request_id: ' || p_request_id ||
5279: ' ctid: '|| p_customer_trx_id ||' ctlid: '||
5280: p_customer_trx_line_id || ' class: ' ||
5281: trx_class_to_process || ' Rules: '||
5282: check_rules_flag);

Line 5283: arp_standard.debug(' Precision: ' || base_precision ||

5279: ' ctid: '|| p_customer_trx_id ||' ctlid: '||
5280: p_customer_trx_line_id || ' class: ' ||
5281: trx_class_to_process || ' Rules: '||
5282: check_rules_flag);
5283: arp_standard.debug(' Precision: ' || base_precision ||
5284: ' MAU: ' || base_min_accountable_unit ||
5285: ' Period Set: '|| period_set_name);
5286: arp_standard.debug('p_trx_header_level_rounding: ' ||
5287: p_trx_header_level_rounding || ' p_activity_flag:' ||

Line 5286: arp_standard.debug('p_trx_header_level_rounding: ' ||

5282: check_rules_flag);
5283: arp_standard.debug(' Precision: ' || base_precision ||
5284: ' MAU: ' || base_min_accountable_unit ||
5285: ' Period Set: '|| period_set_name);
5286: arp_standard.debug('p_trx_header_level_rounding: ' ||
5287: p_trx_header_level_rounding || ' p_activity_flag:' ||
5288: p_activity_flag || ' trx_header_round_ccid:' ||
5289: trx_header_round_ccid);
5290: END IF;

Line 5334: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()- ' ||

5330: end if;
5331: end if;
5332:
5333: IF PG_DEBUG in ('Y', 'C') THEN
5334: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()- ' ||
5335: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
5336: END IF;
5337:
5338: RETURN( iTRUE );

Line 5353: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()+ ' ||

5349:
5350: ROLLBACK TO SAVEPOINT ARPLBCRE_1;
5351:
5352: IF PG_DEBUG in ('Y', 'C') THEN
5353: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()+ ' ||
5354: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
5355: END IF;
5356:
5357: RETURN( iFALSE );