eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IBY_CREDITCARD_PKG dependencies on IBY_SECURITY_PKG

Line 120: iby_security_pkg.validate_sys_key(p_sec_key,l_keyvalid);

116: l_encrypted_count NUMBER := 0;
117: l_keyvalid VARCHAR2(100) := NULL;
118: BEGIN
119:
120: iby_security_pkg.validate_sys_key(p_sec_key,l_keyvalid);
121:
122: IF (NOT l_keyvalid IS NULL) THEN
123: SELECT count(instrid)
124: INTO l_encrypted_count

Line 213: x_mask_setting := iby_security_pkg.G_MASK_PREFIX;

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:
215: IF (c_mask_setting%ISOPEN) THEN CLOSE c_mask_setting; END IF;
216:
217: OPEN c_mask_setting;

Line 222: x_mask_setting := iby_security_pkg.G_MASK_PREFIX;

218: FETCH c_mask_setting INTO x_mask_setting, x_unmask_len;
219: CLOSE c_mask_setting;
220:
221: IF (x_mask_setting IS NULL) THEN
222: x_mask_setting := iby_security_pkg.G_MASK_PREFIX;
223: END IF;
224: IF (x_unmask_len IS NULL) THEN
225: x_unmask_len := G_DEF_UNMASK_LENGTH;
226: END IF;

Line 237: RETURN iby_security_pkg.Mask_Data

233: )
234: RETURN iby_creditcard.masked_cc_number%TYPE
235: IS
236: BEGIN
237: RETURN iby_security_pkg.Mask_Data
238: (p_cc_number,p_mask_option,p_unmask_len,G_MASK_CHARACTER);
239: END Mask_Card_Number;
240:
241: --

Line 290: p_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE,

286: p_purpose IN iby_creditcard.card_purpose%TYPE,
287: p_desc IN iby_creditcard.description%TYPE,
288: p_active_flag IN iby_creditcard.active_flag%TYPE,
289: p_inactive_date IN iby_creditcard.inactive_date%TYPE,
290: p_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE,
291: p_attribute_category IN iby_creditcard.attribute_category%TYPE,
292: p_attribute1 IN iby_creditcard.attribute1%TYPE,
293: p_attribute2 IN iby_creditcard.attribute2%TYPE,
294: p_attribute3 IN iby_creditcard.attribute3%TYPE,

Line 454: l_cc_hash1 := iby_security_pkg.get_hash(lx_cc_number,'F');

450: l_card_len := LENGTH(lx_cc_number);
451: END IF;
452:
453: Mask_Card_Number(lx_cc_number,lx_masked_number,lx_mask_option,lx_unmask_len);
454: l_cc_hash1 := iby_security_pkg.get_hash(lx_cc_number,'F');
455: -- get hash value for a salted version of the card number
456: l_cc_hash2 := iby_security_pkg.get_hash(lx_cc_number,'T');
457:
458: -- Bug 5153265 start

Line 456: l_cc_hash2 := iby_security_pkg.get_hash(lx_cc_number,'T');

452:
453: Mask_Card_Number(lx_cc_number,lx_masked_number,lx_mask_option,lx_unmask_len);
454: l_cc_hash1 := iby_security_pkg.get_hash(lx_cc_number,'F');
455: -- get hash value for a salted version of the card number
456: l_cc_hash2 := iby_security_pkg.get_hash(lx_cc_number,'T');
457:
458: -- Bug 5153265 start
459: -- If Site use id is already provied then no need to call get_billing address
460: IF (p_address_type = G_PARTY_SITE_USE_ID) AND (NOT (p_billing_address_id IS NULL)) THEN

Line 500: iby_security_pkg.validate_sys_key(p_sys_sec_key,l_keyvalid);

496: IF (NOT x_instr_id IS NULL) THEN RETURN; END IF;
497:
498: IF (NOT p_sys_sec_key IS NULL) THEN
499: -- check the system key
500: iby_security_pkg.validate_sys_key(p_sys_sec_key,l_keyvalid);
501:
502: IF (NOT l_keyvalid IS NULL) THEN
503: x_result_code := 'INVALID_SEC_KEY';
504: RETURN;

