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 1825: arp_standard.debug('Rows Processed: '||

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

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

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

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

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

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

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

Line 2084: arp_standard.debug(

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

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

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

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

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

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

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

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

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

Line 3113: arp_standard.debug(

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

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

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

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

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

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

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

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

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

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

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

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 = 1
3563: THEN

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

3793: rows from the table, we cause the update to fail.
3794: */
3795:
3796: IF PG_DEBUG in ('Y', 'C') THEN
3797: arp_standard.debug(' Target: ' || t_line_id(upd) ||
3798: ' ' || t_account_class(upd) ||
3799: ' ' || t_rec_offset(upd) ||
3800: ' ' || t_round_amount(upd) ||
3801: ' ' || t_round_acctd(upd) ||

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

3847: IF PG_DEBUG in ('Y', 'C')
3848: THEN
3849:
3850: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
3851: arp_standard.debug(t_line_id(err)|| ' ' ||
3852: t_account_class(err) ||
3853: ' ' || t_rec_offset(err) ||
3854: ' ' || t_round_amount(err) ||
3855: ' ' || t_round_acctd(err) || ' ' ||

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

3866:
3867: END LOOP; /* END - Cleanup loop */
3868:
3869: IF PG_DEBUG in ('Y', 'C') THEN
3870: arp_standard.debug(' Rows rounded this pass : ' || l_rows_rounded_this_pass);
3871: END IF;
3872:
3873: l_rows_rounded := l_rows_rounded + l_rows_rounded_this_pass;
3874:

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

3886: and corrected.
3887: */
3888:
3889: IF PG_DEBUG in ('Y', 'C') THEN
3890: arp_standard.debug('Mismatch between lines found and lines updated (see below)');
3891: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
3892: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
3893:
3894: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP

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

3887: */
3888:
3889: IF PG_DEBUG in ('Y', 'C') THEN
3890: arp_standard.debug('Mismatch between lines found and lines updated (see below)');
3891: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
3892: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
3893:
3894: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
3895:

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

3888:
3889: IF PG_DEBUG in ('Y', 'C') THEN
3890: arp_standard.debug('Mismatch between lines found and lines updated (see below)');
3891: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
3892: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
3893:
3894: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
3895:
3896: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||

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

3892: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
3893:
3894: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
3895:
3896: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||
3897: ' ' || t_rec_offset(err) ||
3898: ' ' || t_round_amount(err) || ' ' || t_round_acctd(err) || ' ' ||
3899: t_round_percent(err) || ' ' || SQL%BULK_ROWCOUNT(err));
3900:

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

3909: END IF;
3910:
3911: p_rows_processed := p_rows_processed + l_rows_rounded;
3912: IF PG_DEBUG in ('Y', 'C') THEN
3913: arp_standard.debug('Total number of rows updated: ' || l_rows_rounded);
3914: END IF;
3915:
3916: /* MRC Processing */
3917: IF PG_DEBUG in ('Y', 'C') THEN

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

3914: END IF;
3915:
3916: /* MRC Processing */
3917: IF PG_DEBUG in ('Y', 'C') THEN
3918: arp_standard.debug('doing rounding for MRC if necessary');
3919: END IF;
3920: ar_mrc_engine2.mrc_correct_rounding(
3921: 'CORRECT_RULE_RECORDS_BY_LINE',
3922: P_REQUEST_ID,

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

3931:
3932: END IF;
3933:
3934: IF PG_DEBUG in ('Y', 'C') THEN
3935: arp_standard.debug('arp_rounding.correct_rule_records_by_line()- ' ||
3936: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
3937: END IF;
3938:
3939: RETURN(iTRUE);

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

4043:
4044: BEGIN
4045:
4046: IF PG_DEBUG in ('Y', 'C') THEN
4047: arp_standard.debug('arp_rounding.correct_rev_adj_by_line()+ ');
4048: END IF;
4049:
4050: /* This is phase 1 of rounding.
4051: Here, we make sure that debits equal credits (REV and UNEARN dists)

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

4085:
4086: /* Now update all the rows that require it */
4087:
4088: IF PG_DEBUG in ('Y', 'C') THEN
4089: arp_standard.debug('Rows that need rounding: ' || l_rows_needing_rounding);
4090: END IF;
4091:
4092: IF (l_rows_needing_rounding > 0) THEN
4093:

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

4092: IF (l_rows_needing_rounding > 0) THEN
4093:
4094: /* DEBUG CODE +/
4095: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4096: arp_standard.debug(err || ' ' || t_line_id(err)|| ' ' ||
4097: t_account_class(err) ||
4098: ' ' || t_round_amount(err) ||
4099: ' ' || t_round_acctd(err) || ' ' ||
4100: t_round_percent(err) );

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

4107:
4108: l_phase := l_phase + 1;
4109:
4110: IF PG_DEBUG in ('Y', 'C') THEN
4111: arp_standard.debug(' Pass = ' || l_phase);
4112: END IF;
4113:
4114: IF l_phase <=3
4115: THEN

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

4358: */
4359:
4360:
4361: IF PG_DEBUG in ('Y', 'C') THEN
4362: arp_standard.debug(' Target: ' || t_line_id(upd) ||
4363: ' ' || t_account_class(upd) ||
4364: ' ' || t_round_amount(upd) ||
4365: ' ' || t_round_acctd(upd) ||
4366: ' ' || t_round_percent(upd) ||

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

4411: IF PG_DEBUG in ('Y', 'C')
4412: THEN
4413:
4414: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4415: arp_standard.debug(t_line_id(err)|| ' ' ||
4416: t_account_class(err) ||
4417: ' ' || t_round_amount(err) ||
4418: ' ' || t_round_acctd(err) || ' ' ||
4419: t_round_percent(err) || ' ' || SQL%BULK_ROWCOUNT(err));

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

4427:
4428: END LOOP; /* END - Cleanup loop */
4429:
4430: IF PG_DEBUG in ('Y', 'C') THEN
4431: arp_standard.debug(' Rows rounded (this pass) : ' || l_rows_rounded_this_pass);
4432: END IF;
4433:
4434: l_rows_rounded := l_rows_rounded + l_rows_rounded_this_pass;
4435:

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

4447: and corrected.
4448: */
4449:
4450: IF PG_DEBUG in ('Y', 'C') THEN
4451: arp_standard.debug('Mismatch between lines found and lines updated [see below]');
4452: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
4453: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
4454:
4455: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP

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

4448: */
4449:
4450: IF PG_DEBUG in ('Y', 'C') THEN
4451: arp_standard.debug('Mismatch between lines found and lines updated [see below]');
4452: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
4453: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
4454:
4455: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4456:

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

4449:
4450: IF PG_DEBUG in ('Y', 'C') THEN
4451: arp_standard.debug('Mismatch between lines found and lines updated [see below]');
4452: arp_standard.debug(' Rows targeted: ' || l_rows_needing_rounding);
4453: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
4454:
4455: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4456:
4457: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||

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

4453: arp_standard.debug(' Rows rounded : ' || l_rows_rounded);
4454:
4455: FOR err in t_line_id.FIRST .. t_line_id.LAST LOOP
4456:
4457: arp_standard.debug(t_line_id(err) || ' ' || t_account_class(err) ||
4458: ' ' || t_round_amount(err) || ' ' || t_round_acctd(err) || ' ' ||
4459: t_round_percent(err) || ' ' || SQL%BULK_ROWCOUNT(err));
4460:
4461: END LOOP;

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

4465: RETURN(iFALSE);
4466: END IF;
4467:
4468: IF PG_DEBUG in ('Y', 'C') THEN
4469: arp_standard.debug('Total number of rows updated: ' || l_rows_rounded);
4470: END IF;
4471:
4472: /* MRC Processing */
4473: IF PG_DEBUG in ('Y', 'C') THEN

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

4470: END IF;
4471:
4472: /* MRC Processing */
4473: IF PG_DEBUG in ('Y', 'C') THEN
4474: arp_standard.debug('doing rounding for MRC if necessary');
4475: END IF;
4476:
4477: /* This call to the MRC wrapper will eventually call a clone of this
4478: routine that was designed to round MRC gld table data. The MRC

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

4497: /* 9317102 - purge GT table to prevent re-processing of lines */
4498: DELETE from ar_line_rev_adj_gt;
4499:
4500: IF PG_DEBUG in ('Y', 'C') THEN
4501: arp_standard.debug('arp_rounding.correct_rev_adj_by_line()-');
4502: END IF;
4503:
4504: RETURN(iTRUE);
4505: END correct_rev_adj_by_line;

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

4542:
4543: begin
4544:
4545: IF PG_DEBUG in ('Y', 'C') THEN
4546: arp_standard.debug('arp_rounding.do_line_level_rounding()+ ' ||
4547: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4548: END IF;
4549:
4550: /*--------------------------------------------------------------+

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

4595:
4596: correct_suspense(p_customer_trx_id);
4597:
4598: IF PG_DEBUG in ('Y', 'C') THEN
4599: arp_standard.debug( 'arp_rounding.do_line_level_rounding()- ' ||
4600: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4601: END IF;
4602:
4603: return(iTRUE);

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

4644:
4645: begin
4646:
4647: IF PG_DEBUG in ('Y', 'C') THEN
4648: arp_standard.debug( 'arp_rounding.replace_balancing_segment()+ ' ||
4649: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4650: END IF;
4651:
4652: if not AR_FLEXBUILDER_WF_PKG.SUBSTITUTE_BALANCING_SEGMENT(

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

4660: error_message )
4661: then
4662:
4663: IF PG_DEBUG in ('Y', 'C') THEN
4664: arp_standard.debug('EXCEPTION: substitute_balancing_segment failed ' ||
4665: return_ccid);
4666: END IF;
4667: return(iFALSE);
4668: end if;

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

4667: return(iFALSE);
4668: end if;
4669:
4670: IF PG_DEBUG in ('Y', 'C') THEN
4671: arp_standard.debug(' original_ccid: ' || original_ccid ||
4672: ' balancing_ccid: ' || balancing_ccid ||
4673: ' return_ccid: ' || return_ccid ||
4674: ' concat_segs: ' || concat_segs
4675: );

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

4672: ' balancing_ccid: ' || balancing_ccid ||
4673: ' return_ccid: ' || return_ccid ||
4674: ' concat_segs: ' || concat_segs
4675: );
4676: arp_standard.debug( 'arp_rounding.replace_balancing_segment()- ' ||
4677: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4678: END IF;
4679:
4680: return(iTRUE);

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

4724:
4725: begin
4726:
4727: IF PG_DEBUG in ('Y', 'C') THEN
4728: arp_standard.debug('arp_rounding.correct_header_level_rounding()+ ' ||
4729: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4730: END IF;
4731:
4732: /*--------------------------------------------------------------+

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

4810: then return(iFALSE);
4811: end If;
4812:
4813: IF PG_DEBUG in ('Y', 'C') THEN
4814: arp_standard.debug( 'arp_rounding.correct_header_level_rounding()- ' ||
4815: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
4816: END IF;
4817:
4818: return(iTRUE);

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

4824: P_SELECT_REC IN OUT NOCOPY SELECT_REC_TYPE ) IS
4825: BEGIN
4826:
4827: IF PG_DEBUG in ('Y', 'C') THEN
4828: arp_standard.debug( 'arp_rounding.get_select_column_values()+' );
4829: END IF;
4830:
4831: dbms_sql.column_value( p_select_sql_c, 1,
4832: p_select_rec.rec_customer_trx_id);

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

4835: dbms_sql.column_value( p_select_sql_c, 3,
4836: p_select_rec.round_customer_trx_id);
4837:
4838: IF PG_DEBUG in ('Y', 'C') THEN
4839: arp_standard.debug( 'arp_rounding.get_select_column_values()-' );
4840: END IF;
4841:
4842: EXCEPTION
4843: WHEN OTHERS THEN

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

4841:
4842: EXCEPTION
4843: WHEN OTHERS THEN
4844: IF PG_DEBUG in ('Y', 'C') THEN
4845: arp_standard.debug('EXCEPTION: arp_rounding.get_select_column_values()');
4846: END IF;
4847: RAISE;
4848: END get_select_column_values;
4849:

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

4850: PROCEDURE dump_select_rec( P_SELECT_REC IN SELECT_REC_TYPE ) IS
4851: BEGIN
4852:
4853: IF PG_DEBUG in ('Y', 'C') THEN
4854: arp_standard.debug( 'arp_rounding.dump_select_rec()+' );
4855: arp_standard.debug(' Dumping select record: ');
4856: arp_standard.debug(' rec_customer_trx_id=' ||
4857: p_select_rec.rec_customer_trx_id);
4858: arp_standard.debug(' rec_code_combination_id=' ||

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

4851: BEGIN
4852:
4853: IF PG_DEBUG in ('Y', 'C') THEN
4854: arp_standard.debug( 'arp_rounding.dump_select_rec()+' );
4855: arp_standard.debug(' Dumping select record: ');
4856: arp_standard.debug(' rec_customer_trx_id=' ||
4857: p_select_rec.rec_customer_trx_id);
4858: arp_standard.debug(' rec_code_combination_id=' ||
4859: p_select_rec.rec_code_combination_id);

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

4852:
4853: IF PG_DEBUG in ('Y', 'C') THEN
4854: arp_standard.debug( 'arp_rounding.dump_select_rec()+' );
4855: arp_standard.debug(' Dumping select record: ');
4856: arp_standard.debug(' rec_customer_trx_id=' ||
4857: p_select_rec.rec_customer_trx_id);
4858: arp_standard.debug(' rec_code_combination_id=' ||
4859: p_select_rec.rec_code_combination_id);
4860: arp_standard.debug(' round_customer_trx_id=' ||

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

4854: arp_standard.debug( 'arp_rounding.dump_select_rec()+' );
4855: arp_standard.debug(' Dumping select record: ');
4856: arp_standard.debug(' rec_customer_trx_id=' ||
4857: p_select_rec.rec_customer_trx_id);
4858: arp_standard.debug(' rec_code_combination_id=' ||
4859: p_select_rec.rec_code_combination_id);
4860: arp_standard.debug(' round_customer_trx_id=' ||
4861: p_select_rec.round_customer_trx_id);
4862: arp_standard.debug( 'arp_rounding.dump_select_rec()-' );

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

4856: arp_standard.debug(' rec_customer_trx_id=' ||
4857: p_select_rec.rec_customer_trx_id);
4858: arp_standard.debug(' rec_code_combination_id=' ||
4859: p_select_rec.rec_code_combination_id);
4860: arp_standard.debug(' round_customer_trx_id=' ||
4861: p_select_rec.round_customer_trx_id);
4862: arp_standard.debug( 'arp_rounding.dump_select_rec()-' );
4863: END IF;
4864:

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

4858: arp_standard.debug(' rec_code_combination_id=' ||
4859: p_select_rec.rec_code_combination_id);
4860: arp_standard.debug(' round_customer_trx_id=' ||
4861: p_select_rec.round_customer_trx_id);
4862: arp_standard.debug( 'arp_rounding.dump_select_rec()-' );
4863: END IF;
4864:
4865: EXCEPTION
4866: WHEN OTHERS THEN

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

4864:
4865: EXCEPTION
4866: WHEN OTHERS THEN
4867: IF PG_DEBUG in ('Y', 'C') THEN
4868: arp_standard.debug( 'EXCEPTION: arp_rounding.dump_select_rec()' );
4869: END IF;
4870: RAISE;
4871: END dump_select_rec;
4872:

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

4874: PROCEDURE define_columns( P_SELECT_SQL_C IN INTEGER,
4875: P_SELECT_REC IN SELECT_REC_TYPE) IS
4876: BEGIN
4877:
4878: arp_standard.debug( 'arp_rounding.define_columns()+' );
4879:
4880: ------------------------------------------------------------
4881: -- Define columns
4882: ------------------------------------------------------------

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

4879:
4880: ------------------------------------------------------------
4881: -- Define columns
4882: ------------------------------------------------------------
4883: arp_standard.debug( ' Defining columns for select_sql_c');
4884:
4885: dbms_sql.define_column( p_select_sql_c, 1,
4886: p_select_rec.rec_customer_trx_id );
4887: dbms_sql.define_column( p_select_sql_c, 2,

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

4888: p_select_rec.rec_code_combination_id );
4889: dbms_sql.define_column( p_select_sql_c, 3,
4890: p_select_rec.round_customer_trx_id );
4891:
4892: arp_standard.debug( 'arp_rounding.define_columns()-' );
4893:
4894: EXCEPTION
4895: WHEN OTHERS THEN
4896: arp_standard.debug( 'EXCEPTION: Error defining columns for select_sql_c' );

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

4892: arp_standard.debug( 'arp_rounding.define_columns()-' );
4893:
4894: EXCEPTION
4895: WHEN OTHERS THEN
4896: arp_standard.debug( 'EXCEPTION: Error defining columns for select_sql_c' );
4897: RAISE;
4898: END;
4899:
4900:

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

4908:
4909: BEGIN
4910:
4911: IF PG_DEBUG in ('Y', 'C') THEN
4912: arp_standard.debug( 'arp_rounding.build_select_sql()+' );
4913: END IF;
4914:
4915: ------------------------------------------------
4916: -- Construct where predicate

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

4945: and rec.latest_rec_flag = ''Y''
4946: and round.account_class(+) = ''ROUND''';
4947:
4948: IF PG_DEBUG in ('Y', 'C') THEN
4949: arp_standard.debug('select_sql = ' ||
4950: l_select_sql);
4951: END IF;
4952:
4953: ------------------------------------------------

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

4955: ------------------------------------------------
4956:
4957: BEGIN
4958: IF PG_DEBUG in ('Y', 'C') THEN
4959: arp_standard.debug('Parsing select stmt');
4960: END IF;
4961:
4962: p_select_sql_c := dbms_sql.open_cursor;
4963: dbms_sql.parse( p_select_sql_c, l_select_sql, dbms_sql.v7 );

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

4976:
4977: EXCEPTION
4978: WHEN OTHERS THEN
4979: IF PG_DEBUG in ('Y', 'C') THEN
4980: arp_standard.debug('build_select_sql: ' || 'EXCEPTION: Error parsing select stmt' );
4981: END IF;
4982: RAISE;
4983: END;
4984:

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

4982: RAISE;
4983: END;
4984:
4985: IF PG_DEBUG in ('Y', 'C') THEN
4986: arp_standard.debug( 'arp_rounding.build_select_sql()-' );
4987: END IF;
4988:
4989:
4990: EXCEPTION

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

4989:
4990: EXCEPTION
4991: WHEN OTHERS THEN
4992: IF PG_DEBUG in ('Y', 'C') THEN
4993: arp_standard.debug( 'EXCEPTION: arp_rounding.build_select_sql()' );
4994: END IF;
4995:
4996: RAISE;
4997: END build_select_sql;

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

5071: -----------------------------------------------------------------------
5072: -- Create dynamic sql
5073: -----------------------------------------------------------------------
5074: IF PG_DEBUG in ('Y', 'C') THEN
5075: arp_standard.debug(' Creating dynamic sql');
5076: END IF;
5077:
5078: build_select_sql( P_REQUEST_ID,
5079: P_CUSTOMER_TRX_ID,

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

5087: ---------------------------------------------------------------
5088: -- Execute sql
5089: ---------------------------------------------------------------
5090: IF PG_DEBUG in ('Y', 'C') THEN
5091: arp_standard.debug(' Executing select sql' );
5092: END IF;
5093:
5094: BEGIN
5095: l_ignore := dbms_sql.execute( select_sql_c );

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

5096:
5097: EXCEPTION
5098: WHEN OTHERS THEN
5099: IF PG_DEBUG in ('Y', 'C') THEN
5100: arp_standard.debug('EXCEPTION: Error executing select sql' );
5101: END IF;
5102: RAISE;
5103: END;
5104:

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

5105: --------------------------------------------------------------
5106: -- Fetch rows
5107: --------------------------------------------------------------
5108: IF PG_DEBUG in ('Y', 'C') THEN
5109: arp_standard.debug(' Fetching select stmt');
5110: END IF;
5111:
5112: begin
5113: loop

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

5114: if (dbms_sql.fetch_rows( select_sql_c ) > 0)
5115: then
5116:
5117: IF PG_DEBUG in ('Y', 'C') THEN
5118: arp_standard.debug(' fetched a row' );
5119: END IF;
5120: l_select_rec := l_null_rec;
5121: ------------------------------------------------------
5122: -- Get column values

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

5125:
5126: dump_select_rec( l_select_rec );
5127: else
5128: IF PG_DEBUG in ('Y', 'C') THEN
5129: arp_standard.debug( ' Done fetching');
5130: END IF;
5131: EXIT;
5132: end if;
5133:

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

5135:
5136: l_customer_trx_id := l_select_rec.rec_customer_trx_id;
5137:
5138: IF PG_DEBUG in ('Y', 'C') THEN
5139: arp_standard.debug( 'rec_customer_trx_id: '|| l_customer_trx_id);
5140: END IF;
5141:
5142: if (l_select_rec.round_customer_trx_id is null)
5143: then

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

5181: dbms_sql.close_cursor(select_sql_c);
5182: end;
5183:
5184: IF PG_DEBUG in ('Y', 'C') THEN
5185: arp_standard.debug( 'arp_rounding.do_header_level_rounding()- ' ||
5186: to_char(sysdate, 'DD-MON-YY HH:MI:SS'));
5187: END IF;
5188:
5189: return(iTRUE);

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

5287: | Print out NOCOPY the parameters in debug mode only |
5288: +----------------------------------------------*/
5289:
5290: IF PG_DEBUG in ('Y', 'C') THEN
5291: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()+ ' ||
5292: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
5293: arp_standard.debug(' Request_id: ' || p_request_id ||
5294: ' ctid: '|| p_customer_trx_id ||' ctlid: '||
5295: p_customer_trx_line_id || ' class: ' ||

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

5289:
5290: IF PG_DEBUG in ('Y', 'C') THEN
5291: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()+ ' ||
5292: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
5293: arp_standard.debug(' Request_id: ' || p_request_id ||
5294: ' ctid: '|| p_customer_trx_id ||' ctlid: '||
5295: p_customer_trx_line_id || ' class: ' ||
5296: trx_class_to_process || ' Rules: '||
5297: check_rules_flag);

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

5294: ' ctid: '|| p_customer_trx_id ||' ctlid: '||
5295: p_customer_trx_line_id || ' class: ' ||
5296: trx_class_to_process || ' Rules: '||
5297: check_rules_flag);
5298: arp_standard.debug(' Precision: ' || base_precision ||
5299: ' MAU: ' || base_min_accountable_unit ||
5300: ' Period Set: '|| period_set_name);
5301: arp_standard.debug('p_trx_header_level_rounding: ' ||
5302: p_trx_header_level_rounding || ' p_activity_flag:' ||

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

5297: check_rules_flag);
5298: arp_standard.debug(' Precision: ' || base_precision ||
5299: ' MAU: ' || base_min_accountable_unit ||
5300: ' Period Set: '|| period_set_name);
5301: arp_standard.debug('p_trx_header_level_rounding: ' ||
5302: p_trx_header_level_rounding || ' p_activity_flag:' ||
5303: p_activity_flag || ' trx_header_round_ccid:' ||
5304: trx_header_round_ccid);
5305: END IF;

Line 5397: arp_standard.debug('REC record does not exist to adjust the amount');

5393:
5394: END IF;
5395: EXCEPTION
5396: WHEN NO_DATA_FOUND THEN
5397: arp_standard.debug('REC record does not exist to adjust the amount');
5398: END;
5399:
5400: /* End - Bug 13090600 */
5401: end if;

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

5400: /* End - Bug 13090600 */
5401: end if;
5402:
5403: IF PG_DEBUG in ('Y', 'C') THEN
5404: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()- ' ||
5405: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
5406: END IF;
5407:
5408: RETURN( iTRUE );

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

5419:
5420: ROLLBACK TO SAVEPOINT ARPLBCRE_1;
5421:
5422: IF PG_DEBUG in ('Y', 'C') THEN
5423: arp_standard.debug( 'arp_rounding.correct_dist_rounding_errors()+ ' ||
5424: TO_CHAR(sysdate, 'DD-MON-YY HH:MI:SS'));
5425: END IF;
5426:
5427: RETURN( iFALSE );