[Home] [Help]
5: --
6: -- USE: Gets the credit card encryption mode setting
7: --
8: FUNCTION Get_CC_Encrypt_Mode
9: RETURN iby_sys_security_options.cc_encryption_mode%TYPE
10: IS
11: l_mode iby_sys_security_options.cc_encryption_mode%TYPE;
12: CURSOR c_encrypt_mode
13: IS
7: --
8: FUNCTION Get_CC_Encrypt_Mode
9: RETURN iby_sys_security_options.cc_encryption_mode%TYPE
10: IS
11: l_mode iby_sys_security_options.cc_encryption_mode%TYPE;
12: CURSOR c_encrypt_mode
13: IS
14: SELECT cc_encryption_mode
15: FROM iby_sys_security_options;
11: l_mode iby_sys_security_options.cc_encryption_mode%TYPE;
12: CURSOR c_encrypt_mode
13: IS
14: SELECT cc_encryption_mode
15: FROM iby_sys_security_options;
16: BEGIN
17: IF (c_encrypt_mode%ISOPEN) THEN CLOSE c_encrypt_mode; END IF;
18:
19: OPEN c_encrypt_mode;
198: --
199: -- USE: Gets credit card mask settings
200: --
201: PROCEDURE Get_Mask_Settings
202: (x_mask_setting OUT NOCOPY iby_sys_security_options.credit_card_mask_setting%TYPE,
203: x_unmask_len OUT NOCOPY iby_sys_security_options.credit_card_unmask_len%TYPE
204: )
205: IS
206:
199: -- USE: Gets credit card mask settings
200: --
201: PROCEDURE Get_Mask_Settings
202: (x_mask_setting OUT NOCOPY iby_sys_security_options.credit_card_mask_setting%TYPE,
203: x_unmask_len OUT NOCOPY iby_sys_security_options.credit_card_unmask_len%TYPE
204: )
205: IS
206:
207: CURSOR c_mask_setting
206:
207: CURSOR c_mask_setting
208: IS
209: SELECT credit_card_mask_setting, credit_card_unmask_len
210: FROM iby_sys_security_options;
211:
212: BEGIN
213: x_mask_setting := iby_security_pkg.G_MASK_PREFIX;
214:
243: --
244: PROCEDURE Mask_Card_Number
245: (p_cc_number IN iby_creditcard.ccnumber%TYPE,
246: x_masked_number OUT NOCOPY iby_creditcard.masked_cc_number%TYPE,
247: x_mask_setting OUT NOCOPY iby_sys_security_options.credit_card_mask_setting%TYPE,
248: x_unmask_len OUT NOCOPY iby_sys_security_options.credit_card_unmask_len%TYPE
249: )
250: IS
251: BEGIN
244: PROCEDURE Mask_Card_Number
245: (p_cc_number IN iby_creditcard.ccnumber%TYPE,
246: x_masked_number OUT NOCOPY iby_creditcard.masked_cc_number%TYPE,
247: x_mask_setting OUT NOCOPY iby_sys_security_options.credit_card_mask_setting%TYPE,
248: x_unmask_len OUT NOCOPY iby_sys_security_options.credit_card_unmask_len%TYPE
249: )
250: IS
251: BEGIN
252: Get_Mask_Settings(x_mask_setting,x_unmask_len);
258: RETURN iby_creditcard.masked_cc_number%TYPE
259: IS
260: lx_mask_option iby_creditcard.card_mask_setting%TYPE;
261: lx_mask_number iby_creditcard.masked_cc_number%TYPE;
262: lx_unmask_len iby_sys_security_options.credit_card_unmask_len%TYPE;
263: BEGIN
264: Mask_Card_Number(p_cc_number,lx_mask_number,lx_mask_option,lx_unmask_len);
265: RETURN lx_mask_number;
266: END Mask_Card_Number;
939: p_subkey_cipher IN iby_sys_security_subkeys.subkey_cipher_text%TYPE,
940: p_card_len IN iby_cc_issuer_ranges.card_number_length%TYPE,
941: p_cc_prefix IN iby_cc_issuer_ranges.card_number_prefix%TYPE,
942: p_digit_check IN iby_creditcard_issuers_b.digit_check_flag%TYPE,
943: p_mask_setting IN iby_sys_security_options.credit_card_mask_setting%TYPE,
944: p_unmask_len IN iby_sys_security_options.credit_card_unmask_len%TYPE,
945: p_unmask_digits IN iby_creditcard.masked_cc_number%TYPE
946: )
947: RETURN iby_creditcard.ccnumber%TYPE
940: p_card_len IN iby_cc_issuer_ranges.card_number_length%TYPE,
941: p_cc_prefix IN iby_cc_issuer_ranges.card_number_prefix%TYPE,
942: p_digit_check IN iby_creditcard_issuers_b.digit_check_flag%TYPE,
943: p_mask_setting IN iby_sys_security_options.credit_card_mask_setting%TYPE,
944: p_unmask_len IN iby_sys_security_options.credit_card_unmask_len%TYPE,
945: p_unmask_digits IN iby_creditcard.masked_cc_number%TYPE
946: )
947: RETURN iby_creditcard.ccnumber%TYPE
948: IS
1088: (p_commit IN VARCHAR2,
1089: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE
1090: )
1091: IS
1092: l_mode iby_sys_security_options.cc_encryption_mode%TYPE;
1093: lx_compress_cc iby_creditcard.ccnumber%TYPE;
1094: lx_mask_digits iby_creditcard.masked_cc_number%TYPE;
1095:
1096: l_subkey iby_security_pkg.DES3_KEY_TYPE;
1304: PROCEDURE Compress_CC_Number
1305: (p_card_number IN iby_creditcard.ccnumber%TYPE,
1306: p_prefix IN iby_cc_issuer_ranges.card_number_prefix%TYPE,
1307: p_digit_check IN iby_creditcard_issuers_b.digit_check_flag%TYPE,
1308: p_mask_setting IN iby_sys_security_options.credit_card_mask_setting%TYPE,
1309: p_unmask_len IN iby_sys_security_options.credit_card_unmask_len%TYPE,
1310: x_compress_num OUT NOCOPY iby_creditcard.ccnumber%TYPE,
1311: x_unmask_digits OUT NOCOPY iby_creditcard.masked_cc_number%TYPE
1312: )
1305: (p_card_number IN iby_creditcard.ccnumber%TYPE,
1306: p_prefix IN iby_cc_issuer_ranges.card_number_prefix%TYPE,
1307: p_digit_check IN iby_creditcard_issuers_b.digit_check_flag%TYPE,
1308: p_mask_setting IN iby_sys_security_options.credit_card_mask_setting%TYPE,
1309: p_unmask_len IN iby_sys_security_options.credit_card_unmask_len%TYPE,
1310: x_compress_num OUT NOCOPY iby_creditcard.ccnumber%TYPE,
1311: x_unmask_digits OUT NOCOPY iby_creditcard.masked_cc_number%TYPE
1312: )
1313: IS
1359: (p_card_number IN iby_creditcard.ccnumber%TYPE,
1360: p_card_length IN iby_creditcard.cc_number_length%TYPE,
1361: p_prefix IN iby_cc_issuer_ranges.card_number_prefix%TYPE,
1362: p_digit_check IN iby_creditcard_issuers_b.digit_check_flag%TYPE,
1363: p_mask_setting IN iby_sys_security_options.credit_card_mask_setting%TYPE,
1364: p_unmask_len IN iby_sys_security_options.credit_card_unmask_len%TYPE,
1365: p_unmask_digits IN iby_creditcard.masked_cc_number%TYPE
1366: )
1367: RETURN iby_creditcard.ccnumber%TYPE
1360: p_card_length IN iby_creditcard.cc_number_length%TYPE,
1361: p_prefix IN iby_cc_issuer_ranges.card_number_prefix%TYPE,
1362: p_digit_check IN iby_creditcard_issuers_b.digit_check_flag%TYPE,
1363: p_mask_setting IN iby_sys_security_options.credit_card_mask_setting%TYPE,
1364: p_unmask_len IN iby_sys_security_options.credit_card_unmask_len%TYPE,
1365: p_unmask_digits IN iby_creditcard.masked_cc_number%TYPE
1366: )
1367: RETURN iby_creditcard.ccnumber%TYPE
1368: IS
1424: FUNCTION Get_Compressed_Len
1425: (p_card_length IN iby_creditcard.cc_number_length%TYPE,
1426: p_prefix IN iby_cc_issuer_ranges.card_number_prefix%TYPE,
1427: p_digit_check IN iby_creditcard_issuers_b.digit_check_flag%TYPE,
1428: p_mask_setting IN iby_sys_security_options.credit_card_mask_setting%TYPE,
1429: p_unmask_len IN iby_sys_security_options.credit_card_unmask_len%TYPE
1430: )
1431: RETURN NUMBER
1432: IS
1425: (p_card_length IN iby_creditcard.cc_number_length%TYPE,
1426: p_prefix IN iby_cc_issuer_ranges.card_number_prefix%TYPE,
1427: p_digit_check IN iby_creditcard_issuers_b.digit_check_flag%TYPE,
1428: p_mask_setting IN iby_sys_security_options.credit_card_mask_setting%TYPE,
1429: p_unmask_len IN iby_sys_security_options.credit_card_unmask_len%TYPE
1430: )
1431: RETURN NUMBER
1432: IS
1433: l_compress_len iby_creditcard.ccnumber%TYPE;
1601: x_chname_segment_id OUT NOCOPY NUMBER,
1602: x_err_code OUT NOCOPY VARCHAR2
1603: ) IS
1604:
1605: l_mode iby_sys_security_options.instr_sec_code_encryption_mode%TYPE;
1606:
1607: BEGIN
1608: -- test_debug('Inside Encrypt_Card_Info.. ');
1609: l_mode := Get_CC_Encrypt_Mode;