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_EXT_BANKACCT_PUB dependencies on IBY_SECURITY_PKG

Line 1427: l_ba_num_hash1 := iby_security_pkg.Get_Hash

1423: IF (NOT p_ext_bank_acct_rec.bank_account_num IS NULL) THEN
1424: l_masked_ba_num :=
1425: Mask_Bank_Number(p_ext_bank_acct_rec.bank_account_num,lx_mask_option,
1426: lx_unmask_len);
1427: l_ba_num_hash1 := iby_security_pkg.Get_Hash
1428: (p_ext_bank_acct_rec.bank_account_num,'F');
1429: l_ba_num_hash2 := iby_security_pkg.Get_Hash
1430: (p_ext_bank_acct_rec.bank_account_num,'T');
1431: END IF;

Line 1429: l_ba_num_hash2 := iby_security_pkg.Get_Hash

1425: Mask_Bank_Number(p_ext_bank_acct_rec.bank_account_num,lx_mask_option,
1426: lx_unmask_len);
1427: l_ba_num_hash1 := iby_security_pkg.Get_Hash
1428: (p_ext_bank_acct_rec.bank_account_num,'F');
1429: l_ba_num_hash2 := iby_security_pkg.Get_Hash
1430: (p_ext_bank_acct_rec.bank_account_num,'T');
1431: END IF;
1432:
1433: IF (NOT p_ext_bank_acct_rec.iban IS NULL) THEN

Line 1437: l_iban_hash1 := iby_security_pkg.Get_Hash(p_ext_bank_acct_rec.iban,'F');

1433: IF (NOT p_ext_bank_acct_rec.iban IS NULL) THEN
1434: l_masked_iban :=
1435: Mask_Bank_Number(p_ext_bank_acct_rec.iban,lx_mask_option,
1436: lx_unmask_len);
1437: l_iban_hash1 := iby_security_pkg.Get_Hash(p_ext_bank_acct_rec.iban,'F');
1438: l_iban_hash2 := iby_security_pkg.Get_Hash(p_ext_bank_acct_rec.iban,'T');
1439: END IF;
1440:
1441: -- inserting the new account into IBY_EXT_BANK_ACCOUNTS

Line 1438: l_iban_hash2 := iby_security_pkg.Get_Hash(p_ext_bank_acct_rec.iban,'T');

1434: l_masked_iban :=
1435: Mask_Bank_Number(p_ext_bank_acct_rec.iban,lx_mask_option,
1436: lx_unmask_len);
1437: l_iban_hash1 := iby_security_pkg.Get_Hash(p_ext_bank_acct_rec.iban,'F');
1438: l_iban_hash2 := iby_security_pkg.Get_Hash(p_ext_bank_acct_rec.iban,'T');
1439: END IF;
1440:
1441: -- inserting the new account into IBY_EXT_BANK_ACCOUNTS
1442: INSERT INTO IBY_EXT_BANK_ACCOUNTS

Line 1573: iby_security_pkg.get_salt_version,

1569: p_ext_bank_acct_rec.short_acct_name, --SHORT_ACCT_NAME
1570: p_ext_bank_acct_rec.description, --DESCRIPTION
1571: 'N', -- encrypted
1572: l_bank_account_num_electronic,
1573: iby_security_pkg.get_salt_version,
1574: p_ext_bank_acct_rec.secondary_account_reference -- Bug 7408747
1575: ) RETURNING EXT_BANK_ACCOUNT_ID INTO x_acct_id;
1576:
1577: IF (SQL%FOUND) THEN

Line 2118: iby_security_pkg.Get_Hash(l_acct_number,'F'));

2114: begin
2115:
2116: if (NOT l_acct_number IS NULL) then
2117: print_debuginfo('The value of Get_Hash(l_acct_number,F): '||
2118: iby_security_pkg.Get_Hash(l_acct_number,'F'));
2119: print_debuginfo('The value of Get_Hash(l_acct_number,T): '||
2120: iby_security_pkg.Get_Hash(l_acct_number,'T'));
2121: print_debuginfo('The value of l_ba_num_hash1: ' ||l_ba_num_hash1);
2122: print_debuginfo('The value of l_ba_num_hash1: '|| l_ba_num_hash2);

Line 2120: iby_security_pkg.Get_Hash(l_acct_number,'T'));

2116: if (NOT l_acct_number IS NULL) then
2117: print_debuginfo('The value of Get_Hash(l_acct_number,F): '||
2118: iby_security_pkg.Get_Hash(l_acct_number,'F'));
2119: print_debuginfo('The value of Get_Hash(l_acct_number,T): '||
2120: iby_security_pkg.Get_Hash(l_acct_number,'T'));
2121: print_debuginfo('The value of l_ba_num_hash1: ' ||l_ba_num_hash1);
2122: print_debuginfo('The value of l_ba_num_hash1: '|| l_ba_num_hash2);
2123:
2124: if ( (iby_security_pkg.Get_Hash(l_acct_number,'F') = l_ba_num_hash1)

Line 2124: if ( (iby_security_pkg.Get_Hash(l_acct_number,'F') = l_ba_num_hash1)

2120: iby_security_pkg.Get_Hash(l_acct_number,'T'));
2121: print_debuginfo('The value of l_ba_num_hash1: ' ||l_ba_num_hash1);
2122: print_debuginfo('The value of l_ba_num_hash1: '|| l_ba_num_hash2);
2123:
2124: if ( (iby_security_pkg.Get_Hash(l_acct_number,'F') = l_ba_num_hash1)
2125: AND (iby_security_pkg.Get_Hash(l_acct_number,'T') = l_ba_num_hash2)
2126: )
2127: then
2128: print_debuginfo('User doesnt change the bank account number');

Line 2125: AND (iby_security_pkg.Get_Hash(l_acct_number,'T') = l_ba_num_hash2)

2121: print_debuginfo('The value of l_ba_num_hash1: ' ||l_ba_num_hash1);
2122: print_debuginfo('The value of l_ba_num_hash1: '|| l_ba_num_hash2);
2123:
2124: if ( (iby_security_pkg.Get_Hash(l_acct_number,'F') = l_ba_num_hash1)
2125: AND (iby_security_pkg.Get_Hash(l_acct_number,'T') = l_ba_num_hash2)
2126: )
2127: then
2128: print_debuginfo('User doesnt change the bank account number');
2129: l_acct_number:=null;

Line 2134: l_ba_num_hash1 := iby_security_pkg.Get_Hash(l_acct_number,'F');

2130: l_ba_num_hash1:=null;
2131: l_ba_num_hash2:=null;
2132: l_masked_ba_num:=null;
2133: else
2134: l_ba_num_hash1 := iby_security_pkg.Get_Hash(l_acct_number,'F');
2135:
2136: print_debuginfo('User has changed the bank account number');
2137: print_debuginfo('The value of l_masked_ba_num before masking:'||
2138: l_masked_ba_num);

Line 2139: l_ba_num_hash2 := iby_security_pkg.Get_Hash(l_acct_number,'T');

2135:
2136: print_debuginfo('User has changed the bank account number');
2137: print_debuginfo('The value of l_masked_ba_num before masking:'||
2138: l_masked_ba_num);
2139: l_ba_num_hash2 := iby_security_pkg.Get_Hash(l_acct_number,'T');
2140: l_masked_ba_num :=
2141: Mask_Bank_Number(l_acct_number,l_mask_option,l_unmask_len);
2142: print_debuginfo('The value of l_masked_ba_num after masking:'||
2143: l_masked_ba_num);

Line 2169: if ( (iby_security_pkg.Get_Hash(l_iban,'F') = l_iban_hash1)

2165: /*
2166: l_iban :=p_ext_bank_acct_rec.iban;
2167: begin
2168: if (NOT l_iban IS NULL) then
2169: if ( (iby_security_pkg.Get_Hash(l_iban,'F') = l_iban_hash1)
2170: AND (iby_security_pkg.Get_Hash(l_iban,'T') = l_iban_hash2)
2171: )
2172: then
2173: print_debuginfo('User doesnt change the IBAN');

Line 2170: AND (iby_security_pkg.Get_Hash(l_iban,'T') = l_iban_hash2)

2166: l_iban :=p_ext_bank_acct_rec.iban;
2167: begin
2168: if (NOT l_iban IS NULL) then
2169: if ( (iby_security_pkg.Get_Hash(l_iban,'F') = l_iban_hash1)
2170: AND (iby_security_pkg.Get_Hash(l_iban,'T') = l_iban_hash2)
2171: )
2172: then
2173: print_debuginfo('User doesnt change the IBAN');
2174: l_iban:=null;

Line 2184: l_iban_hash1 := iby_security_pkg.Get_Hash(l_iban,'F');

2180: (p_ext_bank_acct_rec.iban, l_iban, x_return_status);
2181: -- throw exception???
2182: print_debuginfo('Validated IBAN Number');
2183:
2184: l_iban_hash1 := iby_security_pkg.Get_Hash(l_iban,'F');
2185: l_iban_hash2 := iby_security_pkg.Get_Hash(l_iban,'T');
2186: l_masked_iban := Mask_Bank_Number(l_iban,l_mask_option,l_unmask_len);
2187:
2188: l_encrypted := 'N';

Line 2185: l_iban_hash2 := iby_security_pkg.Get_Hash(l_iban,'T');

2181: -- throw exception???
2182: print_debuginfo('Validated IBAN Number');
2183:
2184: l_iban_hash1 := iby_security_pkg.Get_Hash(l_iban,'F');
2185: l_iban_hash2 := iby_security_pkg.Get_Hash(l_iban,'T');
2186: l_masked_iban := Mask_Bank_Number(l_iban,l_mask_option,l_unmask_len);
2187:
2188: l_encrypted := 'N';
2189: DELETE FROM iby_security_segments

Line 2216: l_iban_hash1 := iby_security_pkg.Get_Hash(l_iban,'F');

2212: END IF;
2213: print_debuginfo('Validated IBAN Number');
2214: print_debuginfo(x_return_status);
2215: print_debuginfo(l_iban);
2216: l_iban_hash1 := iby_security_pkg.Get_Hash(l_iban,'F');
2217: print_debuginfo(l_iban_hash1);
2218: l_iban_hash2 := iby_security_pkg.Get_Hash(l_iban,'T');
2219: print_debuginfo(l_iban_hash2);
2220: l_masked_iban := Mask_Bank_Number(l_iban,l_mask_option,l_unmask_len);

Line 2218: l_iban_hash2 := iby_security_pkg.Get_Hash(l_iban,'T');

2214: print_debuginfo(x_return_status);
2215: print_debuginfo(l_iban);
2216: l_iban_hash1 := iby_security_pkg.Get_Hash(l_iban,'F');
2217: print_debuginfo(l_iban_hash1);
2218: l_iban_hash2 := iby_security_pkg.Get_Hash(l_iban,'T');
2219: print_debuginfo(l_iban_hash2);
2220: l_masked_iban := Mask_Bank_Number(l_iban,l_mask_option,l_unmask_len);
2221: print_debuginfo(l_masked_iban);
2222: ELSE

Line 3056: l_ba_num_hash1 := iby_security_pkg.get_hash(p_ext_bank_acct_rec.bank_account_num,'F');

3052: IF (p_ext_bank_acct_rec.bank_account_name IS NULL) THEN
3053: check_mandatory('Bank Account Number',p_ext_bank_acct_rec.bank_account_num);
3054: END IF;
3055:
3056: l_ba_num_hash1 := iby_security_pkg.get_hash(p_ext_bank_acct_rec.bank_account_num,'F');
3057: l_ba_num_hash2 := iby_security_pkg.get_hash(p_ext_bank_acct_rec.bank_account_num,'T');
3058:
3059: -- Check if bank account exists
3060: -- For Japan, account type has to be considered for Unique check

Line 3057: l_ba_num_hash2 := iby_security_pkg.get_hash(p_ext_bank_acct_rec.bank_account_num,'T');

3053: check_mandatory('Bank Account Number',p_ext_bank_acct_rec.bank_account_num);
3054: END IF;
3055:
3056: l_ba_num_hash1 := iby_security_pkg.get_hash(p_ext_bank_acct_rec.bank_account_num,'F');
3057: l_ba_num_hash2 := iby_security_pkg.get_hash(p_ext_bank_acct_rec.bank_account_num,'T');
3058:
3059: -- Check if bank account exists
3060: -- For Japan, account type has to be considered for Unique check
3061: -- Bug No: 7501595

Line 4114: RETURN iby_security_pkg.Mask_Data

4110: )
4111: RETURN VARCHAR2
4112: IS
4113: BEGIN
4114: RETURN iby_security_pkg.Mask_Data
4115: (p_bank_number,p_mask_option,p_unmask_len,G_MASK_CHARACTER);
4116: END Mask_Bank_Number;
4117:
4118: PROCEDURE Compress_Bank_Number

Line 4132: iby_security_pkg.Get_Unmasked_Data

4128: l_substr_start NUMBER;
4129: l_substr_stop NUMBER;
4130: BEGIN
4131: x_unmask_digits :=
4132: iby_security_pkg.Get_Unmasked_Data
4133: (p_bank_number,p_mask_setting,p_unmask_len);
4134: l_unmask_len := NVL(LENGTH(x_unmask_digits),0);
4135:
4136: -- all digits exposed; compressed number is trivial

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

4138: x_compress_num := NULL;
4139: RETURN;
4140: END IF;
4141:
4142: IF ( (p_mask_setting = iby_security_pkg.G_MASK_POSTFIX) )
4143: THEN
4144: l_substr_start := l_unmask_len + 1;
4145: ELSE
4146: l_substr_start := 1;

Line 4149: IF (p_mask_setting = iby_security_pkg.G_MASK_PREFIX)

4145: ELSE
4146: l_substr_start := 1;
4147: END IF;
4148:
4149: IF (p_mask_setting = iby_security_pkg.G_MASK_PREFIX)
4150: AND (p_unmask_len>0)
4151: THEN
4152: l_substr_stop := GREATEST(LENGTH(p_bank_number)-p_unmask_len,0);
4153: ELSE

Line 4168: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE,

4164:
4165: FUNCTION Uncipher_Bank_Number
4166: (p_unmask_digits IN VARCHAR2,
4167: p_segment_id IN iby_security_segments.sec_segment_id%TYPE,
4168: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE,
4169: p_sub_key_cipher IN iby_sys_security_subkeys.subkey_cipher_text%TYPE,
4170: p_segment_cipher IN iby_security_segments.segment_cipher_text%TYPE,
4171: p_encoding IN iby_security_segments.encoding_scheme%TYPE,
4172: p_mask_option IN iby_ext_bank_accounts.ba_mask_setting%TYPE,

Line 4185: l_sub_key := iby_security_pkg.get_sys_subkey(p_sys_key,p_sub_key_cipher);

4181:
4182: IF (p_segment_id IS NULL) THEN RETURN p_unmask_digits; END IF;
4183:
4184: -- uncipher the subkey
4185: l_sub_key := iby_security_pkg.get_sys_subkey(p_sys_key,p_sub_key_cipher);
4186:
4187: -- uncipher the segment
4188: l_bank_segment :=
4189: dbms_obfuscation_toolkit.des3decrypt

Line 4193: l_bank_segment := IBY_SECURITY_PKG.PKCS5_UNPAD(l_bank_segment);

4189: dbms_obfuscation_toolkit.des3decrypt
4190: ( input => p_segment_cipher, key => l_sub_key,
4191: which => dbms_obfuscation_toolkit.ThreeKeyMode
4192: );
4193: l_bank_segment := IBY_SECURITY_PKG.PKCS5_UNPAD(l_bank_segment);
4194: l_bank_num := UTL_I18N.RAW_TO_CHAR(l_bank_segment,p_encoding);
4195:
4196: IF (NOT p_unmask_digits IS NULL) THEN
4197: IF (p_mask_option = iby_security_pkg.G_MASK_POSTFIX) THEN

Line 4197: IF (p_mask_option = iby_security_pkg.G_MASK_POSTFIX) THEN

4193: l_bank_segment := IBY_SECURITY_PKG.PKCS5_UNPAD(l_bank_segment);
4194: l_bank_num := UTL_I18N.RAW_TO_CHAR(l_bank_segment,p_encoding);
4195:
4196: IF (NOT p_unmask_digits IS NULL) THEN
4197: IF (p_mask_option = iby_security_pkg.G_MASK_POSTFIX) THEN
4198: l_bank_num := p_unmask_digits || l_bank_num;
4199: ELSIF (p_mask_option = iby_security_pkg.G_MASK_PREFIX) THEN
4200: l_bank_num := l_bank_num || p_unmask_digits;
4201: END IF;

Line 4199: ELSIF (p_mask_option = iby_security_pkg.G_MASK_PREFIX) THEN

4195:
4196: IF (NOT p_unmask_digits IS NULL) THEN
4197: IF (p_mask_option = iby_security_pkg.G_MASK_POSTFIX) THEN
4198: l_bank_num := p_unmask_digits || l_bank_num;
4199: ELSIF (p_mask_option = iby_security_pkg.G_MASK_PREFIX) THEN
4200: l_bank_num := l_bank_num || p_unmask_digits;
4201: END IF;
4202: END IF;
4203:

Line 4209: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE

4205: END Uncipher_Bank_Number;
4206:
4207: PROCEDURE Remask_Accounts
4208: (p_commit IN VARCHAR2 := FND_API.G_TRUE,
4209: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE
4210: )
4211: IS
4212: lx_mask_option iby_ext_bank_accounts.ba_mask_setting%TYPE;
4213: lx_unmask_len iby_ext_bank_accounts.ba_unmask_length%TYPE;

Line 4267: iby_security_pkg.Validate_Sys_Key(p_sys_key,lx_key_error);

4263: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
4264: iby_debug_pub.add('unmask length:=' || lx_unmask_len,
4265: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);
4266:
4267: iby_security_pkg.Validate_Sys_Key(p_sys_key,lx_key_error);
4268: l_mode := Get_BA_Encrypt_Mode();
4269:
4270: iby_debug_pub.add('sys key check:=' || lx_key_error,
4271: iby_debug_pub.G_LEVEL_INFO,l_dbg_mod);

Line 4324: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);

4320:
4321: IF (NOT lx_compress_num IS NULL) THEN
4322: l_ba_segment :=
4323: UTL_I18N.STRING_TO_RAW
4324: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4325: l_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_ba_segment);
4326:
4327: IF (ext_ba_rec.ba_num_sec_segment_id IS NULL) THEN
4328: IBY_SECURITY_PKG.Create_Segment

Line 4325: l_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_ba_segment);

4321: IF (NOT lx_compress_num IS NULL) THEN
4322: l_ba_segment :=
4323: UTL_I18N.STRING_TO_RAW
4324: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4325: l_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_ba_segment);
4326:
4327: IF (ext_ba_rec.ba_num_sec_segment_id IS NULL) THEN
4328: IBY_SECURITY_PKG.Create_Segment
4329: (FND_API.G_FALSE,l_ba_segment,

Line 4328: IBY_SECURITY_PKG.Create_Segment

4324: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4325: l_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_ba_segment);
4326:
4327: IF (ext_ba_rec.ba_num_sec_segment_id IS NULL) THEN
4328: IBY_SECURITY_PKG.Create_Segment
4329: (FND_API.G_FALSE,l_ba_segment,
4330: iby_security_pkg.G_ENCODING_UTF8_AL32,
4331: p_sys_key,lx_ba_segment_id);
4332: ELSE

Line 4330: iby_security_pkg.G_ENCODING_UTF8_AL32,

4326:
4327: IF (ext_ba_rec.ba_num_sec_segment_id IS NULL) THEN
4328: IBY_SECURITY_PKG.Create_Segment
4329: (FND_API.G_FALSE,l_ba_segment,
4330: iby_security_pkg.G_ENCODING_UTF8_AL32,
4331: p_sys_key,lx_ba_segment_id);
4332: ELSE
4333: lx_ba_segment_id := ext_ba_rec.ba_num_sec_segment_id;
4334: IBY_SECURITY_PKG.Update_Segment

Line 4334: IBY_SECURITY_PKG.Update_Segment

4330: iby_security_pkg.G_ENCODING_UTF8_AL32,
4331: p_sys_key,lx_ba_segment_id);
4332: ELSE
4333: lx_ba_segment_id := ext_ba_rec.ba_num_sec_segment_id;
4334: IBY_SECURITY_PKG.Update_Segment
4335: (FND_API.G_FALSE,lx_ba_segment_id,l_ba_segment,
4336: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,
4337: ext_ba_rec.ba_subkey_cipher);
4338: END IF;

Line 4336: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,

4332: ELSE
4333: lx_ba_segment_id := ext_ba_rec.ba_num_sec_segment_id;
4334: IBY_SECURITY_PKG.Update_Segment
4335: (FND_API.G_FALSE,lx_ba_segment_id,l_ba_segment,
4336: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,
4337: ext_ba_rec.ba_subkey_cipher);
4338: END IF;
4339: ELSE
4340: DELETE FROM iby_security_segments

Line 4351: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);

4347:
4348: IF (NOT lx_compress_num IS NULL) THEN
4349: l_iban_segment :=
4350: UTL_I18N.STRING_TO_RAW
4351: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4352: l_iban_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_iban_segment);
4353:
4354: IF (ext_ba_rec.iban_sec_segment_id IS NULL) THEN
4355: IBY_SECURITY_PKG.Create_Segment

Line 4352: l_iban_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_iban_segment);

4348: IF (NOT lx_compress_num IS NULL) THEN
4349: l_iban_segment :=
4350: UTL_I18N.STRING_TO_RAW
4351: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4352: l_iban_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_iban_segment);
4353:
4354: IF (ext_ba_rec.iban_sec_segment_id IS NULL) THEN
4355: IBY_SECURITY_PKG.Create_Segment
4356: (FND_API.G_FALSE,l_iban_segment,

Line 4355: IBY_SECURITY_PKG.Create_Segment

4351: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4352: l_iban_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_iban_segment);
4353:
4354: IF (ext_ba_rec.iban_sec_segment_id IS NULL) THEN
4355: IBY_SECURITY_PKG.Create_Segment
4356: (FND_API.G_FALSE,l_iban_segment,
4357: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,
4358: lx_iban_segment_id);
4359: ELSE

Line 4357: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,

4353:
4354: IF (ext_ba_rec.iban_sec_segment_id IS NULL) THEN
4355: IBY_SECURITY_PKG.Create_Segment
4356: (FND_API.G_FALSE,l_iban_segment,
4357: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,
4358: lx_iban_segment_id);
4359: ELSE
4360: lx_iban_segment_id := ext_ba_rec.iban_sec_segment_id;
4361: IBY_SECURITY_PKG.Update_Segment

Line 4361: IBY_SECURITY_PKG.Update_Segment

4357: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,
4358: lx_iban_segment_id);
4359: ELSE
4360: lx_iban_segment_id := ext_ba_rec.iban_sec_segment_id;
4361: IBY_SECURITY_PKG.Update_Segment
4362: (FND_API.G_FALSE,lx_iban_segment_id,l_iban_segment,
4363: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,
4364: ext_ba_rec.iban_subkey_cipher);
4365: END IF;

Line 4363: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,

4359: ELSE
4360: lx_iban_segment_id := ext_ba_rec.iban_sec_segment_id;
4361: IBY_SECURITY_PKG.Update_Segment
4362: (FND_API.G_FALSE,lx_iban_segment_id,l_iban_segment,
4363: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,
4364: ext_ba_rec.iban_subkey_cipher);
4365: END IF;
4366: ELSE
4367: DELETE FROM iby_security_segments

Line 4395: encrypted = DECODE(l_mode, iby_security_pkg.G_ENCRYPT_MODE_NONE,'N',

4391: Mask_Bank_Number(l_ba_num,lx_mask_option,lx_unmask_len),
4392: masked_iban = Mask_Bank_Number(l_iban,lx_mask_option,lx_unmask_len),
4393: ba_mask_setting = lx_mask_option,
4394: ba_unmask_length = lx_unmask_len,
4395: encrypted = DECODE(l_mode, iby_security_pkg.G_ENCRYPT_MODE_NONE,'N',
4396: 'Y'
4397: ),
4398: object_version_number = object_version_number + 1,
4399: last_update_date = sysdate,

Line 4415: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE

4411: END Remask_Accounts;
4412:
4413: PROCEDURE Encrypt_Accounts
4414: (p_commit IN VARCHAR2,
4415: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE
4416: )
4417: IS
4418: l_mode iby_sys_security_options.ext_ba_encryption_mode%TYPE;
4419: lx_key_error VARCHAR2(300);

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

4443:
4444: BEGIN
4445:
4446: l_mode := Get_BA_Encrypt_Mode();
4447: IF (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE) THEN
4448: RETURN;
4449: END IF;
4450:
4451: iby_security_pkg.Validate_Sys_Key(p_sys_key,lx_key_error);

Line 4451: iby_security_pkg.Validate_Sys_Key(p_sys_key,lx_key_error);

4447: IF (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE) THEN
4448: RETURN;
4449: END IF;
4450:
4451: iby_security_pkg.Validate_Sys_Key(p_sys_key,lx_key_error);
4452: IF (NOT lx_key_error IS NULL) THEN
4453: raise_application_error(-20000,lx_key_error, FALSE);
4454: END IF;
4455:

Line 4477: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);

4473:
4474: IF (NOT lx_compress_num IS NULL) THEN
4475: l_ba_segment :=
4476: UTL_I18N.STRING_TO_RAW
4477: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4478: -- pad to unit 8 length
4479: l_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_ba_segment);
4480:
4481: IBY_SECURITY_PKG.Create_Segment

Line 4479: l_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_ba_segment);

4475: l_ba_segment :=
4476: UTL_I18N.STRING_TO_RAW
4477: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4478: -- pad to unit 8 length
4479: l_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_ba_segment);
4480:
4481: IBY_SECURITY_PKG.Create_Segment
4482: (FND_API.G_FALSE,l_ba_segment,iby_security_pkg.G_ENCODING_UTF8_AL32,
4483: p_sys_key,lx_ba_segment_id);

Line 4481: IBY_SECURITY_PKG.Create_Segment

4477: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4478: -- pad to unit 8 length
4479: l_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_ba_segment);
4480:
4481: IBY_SECURITY_PKG.Create_Segment
4482: (FND_API.G_FALSE,l_ba_segment,iby_security_pkg.G_ENCODING_UTF8_AL32,
4483: p_sys_key,lx_ba_segment_id);
4484: END IF;
4485: ELSE

Line 4482: (FND_API.G_FALSE,l_ba_segment,iby_security_pkg.G_ENCODING_UTF8_AL32,

4478: -- pad to unit 8 length
4479: l_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_ba_segment);
4480:
4481: IBY_SECURITY_PKG.Create_Segment
4482: (FND_API.G_FALSE,l_ba_segment,iby_security_pkg.G_ENCODING_UTF8_AL32,
4483: p_sys_key,lx_ba_segment_id);
4484: END IF;
4485: ELSE
4486: lx_ba_unmask_digits := ext_ba_rec.bank_account_num;

Line 4499: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);

4495:
4496: IF (NOT lx_compress_num IS NULL) THEN
4497: l_iban_segment :=
4498: UTL_I18N.STRING_TO_RAW
4499: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4500: -- pad to unit 8 length
4501: l_iban_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_iban_segment);
4502:
4503: IBY_SECURITY_PKG.Create_Segment

Line 4501: l_iban_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_iban_segment);

4497: l_iban_segment :=
4498: UTL_I18N.STRING_TO_RAW
4499: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4500: -- pad to unit 8 length
4501: l_iban_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_iban_segment);
4502:
4503: IBY_SECURITY_PKG.Create_Segment
4504: (FND_API.G_FALSE,l_iban_segment,
4505: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,lx_iban_segment_id);

Line 4503: IBY_SECURITY_PKG.Create_Segment

4499: (lx_compress_num,iby_security_pkg.G_ENCODING_UTF8_AL32);
4500: -- pad to unit 8 length
4501: l_iban_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_iban_segment);
4502:
4503: IBY_SECURITY_PKG.Create_Segment
4504: (FND_API.G_FALSE,l_iban_segment,
4505: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,lx_iban_segment_id);
4506: END IF;
4507: ELSE

Line 4505: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,lx_iban_segment_id);

4501: l_iban_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_iban_segment);
4502:
4503: IBY_SECURITY_PKG.Create_Segment
4504: (FND_API.G_FALSE,l_iban_segment,
4505: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,lx_iban_segment_id);
4506: END IF;
4507: ELSE
4508: lx_iban_unmask_digits := ext_ba_rec.iban;
4509: END IF;

Line 4518: iby_security_pkg.G_ENCODING_UTF8_AL32);

4514: lx_e_ba_unmask_digits := NULL;
4515: l_e_ba_segment :=
4516: UTL_I18N.STRING_TO_RAW
4517: (ext_ba_rec.bank_account_num_electronic,
4518: iby_security_pkg.G_ENCODING_UTF8_AL32);
4519: -- pad to unit 8 length
4520: l_e_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_e_ba_segment);
4521:
4522: IBY_SECURITY_PKG.Create_Segment

Line 4520: l_e_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_e_ba_segment);

4516: UTL_I18N.STRING_TO_RAW
4517: (ext_ba_rec.bank_account_num_electronic,
4518: iby_security_pkg.G_ENCODING_UTF8_AL32);
4519: -- pad to unit 8 length
4520: l_e_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_e_ba_segment);
4521:
4522: IBY_SECURITY_PKG.Create_Segment
4523: (FND_API.G_FALSE,l_e_ba_segment,
4524: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,lx_e_ba_segment_id);

Line 4522: IBY_SECURITY_PKG.Create_Segment

4518: iby_security_pkg.G_ENCODING_UTF8_AL32);
4519: -- pad to unit 8 length
4520: l_e_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_e_ba_segment);
4521:
4522: IBY_SECURITY_PKG.Create_Segment
4523: (FND_API.G_FALSE,l_e_ba_segment,
4524: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,lx_e_ba_segment_id);
4525: ELSE
4526: lx_e_ba_unmask_digits := ext_ba_rec.bank_account_num_electronic;

Line 4524: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,lx_e_ba_segment_id);

4520: l_e_ba_segment := IBY_SECURITY_PKG.PKCS5_PAD(l_e_ba_segment);
4521:
4522: IBY_SECURITY_PKG.Create_Segment
4523: (FND_API.G_FALSE,l_e_ba_segment,
4524: iby_security_pkg.G_ENCODING_UTF8_AL32,p_sys_key,lx_e_ba_segment_id);
4525: ELSE
4526: lx_e_ba_unmask_digits := ext_ba_rec.bank_account_num_electronic;
4527: END IF;
4528:

Line 4549: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE

4545: END Encrypt_Accounts;
4546:
4547: PROCEDURE Decrypt_Accounts
4548: (p_commit IN VARCHAR2,
4549: p_sys_key IN iby_security_pkg.DES3_KEY_TYPE
4550: )
4551: IS
4552: l_mode iby_sys_security_options.ext_ba_encryption_mode%TYPE;
4553: l_subkey iby_sys_security_subkeys.subkey_cipher_text%TYPE;

Line 4591: IF (NOT (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE)) THEN

4587:
4588: BEGIN
4589:
4590: l_mode := Get_BA_Encrypt_Mode();
4591: IF (NOT (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE)) THEN
4592: RETURN;
4593: END IF;
4594:
4595: iby_security_pkg.Validate_Sys_Key(p_sys_key,lx_key_error);

Line 4595: iby_security_pkg.Validate_Sys_Key(p_sys_key,lx_key_error);

4591: IF (NOT (l_mode = iby_security_pkg.G_ENCRYPT_MODE_NONE)) THEN
4592: RETURN;
4593: END IF;
4594:
4595: iby_security_pkg.Validate_Sys_Key(p_sys_key,lx_key_error);
4596:
4597: FOR ext_ba_rec IN c_ext_ba LOOP
4598:
4599: -- raise sys-key exception only if encrypted data exists

Line 4686: x_mask_setting := iby_security_pkg.G_MASK_PREFIX;

4682: SELECT ext_ba_mask_setting, ext_ba_unmask_len
4683: FROM iby_sys_security_options;
4684:
4685: BEGIN
4686: x_mask_setting := iby_security_pkg.G_MASK_PREFIX;
4687:
4688: IF (c_mask_setting%ISOPEN) THEN CLOSE c_mask_setting; END IF;
4689:
4690: OPEN c_mask_setting;

Line 4695: x_mask_setting := iby_security_pkg.G_MASK_PREFIX;

4691: FETCH c_mask_setting INTO x_mask_setting, x_unmask_len;
4692: CLOSE c_mask_setting;
4693:
4694: IF (x_mask_setting IS NULL) THEN
4695: x_mask_setting := iby_security_pkg.G_MASK_PREFIX;
4696: END IF;
4697: IF (x_unmask_len IS NULL) THEN
4698: x_unmask_len := G_DEF_UNMASK_LENGTH;
4699: END IF;