DBA Data[Home] [Help]

APPS.ARP_CR_ICR_PKG dependencies on ARP_CR_ICR_PKG

Line 1: PACKAGE BODY ARP_CR_ICR_PKG AS

1: PACKAGE BODY ARP_CR_ICR_PKG AS
2: /* $Header: ARRIICRB.pls 120.8.12010000.2 2009/02/02 16:52:56 mpsingh ship $*/
3:
4: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
5: --

Line 67: arp_standard.debug( 'arp_cr_icr_pkg.insert_p()+' );

63: p_icr_rec IN ar_interim_cash_receipts%ROWTYPE ) IS
64: l_cr_id ar_interim_cash_receipts.cash_receipt_id%TYPE;
65: l_row_id VARCHAR2( 20 );
66: BEGIN
67: arp_standard.debug( 'arp_cr_icr_pkg.insert_p()+' );
68: --
69: arp_cr_icr_pkg.insert_p( p_icr_rec, l_cr_id );
70: --
71: SELECT ROWID

Line 69: arp_cr_icr_pkg.insert_p( p_icr_rec, l_cr_id );

65: l_row_id VARCHAR2( 20 );
66: BEGIN
67: arp_standard.debug( 'arp_cr_icr_pkg.insert_p()+' );
68: --
69: arp_cr_icr_pkg.insert_p( p_icr_rec, l_cr_id );
70: --
71: SELECT ROWID
72: INTO l_row_id
73: FROM ar_interim_cash_receipts

Line 79: arp_standard.debug( 'arp_cr_icr_pkg.insert_p()-' );

75: --
76: p_cr_id := l_cr_id;
77: p_row_id := l_row_id;
78: --
79: arp_standard.debug( 'arp_cr_icr_pkg.insert_p()-' );
80: --
81: EXCEPTION
82: WHEN OTHERS THEN
83: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.insert_p' );

Line 83: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.insert_p' );

79: arp_standard.debug( 'arp_cr_icr_pkg.insert_p()-' );
80: --
81: EXCEPTION
82: WHEN OTHERS THEN
83: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.insert_p' );
84: RAISE;
85: END;
86:
87: /*===========================================================================+

Line 121: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.insert_p' );

117: PROCEDURE insert_p( p_icr_rec IN ar_interim_cash_receipts%ROWTYPE,
118: p_icr_id OUT NOCOPY ar_interim_cash_receipts.cash_receipt_id%TYPE ) IS
119: l_icr_id ar_interim_cash_receipts.cash_receipt_id%TYPE;
120: BEGIN
121: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.insert_p' );
122: --
123: SELECT ar_cash_receipts_s.nextval
124: INTO l_icr_id
125: FROM dual;

Line 259: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.insert_p' );

255: p_icr_rec.autoapply_flag
256: );
257: p_icr_id := l_icr_id;
258: --
259: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.insert_p' );
260: EXCEPTION
261: WHEN OTHERS THEN
262: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.insert_p' );
263: RAISE;

Line 262: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.insert_p' );

258: --
259: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.insert_p' );
260: EXCEPTION
261: WHEN OTHERS THEN
262: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.insert_p' );
263: RAISE;
264: END;
265: --
266: /*===========================================================================+

Line 296: arp_standard.debug('arp_cr_icr_pkg.construct_icr_update_stmt()+');

292: --
293: PROCEDURE construct_icr_update_stmt( update_text OUT NOCOPY varchar2) IS
294: --
295: BEGIN
296: arp_standard.debug('arp_cr_icr_pkg.construct_icr_update_stmt()+');
297: --
298: update_text :=
299: 'update ar_interim_cash_receipts
300: SET amount =

Line 527: arp_standard.debug('arp_cr_icr_pkg.construct_icr_update_stmt()-');

523: :ar_flag_dummy, autoapply_flag,
524: :autoapply_flag)
525: ';
526: --
527: arp_standard.debug('arp_cr_icr_pkg.construct_icr_update_stmt()-');
528: --
529: EXCEPTION
530: WHEN OTHERS THEN
531: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg .construct_icr_update_stmt()');

Line 531: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg .construct_icr_update_stmt()');

527: arp_standard.debug('arp_cr_icr_pkg.construct_icr_update_stmt()-');
528: --
529: EXCEPTION
530: WHEN OTHERS THEN
531: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg .construct_icr_update_stmt()');
532: RAISE;
533: --
534: END;
535: --

Line 569: arp_standard.debug('arp_cr_icr_pkg.bind_icr_variables()+');

565: IS
566: --
567: BEGIN
568: --
569: arp_standard.debug('arp_cr_icr_pkg.bind_icr_variables()+');
570: --
571: --
572: /*------------------+
573: | Dummy constants |

Line 782: arp_standard.debug('arp_cr_icr_pkg.bind_icr_variables()-');

778: dbms_sql.bind_variable(p_update_cursor, ':autoapply_flag',
779: p_icr_rec.autoapply_flag);
780: --
781:
782: arp_standard.debug('arp_cr_icr_pkg.bind_icr_variables()-');
783: --
784: EXCEPTION
785: WHEN OTHERS THEN
786: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.bind_icr_variables()');

Line 786: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.bind_icr_variables()');

782: arp_standard.debug('arp_cr_icr_pkg.bind_icr_variables()-');
783: --
784: EXCEPTION
785: WHEN OTHERS THEN
786: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.bind_icr_variables()');
787: arp_standard.debug('Error at character: ' ||
788: to_char(dbms_sql.last_error_position));
789:
790: RAISE;

Line 806: arp_standard.debug('arp_cr_icr_pkg.generic_update()+');

802: l_count number;
803: l_update_statement varchar2(20000);
804: --
805: BEGIN
806: arp_standard.debug('arp_cr_icr_pkg.generic_update()+');
807: --
808: /*--------------------------------------------------------------+
809: | If this update statement has not already been parsed, |
810: | construct the statement and parse it. |

Line 824: arp_cr_icr_pkg.construct_icr_update_stmt(l_update_statement);

820: /*---------------------------------+
821: | Construct the update statement |
822: +---------------------------------*/
823: --
824: arp_cr_icr_pkg.construct_icr_update_stmt(l_update_statement);
825: --
826: l_update_statement := l_update_statement || p_where_clause;
827: --
828: arp_standard.debug('after l_update_statement');