Line 514: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_cc_compressed,TRUE));

510: lx_unmask_len,lx_cc_compressed,lx_unmasked_digits);
511:
512: IF (NOT lx_cc_compressed IS NULL) THEN
513: l_cc_ciphertext :=
514: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_cc_compressed,TRUE));
515: IBY_SECURITY_PKG.Create_Segment
516: (FND_API.G_FALSE,l_cc_ciphertext,iby_security_pkg.G_ENCODING_NUMERIC,
517: p_sys_sec_key,lx_sec_segment_id);
518: END IF;

Line 515: IBY_SECURITY_PKG.Create_Segment

511:
512: IF (NOT lx_cc_compressed IS NULL) THEN
513: l_cc_ciphertext :=
514: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_cc_compressed,TRUE));
515: IBY_SECURITY_PKG.Create_Segment
516: (FND_API.G_FALSE,l_cc_ciphertext,iby_security_pkg.G_ENCODING_NUMERIC,
517: p_sys_sec_key,lx_sec_segment_id);
518: END IF;
519:

Line 516: (FND_API.G_FALSE,l_cc_ciphertext,iby_security_pkg.G_ENCODING_NUMERIC,

512: IF (NOT lx_cc_compressed IS NULL) THEN
513: l_cc_ciphertext :=
514: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_cc_compressed,TRUE));
515: IBY_SECURITY_PKG.Create_Segment
516: (FND_API.G_FALSE,l_cc_ciphertext,iby_security_pkg.G_ENCODING_NUMERIC,
517: p_sys_sec_key,lx_sec_segment_id);
518: END IF;
519:
520: lx_cc_number := NVL(lx_unmasked_digits,'0');

Line 526: IBY_SECURITY_PKG.encrypt_field_vals(p_holder_name,

522: --now need to encrypt the other card holder data
523: --i.e, CHNAME and EXPDATE for now.
524: IF(Other_CC_Attribs_Encrypted = 'Y') THEN
525: l_chname_sec_segment_id :=
526: IBY_SECURITY_PKG.encrypt_field_vals(p_holder_name,
527: p_sys_sec_key,
528: null,
529: 'N'
530: );

Line 532: IBY_SECURITY_PKG.encrypt_date_field(l_expiry_date,

528: null,
529: 'N'
530: );
531: l_expdate_sec_segment_id :=
532: IBY_SECURITY_PKG.encrypt_date_field(l_expiry_date,
533: p_sys_sec_key,
534: null,
535: 'N'
536: );

Line 538: IBY_SECURITY_PKG.Mask_Data(p_holder_name,

534: null,
535: 'N'
536: );
537: l_masked_chname :=
538: IBY_SECURITY_PKG.Mask_Data(p_holder_name,
539: IBY_SECURITY_PKG.G_MASK_ALL,
540: 0,
541: 'X'
542: );

Line 539: IBY_SECURITY_PKG.G_MASK_ALL,

535: 'N'
536: );
537: l_masked_chname :=
538: IBY_SECURITY_PKG.Mask_Data(p_holder_name,
539: IBY_SECURITY_PKG.G_MASK_ALL,
540: 0,
541: 'X'
542: );
543:

Line 606: -- iby_security_pkg.get_salt_version bug 6326624

602: p_attribute11,p_attribute12,p_attribute13,p_attribute14,p_attribute15,
603: p_attribute16,p_attribute17, p_attribute18,p_attribute19,p_attribute20,
604: p_attribute21,p_attribute22, p_attribute23,p_attribute24,p_attribute25,
605: p_attribute26,p_attribute27, p_attribute28,p_attribute29,p_attribute30
606: -- iby_security_pkg.get_salt_version bug 6326624
607: );
608:
609: IF FND_API.To_Boolean(p_commit) THEN
610: COMMIT;

