27: l_message_name VARCHAR2(50);
28:
29: BEGIN
30: IF PG_DEBUG in ('Y', 'C') THEN
31: arp_standard.debug('raise_error: ' || 'arp_non_db_pkg.check_natural_application(1)+');
32: END IF;
33: arp_non_db_pkg.check_natural_application(
34: p_creation_sign,
35: p_allow_overapplication_flag,
48: THEN
49: arp_non_db_pkg.raise_error( l_message_name );
50: END IF;
51: IF PG_DEBUG in ('Y', 'C') THEN
52: arp_standard.debug('raise_error: ' || 'arp_non_db_pkg.check_natural_application(1)-');
53: END IF;
54:
55: EXCEPTION
56: WHEN OTHERS THEN
56: WHEN OTHERS THEN
57:
58: -- 12/5/1995 H.Kaukovuo Added debug statements for problem solving.
59: IF PG_DEBUG in ('Y', 'C') THEN
60: arp_standard.debug('-- ARP_NON_DB_PK.RAISE_ERROR: EXCEPTION');
61: arp_standard.debug('raise_error: ' || '-- Printing out NOCOPY package parameters:');
62: arp_standard.debug('raise_error: ' || '-- p_creation_sign = '||p_creation_sign);
63: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag = '||
64: p_allow_overapplication_flag);
57:
58: -- 12/5/1995 H.Kaukovuo Added debug statements for problem solving.
59: IF PG_DEBUG in ('Y', 'C') THEN
60: arp_standard.debug('-- ARP_NON_DB_PK.RAISE_ERROR: EXCEPTION');
61: arp_standard.debug('raise_error: ' || '-- Printing out NOCOPY package parameters:');
62: arp_standard.debug('raise_error: ' || '-- p_creation_sign = '||p_creation_sign);
63: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag = '||
64: p_allow_overapplication_flag);
65: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag = '||
58: -- 12/5/1995 H.Kaukovuo Added debug statements for problem solving.
59: IF PG_DEBUG in ('Y', 'C') THEN
60: arp_standard.debug('-- ARP_NON_DB_PK.RAISE_ERROR: EXCEPTION');
61: arp_standard.debug('raise_error: ' || '-- Printing out NOCOPY package parameters:');
62: arp_standard.debug('raise_error: ' || '-- p_creation_sign = '||p_creation_sign);
63: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag = '||
64: p_allow_overapplication_flag);
65: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag = '||
66: p_natural_app_only_flag);
59: IF PG_DEBUG in ('Y', 'C') THEN
60: arp_standard.debug('-- ARP_NON_DB_PK.RAISE_ERROR: EXCEPTION');
61: arp_standard.debug('raise_error: ' || '-- Printing out NOCOPY package parameters:');
62: arp_standard.debug('raise_error: ' || '-- p_creation_sign = '||p_creation_sign);
63: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag = '||
64: p_allow_overapplication_flag);
65: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag = '||
66: p_natural_app_only_flag);
67: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps = '||p_sign_of_ps);
61: arp_standard.debug('raise_error: ' || '-- Printing out NOCOPY package parameters:');
62: arp_standard.debug('raise_error: ' || '-- p_creation_sign = '||p_creation_sign);
63: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag = '||
64: p_allow_overapplication_flag);
65: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag = '||
66: p_natural_app_only_flag);
67: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps = '||p_sign_of_ps);
68: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero = '||p_chk_overapp_if_zero);
69: arp_standard.debug('raise_error: ' || '-- p_payment_amount = '||to_char(p_payment_amount));
63: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag = '||
64: p_allow_overapplication_flag);
65: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag = '||
66: p_natural_app_only_flag);
67: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps = '||p_sign_of_ps);
68: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero = '||p_chk_overapp_if_zero);
69: arp_standard.debug('raise_error: ' || '-- p_payment_amount = '||to_char(p_payment_amount));
70: arp_standard.debug('raise_error: ' || '-- p_discount_taken = '||to_char(p_discount_taken));
71: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining = '||
64: p_allow_overapplication_flag);
65: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag = '||
66: p_natural_app_only_flag);
67: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps = '||p_sign_of_ps);
68: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero = '||p_chk_overapp_if_zero);
69: arp_standard.debug('raise_error: ' || '-- p_payment_amount = '||to_char(p_payment_amount));
70: arp_standard.debug('raise_error: ' || '-- p_discount_taken = '||to_char(p_discount_taken));
71: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining = '||
72: to_char(p_amount_due_remaining));
65: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag = '||
66: p_natural_app_only_flag);
67: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps = '||p_sign_of_ps);
68: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero = '||p_chk_overapp_if_zero);
69: arp_standard.debug('raise_error: ' || '-- p_payment_amount = '||to_char(p_payment_amount));
70: arp_standard.debug('raise_error: ' || '-- p_discount_taken = '||to_char(p_discount_taken));
71: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining = '||
72: to_char(p_amount_due_remaining));
73: arp_standard.debug('raise_error: ' || '-- p_amount_due_original = '||
66: p_natural_app_only_flag);
67: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps = '||p_sign_of_ps);
68: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero = '||p_chk_overapp_if_zero);
69: arp_standard.debug('raise_error: ' || '-- p_payment_amount = '||to_char(p_payment_amount));
70: arp_standard.debug('raise_error: ' || '-- p_discount_taken = '||to_char(p_discount_taken));
71: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining = '||
72: to_char(p_amount_due_remaining));
73: arp_standard.debug('raise_error: ' || '-- p_amount_due_original = '||
74: to_char(p_amount_due_original));
67: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps = '||p_sign_of_ps);
68: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero = '||p_chk_overapp_if_zero);
69: arp_standard.debug('raise_error: ' || '-- p_payment_amount = '||to_char(p_payment_amount));
70: arp_standard.debug('raise_error: ' || '-- p_discount_taken = '||to_char(p_discount_taken));
71: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining = '||
72: to_char(p_amount_due_remaining));
73: arp_standard.debug('raise_error: ' || '-- p_amount_due_original = '||
74: to_char(p_amount_due_original));
75: arp_standard.debug('raise_error: ' || '-- event = '||event);
69: arp_standard.debug('raise_error: ' || '-- p_payment_amount = '||to_char(p_payment_amount));
70: arp_standard.debug('raise_error: ' || '-- p_discount_taken = '||to_char(p_discount_taken));
71: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining = '||
72: to_char(p_amount_due_remaining));
73: arp_standard.debug('raise_error: ' || '-- p_amount_due_original = '||
74: to_char(p_amount_due_original));
75: arp_standard.debug('raise_error: ' || '-- event = '||event);
76: END IF;
77: RAISE;
71: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining = '||
72: to_char(p_amount_due_remaining));
73: arp_standard.debug('raise_error: ' || '-- p_amount_due_original = '||
74: to_char(p_amount_due_original));
75: arp_standard.debug('raise_error: ' || '-- event = '||event);
76: END IF;
77: RAISE;
78:
79: END;
99: l_message_name VARCHAR2(50); /*Bug 3842116*/
100:
101: BEGIN
102: IF PG_DEBUG in ('Y', 'C') THEN
103: arp_standard.debug('raise_error: ' || 'arp_non_db_pkg.check_natural_application(2)+');
104: END IF;
105:
106: p_message_name := NULL;
107:
113: -- +----------------------------------------------------------+
114: -- | This is for debug purposes. Comment out NOCOPY when not needed. |
115: -- +----------------------------------------------------------+
116: IF PG_DEBUG in ('Y', 'C') THEN
117: arp_standard.debug('raise_error: ' || '-- p_creation_sign ='||p_creation_sign);
118: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag ='||
119: p_allow_overapplication_flag);
120: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag ='||
121: p_natural_app_only_flag);
114: -- | This is for debug purposes. Comment out NOCOPY when not needed. |
115: -- +----------------------------------------------------------+
116: IF PG_DEBUG in ('Y', 'C') THEN
117: arp_standard.debug('raise_error: ' || '-- p_creation_sign ='||p_creation_sign);
118: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag ='||
119: p_allow_overapplication_flag);
120: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag ='||
121: p_natural_app_only_flag);
122: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps ='||p_sign_of_ps);
116: IF PG_DEBUG in ('Y', 'C') THEN
117: arp_standard.debug('raise_error: ' || '-- p_creation_sign ='||p_creation_sign);
118: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag ='||
119: p_allow_overapplication_flag);
120: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag ='||
121: p_natural_app_only_flag);
122: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps ='||p_sign_of_ps);
123: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero ='||p_chk_overapp_if_zero);
124: arp_standard.debug('raise_error: ' || '-- p_payment_amount ='||to_char(p_payment_amount));
118: arp_standard.debug('raise_error: ' || '-- p_allow_overapplication_flag ='||
119: p_allow_overapplication_flag);
120: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag ='||
121: p_natural_app_only_flag);
122: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps ='||p_sign_of_ps);
123: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero ='||p_chk_overapp_if_zero);
124: arp_standard.debug('raise_error: ' || '-- p_payment_amount ='||to_char(p_payment_amount));
125: arp_standard.debug('raise_error: ' || '-- p_discount_taken ='||to_char(p_discount_taken));
126: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining='||
119: p_allow_overapplication_flag);
120: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag ='||
121: p_natural_app_only_flag);
122: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps ='||p_sign_of_ps);
123: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero ='||p_chk_overapp_if_zero);
124: arp_standard.debug('raise_error: ' || '-- p_payment_amount ='||to_char(p_payment_amount));
125: arp_standard.debug('raise_error: ' || '-- p_discount_taken ='||to_char(p_discount_taken));
126: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining='||
127: to_char(p_amount_due_remaining));
120: arp_standard.debug('raise_error: ' || '-- p_natural_app_only_flag ='||
121: p_natural_app_only_flag);
122: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps ='||p_sign_of_ps);
123: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero ='||p_chk_overapp_if_zero);
124: arp_standard.debug('raise_error: ' || '-- p_payment_amount ='||to_char(p_payment_amount));
125: arp_standard.debug('raise_error: ' || '-- p_discount_taken ='||to_char(p_discount_taken));
126: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining='||
127: to_char(p_amount_due_remaining));
128: arp_standard.debug('raise_error: ' || '-- p_amount_due_original='||
121: p_natural_app_only_flag);
122: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps ='||p_sign_of_ps);
123: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero ='||p_chk_overapp_if_zero);
124: arp_standard.debug('raise_error: ' || '-- p_payment_amount ='||to_char(p_payment_amount));
125: arp_standard.debug('raise_error: ' || '-- p_discount_taken ='||to_char(p_discount_taken));
126: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining='||
127: to_char(p_amount_due_remaining));
128: arp_standard.debug('raise_error: ' || '-- p_amount_due_original='||
129: to_char(p_amount_due_original));
122: arp_standard.debug('raise_error: ' || '-- p_sign_of_ps ='||p_sign_of_ps);
123: arp_standard.debug('raise_error: ' || '-- p_chk_overapp_if_zero ='||p_chk_overapp_if_zero);
124: arp_standard.debug('raise_error: ' || '-- p_payment_amount ='||to_char(p_payment_amount));
125: arp_standard.debug('raise_error: ' || '-- p_discount_taken ='||to_char(p_discount_taken));
126: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining='||
127: to_char(p_amount_due_remaining));
128: arp_standard.debug('raise_error: ' || '-- p_amount_due_original='||
129: to_char(p_amount_due_original));
130: arp_standard.debug('raise_error: ' || '-- event ='||event);
124: arp_standard.debug('raise_error: ' || '-- p_payment_amount ='||to_char(p_payment_amount));
125: arp_standard.debug('raise_error: ' || '-- p_discount_taken ='||to_char(p_discount_taken));
126: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining='||
127: to_char(p_amount_due_remaining));
128: arp_standard.debug('raise_error: ' || '-- p_amount_due_original='||
129: to_char(p_amount_due_original));
130: arp_standard.debug('raise_error: ' || '-- event ='||event);
131: END IF;
132: END IF;
126: arp_standard.debug('raise_error: ' || '-- p_amount_due_remaining='||
127: to_char(p_amount_due_remaining));
128: arp_standard.debug('raise_error: ' || '-- p_amount_due_original='||
129: to_char(p_amount_due_original));
130: arp_standard.debug('raise_error: ' || '-- event ='||event);
131: END IF;
132: END IF;
133:
134: /*----------------------------+
134: /*----------------------------+
135: | Checking out NOCOPY the parameters |
136: +----------------------------*/
137: IF PG_DEBUG in ('Y', 'C') THEN
138: arp_standard.debug('raise_error: ' || '-- Checking out NOCOPY the parameters');
139: END IF;
140: IF ( p_creation_sign IS NULL ) THEN
141: p_message_name := 'AR_CKAP_CRE_SIGN_NULL';
142:
173: -- IF amount_due_remaining is not zero, Use the sign of ADR
174: -- as the sign of payment schedule.
175: --
176: IF PG_DEBUG in ('Y', 'C') THEN
177: arp_standard.debug('raise_error: ' || '-- Checking amount due remaining');
178: END IF;
179:
180: IF ( NVL( p_amount_due_remaining, 0 ) < 0 ) THEN
181: l_sign_value_of_ps:= -1;
249: END IF;
250: END IF;
251:
252: IF PG_DEBUG in ('Y', 'C') THEN
253: arp_standard.debug('raise_error: ' || 'arp_non_db_pkg.check_natural_application(2)-'|| p_message_name);
254: END IF;
255:
256: END check_natural_application;
257:
262: event IN VARCHAR2,
263: p_message_name OUT NOCOPY VARCHAR2) IS
264: BEGIN
265: IF PG_DEBUG in ('Y', 'C') THEN
266: arp_standard.debug('raise_error: ' || 'arp_non_db_pkg.check_creation_sign(1)+');
267: END IF;
268: p_message_name := NULL;
269:
270: IF ( p_creation_sign = 'A' ) THEN
280: ELSE
281: p_message_name := 'AR_CKAP_INV_CT_SIGN';
282: END IF;
283: IF PG_DEBUG in ('Y', 'C') THEN
284: arp_standard.debug('raise_error: ' || 'arp_non_db_pkg.check_creation_sign(1)-');
285: END IF;
286: END check_creation_sign;
287:
288:
294: l_message_name VARCHAR2(50);
295:
296: BEGIN
297: IF PG_DEBUG in ('Y', 'C') THEN
298: arp_standard.debug('raise_error: ' || 'arp_non_db_pkg.check_creation_sign(2)+');
299: END IF;
300: check_creation_sign(
301: p_creation_sign,
302: p_amount,
308: arp_non_db_pkg.raise_error(l_message_name);
309: END IF;
310:
311: IF PG_DEBUG in ('Y', 'C') THEN
312: arp_standard.debug('raise_error: ' || 'arp_non_db_pkg.check_creation_sign(2)-');
313: END IF;
314: END check_creation_sign;
315:
316: