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.OKC_REP_CONTRACT_PROCESS_PVT dependencies on FND_LOG

Line 55: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

51: WHERE contract_id = p_contract_id;
52:
53: BEGIN
54:
55: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
56: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
57: 'Entered OKC_REP_WF_PVT.submit_contract');
58: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
59: 'Contract Id is: ' || p_contract_id);

Line 56: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

52:
53: BEGIN
54:
55: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
56: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
57: 'Entered OKC_REP_WF_PVT.submit_contract');
58: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
59: 'Contract Id is: ' || p_contract_id);
60: END IF;

Line 58: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

54:
55: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
56: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
57: 'Entered OKC_REP_WF_PVT.submit_contract');
58: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
59: 'Contract Id is: ' || p_contract_id);
60: END IF;
61: l_api_name := 'submit_contract_for_approval';
62: l_api_version := 1.0;

Line 81: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

77: -- Get contract number
78: OPEN contract_csr;
79: FETCH contract_csr into l_contract_number;
80: IF(contract_csr%NOTFOUND) THEN
81: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
82: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
83: G_MODULE||l_api_name,
84: 'Invalid Contract Id: '|| p_contract_id);
85: END IF;

Line 82: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

78: OPEN contract_csr;
79: FETCH contract_csr into l_contract_number;
80: IF(contract_csr%NOTFOUND) THEN
81: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
82: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
83: G_MODULE||l_api_name,
84: 'Invalid Contract Id: '|| p_contract_id);
85: END IF;
86: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 95: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

91: -- RAISE NO_DATA_FOUND;
92: END IF;
93: CLOSE contract_csr;
94:
95: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
96: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
97: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
98: END IF;
99: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

Line 96: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

92: END IF;
93: CLOSE contract_csr;
94:
95: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
96: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
97: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
98: END IF;
99: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
100: OKC_REP_UTIL_PVT.change_contract_status(

Line 111: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

107: p_note => NULL,
108: x_msg_data => x_msg_data,
109: x_msg_count => x_msg_count,
110: x_return_status => x_return_status);
111: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
112: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
113: 'OKC_REP_UTIL_PVT.change_contract_status return status is: '
114: || x_return_status);
115: END IF;

Line 112: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

108: x_msg_data => x_msg_data,
109: x_msg_count => x_msg_count,
110: x_return_status => x_return_status);
111: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
112: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
113: 'OKC_REP_UTIL_PVT.change_contract_status return status is: '
114: || x_return_status);
115: END IF;
116: -----------------------------------------------------

Line 125: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

121: END IF;
122: --------------------------------------------------------
123:
124:
125: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
127: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
128: END IF;
129: -- Add a record in ONC_REP_CON_APPROVALS table.

Line 126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

122: --------------------------------------------------------
123:
124:
125: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
127: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
128: END IF;
129: -- Add a record in ONC_REP_CON_APPROVALS table.
130: OKC_REP_UTIL_PVT.add_approval_hist_record(

Line 141: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

137: p_note => NULL,
138: x_msg_data => x_msg_data,
139: x_msg_count => x_msg_count,
140: x_return_status => x_return_status);
141: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
142: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
143: 'OKC_REP_UTIL_PVT.add_approval_hist_record return status is: '
144: || x_return_status);
145: END IF;

Line 142: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

138: x_msg_data => x_msg_data,
139: x_msg_count => x_msg_count,
140: x_return_status => x_return_status);
141: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
142: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
143: 'OKC_REP_UTIL_PVT.add_approval_hist_record return status is: '
144: || x_return_status);
145: END IF;
146: -------------------------------------------------------

Line 155: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

151: END IF;
152: --------------------------------------------------------
153: -- Get the user key
154: l_user_key := l_contract_number || ':' || l_wf_sequence;
155: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
157: 'Calling WF_ENGINE.createprocess');
158: END IF;
159: WF_ENGINE.createprocess (

Line 156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

152: --------------------------------------------------------
153: -- Get the user key
154: l_user_key := l_contract_number || ':' || l_wf_sequence;
155: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
157: 'Calling WF_ENGINE.createprocess');
158: END IF;
159: WF_ENGINE.createprocess (
160: itemtype => G_APPROVAL_ITEM_TYPE,

Line 165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

161: itemkey => l_wf_sequence,
162: process => G_APPROVAL_PROCESS);
163:
164:
165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
167: 'Calling WF_ENGINE.SetItemUserKey');
168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
169: 'User key Value is: ' || l_user_key);

Line 166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

162: process => G_APPROVAL_PROCESS);
163:
164:
165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
167: 'Calling WF_ENGINE.SetItemUserKey');
168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
169: 'User key Value is: ' || l_user_key);
170: END IF;

Line 168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

164:
165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
167: 'Calling WF_ENGINE.SetItemUserKey');
168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
169: 'User key Value is: ' || l_user_key);
170: END IF;
171: WF_ENGINE.SetItemUserKey (
172: itemtype => G_APPROVAL_ITEM_TYPE,

Line 176: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

172: itemtype => G_APPROVAL_ITEM_TYPE,
173: itemkey => l_wf_sequence,
174: userkey => l_user_key);
175:
176: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
177: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
178: 'Calling WF_ENGINE.SetItemOwner');
179: END IF;
180: WF_ENGINE.SetItemOwner (

Line 177: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

173: itemkey => l_wf_sequence,
174: userkey => l_user_key);
175:
176: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
177: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
178: 'Calling WF_ENGINE.SetItemOwner');
179: END IF;
180: WF_ENGINE.SetItemOwner (
181: itemtype => G_APPROVAL_ITEM_TYPE,

Line 186: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

182: itemkey => l_wf_sequence,
183: owner => fnd_global.user_name);
184:
185:
186: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
188: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_ID');
189: END IF;
190: WF_ENGINE.SetItemAttrText (

Line 187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

183: owner => fnd_global.user_name);
184:
185:
186: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
188: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_ID');
189: END IF;
190: WF_ENGINE.SetItemAttrText (
191: itemtype => G_APPROVAL_ITEM_TYPE,

Line 196: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

192: itemkey => l_wf_sequence,
193: aname => 'CONTRACT_ID',
194: avalue => p_contract_id);
195:
196: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
197: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
198: 'Calling WF_ENGINE.startprocess for REQUESTOR');
199: END IF;
200: WF_ENGINE.SetItemAttrText (

Line 197: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

193: aname => 'CONTRACT_ID',
194: avalue => p_contract_id);
195:
196: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
197: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
198: 'Calling WF_ENGINE.startprocess for REQUESTOR');
199: END IF;
200: WF_ENGINE.SetItemAttrText (
201: itemtype => G_APPROVAL_ITEM_TYPE,

Line 207: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

203: aname => 'REQUESTER',
204: avalue => fnd_global.user_name);
205:
206:
207: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
209: 'Calling WF_ENGINE.startprocess');
210: END IF;
211: WF_ENGINE.startprocess (

Line 208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

204: avalue => fnd_global.user_name);
205:
206:
207: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
209: 'Calling WF_ENGINE.startprocess');
210: END IF;
211: WF_ENGINE.startprocess (
212: itemtype => G_APPROVAL_ITEM_TYPE,

Line 218: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

214:
215:
216:
217: -- Update WF columns in OKC_REP_CONTRACTS_ALL
218: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
219: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
220: 'Updating workflow columns in OKC_REP_CONTRACTS_ALL');
221: END IF;
222: UPDATE OKC_REP_CONTRACTS_ALL

Line 219: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

215:
216:
217: -- Update WF columns in OKC_REP_CONTRACTS_ALL
218: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
219: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
220: 'Updating workflow columns in OKC_REP_CONTRACTS_ALL');
221: END IF;
222: UPDATE OKC_REP_CONTRACTS_ALL
223: SET wf_item_type = G_APPROVAL_ITEM_TYPE, wf_item_key = l_wf_sequence

Line 231: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

227:
228: -- Standard call to get message count and if count is 1, get message info.
229: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
230:
231: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
232: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
233: 'Leaving OKC_REP_WF_PVT.submit_contract');
234: END IF;
235:

Line 232: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

228: -- Standard call to get message count and if count is 1, get message info.
229: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
230:
231: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
232: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
233: 'Leaving OKC_REP_WF_PVT.submit_contract');
234: END IF;
235:
236: EXCEPTION

Line 238: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

234: END IF;
235:
236: EXCEPTION
237: WHEN FND_API.G_EXC_ERROR THEN
238: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
239: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
240: g_module || l_api_name,
241: 'Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
242: END IF;

Line 239: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

235:
236: EXCEPTION
237: WHEN FND_API.G_EXC_ERROR THEN
238: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
239: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
240: g_module || l_api_name,
241: 'Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
242: END IF;
243: --close cursors

Line 255: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

251: p_data => x_msg_data
252: );
253:
254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
255: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
256: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
257: g_module || l_api_name,
258: 'Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
259: END IF;

Line 256: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

252: );
253:
254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
255: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
256: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
257: g_module || l_api_name,
258: 'Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
259: END IF;
260: --close cursors

Line 272: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

268: p_data => x_msg_data
269: );
270:
271: WHEN OTHERS THEN
272: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
273: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
274: g_module || l_api_name,
275: 'Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
276: END IF;

Line 273: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

269: );
270:
271: WHEN OTHERS THEN
272: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
273: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
274: g_module || l_api_name,
275: 'Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
276: END IF;
277: --close cursors

Line 329: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

325: l_api_version NUMBER;
326:
327: BEGIN
328:
329: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
330: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
331: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
333: 'Contract Id is: ' || to_char(p_contract_id));

Line 330: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

326:
327: BEGIN
328:
329: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
330: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
331: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
333: 'Contract Id is: ' || to_char(p_contract_id));
334: END IF;

Line 332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

328:
329: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
330: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
331: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
333: 'Contract Id is: ' || to_char(p_contract_id));
334: END IF;
335: l_api_name := 'delete_contacts';
336: l_api_version := 1.0;

Line 363: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

359:
360: -- Standard call to get message count and if count is 1, get message info.
361: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
362:
363: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
364: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
365: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
366: END IF;
367:

Line 364: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

360: -- Standard call to get message count and if count is 1, get message info.
361: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
362:
363: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
364: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
365: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
366: END IF;
367:
368:

Line 371: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

367:
368:
369: EXCEPTION
370: WHEN FND_API.G_EXC_ERROR THEN
371: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
372: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
373: g_module || l_api_name,
374: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');
375: END IF;

Line 372: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

368:
369: EXCEPTION
370: WHEN FND_API.G_EXC_ERROR THEN
371: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
372: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
373: g_module || l_api_name,
374: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');
375: END IF;
376: ROLLBACK TO delete_contacts_PVT;

Line 384: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

380: p_data => x_msg_data
381: );
382:
383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
384: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
385: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
386: g_module || l_api_name,
387: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
388: END IF;

Line 385: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

381: );
382:
383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
384: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
385: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
386: g_module || l_api_name,
387: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
388: END IF;
389: ROLLBACK TO delete_contacts_PVT;

Line 397: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

393: p_data => x_msg_data
394: );
395:
396: WHEN OTHERS THEN
397: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
398: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
399: g_module || l_api_name,
400: 'Leaving delete_contacts because of EXCEPTION: ' || sqlerrm);
401: END IF;

Line 398: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

394: );
395:
396: WHEN OTHERS THEN
397: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
398: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
399: g_module || l_api_name,
400: 'Leaving delete_contacts because of EXCEPTION: ' || sqlerrm);
401: END IF;
402: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 448: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

444: l_api_name VARCHAR2(30);
445: l_api_version NUMBER;
446: BEGIN
447:
448: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
449: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
450: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
452: 'Contract Id is: ' || p_contract_id);

Line 449: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

445: l_api_version NUMBER;
446: BEGIN
447:
448: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
449: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
450: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
452: 'Contract Id is: ' || p_contract_id);
453: END IF;

Line 451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

447:
448: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
449: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
450: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
452: 'Contract Id is: ' || p_contract_id);
453: END IF;
454: l_api_name := 'delete_parties';
455: l_api_version := 1.0;

Line 482: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

478:
479: -- Standard call to get message count and if count is 1, get message info.
480: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
481:
482: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
483: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
484: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
485: END IF;
486:

Line 483: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

479: -- Standard call to get message count and if count is 1, get message info.
480: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
481:
482: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
483: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
484: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
485: END IF;
486:
487:

Line 490: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

486:
487:
488: EXCEPTION
489: WHEN FND_API.G_EXC_ERROR THEN
490: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
491: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
492: g_module || l_api_name,
493: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');
494: END IF;

Line 491: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

487:
488: EXCEPTION
489: WHEN FND_API.G_EXC_ERROR THEN
490: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
491: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
492: g_module || l_api_name,
493: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');
494: END IF;
495: ROLLBACK TO delete_parties_PVT;

Line 503: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

499: p_data => x_msg_data
500: );
501:
502: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
503: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
504: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
505: g_module || l_api_name,
506: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
507: END IF;

Line 504: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

500: );
501:
502: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
503: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
504: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
505: g_module || l_api_name,
506: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
507: END IF;
508: ROLLBACK TO delete_parties_PVT;

Line 516: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

512: p_data => x_msg_data
513: );
514:
515: WHEN OTHERS THEN
516: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
517: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
518: g_module || l_api_name,
519: 'Leaving delete_parties because of EXCEPTION: ' || sqlerrm);
520: END IF;

Line 517: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

513: );
514:
515: WHEN OTHERS THEN
516: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
517: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
518: g_module || l_api_name,
519: 'Leaving delete_parties because of EXCEPTION: ' || sqlerrm);
520: END IF;
521: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 575: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

571: contract_rec contract_csr%ROWTYPE;
572:
573: BEGIN
574:
575: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
576: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
577: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
579: 'Contract Id is: ' || p_contract_id);

Line 576: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

572:
573: BEGIN
574:
575: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
576: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
577: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
579: 'Contract Id is: ' || p_contract_id);
580: END IF;

Line 578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

574:
575: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
576: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
577: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
579: 'Contract Id is: ' || p_contract_id);
580: END IF;
581: l_api_name := 'delete_risks';
582: l_api_version := 1.0;

Line 600: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

596: -- Get contract_type and version of the contract.
597: OPEN contract_csr;
598: FETCH contract_csr INTO contract_rec;
599: IF(contract_csr%NOTFOUND) THEN
600: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
601: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
602: G_MODULE||l_api_name,
603: 'Invalid Contract Id: '|| p_contract_id);
604: END IF;

Line 601: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

597: OPEN contract_csr;
598: FETCH contract_csr INTO contract_rec;
599: IF(contract_csr%NOTFOUND) THEN
600: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
601: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
602: G_MODULE||l_api_name,
603: 'Invalid Contract Id: '|| p_contract_id);
604: END IF;
605: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 627: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

623:
624: -- Standard call to get message count and if count is 1, get message info.
625: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
626:
627: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
628: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
629: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
630: END IF;
631:

Line 628: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

624: -- Standard call to get message count and if count is 1, get message info.
625: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
626:
627: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
628: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
629: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
630: END IF;
631:
632:

Line 635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

631:
632:
633: EXCEPTION
634: WHEN FND_API.G_EXC_ERROR THEN
635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
636: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
637: g_module || l_api_name,
638: 'Leaving delete_risks:FND_API.G_EXC_ERROR Exception');
639: END IF;

Line 636: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

632:
633: EXCEPTION
634: WHEN FND_API.G_EXC_ERROR THEN
635: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
636: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
637: g_module || l_api_name,
638: 'Leaving delete_risks:FND_API.G_EXC_ERROR Exception');
639: END IF;
640: --close cursors

Line 652: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

648: p_data => x_msg_data
649: );
650:
651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
652: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
653: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
654: g_module || l_api_name,
655: 'Leaving delete_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
656: END IF;

Line 653: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

649: );
650:
651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
652: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
653: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
654: g_module || l_api_name,
655: 'Leaving delete_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
656: END IF;
657: --close cursors

Line 669: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

665: p_data => x_msg_data
666: );
667:
668: WHEN OTHERS THEN
669: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
670: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
671: g_module || l_api_name,
672: 'Leaving delete_risks because of EXCEPTION: ' || sqlerrm);
673: END IF;

Line 670: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

666: );
667:
668: WHEN OTHERS THEN
669: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
670: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
671: g_module || l_api_name,
672: 'Leaving delete_risks because of EXCEPTION: ' || sqlerrm);
673: END IF;
674: --close cursors

Line 724: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

720: l_api_name VARCHAR2(30);
721: l_api_version NUMBER;
722: BEGIN
723:
724: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
725: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
726: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
727: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
728: 'Contract Id is: ' || p_contract_id);

Line 725: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

721: l_api_version NUMBER;
722: BEGIN
723:
724: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
725: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
726: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
727: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
728: 'Contract Id is: ' || p_contract_id);
729: END IF;

Line 727: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

723:
724: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
725: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
726: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
727: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
728: 'Contract Id is: ' || p_contract_id);
729: END IF;
730: l_api_name := 'delete_related_contracts';
731: l_api_version := 1.0;

Line 758: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

754:
755: -- Standard call to get message count and if count is 1, get message info.
756: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
757:
758: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
760: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
761: END IF;
762:

Line 759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

755: -- Standard call to get message count and if count is 1, get message info.
756: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
757:
758: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
760: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
761: END IF;
762:
763:

Line 766: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

762:
763:
764: EXCEPTION
765: WHEN FND_API.G_EXC_ERROR THEN
766: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
767: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
768: g_module || l_api_name,
769: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');
770: END IF;

Line 767: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

763:
764: EXCEPTION
765: WHEN FND_API.G_EXC_ERROR THEN
766: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
767: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
768: g_module || l_api_name,
769: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');
770: END IF;
771: ROLLBACK TO delete_related_contracts_PVT;

Line 779: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

775: p_data => x_msg_data
776: );
777:
778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
779: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
780: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
781: g_module || l_api_name,
782: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
783: END IF;

Line 780: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

776: );
777:
778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
779: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
780: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
781: g_module || l_api_name,
782: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
783: END IF;
784: ROLLBACK TO delete_related_contracts_PVT;

Line 792: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

788: p_data => x_msg_data
789: );
790:
791: WHEN OTHERS THEN
792: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
793: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
794: g_module || l_api_name,
795: 'Leaving delete_related_contracts because of EXCEPTION: ' || sqlerrm);
796: END IF;

Line 793: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

789: );
790:
791: WHEN OTHERS THEN
792: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
793: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
794: g_module || l_api_name,
795: 'Leaving delete_related_contracts because of EXCEPTION: ' || sqlerrm);
796: END IF;
797: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 861: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

857: AND fgrant.instance_pk1_value = to_char(p_contract_id);
858:
859: BEGIN
860:
861: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
862: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
863: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
864: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
865: 'Contract Id is: ' || p_contract_id);

Line 862: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

858:
859: BEGIN
860:
861: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
862: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
863: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
864: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
865: 'Contract Id is: ' || p_contract_id);
866: END IF;

Line 864: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

860:
861: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
862: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
863: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
864: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
865: 'Contract Id is: ' || p_contract_id);
866: END IF;
867: l_api_name := 'delete_ACL';
868: l_api_version := 1.0;

Line 884: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

880: -- Initialize API return status to success
881: x_return_status := FND_API.G_RET_STS_SUCCESS;
882:
883: FOR acl_rec IN acl_csr LOOP
884: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
885: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
886: 'grantee_type is: ' || acl_rec.grantee_type);
887: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
888: 'grantee_key is: ' || acl_rec.grantee_key);

Line 885: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

881: x_return_status := FND_API.G_RET_STS_SUCCESS;
882:
883: FOR acl_rec IN acl_csr LOOP
884: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
885: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
886: 'grantee_type is: ' || acl_rec.grantee_type);
887: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
888: 'grantee_key is: ' || acl_rec.grantee_key);
889: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 887: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

883: FOR acl_rec IN acl_csr LOOP
884: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
885: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
886: 'grantee_type is: ' || acl_rec.grantee_type);
887: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
888: 'grantee_key is: ' || acl_rec.grantee_key);
889: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
890: 'instance_type is: ' || acl_rec.instance_type);
891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 889: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

885: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
886: 'grantee_type is: ' || acl_rec.grantee_type);
887: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
888: 'grantee_key is: ' || acl_rec.grantee_key);
889: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
890: 'instance_type is: ' || acl_rec.instance_type);
891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
892: 'instance_set_id is: ' || acl_rec.instance_set_id);
893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

887: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
888: 'grantee_key is: ' || acl_rec.grantee_key);
889: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
890: 'instance_type is: ' || acl_rec.instance_type);
891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
892: 'instance_set_id is: ' || acl_rec.instance_set_id);
893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
894: 'menu_name is: ' || acl_rec.menu_name);
895: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

889: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
890: 'instance_type is: ' || acl_rec.instance_type);
891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
892: 'instance_set_id is: ' || acl_rec.instance_set_id);
893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
894: 'menu_name is: ' || acl_rec.menu_name);
895: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
896: 'program_name is: ' || acl_rec.program_name);
897: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 895: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
892: 'instance_set_id is: ' || acl_rec.instance_set_id);
893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
894: 'menu_name is: ' || acl_rec.menu_name);
895: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
896: 'program_name is: ' || acl_rec.program_name);
897: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
898: 'program_tag is: ' || acl_rec.program_tag);
899: END IF;

Line 897: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
894: 'menu_name is: ' || acl_rec.menu_name);
895: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
896: 'program_name is: ' || acl_rec.program_name);
897: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
898: 'program_tag is: ' || acl_rec.program_tag);
899: END IF;
900: -- call FND_GRANT's delete api
901: FND_GRANTS_PKG.delete_grant(

Line 929: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

925:
926: -- Standard call to get message count and if count is 1, get message info.
927: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
928:
929: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
930: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
931: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
932: END IF;
933:

Line 930: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

926: -- Standard call to get message count and if count is 1, get message info.
927: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
928:
929: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
930: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
931: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
932: END IF;
933:
934:

Line 937: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

933:
934:
935: EXCEPTION
936: WHEN FND_API.G_EXC_ERROR THEN
937: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
938: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
939: g_module || l_api_name,
940: 'Leaving delete_ACL:FND_API.G_EXC_ERROR Exception');
941: END IF;

Line 938: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

934:
935: EXCEPTION
936: WHEN FND_API.G_EXC_ERROR THEN
937: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
938: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
939: g_module || l_api_name,
940: 'Leaving delete_ACL:FND_API.G_EXC_ERROR Exception');
941: END IF;
942: --close cursors

Line 954: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

950: p_data => x_msg_data
951: );
952:
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
955: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
956: g_module || l_api_name,
957: 'Leaving delete_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
958: END IF;

Line 955: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

951: );
952:
953: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
954: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
955: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
956: g_module || l_api_name,
957: 'Leaving delete_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
958: END IF;
959: IF (acl_csr%ISOPEN) THEN

Line 970: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

966: p_data => x_msg_data
967: );
968:
969: WHEN OTHERS THEN
970: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
971: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
972: g_module || l_api_name,
973: 'Leaving delete_ACL because of EXCEPTION: ' || sqlerrm);
974: END IF;

Line 971: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

967: );
968:
969: WHEN OTHERS THEN
970: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
971: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
972: g_module || l_api_name,
973: 'Leaving delete_ACL because of EXCEPTION: ' || sqlerrm);
974: END IF;
975: IF (acl_csr%ISOPEN) THEN

Line 1028: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1024: l_api_version NUMBER;
1025:
1026: BEGIN
1027:
1028: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1029: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1030: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history');
1031: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1032: 'Contract Id is: ' || to_char(p_contract_id));

Line 1029: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1025:
1026: BEGIN
1027:
1028: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1029: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1030: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history');
1031: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1032: 'Contract Id is: ' || to_char(p_contract_id));
1033: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 1031: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1027:
1028: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1029: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1030: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history');
1031: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1032: 'Contract Id is: ' || to_char(p_contract_id));
1033: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1034: 'Contract Version is: ' || to_char(p_contract_version));
1035: END IF;

Line 1033: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1029: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1030: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history');
1031: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1032: 'Contract Id is: ' || to_char(p_contract_id));
1033: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1034: 'Contract Version is: ' || to_char(p_contract_version));
1035: END IF;
1036: l_api_name := 'delete_status_history';
1037: l_api_version := 1.0;

Line 1065: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1061:
1062: -- Standard call to get message count and if count is 1, get message info.
1063: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1064:
1065: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1066: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1067: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history');
1068: END IF;
1069:

Line 1066: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1062: -- Standard call to get message count and if count is 1, get message info.
1063: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1064:
1065: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1066: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1067: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history');
1068: END IF;
1069:
1070:

Line 1073: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1069:
1070:
1071: EXCEPTION
1072: WHEN FND_API.G_EXC_ERROR THEN
1073: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1074: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1075: g_module || l_api_name,
1076: 'Leaving delete_status_history:FND_API.G_EXC_ERROR Exception');
1077: END IF;

Line 1074: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1070:
1071: EXCEPTION
1072: WHEN FND_API.G_EXC_ERROR THEN
1073: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1074: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1075: g_module || l_api_name,
1076: 'Leaving delete_status_history:FND_API.G_EXC_ERROR Exception');
1077: END IF;
1078: ROLLBACK TO delete_status_history_PVT;

Line 1086: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1082: p_data => x_msg_data
1083: );
1084:
1085: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1086: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1087: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1088: g_module || l_api_name,
1089: 'Leaving delete_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1090: END IF;

Line 1087: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1083: );
1084:
1085: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1086: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1087: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1088: g_module || l_api_name,
1089: 'Leaving delete_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1090: END IF;
1091: ROLLBACK TO delete_status_history_PVT;

Line 1099: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1095: p_data => x_msg_data
1096: );
1097:
1098: WHEN OTHERS THEN
1099: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1100: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1101: g_module || l_api_name,
1102: 'Leaving delete_status_history because of EXCEPTION: ' || sqlerrm);
1103: END IF;

Line 1100: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1096: );
1097:
1098: WHEN OTHERS THEN
1099: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1100: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1101: g_module || l_api_name,
1102: 'Leaving delete_status_history because of EXCEPTION: ' || sqlerrm);
1103: END IF;
1104: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1153: l_api_version NUMBER;
1154:
1155: BEGIN
1156:
1157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1159: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1160: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1161: 'Contract Id is: ' || to_char(p_contract_id));

Line 1158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1154:
1155: BEGIN
1156:
1157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1159: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1160: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1161: 'Contract Id is: ' || to_char(p_contract_id));
1162: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 1160: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1156:
1157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1159: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1160: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1161: 'Contract Id is: ' || to_char(p_contract_id));
1162: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1163: 'Contract Version is: ' || to_char(p_contract_version));
1164: END IF;

Line 1162: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1159: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1160: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1161: 'Contract Id is: ' || to_char(p_contract_id));
1162: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1163: 'Contract Version is: ' || to_char(p_contract_version));
1164: END IF;
1165: l_api_name := 'delete_approval_history';
1166: l_api_version := 1.0;

Line 1194: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1190:
1191: -- Standard call to get message count and if count is 1, get message info.
1192: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1193:
1194: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1195: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1196: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1197: END IF;
1198:

Line 1195: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1191: -- Standard call to get message count and if count is 1, get message info.
1192: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1193:
1194: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1195: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1196: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1197: END IF;
1198:
1199:

Line 1202: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1198:
1199:
1200: EXCEPTION
1201: WHEN FND_API.G_EXC_ERROR THEN
1202: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1203: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1204: g_module || l_api_name,
1205: 'Leaving delete_approval_history:FND_API.G_EXC_ERROR Exception');
1206: END IF;

Line 1203: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1199:
1200: EXCEPTION
1201: WHEN FND_API.G_EXC_ERROR THEN
1202: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1203: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1204: g_module || l_api_name,
1205: 'Leaving delete_approval_history:FND_API.G_EXC_ERROR Exception');
1206: END IF;
1207: ROLLBACK TO delete_approval_history_PVT;

Line 1215: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1211: p_data => x_msg_data
1212: );
1213:
1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1215: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1216: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1217: g_module || l_api_name,
1218: 'Leaving delete_approval_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1219: END IF;

Line 1216: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1212: );
1213:
1214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1215: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1216: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1217: g_module || l_api_name,
1218: 'Leaving delete_approval_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1219: END IF;
1220: ROLLBACK TO delete_approval_history_PVT;

Line 1228: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1224: p_data => x_msg_data
1225: );
1226:
1227: WHEN OTHERS THEN
1228: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1229: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1230: g_module || l_api_name,
1231: 'Leaving delete_approval_history because of EXCEPTION: ' || sqlerrm);
1232: END IF;

Line 1229: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1225: );
1226:
1227: WHEN OTHERS THEN
1228: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1229: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1230: g_module || l_api_name,
1231: 'Leaving delete_approval_history because of EXCEPTION: ' || sqlerrm);
1232: END IF;
1233: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1282: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1278: l_api_version NUMBER;
1279:
1280: BEGIN
1281:
1282: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1283: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1284: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1285: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1286: 'Contract Id is: ' || p_contract_id);

Line 1283: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1279:
1280: BEGIN
1281:
1282: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1283: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1284: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1285: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1286: 'Contract Id is: ' || p_contract_id);
1287: END IF;

Line 1285: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1281:
1282: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1283: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1284: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1285: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1286: 'Contract Id is: ' || p_contract_id);
1287: END IF;
1288: l_api_name := 'delete_bookmarks';
1289: l_api_version := 1.0;

Line 1320: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1316:
1317: -- Standard call to get message count and if count is 1, get message info.
1318: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1319:
1320: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1322: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1323: END IF;
1324:

Line 1321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1317: -- Standard call to get message count and if count is 1, get message info.
1318: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1319:
1320: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1322: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1323: END IF;
1324:
1325:

Line 1328: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1324:
1325:
1326: EXCEPTION
1327: WHEN FND_API.G_EXC_ERROR THEN
1328: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1329: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1330: g_module || l_api_name,
1331: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');
1332: END IF;

Line 1329: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1325:
1326: EXCEPTION
1327: WHEN FND_API.G_EXC_ERROR THEN
1328: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1329: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1330: g_module || l_api_name,
1331: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');
1332: END IF;
1333: ROLLBACK TO delete_bookmarks_PVT;

Line 1341: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1337: p_data => x_msg_data
1338: );
1339:
1340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1341: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1342: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1343: g_module || l_api_name,
1344: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1345: END IF;

Line 1342: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1338: );
1339:
1340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1341: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1342: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1343: g_module || l_api_name,
1344: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1345: END IF;
1346: ROLLBACK TO delete_bookmarks_PVT;

Line 1354: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1350: p_data => x_msg_data
1351: );
1352:
1353: WHEN OTHERS THEN
1354: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1355: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1356: g_module || l_api_name,
1357: 'Leaving delete_bookmarks because of EXCEPTION: ' || sqlerrm);
1358: END IF;

Line 1355: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1351: );
1352:
1353: WHEN OTHERS THEN
1354: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1355: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1356: g_module || l_api_name,
1357: 'Leaving delete_bookmarks because of EXCEPTION: ' || sqlerrm);
1358: END IF;
1359: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1403: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1399: FROM OKC_REP_CONTRACTS_ALL
1400: WHERE CONTRACT_ID = cp_contract_id;
1401: BEGIN
1402:
1403: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1404: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1405: 'Entered Function OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1406: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1407: 'Contract Id is: ' || p_contract_id);

Line 1404: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1400: WHERE CONTRACT_ID = cp_contract_id;
1401: BEGIN
1402:
1403: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1404: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1405: 'Entered Function OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1406: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1407: 'Contract Id is: ' || p_contract_id);
1408: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 1406: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1402:
1403: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1404: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1405: 'Entered Function OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1406: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1407: 'Contract Id is: ' || p_contract_id);
1408: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1409: 'Object Version is: ' || p_object_version_number);
1410: END IF;

Line 1408: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1404: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1405: 'Entered Function OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1406: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1407: 'Contract Id is: ' || p_contract_id);
1408: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1409: 'Object Version is: ' || p_object_version_number);
1410: END IF;
1411:
1412:

Line 1422: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1418: CLOSE lock_csr;
1419:
1420: EXCEPTION
1421: WHEN E_Resource_Busy THEN
1422: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1423: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1424: g_module || l_api_name,
1425: 'Leaving Function Lock_Contract_Header:E_Resource_Busy Exception');
1426: END IF;

Line 1423: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1419:
1420: EXCEPTION
1421: WHEN E_Resource_Busy THEN
1422: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1423: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1424: g_module || l_api_name,
1425: 'Leaving Function Lock_Contract_Header:E_Resource_Busy Exception');
1426: END IF;
1427:

Line 1456: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1452: ELSE
1453: l_return_status :=FND_API.G_RET_STS_SUCCESS;
1454: END IF;
1455:
1456: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1457: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1458: g_module || l_api_name,
1459: 'Leaving Function Lock_Contract_Header');
1460: END IF;

Line 1457: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,

1453: l_return_status :=FND_API.G_RET_STS_SUCCESS;
1454: END IF;
1455:
1456: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1457: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1458: g_module || l_api_name,
1459: 'Leaving Function Lock_Contract_Header');
1460: END IF;
1461:

Line 1474: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1470: IF (lchk_csr%ISOPEN) THEN
1471: CLOSE lchk_csr;
1472: END IF;
1473:
1474: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1475: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1476: g_module || l_api_name,
1477: 'Leaving Function Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1478: END IF;

Line 1475: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1471: CLOSE lchk_csr;
1472: END IF;
1473:
1474: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1475: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1476: g_module || l_api_name,
1477: 'Leaving Function Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1478: END IF;
1479:

Line 1516: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1512: l_api_name VARCHAR2(30);
1513:
1514: BEGIN
1515: l_api_name := 'Lock_Contract_header';
1516: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1518: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1519: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1520: 'Contract Id is: ' || p_contract_id);

Line 1517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1513:
1514: BEGIN
1515: l_api_name := 'Lock_Contract_header';
1516: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1518: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1519: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1520: 'Contract Id is: ' || p_contract_id);
1521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 1519: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1515: l_api_name := 'Lock_Contract_header';
1516: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1518: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1519: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1520: 'Contract Id is: ' || p_contract_id);
1521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1522: 'Object Version is: ' || p_object_version_number);
1523: END IF;

Line 1521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1517: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1518: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1519: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1520: 'Contract Id is: ' || p_contract_id);
1521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1522: 'Object Version is: ' || p_object_version_number);
1523: END IF;
1524:
1525: --------------------------------------------

Line 1539: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1535: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1536: RAISE FND_API.G_EXC_ERROR;
1537: END IF;
1538: ----------------------------------------------------------
1539: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1540: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1541: g_module || l_api_name,
1542: 'Leaving Lock_Contract_Header');
1543: END IF;

Line 1540: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,

1536: RAISE FND_API.G_EXC_ERROR;
1537: END IF;
1538: ----------------------------------------------------------
1539: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1540: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1541: g_module || l_api_name,
1542: 'Leaving Lock_Contract_Header');
1543: END IF;
1544:

Line 1547: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1543: END IF;
1544:
1545: EXCEPTION
1546: WHEN FND_API.G_EXC_ERROR THEN
1547: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1548: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1549: g_module || l_api_name,
1550: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1551: END IF;

Line 1548: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1544:
1545: EXCEPTION
1546: WHEN FND_API.G_EXC_ERROR THEN
1547: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1548: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1549: g_module || l_api_name,
1550: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1551: END IF;
1552: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1554: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1550: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1551: END IF;
1552: x_return_status := FND_API.G_RET_STS_ERROR;
1553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1554: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1555: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1556: g_module || l_api_name,
1557: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1558: END IF;

Line 1555: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1551: END IF;
1552: x_return_status := FND_API.G_RET_STS_ERROR;
1553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1554: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1555: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1556: g_module || l_api_name,
1557: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1558: END IF;
1559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1562: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1558: END IF;
1559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1560:
1561: WHEN OTHERS THEN
1562: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1564: g_module || l_api_name,
1565: 'Leaving Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1566: END IF;

Line 1563: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1560:
1561: WHEN OTHERS THEN
1562: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1564: g_module || l_api_name,
1565: 'Leaving Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1566: END IF;
1567: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1628: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1624: contract_rec contract_csr%ROWTYPE;
1625:
1626: BEGIN
1627:
1628: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1629: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1630: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
1631: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1632: 'Contract Id is: ' || p_contract_id);

Line 1629: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1625:
1626: BEGIN
1627:
1628: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1629: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1630: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
1631: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1632: 'Contract Id is: ' || p_contract_id);
1633: END IF;

Line 1631: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

1627:
1628: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1629: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1630: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
1631: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1632: 'Contract Id is: ' || p_contract_id);
1633: END IF;
1634: l_api_name := 'delete_contract';
1635: l_api_version := 1.0;

Line 1650: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1646:
1647: -- Initialize API return status to success
1648: x_return_status := FND_API.G_RET_STS_SUCCESS;
1649:
1650: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1651: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1652: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
1653: END IF;
1654: -- Lock the contract header

Line 1651: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1647: -- Initialize API return status to success
1648: x_return_status := FND_API.G_RET_STS_SUCCESS;
1649:
1650: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1651: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1652: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
1653: END IF;
1654: -- Lock the contract header
1655: Lock_Contract_Header(

Line 1660: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1656: p_contract_id => p_contract_id,
1657: p_object_version_number => NULL,
1658: x_return_status => x_return_status
1659: );
1660: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1661: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1662: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
1663: || x_return_status);
1664: END IF;

Line 1661: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1657: p_object_version_number => NULL,
1658: x_return_status => x_return_status
1659: );
1660: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1661: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1662: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
1663: || x_return_status);
1664: END IF;
1665: -----------------------------------------------------

Line 1678: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1674: -- Get contract_type and version required for deliverables and documents APIs
1675: OPEN contract_csr;
1676: FETCH contract_csr INTO contract_rec;
1677: IF(contract_csr%NOTFOUND) THEN
1678: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1679: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1680: G_MODULE||l_api_name,
1681: 'Invalid Contract Id: '|| p_contract_id);
1682: END IF;

Line 1679: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

1675: OPEN contract_csr;
1676: FETCH contract_csr INTO contract_rec;
1677: IF(contract_csr%NOTFOUND) THEN
1678: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1679: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1680: G_MODULE||l_api_name,
1681: 'Invalid Contract Id: '|| p_contract_id);
1682: END IF;
1683: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 1693: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1689: END IF;
1690:
1691:
1692: if (contract_rec.contract_version_num = 1) THEN
1693: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1694: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1695: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts()');
1696: END IF;
1697: delete_contacts(

Line 1694: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1690:
1691:
1692: if (contract_rec.contract_version_num = 1) THEN
1693: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1694: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1695: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts()');
1696: END IF;
1697: delete_contacts(
1698: p_api_version => 1.0,

Line 1705: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1701: p_contract_id => p_contract_id,
1702: x_msg_data => x_msg_data,
1703: x_msg_count => x_msg_count,
1704: x_return_status => x_return_status);
1705: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1706: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1707: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts return status is: '
1708: || x_return_status);
1709: END IF;

Line 1706: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1702: x_msg_data => x_msg_data,
1703: x_msg_count => x_msg_count,
1704: x_return_status => x_return_status);
1705: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1706: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1707: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts return status is: '
1708: || x_return_status);
1709: END IF;
1710: -----------------------------------------------------

Line 1719: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1715: END IF;
1716: -----------------------------------------------------
1717:
1718:
1719: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1720: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1721: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_parties()');
1722: END IF;
1723: delete_parties(

Line 1720: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1716: -----------------------------------------------------
1717:
1718:
1719: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1720: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1721: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_parties()');
1722: END IF;
1723: delete_parties(
1724: p_api_version => 1.0,

Line 1731: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1727: p_contract_id => p_contract_id,
1728: x_msg_data => x_msg_data,
1729: x_msg_count => x_msg_count,
1730: x_return_status => x_return_status);
1731: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1732: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1733: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_parties return status is: '
1734: || x_return_status);
1735: END IF;

Line 1732: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1728: x_msg_data => x_msg_data,
1729: x_msg_count => x_msg_count,
1730: x_return_status => x_return_status);
1731: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1732: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1733: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_parties return status is: '
1734: || x_return_status);
1735: END IF;
1736: -----------------------------------------------------

Line 1745: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1741: END IF;
1742: --------------------------------------------------------
1743:
1744:
1745: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1746: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1747: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_risks()');
1748: END IF;
1749: delete_risks(

Line 1746: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1742: --------------------------------------------------------
1743:
1744:
1745: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1746: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1747: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_risks()');
1748: END IF;
1749: delete_risks(
1750: p_api_version => 1.0,

Line 1757: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1753: p_contract_id => p_contract_id,
1754: x_msg_data => x_msg_data,
1755: x_msg_count => x_msg_count,
1756: x_return_status => x_return_status);
1757: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1758: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1759: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_risks return status is: '
1760: || x_return_status);
1761: END IF;

Line 1758: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1754: x_msg_data => x_msg_data,
1755: x_msg_count => x_msg_count,
1756: x_return_status => x_return_status);
1757: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1758: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1759: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_risks return status is: '
1760: || x_return_status);
1761: END IF;
1762: -----------------------------------------------------

Line 1771: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1767: END IF;
1768: --------------------------------------------------------
1769:
1770:
1771: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1772: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1773: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL()');
1774: END IF;
1775: delete_ACL(

Line 1772: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1768: --------------------------------------------------------
1769:
1770:
1771: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1772: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1773: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL()');
1774: END IF;
1775: delete_ACL(
1776: p_api_version => 1.0,

Line 1783: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1779: p_contract_id => p_contract_id,
1780: x_msg_data => x_msg_data,
1781: x_msg_count => x_msg_count,
1782: x_return_status => x_return_status);
1783: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1784: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1785: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL return status is: '
1786: || x_return_status);
1787: END IF;

Line 1784: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1780: x_msg_data => x_msg_data,
1781: x_msg_count => x_msg_count,
1782: x_return_status => x_return_status);
1783: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1784: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1785: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL return status is: '
1786: || x_return_status);
1787: END IF;
1788: -----------------------------------------------------

Line 1797: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1793: END IF;
1794: --------------------------------------------------------
1795:
1796:
1797: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1798: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1799: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts()');
1800: END IF;
1801: delete_related_contracts(

Line 1798: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1794: --------------------------------------------------------
1795:
1796:
1797: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1798: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1799: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts()');
1800: END IF;
1801: delete_related_contracts(
1802: p_api_version => 1.0,

Line 1809: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1805: p_contract_id => p_contract_id,
1806: x_msg_data => x_msg_data,
1807: x_msg_count => x_msg_count,
1808: x_return_status => x_return_status);
1809: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1810: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1811: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts return status is: '
1812: || x_return_status);
1813: END IF;

Line 1810: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1806: x_msg_data => x_msg_data,
1807: x_msg_count => x_msg_count,
1808: x_return_status => x_return_status);
1809: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1810: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1811: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts return status is: '
1812: || x_return_status);
1813: END IF;
1814: -----------------------------------------------------

Line 1823: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1819: END IF;
1820: --------------------------------------------------------
1821:
1822:
1823: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1824: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1825: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history()');
1826: END IF;
1827: delete_status_history(

Line 1824: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1820: --------------------------------------------------------
1821:
1822:
1823: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1824: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1825: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history()');
1826: END IF;
1827: delete_status_history(
1828: p_api_version => 1.0,

Line 1836: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1832: p_contract_version => contract_rec.contract_version_num,
1833: x_msg_data => x_msg_data,
1834: x_msg_count => x_msg_count,
1835: x_return_status => x_return_status);
1836: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1837: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1838: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history return status is: '
1839: || x_return_status);
1840: END IF;

Line 1837: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1833: x_msg_data => x_msg_data,
1834: x_msg_count => x_msg_count,
1835: x_return_status => x_return_status);
1836: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1837: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1838: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history return status is: '
1839: || x_return_status);
1840: END IF;
1841: -----------------------------------------------------

Line 1850: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1846: END IF;
1847: --------------------------------------------------------
1848:
1849:
1850: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1851: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1852: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history()');
1853: END IF;
1854: delete_approval_history(

Line 1851: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1847: --------------------------------------------------------
1848:
1849:
1850: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1851: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1852: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history()');
1853: END IF;
1854: delete_approval_history(
1855: p_api_version => 1.0,

Line 1863: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1859: p_contract_version => contract_rec.contract_version_num,
1860: x_msg_data => x_msg_data,
1861: x_msg_count => x_msg_count,
1862: x_return_status => x_return_status);
1863: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1864: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1865: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history return status is: '
1866: || x_return_status);
1867: END IF;

Line 1864: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1860: x_msg_data => x_msg_data,
1861: x_msg_count => x_msg_count,
1862: x_return_status => x_return_status);
1863: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1864: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1865: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history return status is: '
1866: || x_return_status);
1867: END IF;
1868: -----------------------------------------------------

Line 1877: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1873: END IF;
1874: --------------------------------------------------------
1875:
1876:
1877: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1879: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks()');
1880: END IF;
1881: delete_bookmarks(

Line 1878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1874: --------------------------------------------------------
1875:
1876:
1877: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1879: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks()');
1880: END IF;
1881: delete_bookmarks(
1882: p_api_version => 1.0,

Line 1890: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1886: p_contract_id => p_contract_id,
1887: x_msg_data => x_msg_data,
1888: x_msg_count => x_msg_count,
1889: x_return_status => x_return_status);
1890: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1892: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks return status is: '
1893: || x_return_status);
1894: END IF;

Line 1891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1887: x_msg_data => x_msg_data,
1888: x_msg_count => x_msg_count,
1889: x_return_status => x_return_status);
1890: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1892: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks return status is: '
1893: || x_return_status);
1894: END IF;
1895: -----------------------------------------------------

Line 1905: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1901: --------------------------------------------------------
1902:
1903: END IF; -- (contract_rec.contract_version_num = 1)
1904:
1905: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1906: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1907: 'Calling OKC_CONTRACT_DOCS_GRP.Delete_Ver_Attachments');
1908: END IF;
1909: -- Delete Contract Documents

Line 1906: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1902:
1903: END IF; -- (contract_rec.contract_version_num = 1)
1904:
1905: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1906: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1907: 'Calling OKC_CONTRACT_DOCS_GRP.Delete_Ver_Attachments');
1908: END IF;
1909: -- Delete Contract Documents
1910: -- The following package call should be uncommented once the package is compiling.

Line 1920: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1916: x_return_status => x_return_status,
1917: x_msg_count => x_msg_count,
1918: x_msg_data => x_msg_data
1919: );
1920: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1921: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1922: 'OKC_CONTRACT_DOCS_GRP.Delete_Ver_Attachments return status is : '
1923: || x_return_status);
1924: END IF;

Line 1921: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1917: x_msg_count => x_msg_count,
1918: x_msg_data => x_msg_data
1919: );
1920: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1921: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1922: 'OKC_CONTRACT_DOCS_GRP.Delete_Ver_Attachments return status is : '
1923: || x_return_status);
1924: END IF;
1925: -----------------------------------------------------

Line 1936: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1932:
1933: IF (contract_rec.contract_version_num > 1) THEN
1934:
1935: -- Call this API only if the contract has previous versions
1936: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1938: 'Calling OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
1939: END IF;
1940:

Line 1937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1933: IF (contract_rec.contract_version_num > 1) THEN
1934:
1935: -- Call this API only if the contract has previous versions
1936: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1938: 'Calling OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
1939: END IF;
1940:
1941: -- Bug 5044121

Line 1950: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1946: p_business_document_type => contract_rec.contract_type,
1947: p_business_document_id => p_contract_id,
1948: p_business_document_version => contract_rec.contract_version_num);
1949:
1950: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1951: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1952: 'OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current return status is : '
1953: || x_return_status);
1954: END IF;

Line 1951: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

1947: p_business_document_id => p_contract_id,
1948: p_business_document_version => contract_rec.contract_version_num);
1949:
1950: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1951: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1952: 'OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current return status is : '
1953: || x_return_status);
1954: END IF;
1955:

Line 1967: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1963:
1964: END IF;
1965:
1966: -- Repository Enhancement 12.1 (For Delete Action)
1967: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1000: Calling Ptivate API to Delete the doc');
1969: END IF;
1970:
1971: -- If the contract has only one version, delete the terms.

Line 1968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1000: Calling Ptivate API to Delete the doc');

1964: END IF;
1965:
1966: -- Repository Enhancement 12.1 (For Delete Action)
1967: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1000: Calling Ptivate API to Delete the doc');
1969: END IF;
1970:
1971: -- If the contract has only one version, delete the terms.
1972: -- Otherwise the only the terms versions have to be deleted.

Line 2028: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2024:
2025:
2026: IF(contract_rec.contract_version_num = 1) THEN
2027:
2028: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2029: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2030: 'Calling OKC_DELIVERABLE_PROCESS_PVT.delete_deliverables');
2031: END IF;
2032:

Line 2029: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2025:
2026: IF(contract_rec.contract_version_num = 1) THEN
2027:
2028: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2029: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2030: 'Calling OKC_DELIVERABLE_PROCESS_PVT.delete_deliverables');
2031: END IF;
2032:
2033: -- Delete Deliverables

Line 2071: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2067: x_msg_data => x_msg_data);
2068:
2069: END IF;
2070:
2071: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2073: 'OKC_DELIVERABLE_PROCESS_PVT.deleteDeliverables return status is : '
2074: || x_return_status);
2075: END IF;

Line 2072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2068:
2069: END IF;
2070:
2071: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2073: 'OKC_DELIVERABLE_PROCESS_PVT.deleteDeliverables return status is : '
2074: || x_return_status);
2075: END IF;
2076:

Line 2086: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2082: END IF;
2083: --------------------------------------------------------
2084:
2085:
2086: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2087: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2088: 'Deleting Contract header record');
2089: END IF;
2090: -- Delete contract header from the main header table OKC_REP_CONTRACTS_ALL

Line 2087: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2083: --------------------------------------------------------
2084:
2085:
2086: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2087: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2088: 'Deleting Contract header record');
2089: END IF;
2090: -- Delete contract header from the main header table OKC_REP_CONTRACTS_ALL
2091: DELETE FROM OKC_REP_CONTRACTS_ALL