Line 841: arp_cr_icr_pkg.bind_icr_variables(p_update_cursor, p_icr_rec);

837: arp_standard.debug('after dbms_sql');
838:
839: end if;
840: --
841: arp_cr_icr_pkg.bind_icr_variables(p_update_cursor, p_icr_rec);
842: --
843: --
844: arp_standard.debug('after .bind_app');
845: /*-----------------------------------------+

Line 871: arp_standard.debug('arp_cr_icr_pkg.generic_update()-');

867: arp_standard.debug('after l_count = 0');
868: end if;
869: --
870: --
871: arp_standard.debug('arp_cr_icr_pkg.generic_update()-');
872: --
873: EXCEPTION
874: WHEN OTHERS THEN
875: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.generic_update()

Line 875: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.generic_update()

871: arp_standard.debug('arp_cr_icr_pkg.generic_update()-');
872: --
873: EXCEPTION
874: WHEN OTHERS THEN
875: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.generic_update()
876: ');
877: arp_standard.debug(l_update_statement);
878: arp_standard.debug('Error at character: ' ||
879: to_char(dbms_sql.last_error_position));

Line 892: arp_standard.debug('arp_cr_icr_pkg.set_to_dummy()+');

888: IS
889: --
890: BEGIN
891: --
892: arp_standard.debug('arp_cr_icr_pkg.set_to_dummy()+');
893: --
894: p_icr_rec.cash_receipt_id := AR_NUMBER_DUMMY;
895: p_icr_rec.amount := AR_NUMBER_DUMMY;
896: p_icr_rec.factor_discount_amount := AR_NUMBER_DUMMY;

Line 946: arp_standard.debug('arp_cr_icr_pkg.set_to_dummy()-');

942: p_icr_rec.customer_reason := AR_TEXT_DUMMY;
943: p_icr_rec.autoapply_flag := AR_FLAG_DUMMY;
944: p_icr_rec.automatch_set_id := AR_NUMBER_DUMMY;
945: --
946: arp_standard.debug('arp_cr_icr_pkg.set_to_dummy()-');
947: --
948: EXCEPTION
949: WHEN OTHERS THEN
950: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.set_to_dummy()');

Line 950: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.set_to_dummy()');

946: arp_standard.debug('arp_cr_icr_pkg.set_to_dummy()-');
947: --
948: EXCEPTION
949: WHEN OTHERS THEN
950: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.set_to_dummy()');
951: RAISE;
952: --
953: END;
954: --

Line 965: arp_standard.debug('arp_cr_icr_pkg.update_p()+ ');

961: ar_interim_cash_receipts.cash_receipt_id%TYPE) IS
962: --
963: BEGIN
964: --
965: arp_standard.debug('arp_cr_icr_pkg.update_p()+ ');
966: --
967: --
968: arp_cr_icr_pkg.generic_update( pg_cursor1,
969: ' WHERE cash_receipt_id = :where_1',

Line 968: arp_cr_icr_pkg.generic_update( pg_cursor1,

964: --
965: arp_standard.debug('arp_cr_icr_pkg.update_p()+ ');
966: --
967: --
968: arp_cr_icr_pkg.generic_update( pg_cursor1,
969: ' WHERE cash_receipt_id = :where_1',
970: p_cash_receipt_id,
971: p_icr_rec);
972: --

Line 973: arp_standard.debug('arp_cr_icr_pkg.update_p()- ' ||

969: ' WHERE cash_receipt_id = :where_1',
970: p_cash_receipt_id,
971: p_icr_rec);
972: --
973: arp_standard.debug('arp_cr_icr_pkg.update_p()- ' ||
974: to_char(sysdate, 'HH:MI:SS'));
975: --
976: --
977: EXCEPTION

Line 979: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.update_p()');

975: --
976: --
977: EXCEPTION
978: WHEN OTHERS THEN
979: arp_standard.debug('EXCEPTION: arp_cr_icr_pkg.update_p()');
980: RAISE;
981: END;
982: --
983: /*===========================================================================+

Line 1007: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.delete_p' );

1003: +===========================================================================*/
1004: PROCEDURE delete_p(
1005: p_icr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE ) IS
1006: BEGIN
1007: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.delete_p' );
1008: --
1009: DELETE FROM ar_interim_cash_receipts
1010: WHERE cash_receipt_id = p_icr_id;
1011: --