Line 757: IF (Get_CC_Encrypt_Mode <> IBY_SECURITY_PKG.G_ENCRYPT_MODE_NONE

753:
754: -- Need to encrypt the sensitive data only if the record was
755: -- previously encrypted and of course the encryption mode
756: -- shouldn't be NONE
757: IF (Get_CC_Encrypt_Mode <> IBY_SECURITY_PKG.G_ENCRYPT_MODE_NONE
758: AND l_encrypted = 'Y'
759: AND Other_CC_Attribs_Encrypted = 'Y') THEN
760:
761: l_encrypted := 'Y';

Line 775: IBY_SECURITY_PKG.Mask_Data(p_holder_name,

771: l_chname_sec_segment_id := l_resp_rec.ChnameSegmentId;
772: l_expdate_sec_segment_id := l_resp_rec.ExpiryDateSegmentId;
773:
774: l_masked_chname :=
775: IBY_SECURITY_PKG.Mask_Data(p_holder_name,
776: IBY_SECURITY_PKG.G_MASK_ALL,
777: 0,
778: 'X'
779: );

Line 776: IBY_SECURITY_PKG.G_MASK_ALL,

772: l_expdate_sec_segment_id := l_resp_rec.ExpiryDateSegmentId;
773:
774: l_masked_chname :=
775: IBY_SECURITY_PKG.Mask_Data(p_holder_name,
776: IBY_SECURITY_PKG.G_MASK_ALL,
777: 0,
778: 'X'
779: );
780:

Line 873: p_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE

869: END Update_Card;
870:
871: FUNCTION uncipher_ccnumber
872: (p_instrid IN iby_creditcard.instrid%TYPE,
873: p_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE
874: )
875: RETURN iby_creditcard.ccnumber%TYPE
876: IS
877: l_cc_number iby_creditcard.ccnumber%TYPE;

Line 922: iby_security_pkg.validate_sys_key(p_sys_sec_key,l_keyvalid);

918: raise_application_error(-20000, 'IBY_20512#', FALSE);
919: END IF;
920:
921: IF (l_encrypted = 'Y') THEN
922: iby_security_pkg.validate_sys_key(p_sys_sec_key,l_keyvalid);
923: IF (NOT l_keyvalid IS NULL) THEN
924: raise_application_error(-20000,'IBY_10008#INSTRID='||p_instrid, FALSE);
925: END IF;
926: END IF;

Line 938: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE,

934: FUNCTION uncipher_ccnumber
935: (p_cc_number IN iby_creditcard.ccnumber%TYPE,
936: p_segment_cipher IN iby_security_segments.segment_cipher_text%TYPE,
937: p_encrypted IN iby_creditcard.encrypted%TYPE,
938: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE,
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,

Line 949: l_sub_key iby_security_pkg.DES3_KEY_TYPE;

945: p_unmask_digits IN iby_creditcard.masked_cc_number%TYPE
946: )
947: RETURN iby_creditcard.ccnumber%TYPE
948: IS
949: l_sub_key iby_security_pkg.DES3_KEY_TYPE;
950: l_segment_raw iby_security_segments.segment_cipher_text%TYPE;
951: l_cc_number iby_creditcard.ccnumber%TYPE;
952: l_compress_len NUMBER;
953: BEGIN

Line 963: iby_security_pkg.get_sys_subkey(p_sys_key,p_subkey_cipher);

959: IF (p_encrypted = 'Y') THEN
960: IF (l_compress_len > 0) THEN
961: -- uncipher the subkey
962: l_sub_key :=
963: iby_security_pkg.get_sys_subkey(p_sys_key,p_subkey_cipher);
964:
965: l_segment_raw :=
966: dbms_obfuscation_toolkit.des3decrypt
967: ( input => p_segment_cipher , key => l_sub_key,

Line 971: l_cc_number := iby_security_pkg.Decode_Number

967: ( input => p_segment_cipher , key => l_sub_key,
968: which => dbms_obfuscation_toolkit.ThreeKeyMode
969: );
970:
971: l_cc_number := iby_security_pkg.Decode_Number
972: (l_segment_raw,l_compress_len,TRUE);
973: END IF;
974:
975: -- finally, uncompress the card number

Line 986: i_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE)

982: END uncipher_ccnumber;
983:
984: FUNCTION uncipher_ccnumber_ui_wrp
985: (i_instrid IN iby_creditcard.instrid%TYPE,
986: i_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE)
987: RETURN iby_creditcard.ccnumber%TYPE
988: IS
989: BEGIN
990: RETURN uncipher_ccnumber(i_instrid, i_sys_sec_key);

Line 998: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE

994: END uncipher_ccnumber_ui_wrp;
995:
996: PROCEDURE Decrypt_Instruments
997: (p_commit IN VARCHAR2,
998: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE
999: )
1000: IS
1001: l_cc_number iby_creditcard.ccnumber%TYPE;
1002:

Line 1040: l_exp_date := IBY_SECURITY_PKG.decrypt_date_field

1036: c_card_rec.card_unmask_length, c_card_rec.unmask_digits
1037: );
1038:
1039: IF (c_card_rec.expiry_sec_segment_id IS NOT NULL) THEN
1040: l_exp_date := IBY_SECURITY_PKG.decrypt_date_field
1041: (c_card_rec.expiry_sec_segment_id,
1042: p_sys_key
1043: );
1044: ELSE

Line 1050: l_chname := IBY_SECURITY_PKG.decrypt_field_vals

1046: l_exp_date := c_card_rec.expirydate;
1047: END IF;
1048:
1049: IF(c_card_rec.chname_sec_segment_id IS NOT NULL) THEN
1050: l_chname := IBY_SECURITY_PKG.decrypt_field_vals
1051: (c_card_rec.chname_sec_segment_id,
1052: p_sys_key
1053: );
1054: ELSE

Line 1089: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE

1085: END Decrypt_Instruments;
1086:
1087: PROCEDURE Encrypt_Instruments
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;

Line 1096: l_subkey iby_security_pkg.DES3_KEY_TYPE;

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;
1097: l_segment_id iby_security_segments.sec_segment_id%TYPE;
1098: l_cc_ciphertext iby_security_segments.segment_cipher_text%TYPE;
1099:
1100: -- variabled for CHNAME and EXPDATE encryption

Line 1123: IF (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE) THEN

1119: AND (seg.sec_subkey_id = k.sec_subkey_id(+));
1120: BEGIN
1121:
1122: l_mode := Get_CC_Encrypt_Mode();
1123: IF (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE) THEN
1124: RETURN;
1125: END IF;
1126:
1127: check_key(p_sys_key);

Line 1138: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_compress_cc,TRUE));