Line 2094: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2090: -- Delete contract header from the main header table OKC_REP_CONTRACTS_ALL
2091: DELETE FROM OKC_REP_CONTRACTS_ALL
2092: WHERE contract_id = p_contract_id;
2093:
2094: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2095: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2096: 'Deleted Contract header record');
2097: END IF;
2098: -- If Version > 1, copy the latest version from the archive table.

Line 2095: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2091: DELETE FROM OKC_REP_CONTRACTS_ALL
2092: WHERE contract_id = p_contract_id;
2093:
2094: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2095: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2096: 'Deleted Contract header record');
2097: END IF;
2098: -- If Version > 1, copy the latest version from the archive table.
2099: if (contract_rec.contract_version_num > 1) THEN

Line 2243: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2239: CLOSE contract_csr;
2240: -- Standard call to get message count and if count is 1, get message info.
2241: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2242:
2243: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2244: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2245: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
2246: END IF;
2247:

Line 2244: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2240: -- Standard call to get message count and if count is 1, get message info.
2241: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2242:
2243: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2244: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2245: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
2246: END IF;
2247:
2248:

Line 2251: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2247:
2248:
2249: EXCEPTION
2250: WHEN FND_API.G_EXC_ERROR THEN
2251: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2252: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2253: g_module || l_api_name,
2254: 'Leaving delete_contract:FND_API.G_EXC_ERROR Exception');
2255: END IF;

Line 2252: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2248:
2249: EXCEPTION
2250: WHEN FND_API.G_EXC_ERROR THEN
2251: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2252: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2253: g_module || l_api_name,
2254: 'Leaving delete_contract:FND_API.G_EXC_ERROR Exception');
2255: END IF;
2256: --close cursors

Line 2268: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2264: p_data => x_msg_data
2265: );
2266:
2267: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2268: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2269: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2270: g_module || l_api_name,
2271: 'Leaving delete_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2272: END IF;

Line 2269: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2265: );
2266:
2267: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2268: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2269: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2270: g_module || l_api_name,
2271: 'Leaving delete_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2272: END IF;
2273: --close cursors

Line 2285: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2281: p_data => x_msg_data
2282: );
2283:
2284: WHEN OTHERS THEN
2285: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2286: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2287: g_module || l_api_name,
2288: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
2289: END IF;

Line 2286: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2282: );
2283:
2284: WHEN OTHERS THEN
2285: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2286: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2287: g_module || l_api_name,
2288: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
2289: END IF;
2290: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 2354: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2350: FROM OKC_REP_PARTY_CONTACTS
2351: WHERE contract_id = p_source_contract_id;
2352: BEGIN
2353:
2354: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2355: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2356: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2357: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2358: 'Source Contract Id is: ' || to_char(p_source_contract_id));

Line 2355: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2351: WHERE contract_id = p_source_contract_id;
2352: BEGIN
2353:
2354: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2355: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2356: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2357: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2358: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2359: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 2357: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2353:
2354: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2355: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2356: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2357: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2358: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2359: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2360: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2361: END IF;

Line 2359: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2355: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2356: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2357: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2358: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2359: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2360: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2361: END IF;
2362: l_api_name := 'copy_contacts';
2363: l_api_version := 1.0;

Line 2385: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2381: l_last_updated_by := l_created_by;
2382: l_last_update_login := Fnd_Global.Login_Id;
2383:
2384: FOR contact_rec IN contact_csr LOOP
2385: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2386: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2387: 'Party Id is: ' || contact_rec.party_id);
2388: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2389: 'Party Role Code is: ' || contact_rec.party_role_code);

Line 2386: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2382: l_last_update_login := Fnd_Global.Login_Id;
2383:
2384: FOR contact_rec IN contact_csr LOOP
2385: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2386: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2387: 'Party Id is: ' || contact_rec.party_id);
2388: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2389: 'Party Role Code is: ' || contact_rec.party_role_code);
2390: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2388: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2384: FOR contact_rec IN contact_csr LOOP
2385: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2386: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2387: 'Party Id is: ' || contact_rec.party_id);
2388: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2389: 'Party Role Code is: ' || contact_rec.party_role_code);
2390: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2391: 'Contact Id is: ' || contact_rec.contact_id);
2392: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2390: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2386: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2387: 'Party Id is: ' || contact_rec.party_id);
2388: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2389: 'Party Role Code is: ' || contact_rec.party_role_code);
2390: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2391: 'Contact Id is: ' || contact_rec.contact_id);
2392: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2393: 'Contact Role Code is: ' || contact_rec.contact_role_id);
2394: END IF;

Line 2392: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2388: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2389: 'Party Role Code is: ' || contact_rec.party_role_code);
2390: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2391: 'Contact Id is: ' || contact_rec.contact_id);
2392: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2393: 'Contact Role Code is: ' || contact_rec.contact_role_id);
2394: END IF;
2395: -- INSERT THE NEW RECORDS into OKC_REP_PARTY_CONTACTS table
2396:

Line 2430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2426:
2427: -- Standard call to get message count and if count is 1, get message info.
2428: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2429:
2430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2432: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2433: END IF;
2434:

Line 2431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2427: -- Standard call to get message count and if count is 1, get message info.
2428: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2429:
2430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2432: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2433: END IF;
2434:
2435:

Line 2438: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2434:
2435:
2436: EXCEPTION
2437: WHEN FND_API.G_EXC_ERROR THEN
2438: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2439: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2440: g_module || l_api_name,
2441: 'Leaving copy_contacts:FND_API.G_EXC_ERROR Exception');
2442: END IF;

Line 2439: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2435:
2436: EXCEPTION
2437: WHEN FND_API.G_EXC_ERROR THEN
2438: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2439: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2440: g_module || l_api_name,
2441: 'Leaving copy_contacts:FND_API.G_EXC_ERROR Exception');
2442: END IF;
2443: ROLLBACK TO copy_contacts_PVT;

Line 2451: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2447: p_data => x_msg_data
2448: );
2449:
2450: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2451: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2452: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2453: g_module || l_api_name,
2454: 'Leaving copy_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2455: END IF;

Line 2452: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2448: );
2449:
2450: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2451: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2452: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2453: g_module || l_api_name,
2454: 'Leaving copy_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2455: END IF;
2456: ROLLBACK TO copy_contacts_PVT;

Line 2464: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2460: p_data => x_msg_data
2461: );
2462:
2463: WHEN OTHERS THEN
2464: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2465: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2466: g_module || l_api_name,
2467: 'Leaving copy_contacts because of EXCEPTION: ' || sqlerrm);
2468: END IF;

Line 2465: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2461: );
2462:
2463: WHEN OTHERS THEN
2464: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2465: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2466: g_module || l_api_name,
2467: 'Leaving copy_contacts because of EXCEPTION: ' || sqlerrm);
2468: END IF;
2469: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 2529: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2525: FROM OKC_REP_CONTRACT_PARTIES
2526: WHERE contract_id = p_source_contract_id;
2527: BEGIN
2528:
2529: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2530: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2531: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2532: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2533: 'Source Contract Id is: ' || to_char(p_source_contract_id));

Line 2530: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2526: WHERE contract_id = p_source_contract_id;
2527: BEGIN
2528:
2529: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2530: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2531: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2532: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2533: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 2532: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2528:
2529: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2530: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2531: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2532: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2533: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2535: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2536: END IF;

Line 2534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2530: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2531: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2532: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2533: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2535: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2536: END IF;
2537: l_api_name := 'copy_parties';
2538: l_api_version := 1.0;

Line 2560: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2556: l_last_updated_by := l_created_by;
2557: l_last_update_login := Fnd_Global.Login_Id;
2558:
2559: FOR party_rec IN party_csr LOOP
2560: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2561: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2562: 'Party Id is: ' || party_rec.party_id);
2563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2564: 'Party Role Code is: ' || party_rec.party_role_code);

Line 2561: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2557: l_last_update_login := Fnd_Global.Login_Id;
2558:
2559: FOR party_rec IN party_csr LOOP
2560: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2561: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2562: 'Party Id is: ' || party_rec.party_id);
2563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2564: 'Party Role Code is: ' || party_rec.party_role_code);
2565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2559: FOR party_rec IN party_csr LOOP
2560: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2561: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2562: 'Party Id is: ' || party_rec.party_id);
2563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2564: 'Party Role Code is: ' || party_rec.party_role_code);
2565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2566: 'Party Location ID is: ' || party_rec.party_location_id);
2567: END IF;

Line 2565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2561: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2562: 'Party Id is: ' || party_rec.party_id);
2563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2564: 'Party Role Code is: ' || party_rec.party_role_code);
2565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2566: 'Party Location ID is: ' || party_rec.party_location_id);
2567: END IF;
2568: -- INSERT THE NEW RECORDS into OKC_REP_CONTRACT_PARTIES table
2569: INSERT INTO OKC_REP_CONTRACT_PARTIES (

Line 2600: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2596:
2597: -- Standard call to get message count and if count is 1, get message info.
2598: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2599:
2600: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2601: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2602: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2603: END IF;
2604:

Line 2601: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2597: -- Standard call to get message count and if count is 1, get message info.
2598: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2599:
2600: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2601: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2602: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2603: END IF;
2604:
2605:

Line 2608: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2604:
2605:
2606: EXCEPTION
2607: WHEN FND_API.G_EXC_ERROR THEN
2608: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2609: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2610: g_module || l_api_name,
2611: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');
2612: END IF;

Line 2609: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2605:
2606: EXCEPTION
2607: WHEN FND_API.G_EXC_ERROR THEN
2608: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2609: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2610: g_module || l_api_name,
2611: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');
2612: END IF;
2613: ROLLBACK TO copy_parties_PVT;

Line 2621: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2617: p_data => x_msg_data
2618: );
2619:
2620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2621: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2622: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2623: g_module || l_api_name,
2624: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2625: END IF;

Line 2622: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2618: );
2619:
2620: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2621: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2622: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2623: g_module || l_api_name,
2624: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2625: END IF;
2626: ROLLBACK TO copy_parties_PVT;

Line 2634: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2630: p_data => x_msg_data
2631: );
2632:
2633: WHEN OTHERS THEN
2634: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2635: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2636: g_module || l_api_name,
2637: 'Leaving copy_parties because of EXCEPTION: ' || sqlerrm);
2638: END IF;

Line 2635: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2631: );
2632:
2633: WHEN OTHERS THEN
2634: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2635: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2636: g_module || l_api_name,
2637: 'Leaving copy_parties because of EXCEPTION: ' || sqlerrm);
2638: END IF;
2639: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 2710: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2706:
2707: contract_rec contract_csr%ROWTYPE;
2708: BEGIN
2709:
2710: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2711: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2712: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2713: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2714: 'Source Contract Id is: ' || to_char(p_source_contract_id));

Line 2711: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2707: contract_rec contract_csr%ROWTYPE;
2708: BEGIN
2709:
2710: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2711: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2712: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2713: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2714: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2715: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 2713: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2709:
2710: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2711: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2712: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2713: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2714: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2715: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2716: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2717: END IF;

Line 2715: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2711: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2712: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2713: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2714: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2715: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2716: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2717: END IF;
2718: l_api_name := 'copy_risks';
2719: l_api_version := 1.0;

Line 2746: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2742: -- Get effective dates and version of the contract.
2743: OPEN contract_csr;
2744: FETCH contract_csr INTO contract_rec;
2745: IF(contract_csr%NOTFOUND) THEN
2746: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2747: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
2748: G_MODULE||l_api_name,
2749: 'Invalid Contract Id: '|| p_source_contract_id);
2750: END IF;

Line 2747: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

2743: OPEN contract_csr;
2744: FETCH contract_csr INTO contract_rec;
2745: IF(contract_csr%NOTFOUND) THEN
2746: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2747: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
2748: G_MODULE||l_api_name,
2749: 'Invalid Contract Id: '|| p_source_contract_id);
2750: END IF;
2751: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 2764: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2760: FOR risk_rec IN risk_csr(contract_rec.contract_type, p_source_contract_id) LOOP
2761: -- Get the id column.
2762: -- SELECT OKC_CONTRACT_RISKS_S.nextval INTO l_contract_risk_id FROM dual;
2763:
2764: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2765: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2766: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
2767: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2768: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);

Line 2765: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2761: -- Get the id column.
2762: -- SELECT OKC_CONTRACT_RISKS_S.nextval INTO l_contract_risk_id FROM dual;
2763:
2764: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2765: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2766: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
2767: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2768: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);
2769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2767: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2763:
2764: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2765: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2766: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
2767: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2768: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);
2769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2770: 'Contract Version is: ' || contract_rec.CONTRACT_VERSION_NUM);
2771: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2765: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2766: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
2767: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2768: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);
2769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2770: 'Contract Version is: ' || contract_rec.CONTRACT_VERSION_NUM);
2771: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2772: 'Risk Event ID is: ' || risk_rec.RISK_EVENT_ID);
2773: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2771: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2767: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2768: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);
2769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2770: 'Contract Version is: ' || contract_rec.CONTRACT_VERSION_NUM);
2771: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2772: 'Risk Event ID is: ' || risk_rec.RISK_EVENT_ID);
2773: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2774: 'Probability code is: ' || risk_rec.PROBABILITY_CODE);
2775: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2773: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2770: 'Contract Version is: ' || contract_rec.CONTRACT_VERSION_NUM);
2771: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2772: 'Risk Event ID is: ' || risk_rec.RISK_EVENT_ID);
2773: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2774: 'Probability code is: ' || risk_rec.PROBABILITY_CODE);
2775: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2776: 'Impact Code is: ' || risk_rec.IMPACT_CODE);
2777: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2775: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2771: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2772: 'Risk Event ID is: ' || risk_rec.RISK_EVENT_ID);
2773: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2774: 'Probability code is: ' || risk_rec.PROBABILITY_CODE);
2775: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2776: 'Impact Code is: ' || risk_rec.IMPACT_CODE);
2777: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2778: 'Risk Occurred Flag is: ' || risk_rec.RISK_OCCURRED_FLAG);
2779: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2777: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2773: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2774: 'Probability code is: ' || risk_rec.PROBABILITY_CODE);
2775: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2776: 'Impact Code is: ' || risk_rec.IMPACT_CODE);
2777: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2778: 'Risk Occurred Flag is: ' || risk_rec.RISK_OCCURRED_FLAG);
2779: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2780: 'Occurence Date is: ' || to_char(risk_rec.OCCURRENCE_DATE));
2781: END IF;

Line 2779: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2775: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2776: 'Impact Code is: ' || risk_rec.IMPACT_CODE);
2777: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2778: 'Risk Occurred Flag is: ' || risk_rec.RISK_OCCURRED_FLAG);
2779: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2780: 'Occurence Date is: ' || to_char(risk_rec.OCCURRENCE_DATE));
2781: END IF;
2782: -- INSERT THE NEW RECORDS into OKC_CONTRACT_RISKS table
2783: INSERT INTO OKC_CONTRACT_RISKS (

Line 2827: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2823:
2824: -- Standard call to get message count and if count is 1, get message info.
2825: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2826:
2827: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2828: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2829: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2830: END IF;
2831:

Line 2828: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2824: -- Standard call to get message count and if count is 1, get message info.
2825: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2826:
2827: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2828: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2829: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2830: END IF;
2831:
2832:

Line 2835: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2831:
2832:
2833: EXCEPTION
2834: WHEN FND_API.G_EXC_ERROR THEN
2835: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2836: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2837: g_module || l_api_name,
2838: 'Leaving copy_risks:FND_API.G_EXC_ERROR Exception');
2839: END IF;

Line 2836: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2832:
2833: EXCEPTION
2834: WHEN FND_API.G_EXC_ERROR THEN
2835: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2836: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2837: g_module || l_api_name,
2838: 'Leaving copy_risks:FND_API.G_EXC_ERROR Exception');
2839: END IF;
2840: --close cursors

Line 2852: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2848: p_data => x_msg_data
2849: );
2850:
2851: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2852: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2853: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2854: g_module || l_api_name,
2855: 'Leaving copy_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2856: END IF;

Line 2853: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2849: );
2850:
2851: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2852: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2853: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2854: g_module || l_api_name,
2855: 'Leaving copy_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2856: END IF;
2857: --close cursors

Line 2869: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2865: p_data => x_msg_data
2866: );
2867:
2868: WHEN OTHERS THEN
2869: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2870: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2871: g_module || l_api_name,
2872: 'Leaving copy_risks because of EXCEPTION: ' || sqlerrm);
2873: END IF;

Line 2870: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2866: );
2867:
2868: WHEN OTHERS THEN
2869: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2870: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2871: g_module || l_api_name,
2872: 'Leaving copy_risks because of EXCEPTION: ' || sqlerrm);
2873: END IF;
2874: --close cursors

Line 2950: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2946: AND fgrant.instance_pk1_value = to_char(p_source_contract_id);
2947:
2948: BEGIN
2949:
2950: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2951: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2952: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
2953: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2954: 'Source Contract Id is: ' || p_source_contract_id);

