43: END IF;
44:
45: -- Initialize message list if p_init_msg_list is set to TRUE.
46: IF FND_API.to_Boolean( p_init_msg_list ) THEN
47: FND_MSG_PUB.initialize;
48: END IF;
49:
50: -- Initialize API return status to SUCCESS
51: x_return_status := FND_API.G_RET_STS_SUCCESS;
84: COMMIT WORK;
85: END IF;
86:
87: -- Standard callto get message count and if count is 1, get message info.
88: FND_MSG_PUB.Count_And_Get
89: ( p_count => x_msg_count,
90: p_data => x_msg_data
91: );
92:
95: ROLLBACK TO IEM_EncryptPassword_PVT;
96: x_return_status := FND_API.G_RET_STS_ERROR ;
97: FND_MESSAGE.SET_NAME('IEM', 'IEM_PASSWORD_NULL');
98:
99: FND_MSG_PUB.ADD;
100: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
101: p_data => x_msg_data );
102:
103: WHEN IEM_DOUBLE_ENCRIPTED THEN
96: x_return_status := FND_API.G_RET_STS_ERROR ;
97: FND_MESSAGE.SET_NAME('IEM', 'IEM_PASSWORD_NULL');
98:
99: FND_MSG_PUB.ADD;
100: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
101: p_data => x_msg_data );
102:
103: WHEN IEM_DOUBLE_ENCRIPTED THEN
104: ROLLBACK TO IEM_EncryptPassword_PVT;
104: ROLLBACK TO IEM_EncryptPassword_PVT;
105: x_return_status := FND_API.G_RET_STS_ERROR;
106: FND_MESSAGE.SET_NAME('IEM', 'IEM_DOUBLE_ENCRIPTED');
107:
108: FND_MSG_PUB.Add;
109: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
110:
111: WHEN FND_API.G_EXC_ERROR THEN
112: ROLLBACK TO IEM_EncryptPassword_PVT;
105: x_return_status := FND_API.G_RET_STS_ERROR;
106: FND_MESSAGE.SET_NAME('IEM', 'IEM_DOUBLE_ENCRIPTED');
107:
108: FND_MSG_PUB.Add;
109: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
110:
111: WHEN FND_API.G_EXC_ERROR THEN
112: ROLLBACK TO IEM_EncryptPassword_PVT;
113: x_return_status := FND_API.G_RET_STS_ERROR ;
110:
111: WHEN FND_API.G_EXC_ERROR THEN
112: ROLLBACK TO IEM_EncryptPassword_PVT;
113: x_return_status := FND_API.G_RET_STS_ERROR ;
114: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
115: p_data => x_msg_data );
116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
117: ROLLBACK TO IEM_EncryptPassword_PVT;
118: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
115: p_data => x_msg_data );
116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
117: ROLLBACK TO IEM_EncryptPassword_PVT;
118: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
119: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
120: p_data => x_msg_data );
121:
122: WHEN OTHERS THEN
123: ROLLBACK TO IEM_EncryptPassword_PVT;
122: WHEN OTHERS THEN
123: ROLLBACK TO IEM_EncryptPassword_PVT;
124: x_return_status := FND_API.G_RET_STS_ERROR;
125:
126: IF FND_MSG_PUB.Check_Msg_Level
127: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
128: THEN
129: FND_MSG_PUB.Add_Exc_Msg
130: (G_PKG_NAME, l_api_name);
123: ROLLBACK TO IEM_EncryptPassword_PVT;
124: x_return_status := FND_API.G_RET_STS_ERROR;
125:
126: IF FND_MSG_PUB.Check_Msg_Level
127: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
128: THEN
129: FND_MSG_PUB.Add_Exc_Msg
130: (G_PKG_NAME, l_api_name);
131: END IF;
125:
126: IF FND_MSG_PUB.Check_Msg_Level
127: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
128: THEN
129: FND_MSG_PUB.Add_Exc_Msg
130: (G_PKG_NAME, l_api_name);
131: END IF;
132:
133: FND_MSG_PUB.Count_And_Get
129: FND_MSG_PUB.Add_Exc_Msg
130: (G_PKG_NAME, l_api_name);
131: END IF;
132:
133: FND_MSG_PUB.Count_And_Get
134: (p_count => x_msg_count,
135: p_data => x_msg_data
136: );
137: END IEM_EncryptPassword;
176: END IF;
177:
178: -- Initialize message list if p_init_msg_list is set to TRUE.
179: IF FND_API.to_Boolean( p_init_msg_list ) THEN
180: FND_MSG_PUB.initialize;
181: END IF;
182:
183: -- Initialize API return status to SUCCESS
184: x_return_status := FND_API.G_RET_STS_SUCCESS;
198: COMMIT WORK;
199: END IF;
200:
201: -- Standard callto get message count and if count is 1, get message info.
202: FND_MSG_PUB.Count_And_Get
203: ( p_count => x_msg_count,
204: p_data => x_msg_data
205: );
206:
209: ROLLBACK TO IEM_DecryptPassword_PVT;
210: x_return_status := FND_API.G_RET_STS_ERROR ;
211: FND_MESSAGE.SET_NAME('IEM', 'IEM_PASSWORD_NULL');
212:
213: FND_MSG_PUB.ADD;
214: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
215: p_data => x_msg_data );
216:
217: WHEN IEM_INVALID_INPUT THEN
210: x_return_status := FND_API.G_RET_STS_ERROR ;
211: FND_MESSAGE.SET_NAME('IEM', 'IEM_PASSWORD_NULL');
212:
213: FND_MSG_PUB.ADD;
214: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
215: p_data => x_msg_data );
216:
217: WHEN IEM_INVALID_INPUT THEN
218: ROLLBACK TO IEM_DecryptPassword_PVT;
218: ROLLBACK TO IEM_DecryptPassword_PVT;
219: x_return_status := FND_API.G_RET_STS_ERROR;
220: FND_MESSAGE.SET_NAME('IEM', 'IEM_INVALID_INPUT');
221:
222: FND_MSG_PUB.Add;
223: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
224:
225: WHEN FND_API.G_EXC_ERROR THEN
226: ROLLBACK TO IEM_DecryptPassword_PVT;
219: x_return_status := FND_API.G_RET_STS_ERROR;
220: FND_MESSAGE.SET_NAME('IEM', 'IEM_INVALID_INPUT');
221:
222: FND_MSG_PUB.Add;
223: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
224:
225: WHEN FND_API.G_EXC_ERROR THEN
226: ROLLBACK TO IEM_DecryptPassword_PVT;
227: x_return_status := FND_API.G_RET_STS_ERROR ;
224:
225: WHEN FND_API.G_EXC_ERROR THEN
226: ROLLBACK TO IEM_DecryptPassword_PVT;
227: x_return_status := FND_API.G_RET_STS_ERROR ;
228: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
229: p_data => x_msg_data );
230:
231: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
232: ROLLBACK TO IEM_DecryptPassword_PVT;
230:
231: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
232: ROLLBACK TO IEM_DecryptPassword_PVT;
233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
234: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
235: p_data => x_msg_data );
236:
237: WHEN OTHERS THEN
238:
237: WHEN OTHERS THEN
238:
239: ROLLBACK TO IEM_DecryptPassword_PVT;
240: x_return_status := FND_API.G_RET_STS_ERROR;
241: IF FND_MSG_PUB.Check_Msg_Level
242: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
243: THEN
244: FND_MSG_PUB.Add_Exc_Msg
245: (G_PKG_NAME, l_api_name);
238:
239: ROLLBACK TO IEM_DecryptPassword_PVT;
240: x_return_status := FND_API.G_RET_STS_ERROR;
241: IF FND_MSG_PUB.Check_Msg_Level
242: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
243: THEN
244: FND_MSG_PUB.Add_Exc_Msg
245: (G_PKG_NAME, l_api_name);
246: END IF;
240: x_return_status := FND_API.G_RET_STS_ERROR;
241: IF FND_MSG_PUB.Check_Msg_Level
242: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
243: THEN
244: FND_MSG_PUB.Add_Exc_Msg
245: (G_PKG_NAME, l_api_name);
246: END IF;
247:
248: FND_MSG_PUB.Count_And_Get
244: FND_MSG_PUB.Add_Exc_Msg
245: (G_PKG_NAME, l_api_name);
246: END IF;
247:
248: FND_MSG_PUB.Count_And_Get
249: (p_count => x_msg_count,
250: p_data => x_msg_data
251: );
252: END IEM_DecryptPassword;