1134: lx_compress_cc, lx_mask_digits);
1135:
1136: IF (NVL(LENGTH(lx_compress_cc),0) > 0) THEN
1137: l_cc_ciphertext :=
1138: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_compress_cc,TRUE));
1139:
1140: IBY_SECURITY_PKG.Create_Segment
1141: (FND_API.G_FALSE,l_cc_ciphertext,iby_security_pkg.G_ENCODING_NUMERIC,
1142: p_sys_key,l_segment_id);

Line 1140: IBY_SECURITY_PKG.Create_Segment

1136: IF (NVL(LENGTH(lx_compress_cc),0) > 0) THEN
1137: l_cc_ciphertext :=
1138: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_compress_cc,TRUE));
1139:
1140: IBY_SECURITY_PKG.Create_Segment
1141: (FND_API.G_FALSE,l_cc_ciphertext,iby_security_pkg.G_ENCODING_NUMERIC,
1142: p_sys_key,l_segment_id);
1143: ELSE
1144: l_segment_id := -1;

Line 1141: (FND_API.G_FALSE,l_cc_ciphertext,iby_security_pkg.G_ENCODING_NUMERIC,

1137: l_cc_ciphertext :=
1138: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_compress_cc,TRUE));
1139:
1140: IBY_SECURITY_PKG.Create_Segment
1141: (FND_API.G_FALSE,l_cc_ciphertext,iby_security_pkg.G_ENCODING_NUMERIC,
1142: p_sys_key,l_segment_id);
1143: ELSE
1144: l_segment_id := -1;
1145: END IF;

