137: l_actual_cc_check_digit number := 0; /* First digit of credit card, numbered from right to left */
138: l_mod10_check_digit number := 0; /* Check digit after mod10 algorithm is applied */
139: j number := 0; /* Product table index */
140: BEGIN
141: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()+0');
142:
143: SELECT lengthb(p_credit_card_number)
144: INTO l_len_credit_card_num
145: FROM dual;
182:
183: -- If actual check digit and check_digit after mod10 don't match, the credit card is an invalid one.
184: IF ( l_mod10_check_digit <> l_actual_cc_check_digit)
185: THEN
186: arp_util.debug('Card is Valid');
187: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
188: return(0);
189: ELSE
190: arp_util.debug('Card is not Valid');
183: -- If actual check digit and check_digit after mod10 don't match, the credit card is an invalid one.
184: IF ( l_mod10_check_digit <> l_actual_cc_check_digit)
185: THEN
186: arp_util.debug('Card is Valid');
187: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
188: return(0);
189: ELSE
190: arp_util.debug('Card is not Valid');
191: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
186: arp_util.debug('Card is Valid');
187: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
188: return(0);
189: ELSE
190: arp_util.debug('Card is not Valid');
191: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
192: return(1);
193: END IF;
194:
187: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
188: return(0);
189: ELSE
190: arp_util.debug('Card is not Valid');
191: arp_util.debug('ar_irec_payments_pkg.is_credit_card_number_valid()-');
192: return(1);
193: END IF;
194:
195: END is_credit_card_number_valid;
2083: | |
2084: | SCOPE - PUBLIC |
2085: | |
2086: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
2087: | arp_util.debug |
2088: | |
2089: | ARGUMENTS : IN: p_message - Message to be writted |
2090: | |
2091: | RETURNS : NONE |
2136: | |
2137: | SCOPE - PUBLIC |
2138: | |
2139: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
2140: | arp_util.debug |
2141: | |
2142: | ARGUMENTS : IN: p_msg_count - Number of messages from the API |
2143: | p_msg_data - Actual messages from the API |
2144: | |