Line 2951: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2947:
2948: BEGIN
2949:
2950: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2951: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2952: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
2953: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2954: 'Source Contract Id is: ' || p_source_contract_id);
2955: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 2953: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2949:
2950: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2951: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2952: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
2953: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2954: 'Source Contract Id is: ' || p_source_contract_id);
2955: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2956: 'Target Contract Id is: ' || p_target_contract_id);
2957: END IF;

Line 2955: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

2951: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2952: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
2953: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2954: 'Source Contract Id is: ' || p_source_contract_id);
2955: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2956: 'Target Contract Id is: ' || p_target_contract_id);
2957: END IF;
2958: l_api_name := 'copy_ACL';
2959: l_api_version := 1.0;

Line 2975: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2971: -- Initialize API return status to success
2972: x_return_status := FND_API.G_RET_STS_SUCCESS;
2973:
2974: FOR acl_rec IN acl_csr LOOP
2975: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2976: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2977: 'grantee_type is: ' || acl_rec.grantee_type);
2978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2979: 'grantee_key is: ' || acl_rec.grantee_key);

Line 2976: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2972: x_return_status := FND_API.G_RET_STS_SUCCESS;
2973:
2974: FOR acl_rec IN acl_csr LOOP
2975: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2976: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2977: 'grantee_type is: ' || acl_rec.grantee_type);
2978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2979: 'grantee_key is: ' || acl_rec.grantee_key);
2980: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2974: FOR acl_rec IN acl_csr LOOP
2975: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2976: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2977: 'grantee_type is: ' || acl_rec.grantee_type);
2978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2979: 'grantee_key is: ' || acl_rec.grantee_key);
2980: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2981: 'instance_type is: ' || acl_rec.instance_type);
2982: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2980: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2976: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2977: 'grantee_type is: ' || acl_rec.grantee_type);
2978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2979: 'grantee_key is: ' || acl_rec.grantee_key);
2980: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2981: 'instance_type is: ' || acl_rec.instance_type);
2982: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2983: 'instance_set_id is: ' || acl_rec.instance_set_id);
2984: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2982: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2979: 'grantee_key is: ' || acl_rec.grantee_key);
2980: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2981: 'instance_type is: ' || acl_rec.instance_type);
2982: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2983: 'instance_set_id is: ' || acl_rec.instance_set_id);
2984: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2985: 'menu_name is: ' || acl_rec.menu_name);
2986: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2984: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2980: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2981: 'instance_type is: ' || acl_rec.instance_type);
2982: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2983: 'instance_set_id is: ' || acl_rec.instance_set_id);
2984: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2985: 'menu_name is: ' || acl_rec.menu_name);
2986: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2987: 'program_name is: ' || acl_rec.program_name);
2988: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 2986: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2982: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2983: 'instance_set_id is: ' || acl_rec.instance_set_id);
2984: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2985: 'menu_name is: ' || acl_rec.menu_name);
2986: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2987: 'program_name is: ' || acl_rec.program_name);
2988: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2989: 'program_tag is: ' || acl_rec.program_tag);
2990: END IF;

Line 2988: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

2984: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2985: 'menu_name is: ' || acl_rec.menu_name);
2986: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2987: 'program_name is: ' || acl_rec.program_name);
2988: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2989: 'program_tag is: ' || acl_rec.program_tag);
2990: END IF;
2991: -- call FND_GRANT's delete api
2992: FND_GRANTS_PKG.grant_function(

Line 3027: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3023:
3024: -- Standard call to get message count and if count is 1, get message info.
3025: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3026:
3027: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3028: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3029: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
3030: END IF;
3031:

Line 3028: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

3024: -- Standard call to get message count and if count is 1, get message info.
3025: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3026:
3027: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3028: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3029: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
3030: END IF;
3031:
3032:

Line 3035: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3031:
3032:
3033: EXCEPTION
3034: WHEN FND_API.G_EXC_ERROR THEN
3035: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3036: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3037: g_module || l_api_name,
3038: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');
3039: END IF;

Line 3036: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3032:
3033: EXCEPTION
3034: WHEN FND_API.G_EXC_ERROR THEN
3035: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3036: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3037: g_module || l_api_name,
3038: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');
3039: END IF;
3040: ROLLBACK TO copy_ACL_PVT;

Line 3048: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3044: p_data => x_msg_data
3045: );
3046:
3047: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3048: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3049: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3050: g_module || l_api_name,
3051: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3052: END IF;

Line 3049: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3045: );
3046:
3047: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3048: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3049: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3050: g_module || l_api_name,
3051: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3052: END IF;
3053: ROLLBACK TO copy_ACL_PVT;

Line 3061: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3057: p_data => x_msg_data
3058: );
3059:
3060: WHEN OTHERS THEN
3061: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3062: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3063: g_module || l_api_name,
3064: 'Leaving copy_ACL because of EXCEPTION: ' || sqlerrm);
3065: END IF;

Line 3062: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3058: );
3059:
3060: WHEN OTHERS THEN
3061: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3062: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3063: g_module || l_api_name,
3064: 'Leaving copy_ACL because of EXCEPTION: ' || sqlerrm);
3065: END IF;
3066: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 3146: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3142:
3143:
3144: BEGIN
3145:
3146: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3147: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3148: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3149: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3150: 'Source Contract Id is: ' || p_source_contract_id);

Line 3147: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

3143:
3144: BEGIN
3145:
3146: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3147: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3148: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3149: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3150: 'Source Contract Id is: ' || p_source_contract_id);
3151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 3149: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

3145:
3146: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3147: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3148: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3149: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3150: 'Source Contract Id is: ' || p_source_contract_id);
3151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3152: 'Target Contract Id is: ' || p_target_contract_id);
3153: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 3151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

3147: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3148: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3149: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3150: 'Source Contract Id is: ' || p_source_contract_id);
3151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3152: 'Target Contract Id is: ' || p_target_contract_id);
3153: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3154: 'Target Contract Number is: ' || p_target_contract_number);
3155: END IF;

Line 3153: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

3149: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3150: 'Source Contract Id is: ' || p_source_contract_id);
3151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3152: 'Target Contract Id is: ' || p_target_contract_id);
3153: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3154: 'Target Contract Number is: ' || p_target_contract_number);
3155: END IF;
3156: l_api_name := 'copy_contract_details';
3157: l_api_version := 1.0;

Line 3172: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3168:
3169: -- Initialize API return status to success
3170: x_return_status := FND_API.G_RET_STS_SUCCESS;
3171:
3172: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3173: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3174: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_parties()');
3175: END IF;
3176: copy_parties(

Line 3173: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3169: -- Initialize API return status to success
3170: x_return_status := FND_API.G_RET_STS_SUCCESS;
3171:
3172: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3173: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3174: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_parties()');
3175: END IF;
3176: copy_parties(
3177: p_api_version => 1.0,

Line 3185: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3181: p_target_contract_id => p_target_contract_id,
3182: x_msg_data => x_msg_data,
3183: x_msg_count => x_msg_count,
3184: x_return_status => x_return_status);
3185: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3186: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3187: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_parties return status is: '
3188: || x_return_status);
3189: END IF;

Line 3186: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3182: x_msg_data => x_msg_data,
3183: x_msg_count => x_msg_count,
3184: x_return_status => x_return_status);
3185: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3186: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3187: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_parties return status is: '
3188: || x_return_status);
3189: END IF;
3190: ----------------------------------------------------

Line 3199: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3195: END IF;
3196: --------------------------------------------------------
3197:
3198:
3199: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3200: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3201: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts()');
3202: END IF;
3203: copy_contacts(

Line 3200: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3196: --------------------------------------------------------
3197:
3198:
3199: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3200: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3201: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts()');
3202: END IF;
3203: copy_contacts(
3204: p_api_version => 1.0,

Line 3212: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3208: p_target_contract_id => p_target_contract_id,
3209: x_msg_data => x_msg_data,
3210: x_msg_count => x_msg_count,
3211: x_return_status => x_return_status);
3212: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3213: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3214: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts return status is: '
3215: || x_return_status);
3216: END IF;

Line 3213: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3209: x_msg_data => x_msg_data,
3210: x_msg_count => x_msg_count,
3211: x_return_status => x_return_status);
3212: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3213: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3214: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts return status is: '
3215: || x_return_status);
3216: END IF;
3217: -----------------------------------------------------

Line 3225: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3221: RAISE OKC_API.G_EXCEPTION_ERROR;
3222: END IF;
3223: -----------------------------------------------------
3224:
3225: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3226: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3227: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_risks()');
3228: END IF;
3229: copy_risks(

Line 3226: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3222: END IF;
3223: -----------------------------------------------------
3224:
3225: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3226: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3227: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_risks()');
3228: END IF;
3229: copy_risks(
3230: p_api_version => 1.0,

Line 3238: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3234: p_target_contract_id => p_target_contract_id,
3235: x_msg_data => x_msg_data,
3236: x_msg_count => x_msg_count,
3237: x_return_status => x_return_status);
3238: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3239: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3240: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_risks return status is: '
3241: || x_return_status);
3242: END IF;

Line 3239: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3235: x_msg_data => x_msg_data,
3236: x_msg_count => x_msg_count,
3237: x_return_status => x_return_status);
3238: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3239: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3240: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_risks return status is: '
3241: || x_return_status);
3242: END IF;
3243: -----------------------------------------------------

Line 3251: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3247: RAISE OKC_API.G_EXCEPTION_ERROR;
3248: END IF;
3249: --------------------------------------------------------
3250:
3251: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3252: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3253: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL()');
3254: END IF;
3255: copy_ACL(

Line 3252: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3248: END IF;
3249: --------------------------------------------------------
3250:
3251: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3252: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3253: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL()');
3254: END IF;
3255: copy_ACL(
3256: p_api_version => 1.0,

Line 3264: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3260: p_target_contract_id => p_target_contract_id,
3261: x_msg_data => x_msg_data,
3262: x_msg_count => x_msg_count,
3263: x_return_status => x_return_status);
3264: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3266: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL return status is: '
3267: || x_return_status);
3268: END IF;

Line 3265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3261: x_msg_data => x_msg_data,
3262: x_msg_count => x_msg_count,
3263: x_return_status => x_return_status);
3264: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3266: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL return status is: '
3267: || x_return_status);
3268: END IF;
3269: -----------------------------------------------------

Line 3280: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3276: -- Get contract_type of source contract, required for deliverables and documents APIs
3277: OPEN source_contract_csr;
3278: FETCH source_contract_csr INTO source_contract_rec;
3279: IF(source_contract_csr%NOTFOUND) THEN
3280: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3281: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3282: G_MODULE||l_api_name,
3283: 'Invalid Contract Id: '|| p_source_contract_id);
3284: END IF;

Line 3281: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

3277: OPEN source_contract_csr;
3278: FETCH source_contract_csr INTO source_contract_rec;
3279: IF(source_contract_csr%NOTFOUND) THEN
3280: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3281: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3282: G_MODULE||l_api_name,
3283: 'Invalid Contract Id: '|| p_source_contract_id);
3284: END IF;
3285: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 3296: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3292: -- Get internal party_id. Needed for deliverables api
3293: OPEN party_csr;
3294: FETCH party_csr INTO l_internal_party_id;
3295: IF(party_csr%NOTFOUND) THEN
3296: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3297: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3298: G_MODULE||l_api_name,
3299: 'No internal party for the contract');
3300: END IF;

Line 3297: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

3293: OPEN party_csr;
3294: FETCH party_csr INTO l_internal_party_id;
3295: IF(party_csr%NOTFOUND) THEN
3296: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3297: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3298: G_MODULE||l_api_name,
3299: 'No internal party for the contract');
3300: END IF;
3301: RAISE FND_API.G_EXC_ERROR;

Line 3304: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3300: END IF;
3301: RAISE FND_API.G_EXC_ERROR;
3302: END IF;
3303:
3304: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3305: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3306: 'Calling OKC_CONTRACT_DOCS_GRP.Copy_Attachments');
3307: END IF;
3308: OKC_CONTRACT_DOCS_GRP.Copy_Attachments(

Line 3305: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3301: RAISE FND_API.G_EXC_ERROR;
3302: END IF;
3303:
3304: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3305: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3306: 'Calling OKC_CONTRACT_DOCS_GRP.Copy_Attachments');
3307: END IF;
3308: OKC_CONTRACT_DOCS_GRP.Copy_Attachments(
3309: p_api_version => 1,

Line 3319: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3315: x_return_status => x_return_status,
3316: x_msg_count => x_msg_count,
3317: x_msg_data => x_msg_data
3318: );
3319: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3321: 'OKC_CONTRACT_DOCS_GRP.Copy_Attachments return status is : '
3322: || x_return_status);
3323: END IF;

Line 3320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3316: x_msg_count => x_msg_count,
3317: x_msg_data => x_msg_data
3318: );
3319: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3321: 'OKC_CONTRACT_DOCS_GRP.Copy_Attachments return status is : '
3322: || x_return_status);
3323: END IF;
3324: -----------------------------------------------------

Line 3335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3331:
3332: -- Repository Enhancement 12.1(For Duplicate Action)
3333:
3334:
3335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3337: 'Calling OKC_TERMS_COPY_PVT.copy_tc');
3338: END IF;
3339:

Line 3336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3332: -- Repository Enhancement 12.1(For Duplicate Action)
3333:
3334:
3335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3337: 'Calling OKC_TERMS_COPY_PVT.copy_tc');
3338: END IF;
3339:
3340: x_target_contract_type := source_contract_rec.contract_type;

Line 3357: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3353: p_target_template_rec => G_TEMPLATE_MISS_REC ,
3354: x_return_status => x_return_status,
3355: x_msg_data => x_msg_data,
3356: x_msg_count => x_msg_count);
3357: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3358: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'600: Finished OKC_TERMS_COPY_PVT.copy_tc, return status : '||x_return_status);
3359: END IF;
3360:
3361: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 3358: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'600: Finished OKC_TERMS_COPY_PVT.copy_tc, return status : '||x_return_status);

3354: x_return_status => x_return_status,
3355: x_msg_data => x_msg_data,
3356: x_msg_count => x_msg_count);
3357: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3358: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'600: Finished OKC_TERMS_COPY_PVT.copy_tc, return status : '||x_return_status);
3359: END IF;
3360:
3361: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3362: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 3369: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3365: END IF;
3366: -- Repository Enhancement 12.1 ends(For Duplicate Action)
3367:
3368:
3369: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3370: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3371: 'Calling OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables');
3372: END IF;
3373: OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables (

Line 3370: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3366: -- Repository Enhancement 12.1 ends(For Duplicate Action)
3367:
3368:
3369: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3370: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3371: 'Calling OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables');
3372: END IF;
3373: OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables (
3374: p_api_version => 1.0,

Line 3390: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3386: x_return_status => x_return_status,
3387: x_msg_count => x_msg_count,
3388: x_msg_data => x_msg_data
3389: );
3390: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3391: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3392: 'OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables return status is : '
3393: || x_return_status);
3394: END IF;

Line 3391: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3387: x_msg_count => x_msg_count,
3388: x_msg_data => x_msg_data
3389: );
3390: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3391: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3392: 'OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables return status is : '
3393: || x_return_status);
3394: END IF;
3395: -----------------------------------------------------

Line 3415: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3411:
3412: -- Standard call to get message count and if count is 1, get message info.
3413: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3414:
3415: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3416: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3417: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3418: END IF;
3419:

Line 3416: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

3412: -- Standard call to get message count and if count is 1, get message info.
3413: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3414:
3415: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3416: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3417: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3418: END IF;
3419:
3420:

Line 3423: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3419:
3420:
3421: EXCEPTION
3422: WHEN FND_API.G_EXC_ERROR THEN
3423: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3424: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3425: g_module || l_api_name,
3426: 'Leaving copy_contract_details:FND_API.G_EXC_ERROR Exception');
3427: END IF;

Line 3424: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3420:
3421: EXCEPTION
3422: WHEN FND_API.G_EXC_ERROR THEN
3423: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3424: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3425: g_module || l_api_name,
3426: 'Leaving copy_contract_details:FND_API.G_EXC_ERROR Exception');
3427: END IF;
3428: --close cursors

Line 3443: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3439: p_data => x_msg_data
3440: );
3441:
3442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3443: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3445: g_module || l_api_name,
3446: 'Leaving copy_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3447: END IF;

Line 3444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3440: );
3441:
3442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3443: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3445: g_module || l_api_name,
3446: 'Leaving copy_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3447: END IF;
3448: --close cursors

Line 3463: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3459: p_data => x_msg_data
3460: );
3461:
3462: WHEN OTHERS THEN
3463: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3464: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3465: g_module || l_api_name,
3466: 'Leaving copy_contract_details because of EXCEPTION: ' || sqlerrm);
3467: END IF;