Line 1152: IBY_SECURITY_PKG.encrypt_field_vals(c_card_rec.chname,

1148: --now need to encrypt the other card holder data
1149: --i.e, CHNAME and EXPDATE for now.
1150: IF(Other_CC_Attribs_Encrypted = 'Y') THEN
1151: l_chname_sec_segment_id :=
1152: IBY_SECURITY_PKG.encrypt_field_vals(c_card_rec.chname,
1153: p_sys_key,
1154: null,
1155: 'N'
1156: );

Line 1158: IBY_SECURITY_PKG.encrypt_date_field(c_card_rec.expirydate,

1154: null,
1155: 'N'
1156: );
1157: l_expdate_sec_segment_id :=
1158: IBY_SECURITY_PKG.encrypt_date_field(c_card_rec.expirydate,
1159: p_sys_key,
1160: null,
1161: 'N'
1162: );

Line 1165: IBY_SECURITY_PKG.Mask_Data(c_card_rec.chname,

1161: 'N'
1162: );
1163:
1164: l_masked_chname :=
1165: IBY_SECURITY_PKG.Mask_Data(c_card_rec.chname,
1166: IBY_SECURITY_PKG.G_MASK_ALL,
1167: 0,
1168: 'X'
1169: );

Line 1166: IBY_SECURITY_PKG.G_MASK_ALL,

1162: );
1163:
1164: l_masked_chname :=
1165: IBY_SECURITY_PKG.Mask_Data(c_card_rec.chname,
1166: IBY_SECURITY_PKG.G_MASK_ALL,
1167: 0,
1168: 'X'
1169: );
1170: ELSE

Line 1201: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE

1197: END Encrypt_Instruments;
1198:
1199: PROCEDURE Remask_Instruments
1200: (p_commit IN VARCHAR2 := FND_API.G_TRUE,
1201: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE
1202: )
1203: IS
1204: l_cc_number iby_creditcard.ccnumber%TYPE;
1205: lx_compress_cc iby_creditcard.ccnumber%TYPE;

Line 1267: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_compress_cc,TRUE));

1263: -- the mask or card issuer range
1264: --
1265: IF (NVL(LENGTH(lx_compress_cc),0) > 0) THEN
1266: l_cc_ciphertext :=
1267: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_compress_cc,TRUE));
1268: IF (lx_segment_id IS NULL) THEN
1269: IBY_SECURITY_PKG.Create_Segment
1270: (FND_API.G_FALSE,l_cc_ciphertext,
1271: iby_security_pkg.G_ENCODING_NUMERIC,

Line 1269: IBY_SECURITY_PKG.Create_Segment

1265: IF (NVL(LENGTH(lx_compress_cc),0) > 0) THEN
1266: l_cc_ciphertext :=
1267: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_compress_cc,TRUE));
1268: IF (lx_segment_id IS NULL) THEN
1269: IBY_SECURITY_PKG.Create_Segment
1270: (FND_API.G_FALSE,l_cc_ciphertext,
1271: iby_security_pkg.G_ENCODING_NUMERIC,
1272: p_sys_key,lx_segment_id);
1273: ELSE

Line 1271: iby_security_pkg.G_ENCODING_NUMERIC,

1267: HEXTORAW(IBY_SECURITY_PKG.Encode_Number(lx_compress_cc,TRUE));
1268: IF (lx_segment_id IS NULL) THEN
1269: IBY_SECURITY_PKG.Create_Segment
1270: (FND_API.G_FALSE,l_cc_ciphertext,
1271: iby_security_pkg.G_ENCODING_NUMERIC,
1272: p_sys_key,lx_segment_id);
1273: ELSE
1274: IBY_SECURITY_PKG.Update_Segment
1275: (FND_API.G_FALSE,lx_segment_id,l_cc_ciphertext,

Line 1274: IBY_SECURITY_PKG.Update_Segment

1270: (FND_API.G_FALSE,l_cc_ciphertext,
1271: iby_security_pkg.G_ENCODING_NUMERIC,
1272: p_sys_key,lx_segment_id);
1273: ELSE
1274: IBY_SECURITY_PKG.Update_Segment
1275: (FND_API.G_FALSE,lx_segment_id,l_cc_ciphertext,
1276: iby_security_pkg.G_ENCODING_NUMERIC,
1277: p_sys_key,c_card_rec.subkey_cipher_text);
1278: END IF;

Line 1276: iby_security_pkg.G_ENCODING_NUMERIC,

1272: p_sys_key,lx_segment_id);
1273: ELSE
1274: IBY_SECURITY_PKG.Update_Segment
1275: (FND_API.G_FALSE,lx_segment_id,l_cc_ciphertext,
1276: iby_security_pkg.G_ENCODING_NUMERIC,
1277: p_sys_key,c_card_rec.subkey_cipher_text);
1278: END IF;
1279: ELSE
1280: DELETE iby_security_segments WHERE (sec_segment_id = lx_segment_id);

