39: l_api_version constant number := 1.0;
40:
41: begin
42:
43: -- Standard start of API savepoint
44: SAVEPOINT SR_DEFAULT_PVT;
45:
46: -- Standard call to check for call compatibility
47: if not fnd_api.Compatible_API_Call(l_api_version,
42:
43: -- Standard start of API savepoint
44: SAVEPOINT SR_DEFAULT_PVT;
45:
46: -- Standard call to check for call compatibility
47: if not fnd_api.Compatible_API_Call(l_api_version,
48: p_api_version,
49: l_api_name,
50: g_pkg_name) then
71: -- end API body
72: -- *******************************************************************
73:
74:
75: -- Standard check of p_simulate and p_commit parameters
76: if fnd_api.to_boolean(p_simulate) then
77: ROLLBACK to SR_DEFAULT_PVT;
78:
79: elsif fnd_api.to_boolean(p_commit) then
80: COMMIT WORK;
81:
82: end if;
83:
84: -- Standard call to get message count and if count=1, get message info
85: fnd_msg_pub.count_and_get(p_count => p_msg_count,
86: p_data => p_msg_data);
87:
88: exception
159: begin
160:
161:
162:
163: -- Standard start of API savepoint
164: SAVEPOINT SR_VALIDATE_PVT;
165:
166: -- Standard call to check for call compatibility
167: if not fnd_api.Compatible_API_Call(l_api_version,
162:
163: -- Standard start of API savepoint
164: SAVEPOINT SR_VALIDATE_PVT;
165:
166: -- Standard call to check for call compatibility
167: if not fnd_api.Compatible_API_Call(l_api_version,
168: p_api_version,
169: l_api_name,
170: g_pkg_name) then
191: -- end API body
192: -- *******************************************************************
193:
194:
195: -- Standard check of p_simulate and p_commit parameters
196: if fnd_api.to_boolean(p_simulate) then
197: ROLLBACK to SR_VALIDATE_PVT;
198:
199: elsif fnd_api.to_boolean(p_commit) then
200: COMMIT WORK;
201:
202: end if;
203:
204: -- Standard call to get message count and if count=1, get message info
205: fnd_msg_pub.count_and_get(p_count => p_msg_count,
206: p_data => p_msg_data);
207:
208: exception