Line 3464: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3460: );
3461:
3462: WHEN OTHERS THEN
3463: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3464: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3465: g_module || l_api_name,
3466: 'Leaving copy_contract_details because of EXCEPTION: ' || sqlerrm);
3467: END IF;
3468: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 3540: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3536: -- Repository Enhancement 12.1 Ends (For Create New Version Action)
3537: l_contract_source VARCHAR2(30); -- For Bug# 6902073
3538: BEGIN
3539:
3540: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3541: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3542: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
3543: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3544: 'Contract Id is: ' || p_contract_id);

Line 3541: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

3537: l_contract_source VARCHAR2(30); -- For Bug# 6902073
3538: BEGIN
3539:
3540: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3541: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3542: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
3543: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3544: 'Contract Id is: ' || p_contract_id);
3545: END IF;

Line 3543: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

3539:
3540: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3541: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3542: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
3543: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3544: 'Contract Id is: ' || p_contract_id);
3545: END IF;
3546: l_api_name := 'version_contract_details';
3547: l_api_version := 1.0;

Line 3563: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3559: -- Initialize API return status to success
3560: x_return_status := FND_API.G_RET_STS_SUCCESS;
3561:
3562: -- Lock the contract header
3563: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3565: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
3566: END IF;
3567: -- Lock the contract header

Line 3564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3560: x_return_status := FND_API.G_RET_STS_SUCCESS;
3561:
3562: -- Lock the contract header
3563: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3565: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
3566: END IF;
3567: -- Lock the contract header
3568: Lock_Contract_Header(

Line 3573: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3569: p_contract_id => p_contract_id,
3570: p_object_version_number => NULL,
3571: x_return_status => x_return_status
3572: );
3573: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3575: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
3576: || x_return_status);
3577: END IF;

Line 3574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3570: p_object_version_number => NULL,
3571: x_return_status => x_return_status
3572: );
3573: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3575: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
3576: || x_return_status);
3577: END IF;
3578: -----------------------------------------------------

Line 3586: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3582: RAISE OKC_API.G_EXCEPTION_ERROR;
3583: END IF;
3584: -----------------------------------------------------
3585:
3586: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3587: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3588: 'Populating contract header record in OKC_REP_CONTRACT_VERS');
3589: END IF;
3590: -- Copy the header record to versions table

Line 3587: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3583: END IF;
3584: -----------------------------------------------------
3585:
3586: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3587: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3588: 'Populating contract header record in OKC_REP_CONTRACT_VERS');
3589: END IF;
3590: -- Copy the header record to versions table
3591: INSERT INTO OKC_REP_CONTRACT_VERS(

Line 3720: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3716: -- Get contract_type of the contract, required for deliverables and documents APIs
3717: OPEN contract_csr;
3718: FETCH contract_csr INTO contract_rec;
3719: IF(contract_csr%NOTFOUND) THEN
3720: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3721: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3722: G_MODULE||l_api_name,
3723: 'Invalid Contract Id: '|| p_contract_id);
3724: END IF;

Line 3721: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

3717: OPEN contract_csr;
3718: FETCH contract_csr INTO contract_rec;
3719: IF(contract_csr%NOTFOUND) THEN
3720: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3721: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3722: G_MODULE||l_api_name,
3723: 'Invalid Contract Id: '|| p_contract_id);
3724: END IF;
3725: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 3733: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3729: RAISE FND_API.G_EXC_ERROR;
3730: -- RAISE NO_DATA_FOUND;
3731: END IF;
3732:
3733: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3734: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3735: 'Calling OKC_CONTRACT_DOCS_GRP.Version_Attachments');
3736: END IF;
3737:

Line 3734: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3730: -- RAISE NO_DATA_FOUND;
3731: END IF;
3732:
3733: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3734: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3735: 'Calling OKC_CONTRACT_DOCS_GRP.Version_Attachments');
3736: END IF;
3737:
3738: /*Bug 6957819: Added an additional parameter in the call for not copying the system generated attachment to the new version*/

Line 3750: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3746: x_msg_count => x_msg_count,
3747: x_msg_data => x_msg_data,
3748: p_include_gen_attach => 'N'
3749: );
3750: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3751: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3752: 'OKC_CONTRACT_DOCS_GRP.Version_Attachments return status is : '
3753: || x_return_status);
3754: END IF;

Line 3751: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3747: x_msg_data => x_msg_data,
3748: p_include_gen_attach => 'N'
3749: );
3750: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3751: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3752: 'OKC_CONTRACT_DOCS_GRP.Version_Attachments return status is : '
3753: || x_return_status);
3754: END IF;
3755: -----------------------------------------------------

Line 3782: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3778: IF l_contract_source = 'STRUCTURED' THEN
3779: --------------------------------------------
3780: -- Call internal Version_Doc
3781: --------------------------------------------
3782: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3783: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call Private Version_Doc ');
3784: END IF;
3785:
3786: OKC_TERMS_VERSION_PVT.Version_Doc(

Line 3783: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call Private Version_Doc ');

3779: --------------------------------------------
3780: -- Call internal Version_Doc
3781: --------------------------------------------
3782: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3783: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call Private Version_Doc ');
3784: END IF;
3785:
3786: OKC_TERMS_VERSION_PVT.Version_Doc(
3787: x_return_status => x_return_status,

Line 3806: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3802: --Only need to version usages record in case of offline authoring
3803: --------------------------------------------
3804: -- Call Create_Version for template usages
3805: --------------------------------------------
3806: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3807: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Call Create_Version for template usages');
3808: END IF;
3809:
3810: x_return_status := OKC_TEMPLATE_USAGES_PVT.Create_Version(

Line 3807: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Call Create_Version for template usages');

3803: --------------------------------------------
3804: -- Call Create_Version for template usages
3805: --------------------------------------------
3806: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3807: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Call Create_Version for template usages');
3808: END IF;
3809:
3810: x_return_status := OKC_TEMPLATE_USAGES_PVT.Create_Version(
3811: p_doc_type => contract_rec.contract_type,

Line 3832: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3828:
3829:
3830: -- If contract status not Signed, we need to version the deliverables as well
3831: IF (contract_rec.contract_status_code <> G_STATUS_SIGNED) THEN
3832: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3833: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3834: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
3835: END IF;
3836: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (

Line 3833: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3829:
3830: -- If contract status not Signed, we need to version the deliverables as well
3831: IF (contract_rec.contract_status_code <> G_STATUS_SIGNED) THEN
3832: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3833: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3834: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
3835: END IF;
3836: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
3837: p_api_version => 1.0,

Line 3846: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3842: x_return_status => x_return_status,
3843: x_msg_count => x_msg_count,
3844: x_msg_data => x_msg_data
3845: );
3846: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3847: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3848: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
3849: || x_return_status);
3850: END IF;

Line 3847: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3843: x_msg_count => x_msg_count,
3844: x_msg_data => x_msg_data
3845: );
3846: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3847: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3848: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
3849: || x_return_status);
3850: END IF;
3851: -----------------------------------------------------

Line 3860: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3856: END IF;
3857: --------------------------------------------------------
3858: END IF; -- contract_rec.contract_status_code <> G_STATUS_SIGNED
3859:
3860: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3861: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3862: 'Calling OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation');
3863: END IF;
3864: OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation (

Line 3861: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3857: --------------------------------------------------------
3858: END IF; -- contract_rec.contract_status_code <> G_STATUS_SIGNED
3859:
3860: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3861: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3862: 'Calling OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation');
3863: END IF;
3864: OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation (
3865: p_api_version => 1.0,

Line 3874: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3870: x_return_status => x_return_status,
3871: x_msg_count => x_msg_count,
3872: x_msg_data => x_msg_data
3873: );
3874: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3875: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3876: 'OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation return status is : '
3877: || x_return_status);
3878: END IF;

Line 3875: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3871: x_msg_count => x_msg_count,
3872: x_msg_data => x_msg_data
3873: );
3874: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3875: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3876: 'OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation return status is : '
3877: || x_return_status);
3878: END IF;
3879: -----------------------------------------------------

Line 3893: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3889:
3890:
3891: CLOSE contract_csr;
3892:
3893: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3894: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3895: 'Delete contract header record.');
3896: END IF;
3897:

Line 3894: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

3890:
3891: CLOSE contract_csr;
3892:
3893: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3894: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3895: 'Delete contract header record.');
3896: END IF;
3897:
3898:

Line 3911: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3907:
3908: -- Standard call to get message count and if count is 1, get message info.
3909: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3910:
3911: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3912: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3913: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
3914: END IF;
3915:

Line 3912: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

3908: -- Standard call to get message count and if count is 1, get message info.
3909: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3910:
3911: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3912: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3913: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
3914: END IF;
3915:
3916:

Line 3919: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3915:
3916:
3917: EXCEPTION
3918: WHEN FND_API.G_EXC_ERROR THEN
3919: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3920: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3921: g_module || l_api_name,
3922: 'Leaving version_contract_details:FND_API.G_EXC_ERROR Exception');
3923: END IF;

Line 3920: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3916:
3917: EXCEPTION
3918: WHEN FND_API.G_EXC_ERROR THEN
3919: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3920: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3921: g_module || l_api_name,
3922: 'Leaving version_contract_details:FND_API.G_EXC_ERROR Exception');
3923: END IF;
3924: --close cursors

Line 3936: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3932: p_data => x_msg_data
3933: );
3934:
3935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3936: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3937: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3938: g_module || l_api_name,
3939: 'Leaving version_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3940: END IF;

Line 3937: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3933: );
3934:
3935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3936: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3937: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3938: g_module || l_api_name,
3939: 'Leaving version_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3940: END IF;
3941: --close cursors

Line 3953: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3949: p_data => x_msg_data
3950: );
3951:
3952: WHEN OTHERS THEN
3953: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3954: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3955: g_module || l_api_name,
3956: 'Leaving version_contract_details because of EXCEPTION: ' || sqlerrm);
3957: END IF;

Line 3954: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3950: );
3951:
3952: WHEN OTHERS THEN
3953: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3954: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3955: g_module || l_api_name,
3956: 'Leaving version_contract_details because of EXCEPTION: ' || sqlerrm);
3957: END IF;
3958: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 4035: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4031:
4032: l_expiration_date_matches_flag := FND_API.G_FALSE;
4033: l_effective_date_matches_flag := FND_API.G_FALSE;
4034:
4035: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4037: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4038: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4039: 'Contract Id is: ' || p_contract_id);

Line 4036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4032: l_expiration_date_matches_flag := FND_API.G_FALSE;
4033: l_effective_date_matches_flag := FND_API.G_FALSE;
4034:
4035: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4037: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4038: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4039: 'Contract Id is: ' || p_contract_id);
4040: END IF;

Line 4038: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4034:
4035: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4037: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4038: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4039: 'Contract Id is: ' || p_contract_id);
4040: END IF;
4041: l_api_name := 'sign_contacts';
4042: l_api_version := 1.0;

Line 4061: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4057: -- Get effective dates and version of the contract.
4058: OPEN contract_csr;
4059: FETCH contract_csr INTO contract_rec;
4060: IF(contract_csr%NOTFOUND) THEN
4061: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4062: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4063: G_MODULE||l_api_name,
4064: 'Invalid Contract Id: '|| p_contract_id);
4065: END IF;

Line 4062: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

4058: OPEN contract_csr;
4059: FETCH contract_csr INTO contract_rec;
4060: IF(contract_csr%NOTFOUND) THEN
4061: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4062: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4063: G_MODULE||l_api_name,
4064: 'Invalid Contract Id: '|| p_contract_id);
4065: END IF;
4066: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 4075: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4071: -- RAISE NO_DATA_FOUND;
4072: END IF;
4073:
4074: -- Lock the contract header
4075: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4076: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4077: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
4078: END IF;
4079: -- Lock the contract header

Line 4076: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4072: END IF;
4073:
4074: -- Lock the contract header
4075: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4076: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4077: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
4078: END IF;
4079: -- Lock the contract header
4080: Lock_Contract_Header(

Line 4085: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4081: p_contract_id => p_contract_id,
4082: p_object_version_number => NULL,
4083: x_return_status => x_return_status
4084: );
4085: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4087: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
4088: || x_return_status);
4089: END IF;

Line 4086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4082: p_object_version_number => NULL,
4083: x_return_status => x_return_status
4084: );
4085: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4087: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
4088: || x_return_status);
4089: END IF;
4090: -----------------------------------------------------

Line 4098: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4094: RAISE OKC_API.G_EXCEPTION_ERROR;
4095: END IF;
4096: -----------------------------------------------------
4097:
4098: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4100: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
4101: END IF;
4102: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

Line 4099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4095: END IF;
4096: -----------------------------------------------------
4097:
4098: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4100: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
4101: END IF;
4102: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
4103: OKC_REP_UTIL_PVT.change_contract_status(

Line 4114: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4110: p_note => NULL,
4111: x_msg_data => x_msg_data,
4112: x_msg_count => x_msg_count,
4113: x_return_status => x_return_status);
4114: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4115: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4116: g_module || l_api_name,
4117: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
4118: END IF;

Line 4115: fnd_log.string(FND_LOG.LEVEL_STATEMENT,

4111: x_msg_data => x_msg_data,
4112: x_msg_count => x_msg_count,
4113: x_return_status => x_return_status);
4114: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4115: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4116: g_module || l_api_name,
4117: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
4118: END IF;
4119: -----------------------------------------------------

Line 4128: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4124: END IF;
4125: ------------------------------------------------------
4126:
4127: -- We need to first version the deliverables
4128: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4129: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4130: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
4131: END IF;
4132: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (

Line 4129: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4125: ------------------------------------------------------
4126:
4127: -- We need to first version the deliverables
4128: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4129: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4130: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
4131: END IF;
4132: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
4133: p_api_version => 1.0,

Line 4142: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4138: x_return_status => x_return_status,
4139: x_msg_count => x_msg_count,
4140: x_msg_data => x_msg_data
4141: );
4142: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4144: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
4145: || x_return_status);
4146: END IF;

Line 4143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4139: x_msg_count => x_msg_count,
4140: x_msg_data => x_msg_data
4141: );
4142: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4144: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
4145: || x_return_status);
4146: END IF;
4147: -----------------------------------------------------

Line 4155: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4151: RAISE OKC_API.G_EXCEPTION_ERROR;
4152: END IF;
4153: --------------------------------------------------------
4154:
4155: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4157: 'Latest signed version number is : '
4158: || contract_rec.latest_signed_ver_number);
4159: END IF;

Line 4156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4152: END IF;
4153: --------------------------------------------------------
4154:
4155: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4157: 'Latest signed version number is : '
4158: || contract_rec.latest_signed_ver_number);
4159: END IF;
4160: -- Now we need to activate deliverables

Line 4167: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4163: ELSE
4164: l_sync_flag := FND_API.G_TRUE;
4165: END IF;
4166:
4167: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4169: 'l_sync_flag is : ' || l_sync_flag);
4170: END IF;
4171: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;

Line 4168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4164: l_sync_flag := FND_API.G_TRUE;
4165: END IF;
4166:
4167: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4169: 'l_sync_flag is : ' || l_sync_flag);
4170: END IF;
4171: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
4172: l_activate_event_tbl(1).event_date := contract_rec.contract_expiration_date;

Line 4174: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4170: END IF;
4171: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
4172: l_activate_event_tbl(1).event_date := contract_rec.contract_expiration_date;
4173:
4174: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4175: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4176: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables');
4177: END IF;
4178:

Line 4175: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4171: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
4172: l_activate_event_tbl(1).event_date := contract_rec.contract_expiration_date;
4173:
4174: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4175: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4176: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables');
4177: END IF;
4178:
4179: OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables (

Line 4194: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4190: x_msg_data => x_msg_data,
4191: x_msg_count => x_msg_count,
4192: x_return_status => x_return_status);
4193:
4194: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4195: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4196: 'OKC_DELIVERABLE_PROCESS_PVT.activateDeliverables return status is : '
4197: || x_return_status);
4198: END IF;

Line 4195: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4191: x_msg_count => x_msg_count,
4192: x_return_status => x_return_status);
4193:
4194: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4195: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4196: 'OKC_DELIVERABLE_PROCESS_PVT.activateDeliverables return status is : '
4197: || x_return_status);
4198: END IF;
4199: -----------------------------------------------------

Line 4214: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4210: -- Get effective dates and version of the contract.
4211: OPEN arch_contract_csr(contract_rec.latest_signed_ver_number);
4212: FETCH arch_contract_csr INTO arch_contract_rec;
4213: IF(contract_csr%NOTFOUND) THEN
4214: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4215: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4216: G_MODULE||l_api_name,
4217: 'Invalid Contract Id: '|| p_contract_id);
4218: END IF;

Line 4215: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

4211: OPEN arch_contract_csr(contract_rec.latest_signed_ver_number);
4212: FETCH arch_contract_csr INTO arch_contract_rec;
4213: IF(contract_csr%NOTFOUND) THEN
4214: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4215: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4216: G_MODULE||l_api_name,
4217: 'Invalid Contract Id: '|| p_contract_id);
4218: END IF;
4219: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 4230: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4226: l_prev_signed_effective_date := arch_contract_rec.contract_effective_date;
4227: l_prev_signed_expiration_date := arch_contract_rec.contract_expiration_date;
4228:
4229: CLOSE arch_contract_csr;
4230: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4232: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
4233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4234: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));