Line 1012: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.delete_p' );

1008: --
1009: DELETE FROM ar_interim_cash_receipts
1010: WHERE cash_receipt_id = p_icr_id;
1011: --
1012: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.delete_p' );
1013: EXCEPTION
1014: WHEN OTHERS THEN
1015: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.delete_p' );
1016: RAISE;

Line 1015: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.delete_p' );

1011: --
1012: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.delete_p' );
1013: EXCEPTION
1014: WHEN OTHERS THEN
1015: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.delete_p' );
1016: RAISE;
1017: END;
1018: --
1019: /*===========================================================================+

Line 1043: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.lock_p' );

1039: +===========================================================================*/
1040: PROCEDURE lock_p( p_icr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE ) IS
1041: l_icr_id ar_interim_cash_receipts.cash_receipt_id%TYPE;
1042: BEGIN
1043: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.lock_p' );
1044: --
1045: SELECT cash_receipt_id
1046: INTO l_icr_id
1047: FROM ar_interim_cash_receipts

Line 1051: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.lock_p' );

1047: FROM ar_interim_cash_receipts
1048: WHERE cash_receipt_id = p_icr_id
1049: FOR UPDATE OF STATUS;
1050: --
1051: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.lock_p' );
1052: EXCEPTION
1053: WHEN OTHERS THEN
1054: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.lock_p' );
1055: RAISE;

Line 1054: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.lock_p' );

1050: --
1051: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.lock_p' );
1052: EXCEPTION
1053: WHEN OTHERS THEN
1054: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.lock_p' );
1055: RAISE;
1056: END;
1057: --
1058: PROCEDURE nowaitlock_p( p_icr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE ) IS

Line 1061: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.nowaitlock_p' );

1057: --
1058: PROCEDURE nowaitlock_p( p_icr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE ) IS
1059: l_icr_id ar_interim_cash_receipts.cash_receipt_id%TYPE;
1060: BEGIN
1061: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.nowaitlock_p' );
1062: --
1063: SELECT cash_receipt_id
1064: INTO l_icr_id
1065: FROM ar_interim_cash_receipts

Line 1069: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.nowaitlock_p' );

1065: FROM ar_interim_cash_receipts
1066: WHERE cash_receipt_id = p_icr_id
1067: FOR UPDATE OF STATUS NOWAIT;
1068: --
1069: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.nowaitlock_p' );
1070: EXCEPTION
1071: WHEN OTHERS THEN
1072: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.nowaitlock_p' );
1073: RAISE;

Line 1072: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.nowaitlock_p' );

1068: --
1069: arp_standard.debug( '<<<<<<<< arp_cr_icr_pkg.nowaitlock_p' );
1070: EXCEPTION
1071: WHEN OTHERS THEN
1072: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.nowaitlock_p' );
1073: RAISE;
1074: END;
1075: --
1076: /*===========================================================================+

Line 1102: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.fetch_p' );

1098: +===========================================================================*/
1099: PROCEDURE fetch_p( p_icr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE,
1100: p_icr_rec OUT NOCOPY ar_interim_cash_receipts%ROWTYPE ) IS
1101: BEGIN
1102: arp_standard.debug( '>>>>>>>> arp_cr_icr_pkg.fetch_p' );
1103: --
1104: SELECT *
1105: INTO p_icr_rec
1106: FROM ar_interim_cash_receipts