Line 1321: iby_security_pkg.Get_Unmasked_Data

1317: l_substr_stop NUMBER;
1318: BEGIN
1319:
1320: x_unmask_digits :=
1321: iby_security_pkg.Get_Unmasked_Data
1322: (p_card_number,p_mask_setting,p_unmask_len);
1323: l_unmask_len := NVL(LENGTH(x_unmask_digits),0);
1324:
1325: -- all digits exposed; compressed number is trivial

Line 1331: IF ( (p_mask_setting = iby_security_pkg.G_MASK_POSTFIX)

1327: x_compress_num := NULL;
1328: RETURN;
1329: END IF;
1330:
1331: IF ( (p_mask_setting = iby_security_pkg.G_MASK_POSTFIX)
1332: AND (p_unmask_len > NVL(LENGTH(p_prefix),0))
1333: )
1334: THEN
1335: l_substr_start := l_unmask_len + 1;

Line 1340: IF (p_mask_setting = iby_security_pkg.G_MASK_PREFIX)

1336: ELSE
1337: l_substr_start := 1 + NVL(LENGTH(p_prefix),0);
1338: END IF;
1339:
1340: IF (p_mask_setting = iby_security_pkg.G_MASK_PREFIX)
1341: AND (p_unmask_len>0)
1342: THEN
1343: l_substr_stop := GREATEST(LENGTH(p_card_number)-p_unmask_len,0);
1344: ELSIF (NVL(p_digit_check,'N') = 'Y') THEN

Line 1380: IF (p_mask_setting = iby_security_pkg.G_MASK_NONE) THEN

1376:
1377: l_unmask_digits_len := NVL(LENGTH(p_unmask_digits),0);
1378: l_prefix_len := NVL(LENGTH(p_prefix),0);
1379:
1380: IF (p_mask_setting = iby_security_pkg.G_MASK_NONE) THEN
1381: l_cc_num := p_unmask_digits;
1382: l_add_check_digit := FALSE;
1383: END IF;
1384:

Line 1389: IF (p_mask_setting = iby_security_pkg.G_MASK_ALL) THEN

1385: -- note we assume p_card_number is null if all the digits
1386: -- are known through a combination of unmasked digits, prefix
1387: -- and check digit
1388:
1389: IF (p_mask_setting = iby_security_pkg.G_MASK_ALL) THEN
1390: l_cc_num := NVL(p_prefix,'') || NVL(p_card_number,'');
1391: l_add_check_digit := (NVL(p_digit_check,'N') = 'Y');
1392: END IF;
1393:

Line 1394: IF (p_mask_setting = iby_security_pkg.G_MASK_POSTFIX) THEN

1390: l_cc_num := NVL(p_prefix,'') || NVL(p_card_number,'');
1391: l_add_check_digit := (NVL(p_digit_check,'N') = 'Y');
1392: END IF;
1393:
1394: IF (p_mask_setting = iby_security_pkg.G_MASK_POSTFIX) THEN
1395: IF (l_unmask_digits_len > l_prefix_len) THEN
1396: l_cc_num := p_unmask_digits;
1397: ELSE
1398: l_cc_num := p_prefix;

Line 1404: IF (p_mask_setting = iby_security_pkg.G_MASK_PREFIX) THEN

1400: l_cc_num := NVL(l_cc_num,'') || NVL(p_card_number,'');
1401: l_add_check_digit := (LENGTH(l_cc_num) < p_card_length);
1402: END IF;
1403:
1404: IF (p_mask_setting = iby_security_pkg.G_MASK_PREFIX) THEN
1405: l_cc_num := NVL(p_card_number,'') || NVL(p_unmask_digits,'');
1406: l_add_check_digit := (l_unmask_digits_len < 1);
1407: l_prefix_use := p_card_length - NVL(LENGTH(l_cc_num),0);
1408: IF (l_add_check_digit) THEN l_prefix_use := l_prefix_use - 1; END IF;

Line 1439: IF (p_mask_setting = iby_security_pkg.G_MASK_PREFIX) THEN

1435: BEGIN
1436: l_compress_len := p_card_length;
1437: l_prefix_len := NVL(LENGTH(p_prefix),0);
1438:
1439: IF (p_mask_setting = iby_security_pkg.G_MASK_PREFIX) THEN
1440:
1441: IF (p_unmask_len>0) THEN
1442: l_compress_len := GREATEST(l_compress_len - p_unmask_len,0);
1443: ELSIF (p_digit_check = 'Y') THEN

Line 1448: ELSIF (p_mask_setting = iby_security_pkg.G_MASK_POSTFIX) THEN

1444: l_compress_len := l_compress_len - 1;
1445: END IF;
1446: l_compress_len := GREATEST(l_compress_len - l_prefix_len,0);
1447:
1448: ELSIF (p_mask_setting = iby_security_pkg.G_MASK_POSTFIX) THEN
1449:
1450: IF (NVL(p_unmask_len,0) > l_prefix_len) THEN
1451: l_compress_len := GREATEST(l_compress_len - p_unmask_len,0);
1452: ELSE

Line 1460: ELSIF (p_mask_setting = iby_security_pkg.G_MASK_NONE) THEN

1456: IF (p_digit_check = 'Y') THEN
1457: l_compress_len := GREATEST(l_compress_len - 1,0);
1458: END IF;
1459:
1460: ELSIF (p_mask_setting = iby_security_pkg.G_MASK_NONE) THEN
1461:
1462: l_compress_len := 0;
1463:
1464: ELSIF (p_mask_setting = iby_security_pkg.G_MASK_ALL) THEN

Line 1464: ELSIF (p_mask_setting = iby_security_pkg.G_MASK_ALL) THEN

1460: ELSIF (p_mask_setting = iby_security_pkg.G_MASK_NONE) THEN
1461:
1462: l_compress_len := 0;
1463:
1464: ELSIF (p_mask_setting = iby_security_pkg.G_MASK_ALL) THEN
1465:
1466: l_compress_len := l_compress_len - l_prefix_len;
1467: IF (p_digit_check = 'Y') THEN
1468: l_compress_len := GREATEST(l_compress_len - 1,0);

Line 1478: p_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE,

1474: END Get_Compressed_Len;
1475:
1476: PROCEDURE Query_Card
1477: (p_card_id IN iby_creditcard.instrid%TYPE,
1478: p_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE,
1479: x_owner_id OUT NOCOPY iby_creditcard.card_owner_id%TYPE,
1480: x_holder_name OUT NOCOPY iby_creditcard.chname%TYPE,
1481: x_billing_address_id OUT NOCOPY iby_creditcard.addressid%TYPE,
1482: x_billing_address1 OUT NOCOPY hz_locations.address1%TYPE,

Line 1545: iby_security_pkg.validate_sys_key(p_sys_sec_key,l_err_code);

1541: CLOSE c_creditcard;
1542: END IF;
1543:
1544: IF (NOT p_sys_sec_key IS NULL) THEN
1545: iby_security_pkg.validate_sys_key(p_sys_sec_key,l_err_code);
1546: IF (NOT l_err_code IS NULL) THEN
1547: raise_application_error(-20000, l_err_code, FALSE);
1548: END IF;
1549: END IF;

Line 1578: x_expiry_date := IBY_SECURITY_PKG.decrypt_date_field

1574: IF (nvl(l_encrypted, 'N') = 'Y'
1575: AND Other_CC_Attribs_Encrypted = 'Y')
1576: THEN
1577: IF (l_expiry_sec_segment_id IS NOT NULL) THEN
1578: x_expiry_date := IBY_SECURITY_PKG.decrypt_date_field
1579: (l_expiry_sec_segment_id,
1580: p_sys_sec_key
1581: );
1582: END IF;

Line 1585: x_holder_name := IBY_SECURITY_PKG.decrypt_field_vals

1581: );
1582: END IF;
1583:
1584: IF(l_chname_sec_segment_id IS NOT NULL) THEN
1585: x_holder_name := IBY_SECURITY_PKG.decrypt_field_vals
1586: (l_chname_sec_segment_id,
1587: p_sys_sec_key
1588: );
1589:

Line 1597: p_sys_security_key IN iby_security_pkg.DES3_KEY_TYPE,

1593: END Query_Card;
1594:
1595: PROCEDURE Encrypt_Card_Info
1596: (p_commit IN VARCHAR2 := FND_API.G_TRUE,
1597: p_sys_security_key IN iby_security_pkg.DES3_KEY_TYPE,
1598: p_expiry_date IN DATE,
1599: p_chname IN VARCHAR2,
1600: x_exp_segment_id OUT NOCOPY NUMBER,
1601: x_chname_segment_id OUT NOCOPY NUMBER,

Line 1610: IF (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE) THEN

1606:
1607: BEGIN
1608: -- test_debug('Inside Encrypt_Card_Info.. ');
1609: l_mode := Get_CC_Encrypt_Mode;
1610: IF (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE) THEN
1611: RETURN;
1612: END IF;
1613: iby_security_pkg.validate_sys_key(p_sys_security_key,x_err_code);
1614: -- test_debug('sysKey valid.. ');

Line 1613: iby_security_pkg.validate_sys_key(p_sys_security_key,x_err_code);

1609: l_mode := Get_CC_Encrypt_Mode;
1610: IF (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE) THEN
1611: RETURN;
1612: END IF;
1613: iby_security_pkg.validate_sys_key(p_sys_security_key,x_err_code);
1614: -- test_debug('sysKey valid.. ');
1615: IF (NOT x_err_code IS NULL) THEN
1616: RETURN;
1617: END IF;

Line 1620: x_exp_segment_id := IBY_SECURITY_PKG.encrypt_date_field(p_expiry_date,

1616: RETURN;
1617: END IF;
1618:
1619: IF (NOT p_expiry_date IS NULL) THEN
1620: x_exp_segment_id := IBY_SECURITY_PKG.encrypt_date_field(p_expiry_date,
1621: p_sys_security_key,
1622: null,
1623: 'N'
1624: );

Line 1628: x_chname_segment_id := IBY_SECURITY_PKG.encrypt_field_vals(p_chname,

1624: );
1625: END IF;
1626:
1627: IF (NOT p_chname IS NULL) THEN
1628: x_chname_segment_id := IBY_SECURITY_PKG.encrypt_field_vals(p_chname,
1629: p_sys_security_key,
1630: null,
1631: 'N'
1632: );

Line 1644: p_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE

1640: END Encrypt_Card_Info;
1641:
1642: PROCEDURE Mark_Expired_Cards
1643: (p_commit IN VARCHAR2 := FND_API.G_TRUE,
1644: p_sys_sec_key IN iby_security_pkg.DES3_KEY_TYPE
1645: )
1646: IS
1647: l_expiry_date DATE;
1648: l_expired_flag VARCHAR2(1);

Line 1662: l_expiry_date := IBY_SECURITY_PKG.decrypt_date_field

1658: IF (c_card%ISOPEN) THEN CLOSE c_card; END IF;
1659: check_key(p_sys_sec_key);
1660:
1661: FOR c_card_rec IN c_card LOOP
1662: l_expiry_date := IBY_SECURITY_PKG.decrypt_date_field
1663: (c_card_rec.expiry_sec_segment_id,
1664: p_sys_sec_key
1665: );
1666: IF (TRUNC(l_expiry_date,'DD') < TRUNC(SYSDATE,'DD')) THEN