Line 4231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4227: l_prev_signed_expiration_date := arch_contract_rec.contract_expiration_date;
4228:
4229: CLOSE arch_contract_csr;
4230: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4232: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
4233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4234: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
4235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 4233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4229: CLOSE arch_contract_csr;
4230: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4232: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
4233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4234: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
4235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4236: 'Current version expiration date: ' || trunc(contract_rec.contract_expiration_date));
4237: END IF;

Line 4235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4232: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
4233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4234: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
4235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4236: 'Current version expiration date: ' || trunc(contract_rec.contract_expiration_date));
4237: END IF;
4238: l_update_event_tbl(1).event_code := G_CONTRACT_EFFECTIVE_EVENT;
4239: l_update_event_tbl(1).event_date := contract_rec.contract_effective_date;

Line 4254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4250: l_effective_date_matches_flag := FND_API.G_TRUE;
4251: END IF;
4252:
4253: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
4254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4256: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
4257: END IF;
4258: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (

Line 4255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4251: END IF;
4252:
4253: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
4254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4256: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
4257: END IF;
4258: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
4259: p_api_version => 1.0,

Line 4270: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4266: x_msg_data => x_msg_data,
4267: x_msg_count => x_msg_count,
4268: x_return_status => x_return_status);
4269:
4270: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4271: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4272: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
4273: || x_return_status);
4274: END IF;

Line 4271: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4267: x_msg_count => x_msg_count,
4268: x_return_status => x_return_status);
4269:
4270: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4271: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4272: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
4273: || x_return_status);
4274: END IF;
4275: -----------------------------------------------------

Line 4284: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4280: END IF;
4281: --------------------------------------------------------
4282: END IF; -- expiration date comparision
4283: -- Disable prev. version deliverables
4284: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4285: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4286: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
4287: END IF;
4288: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (

Line 4285: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4281: --------------------------------------------------------
4282: END IF; -- expiration date comparision
4283: -- Disable prev. version deliverables
4284: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4285: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4286: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
4287: END IF;
4288: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (
4289: p_api_version => 1.0,

Line 4299: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4295: x_msg_data => x_msg_data,
4296: x_msg_count => x_msg_count,
4297: x_return_status => x_return_status);
4298:
4299: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4300: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4301: 'OKC_DELIVERABLE_PROCESS_PVT.disableDeliverables return status is : '
4302: || x_return_status);
4303: END IF;

Line 4300: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4296: x_msg_count => x_msg_count,
4297: x_return_status => x_return_status);
4298:
4299: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4300: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4301: 'OKC_DELIVERABLE_PROCESS_PVT.disableDeliverables return status is : '
4302: || x_return_status);
4303: END IF;
4304: -----------------------------------------------------

Line 4312: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4308: RAISE OKC_API.G_EXCEPTION_ERROR;
4309: END IF;
4310: --------------------------------------------------------
4311: END IF; -- (l_sync_flag = 'Y')
4312: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4313: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4314: 'Updating latest_signed_ver_number column');
4315: END IF;
4316: UPDATE okc_rep_contracts_all

Line 4313: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4309: END IF;
4310: --------------------------------------------------------
4311: END IF; -- (l_sync_flag = 'Y')
4312: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4313: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4314: 'Updating latest_signed_ver_number column');
4315: END IF;
4316: UPDATE okc_rep_contracts_all
4317: SET latest_signed_ver_number = contract_rec.contract_version_num

Line 4328: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4324:
4325: -- Standard call to get message count and if count is 1, get message info.
4326: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
4327:
4328: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4329: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4330: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4331: END IF;
4332:

Line 4329: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4325: -- Standard call to get message count and if count is 1, get message info.
4326: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
4327:
4328: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4329: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4330: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4331: END IF;
4332:
4333:

Line 4336: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4332:
4333:
4334: EXCEPTION
4335: WHEN FND_API.G_EXC_ERROR THEN
4336: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4337: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4338: g_module || l_api_name,
4339: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');
4340: END IF;

Line 4337: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4333:
4334: EXCEPTION
4335: WHEN FND_API.G_EXC_ERROR THEN
4336: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4337: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4338: g_module || l_api_name,
4339: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');
4340: END IF;
4341: --close cursors

Line 4356: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4352: p_data => x_msg_data
4353: );
4354:
4355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4356: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4357: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4358: g_module || l_api_name,
4359: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4360: END IF;

Line 4357: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4353: );
4354:
4355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4356: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4357: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4358: g_module || l_api_name,
4359: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4360: END IF;
4361: --close cursors

Line 4376: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4372: p_data => x_msg_data
4373: );
4374:
4375: WHEN OTHERS THEN
4376: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4377: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4378: g_module || l_api_name,
4379: 'Leaving sign_contract because of EXCEPTION: ' || sqlerrm);
4380: END IF;

Line 4377: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4373: );
4374:
4375: WHEN OTHERS THEN
4376: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4377: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4378: g_module || l_api_name,
4379: 'Leaving sign_contract because of EXCEPTION: ' || sqlerrm);
4380: END IF;
4381: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 4451: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4447:
4448: contract_rec contract_csr%ROWTYPE;
4449: BEGIN
4450:
4451: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4453: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
4454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4455: 'Contract Id is: ' || p_contract_id);

Line 4452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4448: contract_rec contract_csr%ROWTYPE;
4449: BEGIN
4450:
4451: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4453: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
4454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4455: 'Contract Id is: ' || p_contract_id);
4456: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 4454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4450:
4451: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4453: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
4454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4455: 'Contract Id is: ' || p_contract_id);
4456: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4457: 'Termination date is: ' || to_char(p_termination_date));
4458: END IF;

Line 4456: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4453: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
4454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4455: 'Contract Id is: ' || p_contract_id);
4456: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4457: 'Termination date is: ' || to_char(p_termination_date));
4458: END IF;
4459: l_api_name := 'terminate_contacts';
4460: l_api_version := 1.0;

Line 4479: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4475: -- Get effective dates and version of the contract.
4476: OPEN contract_csr;
4477: FETCH contract_csr INTO contract_rec;
4478: IF(contract_csr%NOTFOUND) THEN
4479: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4480: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4481: G_MODULE||l_api_name,
4482: 'Invalid Contract Id: '|| p_contract_id);
4483: END IF;

Line 4480: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

4476: OPEN contract_csr;
4477: FETCH contract_csr INTO contract_rec;
4478: IF(contract_csr%NOTFOUND) THEN
4479: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4480: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4481: G_MODULE||l_api_name,
4482: 'Invalid Contract Id: '|| p_contract_id);
4483: END IF;
4484: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 4493: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4489: -- RAISE NO_DATA_FOUND;
4490: END IF;
4491:
4492: -- Lock the contract header
4493: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4494: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4495: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
4496: END IF;
4497: -- Lock the contract header

Line 4494: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4490: END IF;
4491:
4492: -- Lock the contract header
4493: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4494: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4495: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
4496: END IF;
4497: -- Lock the contract header
4498: Lock_Contract_Header(

Line 4503: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4499: p_contract_id => p_contract_id,
4500: p_object_version_number => NULL,
4501: x_return_status => x_return_status
4502: );
4503: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4504: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4505: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
4506: || x_return_status);
4507: END IF;

Line 4504: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4500: p_object_version_number => NULL,
4501: x_return_status => x_return_status
4502: );
4503: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4504: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4505: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
4506: || x_return_status);
4507: END IF;
4508: -----------------------------------------------------

Line 4516: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4512: RAISE OKC_API.G_EXCEPTION_ERROR;
4513: END IF;
4514: -----------------------------------------------------
4515: IF (trunc(p_termination_date) <= trunc(sysdate)) THEN
4516: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4517: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4518: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
4519: END IF;
4520:

Line 4517: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4513: END IF;
4514: -----------------------------------------------------
4515: IF (trunc(p_termination_date) <= trunc(sysdate)) THEN
4516: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4517: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4518: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
4519: END IF;
4520:
4521: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

Line 4533: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4529: p_note => NULL,
4530: x_msg_data => x_msg_data,
4531: x_msg_count => x_msg_count,
4532: x_return_status => x_return_status);
4533: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4534: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4535: g_module || l_api_name,
4536: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
4537: END IF;

Line 4534: fnd_log.string(FND_LOG.LEVEL_STATEMENT,

4530: x_msg_data => x_msg_data,
4531: x_msg_count => x_msg_count,
4532: x_return_status => x_return_status);
4533: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4534: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4535: g_module || l_api_name,
4536: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
4537: END IF;
4538: -----------------------------------------------------

Line 4554: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4550: l_cancel_event_tbl(1).event_code := G_CONTRACT_EFFECTIVE_EVENT;
4551: l_cancel_event_tbl(1).event_date := contract_rec.contract_effective_date;
4552: l_cancel_event_tbl(2).event_code := G_CONTRACT_EXPIRE_EVENT;
4553: l_cancel_event_tbl(2).event_date := contract_rec.contract_expiration_date;
4554: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4555: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4556: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables ');
4557: END IF;
4558:

Line 4555: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4551: l_cancel_event_tbl(1).event_date := contract_rec.contract_effective_date;
4552: l_cancel_event_tbl(2).event_code := G_CONTRACT_EXPIRE_EVENT;
4553: l_cancel_event_tbl(2).event_date := contract_rec.contract_expiration_date;
4554: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4555: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4556: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables ');
4557: END IF;
4558:
4559: OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables (

Line 4573: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4569: x_msg_data => x_msg_data,
4570: x_msg_count => x_msg_count,
4571: x_return_status => x_return_status);
4572:
4573: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4575: 'OKC_DELIVERABLE_PROCESS_PVT.activateCloseOutDeliverables return status is : '
4576: || x_return_status);
4577: END IF;

Line 4574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4570: x_msg_count => x_msg_count,
4571: x_return_status => x_return_status);
4572:
4573: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4575: 'OKC_DELIVERABLE_PROCESS_PVT.activateCloseOutDeliverables return status is : '
4576: || x_return_status);
4577: END IF;
4578: -----------------------------------------------------

Line 4590: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4586: IF (trunc(contract_rec.termination_date) <> trunc(p_termination_date)) THEN
4587: -- Update the deliverables
4588: l_update_event_tbl(1).event_code := G_CONTRACT_TERMINATED_EVENT;
4589: l_update_event_tbl(1).event_date := p_termination_date;
4590: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4591: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4592: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables ');
4593: END IF;
4594: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (

Line 4591: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4587: -- Update the deliverables
4588: l_update_event_tbl(1).event_code := G_CONTRACT_TERMINATED_EVENT;
4589: l_update_event_tbl(1).event_date := p_termination_date;
4590: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4591: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4592: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables ');
4593: END IF;
4594: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
4595: p_api_version => 1.0,

Line 4606: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4602: x_msg_data => x_msg_data,
4603: x_msg_count => x_msg_count,
4604: x_return_status => x_return_status);
4605:
4606: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4607: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4608: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
4609: || x_return_status);
4610: END IF;

Line 4607: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4603: x_msg_count => x_msg_count,
4604: x_return_status => x_return_status);
4605:
4606: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4607: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4608: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
4609: || x_return_status);
4610: END IF;
4611: -----------------------------------------------------

Line 4631: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4627:
4628: -- Standard call to get message count and if count is 1, get message info.
4629: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
4630:
4631: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4632: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4633: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
4634: END IF;
4635:

Line 4632: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4628: -- Standard call to get message count and if count is 1, get message info.
4629: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
4630:
4631: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4632: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4633: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
4634: END IF;
4635:
4636:

Line 4639: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4635:
4636:
4637: EXCEPTION
4638: WHEN FND_API.G_EXC_ERROR THEN
4639: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4640: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4641: g_module || l_api_name,
4642: 'Leaving terminate_contract:FND_API.G_EXC_ERROR Exception');
4643: END IF;

Line 4640: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4636:
4637: EXCEPTION
4638: WHEN FND_API.G_EXC_ERROR THEN
4639: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4640: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4641: g_module || l_api_name,
4642: 'Leaving terminate_contract:FND_API.G_EXC_ERROR Exception');
4643: END IF;
4644: --close cursors

Line 4656: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4652: p_data => x_msg_data
4653: );
4654:
4655: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4656: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4657: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4658: g_module || l_api_name,
4659: 'Leaving terminate_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4660: END IF;

Line 4657: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4653: );
4654:
4655: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4656: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4657: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4658: g_module || l_api_name,
4659: 'Leaving terminate_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4660: END IF;
4661: --close cursors

Line 4673: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4669: p_data => x_msg_data
4670: );
4671:
4672: WHEN OTHERS THEN
4673: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4674: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4675: g_module || l_api_name,
4676: 'Leaving terminate_contract because of EXCEPTION: ' || sqlerrm);
4677: END IF;

Line 4674: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4670: );
4671:
4672: WHEN OTHERS THEN
4673: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4674: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4675: g_module || l_api_name,
4676: 'Leaving terminate_contract because of EXCEPTION: ' || sqlerrm);
4677: END IF;
4678: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 4775: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4771: contact_attributes_rec contact_attributes%ROWTYPE;
4772:
4773:
4774: BEGIN
4775: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4776: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4777: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
4778: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4779: 'Contract Id is: ' || p_contract_id);

Line 4776: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4772:
4773:
4774: BEGIN
4775: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4776: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4777: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
4778: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4779: 'Contract Id is: ' || p_contract_id);
4780: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 4778: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4774: BEGIN
4775: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4776: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4777: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
4778: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4779: 'Contract Id is: ' || p_contract_id);
4780: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4781: 'Contract Number is: ' || p_contract_number);
4782: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 4780: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4776: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4777: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
4778: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4779: 'Contract Id is: ' || p_contract_id);
4780: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4781: 'Contract Number is: ' || p_contract_number);
4782: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4783: 'Expired flag is: ' || p_expired_flag);
4784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 4782: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4778: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4779: 'Contract Id is: ' || p_contract_id);
4780: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4781: 'Contract Number is: ' || p_contract_number);
4782: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4783: 'Expired flag is: ' || p_expired_flag);
4784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4785: 'Contact Role Id is: ' || p_notify_contact_role_id);
4786: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 4784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4780: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4781: 'Contract Number is: ' || p_contract_number);
4782: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4783: 'Expired flag is: ' || p_expired_flag);
4784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4785: 'Contact Role Id is: ' || p_notify_contact_role_id);
4786: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4787: 'Contract Version is: ' || p_contract_version);
4788: END IF;

Line 4786: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

4782: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4783: 'Expired flag is: ' || p_expired_flag);
4784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4785: 'Contact Role Id is: ' || p_notify_contact_role_id);
4786: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4787: 'Contract Version is: ' || p_contract_version);
4788: END IF;
4789:
4790: --initialize variables

Line 4824: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4820: END IF;
4821:
4822: FOR contract_contacts_rec in CONTRACT_CONTACTS(p_contract_id) LOOP
4823:
4824: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4825: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4826: 'contract_contacts_rec.contact_id ' || contract_contacts_rec.contact_id);
4827: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4828: 'Calling WF_DIRECTORY.GetUserName()');

Line 4825: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4821:
4822: FOR contract_contacts_rec in CONTRACT_CONTACTS(p_contract_id) LOOP
4823:
4824: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4825: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4826: 'contract_contacts_rec.contact_id ' || contract_contacts_rec.contact_id);
4827: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4828: 'Calling WF_DIRECTORY.GetUserName()');
4829: END IF;

Line 4827: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4823:
4824: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4825: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4826: 'contract_contacts_rec.contact_id ' || contract_contacts_rec.contact_id);
4827: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4828: 'Calling WF_DIRECTORY.GetUserName()');
4829: END IF;
4830:
4831: -- Get WF user name for the current contact

Line 4839: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4835: p_display_name => l_display_name);
4836:
4837: IF (l_user_name IS NULL) THEN
4838:
4839: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4840: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4841: 'Current contact does not have FND User');
4842: END IF;
4843:

Line 4840: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4836:
4837: IF (l_user_name IS NULL) THEN
4838:
4839: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4840: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4841: 'Current contact does not have FND User');
4842: END IF;
4843:
4844: -- Get Email address of the current contact

Line 4854: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4850: IF (l_email IS NOT NULL) THEN
4851:
4852: l_display_name := null;
4853:
4854: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4856: 'Calling WF_DIRECTORY.CreateAdHocUser() with email ' || l_email);
4857: END IF;
4858:

Line 4855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4851:
4852: l_display_name := null;
4853:
4854: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4856: 'Calling WF_DIRECTORY.CreateAdHocUser() with email ' || l_email);
4857: END IF;
4858:
4859: --create ad hoc user if user does not already exists

