59: | |
60: +===========================================================================*/
61: PROCEDURE insert_p( p_row_id OUT NOCOPY VARCHAR2,
62: p_cr_line_id OUT NOCOPY
63: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE,
64: p_icr_lines_rec IN
65: ar_interim_cash_receipt_lines%ROWTYPE ) IS
66: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
67: l_row_id VARCHAR2( 20 );
61: PROCEDURE insert_p( p_row_id OUT NOCOPY VARCHAR2,
62: p_cr_line_id OUT NOCOPY
63: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE,
64: p_icr_lines_rec IN
65: ar_interim_cash_receipt_lines%ROWTYPE ) IS
66: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
67: l_row_id VARCHAR2( 20 );
68: BEGIN
69: arp_standard.debug( 'arp_cr_icr_lines_pkg.insert_p()+' );
62: p_cr_line_id OUT NOCOPY
63: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE,
64: p_icr_lines_rec IN
65: ar_interim_cash_receipt_lines%ROWTYPE ) IS
66: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
67: l_row_id VARCHAR2( 20 );
68: BEGIN
69: arp_standard.debug( 'arp_cr_icr_lines_pkg.insert_p()+' );
70: --
73: l_cr_line_id );
74: --
75: SELECT ROWID
76: INTO l_row_id
77: FROM ar_interim_cash_receipt_lines
78: WHERE cash_receipt_line_id = l_cr_line_id
79: AND cash_receipt_id = p_icr_lines_rec.cash_receipt_id;
80: --
81: p_cr_line_id := l_cr_line_id;
122: | 01-20-03 K.Dhaliwal Bug 2707190 Added applied_rec_app_id to |
123: | set_to_dummy |
124: +===========================================================================*/
125: PROCEDURE insert_p(
126: p_icr_lines_rec IN ar_interim_cash_receipt_lines%ROWTYPE,
127: p_cr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE,
128: p_icr_line_id OUT NOCOPY
129: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
130: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
125: PROCEDURE insert_p(
126: p_icr_lines_rec IN ar_interim_cash_receipt_lines%ROWTYPE,
127: p_cr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE,
128: p_icr_line_id OUT NOCOPY
129: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
130: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
131: l_org_id ar_interim_cash_receipt_lines.org_id%TYPE;
132: BEGIN
133: arp_standard.debug( ' arp_cr_icr_lines_pkg.insert_p()+' );
126: p_icr_lines_rec IN ar_interim_cash_receipt_lines%ROWTYPE,
127: p_cr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE,
128: p_icr_line_id OUT NOCOPY
129: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
130: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
131: l_org_id ar_interim_cash_receipt_lines.org_id%TYPE;
132: BEGIN
133: arp_standard.debug( ' arp_cr_icr_lines_pkg.insert_p()+' );
134: /* Adding the following line to populate the org_id as per the bug:5244971*/
127: p_cr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE,
128: p_icr_line_id OUT NOCOPY
129: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
130: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
131: l_org_id ar_interim_cash_receipt_lines.org_id%TYPE;
132: BEGIN
133: arp_standard.debug( ' arp_cr_icr_lines_pkg.insert_p()+' );
134: /* Adding the following line to populate the org_id as per the bug:5244971*/
135: l_org_id := arp_standard.sysparm.org_id;
136: --
137: /* Changing the following query to remove the org id as per the bug:5244971*/
138: SELECT NVL(MAX(cash_receipt_line_id),0) + 1
139: INTO l_cr_line_id
140: FROM ar_interim_cash_receipt_lines
141: WHERE cash_receipt_id = p_cr_id;
142: --
143: INSERT INTO ar_interim_cash_receipt_lines (
144: cash_receipt_line_id,
139: INTO l_cr_line_id
140: FROM ar_interim_cash_receipt_lines
141: WHERE cash_receipt_id = p_cr_id;
142: --
143: INSERT INTO ar_interim_cash_receipt_lines (
144: cash_receipt_line_id,
145: cash_receipt_id,
146: last_updated_by,
147: last_update_date,
314: BEGIN
315: arp_standard.debug('arp_cr_icr_lines_pkg.const_icr_lines_update_stmt()+');
316: --
317: update_text :=
318: 'update ar_interim_cash_receipt_lines
319: SET payment_amount =
320: decode(:payment_amount,
321: :ar_number_dummy, payment_amount,
322: :payment_amount),
595: --
596: --
597: PROCEDURE bind_icr_lines_variables(
598: p_update_cursor IN integer,
599: p_icr_lines_rec IN ar_interim_cash_receipt_lines%rowtype ) IS
600: --
601: BEGIN
602: --
603: arp_standard.debug('arp_cr_icr_lines_pkg.bind_icr_lines_variables()+');
829: p_where_clause IN varchar2,
830: p_where1 IN number,
831: p_where2 IN number,
832: p_where3 IN number,
833: p_icr_lines_rec IN ar_interim_cash_receipt_lines%ROWTYPE)
834: IS
835: --
836: l_count number;
837: l_update_statement varchar2(20000);
933: --
934: --
935: --
936: PROCEDURE set_to_dummy( p_icr_lines_rec OUT NOCOPY
937: ar_interim_cash_receipt_lines%rowtype) IS
938: --
939: BEGIN
940: --
941: arp_standard.debug('arp_cr_icr_lines_pkg.set_to_dummy()+');
1008: --
1009: --
1010: --
1011: PROCEDURE update_p(
1012: p_icr_lines_rec IN ar_interim_cash_receipt_lines%ROWTYPE,
1013: p_cash_receipt_line_id IN
1014: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE,
1015: p_batch_id IN
1016: ar_interim_cash_receipt_lines.batch_id%TYPE,
1010: --
1011: PROCEDURE update_p(
1012: p_icr_lines_rec IN ar_interim_cash_receipt_lines%ROWTYPE,
1013: p_cash_receipt_line_id IN
1014: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE,
1015: p_batch_id IN
1016: ar_interim_cash_receipt_lines.batch_id%TYPE,
1017: p_cash_receipt_id IN
1018: ar_interim_cash_receipt_lines.cash_receipt_id%TYPE) IS
1012: p_icr_lines_rec IN ar_interim_cash_receipt_lines%ROWTYPE,
1013: p_cash_receipt_line_id IN
1014: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE,
1015: p_batch_id IN
1016: ar_interim_cash_receipt_lines.batch_id%TYPE,
1017: p_cash_receipt_id IN
1018: ar_interim_cash_receipt_lines.cash_receipt_id%TYPE) IS
1019: --
1020: BEGIN
1014: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE,
1015: p_batch_id IN
1016: ar_interim_cash_receipt_lines.batch_id%TYPE,
1017: p_cash_receipt_id IN
1018: ar_interim_cash_receipt_lines.cash_receipt_id%TYPE) IS
1019: --
1020: BEGIN
1021: --
1022: arp_standard.debug('arp_cr_icr_lines_pkg.update_p()+ ');
1067: +===========================================================================*/
1068: PROCEDURE delete_p(
1069: p_icr_id IN ar_interim_cash_receipts.cash_receipt_id%TYPE,
1070: p_icr_line_id IN
1071: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
1072: BEGIN
1073: arp_standard.debug( 'arp_cr_icr_lines_pkg.delete_p()+' );
1074: --
1075: DELETE FROM ar_interim_cash_receipt_lines
1071: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
1072: BEGIN
1073: arp_standard.debug( 'arp_cr_icr_lines_pkg.delete_p()+' );
1074: --
1075: DELETE FROM ar_interim_cash_receipt_lines
1076: WHERE cash_receipt_id = p_icr_id
1077: AND cash_receipt_line_id = p_icr_line_id;
1078: --
1079: arp_standard.debug( 'arp_cr_icr_lines_pkg.delete_p()-' );
1114: IF PG_DEBUG in ('Y', 'C') THEN
1115: arp_standard.debug( 'arp_cr_icr_lines_pkg.delete_fk()+' );
1116: END IF;
1117: --
1118: DELETE FROM ar_interim_cash_receipt_lines
1119: WHERE cash_receipt_id = p_icr_id;
1120: --
1121: IF PG_DEBUG in ('Y', 'C') THEN
1122: arp_standard.debug( 'arp_cr_icr_lines_pkg.delete_fk()-' );
1153: | |
1154: +===========================================================================*/
1155: PROCEDURE lock_p(
1156: p_icr_line_id IN
1157: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
1158: --
1159: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
1160: BEGIN
1161: arp_standard.debug( 'arp_cr_icr_lines_pkg.lock_p()+' );
1155: PROCEDURE lock_p(
1156: p_icr_line_id IN
1157: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
1158: --
1159: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
1160: BEGIN
1161: arp_standard.debug( 'arp_cr_icr_lines_pkg.lock_p()+' );
1162: --
1163: SELECT cash_receipt_line_id
1161: arp_standard.debug( 'arp_cr_icr_lines_pkg.lock_p()+' );
1162: --
1163: SELECT cash_receipt_line_id
1164: INTO l_cr_line_id
1165: FROM ar_interim_cash_receipt_lines
1166: WHERE cash_receipt_line_id = p_icr_line_id
1167: FOR UPDATE OF PAYMENT_AMOUNT;
1168: --
1169: arp_standard.debug( 'arp_cr_icr_lines_pkg.lock_p()-' );
1174: END;
1175: --
1176: PROCEDURE nowaitlock_p(
1177: p_icr_line_id IN
1178: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
1179: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
1180: BEGIN
1181: arp_standard.debug( 'arp_cr_icr_lines_pkg.nowaitlock_p()+' );
1182: --
1175: --
1176: PROCEDURE nowaitlock_p(
1177: p_icr_line_id IN
1178: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE ) IS
1179: l_cr_line_id ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE;
1180: BEGIN
1181: arp_standard.debug( 'arp_cr_icr_lines_pkg.nowaitlock_p()+' );
1182: --
1183: SELECT cash_receipt_line_id
1181: arp_standard.debug( 'arp_cr_icr_lines_pkg.nowaitlock_p()+' );
1182: --
1183: SELECT cash_receipt_line_id
1184: INTO l_cr_line_id
1185: FROM ar_interim_cash_receipt_lines
1186: WHERE cash_receipt_line_id = p_icr_line_id
1187: FOR UPDATE OF PAYMENT_AMOUNT NOWAIT;
1188: --
1189: arp_standard.debug( 'arp_cr_icr_lines_pkg.nowaitlock_p()-' );
1217: | |
1218: +===========================================================================*/
1219: PROCEDURE fetch_p(
1220: p_icr_line_id IN
1221: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE,
1222: p_icr_lines_rec OUT NOCOPY
1223: ar_interim_cash_receipt_lines%ROWTYPE ) IS
1224: BEGIN
1225: arp_standard.debug( 'arp_cr_icr_lines_pkg.fetch_p()+' );
1219: PROCEDURE fetch_p(
1220: p_icr_line_id IN
1221: ar_interim_cash_receipt_lines.cash_receipt_line_id%TYPE,
1222: p_icr_lines_rec OUT NOCOPY
1223: ar_interim_cash_receipt_lines%ROWTYPE ) IS
1224: BEGIN
1225: arp_standard.debug( 'arp_cr_icr_lines_pkg.fetch_p()+' );
1226: --
1227: SELECT *
1225: arp_standard.debug( 'arp_cr_icr_lines_pkg.fetch_p()+' );
1226: --
1227: SELECT *
1228: INTO p_icr_lines_rec
1229: FROM ar_interim_cash_receipt_lines
1230: WHERE cash_receipt_line_id = p_icr_line_id;
1231: --
1232: arp_standard.debug( 'arp_cr_icr_lines_pkg.fetch_p()-' );
1233: EXCEPTION
1237: RAISE;
1238: END;
1239: --
1240: PROCEDURE lock_fetch_p( p_icr_lines_rec IN OUT NOCOPY
1241: ar_interim_cash_receipt_lines%ROWTYPE ) IS
1242: BEGIN
1243: IF PG_DEBUG in ('Y', 'C') THEN
1244: arp_standard.debug( 'arp_cr_icr_lines_pkg.lock_fetch_p()+' );
1245: END IF;
1245: END IF;
1246: --
1247: SELECT *
1248: INTO p_icr_lines_rec
1249: FROM ar_interim_cash_receipt_lines
1250: WHERE cash_receipt_line_id = p_icr_lines_rec.cash_receipt_line_id
1251: FOR UPDATE OF PAYMENT_AMOUNT;
1252: --
1253: IF PG_DEBUG in ('Y', 'C') THEN
1262: END lock_fetch_p;
1263: --
1264: --
1265: PROCEDURE nowaitlock_fetch_p( p_icr_lines_rec IN OUT NOCOPY
1266: ar_interim_cash_receipt_lines%ROWTYPE ) IS
1267: BEGIN
1268: IF PG_DEBUG in ('Y', 'C') THEN
1269: arp_standard.debug( 'arp_cr_icr_lines_pkg.nowaitlock_fetch_p()+' );
1270: END IF;
1270: END IF;
1271: --
1272: SELECT *
1273: INTO p_icr_lines_rec
1274: FROM ar_interim_cash_receipt_lines
1275: WHERE cash_receipt_line_id = p_icr_lines_rec.cash_receipt_line_id
1276: FOR UPDATE OF PAYMENT_AMOUNT NOWAIT;
1277: --
1278: IF PG_DEBUG in ('Y', 'C') THEN