Line 1109: arp_standard.debug( '<<<<<<<<< arp_cr_icr_pkg.fetch_p' );

1105: INTO p_icr_rec
1106: FROM ar_interim_cash_receipts
1107: WHERE cash_receipt_id = p_icr_id;
1108: --
1109: arp_standard.debug( '<<<<<<<<< arp_cr_icr_pkg.fetch_p' );
1110: EXCEPTION
1111: --
1112: WHEN OTHERS THEN
1113: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.fetch_p' );

Line 1113: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.fetch_p' );

1109: arp_standard.debug( '<<<<<<<<< arp_cr_icr_pkg.fetch_p' );
1110: EXCEPTION
1111: --
1112: WHEN OTHERS THEN
1113: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.fetch_p' );
1114: RAISE;
1115: END;
1116: --
1117:

Line 1121: arp_standard.debug( 'arp_cr_icr_pkg.lock_fetch_p()+' );

1117:
1118: PROCEDURE lock_fetch_p( p_icr_rec IN OUT NOCOPY ar_interim_cash_receipts%ROWTYPE ) IS
1119: BEGIN
1120: IF PG_DEBUG in ('Y', 'C') THEN
1121: arp_standard.debug( 'arp_cr_icr_pkg.lock_fetch_p()+' );
1122: END IF;
1123: --
1124: SELECT *
1125: INTO p_icr_rec

Line 1131: arp_standard.debug( 'arp_cr_icr_pkg.lock_fetch_p()-' );

1127: WHERE cash_receipt_id = p_icr_rec.cash_receipt_id
1128: FOR UPDATE OF STATUS;
1129: --
1130: IF PG_DEBUG in ('Y', 'C') THEN
1131: arp_standard.debug( 'arp_cr_icr_pkg.lock_fetch_p()-' );
1132: END IF;
1133: EXCEPTION
1134: WHEN OTHERS THEN
1135: IF PG_DEBUG in ('Y', 'C') THEN

Line 1136: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.lock_fetch_p' );

1132: END IF;
1133: EXCEPTION
1134: WHEN OTHERS THEN
1135: IF PG_DEBUG in ('Y', 'C') THEN
1136: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.lock_fetch_p' );
1137: END IF;
1138: RAISE;
1139: END lock_fetch_p;
1140: --

Line 1145: arp_standard.debug( 'arp_cr_icr_pkg.nowaitlock_fetch_p()+' );

1141: --
1142: PROCEDURE nowaitlock_fetch_p( p_icr_rec IN OUT NOCOPY ar_interim_cash_receipts%ROWTYPE ) IS
1143: BEGIN
1144: IF PG_DEBUG in ('Y', 'C') THEN
1145: arp_standard.debug( 'arp_cr_icr_pkg.nowaitlock_fetch_p()+' );
1146: END IF;
1147: --
1148: SELECT *
1149: INTO p_icr_rec

Line 1155: arp_standard.debug( 'arp_cr_icr_pkg.nowaitlock_fetch_p()-' );

1151: WHERE cash_receipt_id = p_icr_rec.cash_receipt_id
1152: FOR UPDATE OF STATUS NOWAIT;
1153: --
1154: IF PG_DEBUG in ('Y', 'C') THEN
1155: arp_standard.debug( 'arp_cr_icr_pkg.nowaitlock_fetch_p()-' );
1156: END IF;
1157: EXCEPTION
1158: WHEN OTHERS THEN
1159: IF PG_DEBUG in ('Y', 'C') THEN

Line 1160: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.nowaitlock_fetch_p' );

1156: END IF;
1157: EXCEPTION
1158: WHEN OTHERS THEN
1159: IF PG_DEBUG in ('Y', 'C') THEN
1160: arp_standard.debug( 'EXCEPTION: arp_cr_icr_pkg.nowaitlock_fetch_p' );
1161: END IF;
1162: RAISE;
1163: END nowaitlock_fetch_p;
1164: --

Line 1188: END ARP_CR_ICR_PKG;

1184: pg_last_update_login := arp_global.last_update_login;
1185: pg_set_of_books_id := arp_global.set_of_books_id;
1186: --
1187: --
1188: END ARP_CR_ICR_PKG;
1189: --