Line 4868: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4864: description => 'Repository Ad Hoc User',
4865: notification_preference => 'MAILHTML',
4866: expiration_date => SYSDATE + 1);
4867:
4868: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4869: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4870: 'Adhoc User Name ' || l_user_name);
4871: END IF;
4872:

Line 4869: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4865: notification_preference => 'MAILHTML',
4866: expiration_date => SYSDATE + 1);
4867:
4868: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4869: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4870: 'Adhoc User Name ' || l_user_name);
4871: END IF;
4872:
4873: ELSE

Line 4875: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4871: END IF;
4872:
4873: ELSE
4874:
4875: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4876: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4877: 'Email address not available for the current contact');
4878: END IF;
4879:

Line 4876: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4872:
4873: ELSE
4874:
4875: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4876: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4877: 'Email address not available for the current contact');
4878: END IF;
4879:
4880: END IF;

Line 4884: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4880: END IF;
4881:
4882: ELSE
4883:
4884: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4885: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4886: 'WF User Name ' || l_user_name);
4887: END IF;
4888:

Line 4885: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4881:
4882: ELSE
4883:
4884: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4885: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4886: 'WF User Name ' || l_user_name);
4887: END IF;
4888:
4889: END IF;

Line 4906: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4902: END LOOP;
4903:
4904: IF (l_contract_contacts_all IS NOT NULL) THEN
4905:
4906: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4908: 'User names list ' || l_contract_contacts_all);
4909: END IF;
4910:

Line 4907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4903:
4904: IF (l_contract_contacts_all IS NOT NULL) THEN
4905:
4906: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4908: 'User names list ' || l_contract_contacts_all);
4909: END IF;
4910:
4911: --Get item key from sequence

Line 4914: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4910:
4911: --Get item key from sequence
4912: SELECT TO_CHAR(okc_wf_notify_s1.NEXTVAL) INTO l_item_key FROM DUAL;
4913:
4914: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4915: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4916: 'Calling WF_DIRECTORY.createAdHocRole()');
4917: END IF;
4918:

Line 4915: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4911: --Get item key from sequence
4912: SELECT TO_CHAR(okc_wf_notify_s1.NEXTVAL) INTO l_item_key FROM DUAL;
4913:
4914: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4915: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4916: 'Calling WF_DIRECTORY.createAdHocRole()');
4917: END IF;
4918:
4919: --create ad hoc workflow role

Line 4928: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4924: role_users => l_contract_contacts_all,
4925: expiration_date => SYSDATE + 1
4926: );
4927:
4928: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4929: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4930: 'Calling wf_engine.CreateProcess()');
4931: END IF;
4932:

Line 4929: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

4925: expiration_date => SYSDATE + 1
4926: );
4927:
4928: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4929: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4930: 'Calling wf_engine.CreateProcess()');
4931: END IF;
4932:
4933: --Create the process

Line 5010: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5006: itemkey => l_item_key,
5007: aname => l_item_message_subject,
5008: avalue => l_subject_text);
5009:
5010: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5011: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5012: 'Calling wf_engine.StartProcess()');
5013: END IF;
5014:

Line 5011: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

5007: aname => l_item_message_subject,
5008: avalue => l_subject_text);
5009:
5010: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5011: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5012: 'Calling wf_engine.StartProcess()');
5013: END IF;
5014:
5015: --Start the process

Line 5020: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5016: wf_engine.StartProcess(
5017: itemtype => l_item_type,
5018: itemkey => l_item_key);
5019:
5020: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5022: 'Updating okc_rep_contracts_all and okc_rep_contract_vers with wf_exp_ntf_item_key ' || l_item_key);
5023: END IF;
5024:

Line 5021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

5017: itemtype => l_item_type,
5018: itemkey => l_item_key);
5019:
5020: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5022: 'Updating okc_rep_contracts_all and okc_rep_contract_vers with wf_exp_ntf_item_key ' || l_item_key);
5023: END IF;
5024:
5025: --update contracts with sent notifications

Line 5041: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5037: COMMIT;
5038:
5039: ELSE
5040:
5041: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5042: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5043: 'No WF users found for contacts of this contract');
5044: END IF;
5045:

Line 5042: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

5038:
5039: ELSE
5040:
5041: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5042: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5043: 'No WF users found for contacts of this contract');
5044: END IF;
5045:
5046: END IF;

Line 5053: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5049: FND_MSG_PUB.Count_And_Get(
5050: p_count => x_msg_count,
5051: p_data => x_msg_data );
5052:
5053: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5054: FND_LOG.STRING(
5055: FND_LOG.LEVEL_PROCEDURE,
5056: G_MODULE||l_api_name,
5057: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');

Line 5054: FND_LOG.STRING(

5050: p_count => x_msg_count,
5051: p_data => x_msg_data );
5052:
5053: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5054: FND_LOG.STRING(
5055: FND_LOG.LEVEL_PROCEDURE,
5056: G_MODULE||l_api_name,
5057: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
5058: END IF;

Line 5055: FND_LOG.LEVEL_PROCEDURE,

5051: p_data => x_msg_data );
5052:
5053: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5054: FND_LOG.STRING(
5055: FND_LOG.LEVEL_PROCEDURE,
5056: G_MODULE||l_api_name,
5057: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
5058: END IF;
5059:

Line 5063: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5059:
5060:
5061: EXCEPTION
5062: WHEN FND_API.G_EXC_ERROR THEN
5063: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5064: fnd_log.string(
5065: FND_LOG.LEVEL_EXCEPTION,
5066: g_module || l_api_name,
5067: 'Leaving repository_notifier:FND_API.G_EXC_ERROR Exception');

Line 5064: fnd_log.string(

5060:
5061: EXCEPTION
5062: WHEN FND_API.G_EXC_ERROR THEN
5063: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5064: fnd_log.string(
5065: FND_LOG.LEVEL_EXCEPTION,
5066: g_module || l_api_name,
5067: 'Leaving repository_notifier:FND_API.G_EXC_ERROR Exception');
5068: END IF;

Line 5065: FND_LOG.LEVEL_EXCEPTION,

5061: EXCEPTION
5062: WHEN FND_API.G_EXC_ERROR THEN
5063: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5064: fnd_log.string(
5065: FND_LOG.LEVEL_EXCEPTION,
5066: g_module || l_api_name,
5067: 'Leaving repository_notifier:FND_API.G_EXC_ERROR Exception');
5068: END IF;
5069: --close cursors

Line 5085: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5081: p_data => x_msg_data
5082: );
5083:
5084: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5085: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5086: fnd_log.string(
5087: FND_LOG.LEVEL_EXCEPTION,
5088: g_module || l_api_name,
5089: 'Leaving repository_notifier:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 5086: fnd_log.string(

5082: );
5083:
5084: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5085: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5086: fnd_log.string(
5087: FND_LOG.LEVEL_EXCEPTION,
5088: g_module || l_api_name,
5089: 'Leaving repository_notifier:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5090: END IF;

Line 5087: FND_LOG.LEVEL_EXCEPTION,

5083:
5084: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5085: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5086: fnd_log.string(
5087: FND_LOG.LEVEL_EXCEPTION,
5088: g_module || l_api_name,
5089: 'Leaving repository_notifier:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5090: END IF;
5091: --close cursors

Line 5107: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5103: p_data => x_msg_data
5104: );
5105:
5106: WHEN OTHERS THEN
5107: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5108: fnd_log.string(
5109: FND_LOG.LEVEL_EXCEPTION,
5110: g_module || l_api_name,
5111: 'Leaving repository_notifier because of EXCEPTION: ' || sqlerrm);

Line 5108: fnd_log.string(

5104: );
5105:
5106: WHEN OTHERS THEN
5107: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5108: fnd_log.string(
5109: FND_LOG.LEVEL_EXCEPTION,
5110: g_module || l_api_name,
5111: 'Leaving repository_notifier because of EXCEPTION: ' || sqlerrm);
5112: END IF;

Line 5109: FND_LOG.LEVEL_EXCEPTION,

5105:
5106: WHEN OTHERS THEN
5107: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5108: fnd_log.string(
5109: FND_LOG.LEVEL_EXCEPTION,
5110: g_module || l_api_name,
5111: 'Leaving repository_notifier because of EXCEPTION: ' || sqlerrm);
5112: END IF;
5113: Okc_Api.Set_Message(

Line 5179: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5175: WHERE contract_id = p_contract_id;
5176:
5177: BEGIN
5178:
5179: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5181: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
5182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5183: 'Contract Id is: ' || p_contract_id);

Line 5180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

5176:
5177: BEGIN
5178:
5179: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5181: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
5182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5183: 'Contract Id is: ' || p_contract_id);
5184: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 5182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

5178:
5179: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5181: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
5182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5183: 'Contract Id is: ' || p_contract_id);
5184: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5185: 'Contract Version is: ' || p_contract_version);
5186: END IF;

Line 5184: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

5180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5181: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
5182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5183: 'Contract Id is: ' || p_contract_id);
5184: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5185: 'Contract Version is: ' || p_contract_version);
5186: END IF;
5187: l_api_name := 'cancel_approval';
5188: l_api_version := 1.0;

Line 5211: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5207: -- Get workflow information of the contract's approval process
5208: OPEN contract_csr;
5209: FETCH contract_csr into l_wf_type, l_wf_key, l_contract_status, l_contract_number;
5210: IF(contract_csr%NOTFOUND) THEN
5211: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5212: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
5213: G_MODULE||l_api_name,
5214: 'Invalid Contract Id: '|| p_contract_id);
5215: END IF;

Line 5212: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

5208: OPEN contract_csr;
5209: FETCH contract_csr into l_wf_type, l_wf_key, l_contract_status, l_contract_number;
5210: IF(contract_csr%NOTFOUND) THEN
5211: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5212: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
5213: G_MODULE||l_api_name,
5214: 'Invalid Contract Id: '|| p_contract_id);
5215: END IF;
5216: CLOSE contract_csr;

Line 5226: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5222: -- RAISE NO_DATA_FOUND;
5223: END IF;
5224: CLOSE contract_csr;
5225:
5226: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5227: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5228: 'Calling WF_ENGINE.AbortProcess');
5229: END IF;
5230:

Line 5227: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

5223: END IF;
5224: CLOSE contract_csr;
5225:
5226: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5227: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5228: 'Calling WF_ENGINE.AbortProcess');
5229: END IF;
5230:
5231: -- Check the status of the contract is Pending Approval before aborting the approval process

Line 5254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5250:
5251: END IF;
5252:
5253:
5254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5256: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
5257: END IF;
5258:

Line 5255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

5251: END IF;
5252:
5253:
5254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5256: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
5257: END IF;
5258:
5259: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

Line 5271: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5267: p_note => NULL,
5268: x_msg_data => x_msg_data,
5269: x_msg_count => x_msg_count,
5270: x_return_status => x_return_status);
5271: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5272: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5273: 'OKC_REP_UTIL_PVT.change_contract_status return status is: '
5274: || x_return_status);
5275: END IF;

Line 5272: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

5268: x_msg_data => x_msg_data,
5269: x_msg_count => x_msg_count,
5270: x_return_status => x_return_status);
5271: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5272: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5273: 'OKC_REP_UTIL_PVT.change_contract_status return status is: '
5274: || x_return_status);
5275: END IF;
5276: -----------------------------------------------------

Line 5285: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5281: END IF;
5282: --------------------------------------------------------
5283:
5284:
5285: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5287: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
5288: END IF;
5289:

Line 5286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

5282: --------------------------------------------------------
5283:
5284:
5285: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5287: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
5288: END IF;
5289:
5290: -- Add a record in ONC_REP_CON_APPROVALS table.

Line 5302: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5298: p_note => NULL,
5299: x_msg_data => x_msg_data,
5300: x_msg_count => x_msg_count,
5301: x_return_status => x_return_status);
5302: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5303: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5304: 'OKC_REP_UTIL_PVT.add_approval_hist_record return status is: '
5305: || x_return_status);
5306: END IF;

Line 5303: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

5299: x_msg_data => x_msg_data,
5300: x_msg_count => x_msg_count,
5301: x_return_status => x_return_status);
5302: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5303: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5304: 'OKC_REP_UTIL_PVT.add_approval_hist_record return status is: '
5305: || x_return_status);
5306: END IF;
5307: -------------------------------------------------------

Line 5320: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5316:
5317: -- Standard call to get message count and if count is 1, get message info.
5318: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
5319:
5320: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5322: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
5323: END IF;
5324:

Line 5321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

5317: -- Standard call to get message count and if count is 1, get message info.
5318: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
5319:
5320: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5322: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
5323: END IF;
5324:
5325: EXCEPTION

Line 5327: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5323: END IF;
5324:
5325: EXCEPTION
5326: WHEN FND_API.G_EXC_ERROR THEN
5327: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5329: g_module || l_api_name,
5330: 'Leaving cancel_approval:FND_API.G_EXC_ERROR Exception');
5331: END IF;

Line 5328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5324:
5325: EXCEPTION
5326: WHEN FND_API.G_EXC_ERROR THEN
5327: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5329: g_module || l_api_name,
5330: 'Leaving cancel_approval:FND_API.G_EXC_ERROR Exception');
5331: END IF;
5332: --close cursors

Line 5344: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5340: p_data => x_msg_data
5341: );
5342:
5343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5344: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5346: g_module || l_api_name,
5347: 'Leaving cancel_approval:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5348: END IF;

Line 5345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5341: );
5342:
5343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5344: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5346: g_module || l_api_name,
5347: 'Leaving cancel_approval:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5348: END IF;
5349: --close cursors

Line 5361: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5357: p_data => x_msg_data
5358: );
5359:
5360: WHEN OTHERS THEN
5361: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5362: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5363: g_module || l_api_name,
5364: 'Leaving cancel_approval because of EXCEPTION: ' || sqlerrm);
5365: END IF;

Line 5362: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5358: );
5359:
5360: WHEN OTHERS THEN
5361: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5362: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5363: g_module || l_api_name,
5364: 'Leaving cancel_approval because of EXCEPTION: ' || sqlerrm);
5365: END IF;
5366: --close cursors

Line 5465: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5461: AND ROWNUM < 2;
5462:
5463: BEGIN
5464:
5465: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5466: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5467: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
5468: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5469: 'Org Id is: ' || p_org_id);

Line 5466: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

5462:
5463: BEGIN
5464:
5465: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5466: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5467: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
5468: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5469: 'Org Id is: ' || p_org_id);
5470: END IF;

Line 5468: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

5464:
5465: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5466: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5467: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
5468: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5469: 'Org Id is: ' || p_org_id);
5470: END IF;
5471: l_api_name := 'get_next_contract_number';
5472: l_api_version := 1.0;

Line 5506: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5502: l_row_notfound := l_get_sob_csr%NOTFOUND;
5503: CLOSE l_get_sob_csr;
5504:
5505: IF l_row_notfound THEN
5506: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5507: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5508: 'Set of book id not found');
5509: END IF;
5510:

Line 5507: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

5503: CLOSE l_get_sob_csr;
5504:
5505: IF l_row_notfound THEN
5506: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5507: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5508: 'Set of book id not found');
5509: END IF;
5510:
5511: CLOSE l_get_sob_csr;

Line 5587: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5583:
5584: -- Standard call to get message count and if count is 1, get message info.
5585: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
5586:
5587: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5588: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5589: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
5590: END IF;
5591:

Line 5588: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

5584: -- Standard call to get message count and if count is 1, get message info.
5585: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
5586:
5587: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5588: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5589: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
5590: END IF;
5591:
5592: EXCEPTION

Line 5594: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5590: END IF;
5591:
5592: EXCEPTION
5593: WHEN FND_API.G_EXC_ERROR THEN
5594: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5595: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5596: g_module || l_api_name,
5597: 'Leaving get_next_contract_number:FND_API.G_EXC_ERROR Exception');
5598: END IF;

Line 5595: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5591:
5592: EXCEPTION
5593: WHEN FND_API.G_EXC_ERROR THEN
5594: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5595: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5596: g_module || l_api_name,
5597: 'Leaving get_next_contract_number:FND_API.G_EXC_ERROR Exception');
5598: END IF;
5599: --close cursors

Line 5616: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5612: p_data => x_msg_data
5613: );
5614:
5615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5616: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5617: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5618: g_module || l_api_name,
5619: 'Leaving get_next_contract_number:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5620: END IF;

Line 5617: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5613: );
5614:
5615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5616: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5617: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5618: g_module || l_api_name,
5619: 'Leaving get_next_contract_number:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5620: END IF;
5621: --close cursors

Line 5638: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

5634: p_data => x_msg_data
5635: );
5636:
5637: WHEN OTHERS THEN
5638: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5639: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5640: g_module || l_api_name,
5641: 'Leaving get_next_contract_number because of EXCEPTION: ' || sqlerrm);
5642: END IF;

Line 5639: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5635: );
5636:
5637: WHEN OTHERS THEN
5638: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5639: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5640: g_module || l_api_name,
5641: 'Leaving get_next_contract_number because of EXCEPTION: ' || sqlerrm);
5642: END IF;
5643: --close cursors