DBA Data[Home] [Help]

APPS.OKC_REP_CONTRACT_PROCESS_PVT dependencies on FND_LOG

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

60:
61:
62: BEGIN
63:
64: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
65: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
66: 'Entered OKC_REP_WF_PVT.submit_contract');
67: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
68: 'Contract Id is: ' || p_contract_id);

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

61:
62: BEGIN
63:
64: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
65: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
66: 'Entered OKC_REP_WF_PVT.submit_contract');
67: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
68: 'Contract Id is: ' || p_contract_id);
69: END IF;

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

63:
64: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
65: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
66: 'Entered OKC_REP_WF_PVT.submit_contract');
67: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
68: 'Contract Id is: ' || p_contract_id);
69: END IF;
70: l_api_name := 'submit_contract_for_approval';
71: l_api_version := 1.0;

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

86: -- Get contract number
87: OPEN contract_csr;
88: FETCH contract_csr into l_contract_number,l_contract_type,l_org_id,l_contract_version;
89: IF(contract_csr%NOTFOUND) THEN
90: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
91: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
92: G_MODULE||l_api_name,
93: 'Invalid Contract Id: '|| p_contract_id);
94: END IF;

Line 91: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

87: OPEN contract_csr;
88: FETCH contract_csr into l_contract_number,l_contract_type,l_org_id,l_contract_version;
89: IF(contract_csr%NOTFOUND) THEN
90: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
91: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
92: G_MODULE||l_api_name,
93: 'Invalid Contract Id: '|| p_contract_id);
94: END IF;
95: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

106: FETCH fetch_wf_name INTO l_wf_name;
107: CLOSE fetch_wf_name;
108:
109: IF l_wf_name IS NULL THEN
110: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
111: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
112: G_MODULE||l_api_name,
113: 'Workflow not associated for the Document');
114: END IF;

Line 111: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

107: CLOSE fetch_wf_name;
108:
109: IF l_wf_name IS NULL THEN
110: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
111: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
112: G_MODULE||l_api_name,
113: 'Workflow not associated for the Document');
114: END IF;
115:

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

119:
120:
121: CLOSE contract_csr;
122:
123: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
125: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
126: END IF;
127: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

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

120:
121: CLOSE contract_csr;
122:
123: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
125: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
126: END IF;
127: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
128: OKC_REP_UTIL_PVT.change_contract_status(

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

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

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

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

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

149: END IF;
150: --------------------------------------------------------
151:
152:
153: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
155: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
156: END IF;
157: -- Add a record in ONC_REP_CON_APPROVALS table.

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

150: --------------------------------------------------------
151:
152:
153: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
155: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
156: END IF;
157: -- Add a record in ONC_REP_CON_APPROVALS table.
158: OKC_REP_UTIL_PVT.add_approval_hist_record(

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

165: p_note => NULL,
166: x_msg_data => x_msg_data,
167: x_msg_count => x_msg_count,
168: x_return_status => x_return_status);
169: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
170: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
171: 'OKC_REP_UTIL_PVT.add_approval_hist_record return status is: '
172: || x_return_status);
173: END IF;

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

166: x_msg_data => x_msg_data,
167: x_msg_count => x_msg_count,
168: x_return_status => x_return_status);
169: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
170: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
171: 'OKC_REP_UTIL_PVT.add_approval_hist_record return status is: '
172: || x_return_status);
173: END IF;
174: -------------------------------------------------------

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

181: -- Get the user key
182: l_user_key := l_contract_number || ':' ||l_contract_type || ':' ||l_org_id|| ':' || l_wf_sequence;
183:
184:
185: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
186: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
187: 'Calling WF_ENGINE.createprocess l_wf_name '||l_wf_name);
188: END IF;
189:

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

182: l_user_key := l_contract_number || ':' ||l_contract_type || ':' ||l_org_id|| ':' || l_wf_sequence;
183:
184:
185: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
186: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
187: 'Calling WF_ENGINE.createprocess l_wf_name '||l_wf_name);
188: END IF;
189:
190: IF l_wf_name IN ( G_APPROVAL_ITEM_TYPE , G_APP_ITEM_TYPE_2579) THEN

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

194: itemkey => l_wf_sequence,
195: process => G_APPROVAL_PROCESS);
196:
197:
198: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
199: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
200: 'Calling WF_ENGINE.SetItemUserKey');
201: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
202: 'User key Value is: ' || l_user_key);

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

195: process => G_APPROVAL_PROCESS);
196:
197:
198: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
199: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
200: 'Calling WF_ENGINE.SetItemUserKey');
201: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
202: 'User key Value is: ' || l_user_key);
203: END IF;

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

197:
198: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
199: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
200: 'Calling WF_ENGINE.SetItemUserKey');
201: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
202: 'User key Value is: ' || l_user_key);
203: END IF;
204: WF_ENGINE.SetItemUserKey (
205: itemtype => l_wf_name,

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

205: itemtype => l_wf_name,
206: itemkey => l_wf_sequence,
207: userkey => l_user_key);
208:
209: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
210: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
211: 'Calling WF_ENGINE.SetItemOwner');
212: END IF;
213: WF_ENGINE.SetItemOwner (

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

206: itemkey => l_wf_sequence,
207: userkey => l_user_key);
208:
209: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
210: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
211: 'Calling WF_ENGINE.SetItemOwner');
212: END IF;
213: WF_ENGINE.SetItemOwner (
214: itemtype => l_wf_name,

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

215: itemkey => l_wf_sequence,
216: owner => fnd_global.user_name);
217:
218:
219: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
220: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
221: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_ID');
222: END IF;
223: WF_ENGINE.SetItemAttrText (

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

216: owner => fnd_global.user_name);
217:
218:
219: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
220: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
221: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_ID');
222: END IF;
223: WF_ENGINE.SetItemAttrText (
224: itemtype => l_wf_name,

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

225: itemkey => l_wf_sequence,
226: aname => 'CONTRACT_ID',
227: avalue => p_contract_id);
228:
229: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
230: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
231: 'Calling WF_ENGINE.startprocess for REQUESTOR');
232: END IF;
233: WF_ENGINE.SetItemAttrText (

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

226: aname => 'CONTRACT_ID',
227: avalue => p_contract_id);
228:
229: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
230: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
231: 'Calling WF_ENGINE.startprocess for REQUESTOR');
232: END IF;
233: WF_ENGINE.SetItemAttrText (
234: itemtype => l_wf_name,

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

235: itemkey => l_wf_sequence,
236: aname => 'REQUESTER',
237: avalue => fnd_global.user_name);
238:
239: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
240: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
241: 'Calling WF_ENGINE.setitemattrnumber for CTX_USER_ID ' || fnd_global.user_id);
242: END IF;
243:

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

236: aname => 'REQUESTER',
237: avalue => fnd_global.user_name);
238:
239: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
240: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
241: 'Calling WF_ENGINE.setitemattrnumber for CTX_USER_ID ' || fnd_global.user_id);
242: END IF;
243:
244: WF_ENGINE.SetItemAttrNumber (

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

246: itemkey => l_wf_sequence,
247: aname => 'CTX_USER_ID',
248: avalue => fnd_global.user_id);
249:
250: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
251: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
252: 'Calling WF_ENGINE.setitemattrnumber for CTX_APPL_ID ' || fnd_global.RESP_APPL_ID);
253: END IF;
254: WF_ENGINE.SetItemAttrNumber (

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

247: aname => 'CTX_USER_ID',
248: avalue => fnd_global.user_id);
249:
250: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
251: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
252: 'Calling WF_ENGINE.setitemattrnumber for CTX_APPL_ID ' || fnd_global.RESP_APPL_ID);
253: END IF;
254: WF_ENGINE.SetItemAttrNumber (
255: itemtype => l_wf_name,

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

256: itemkey => l_wf_sequence,
257: aname => 'CTX_APPL_ID',
258: avalue => fnd_global.RESP_APPL_ID);
259:
260: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
262: 'Calling WF_ENGINE.setitemattrnumber for CTX_RESP_ID ' || fnd_global.resp_id);
263: END IF;
264: WF_ENGINE.SetItemAttrNumber (

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

257: aname => 'CTX_APPL_ID',
258: avalue => fnd_global.RESP_APPL_ID);
259:
260: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
262: 'Calling WF_ENGINE.setitemattrnumber for CTX_RESP_ID ' || fnd_global.resp_id);
263: END IF;
264: WF_ENGINE.SetItemAttrNumber (
265: itemtype => l_wf_name,

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

267: aname => 'CTX_RESP_ID',
268: avalue => fnd_global.resp_id);
269:
270:
271: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
272: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
273: 'Calling WF_ENGINE.startprocess');
274: END IF;
275: WF_ENGINE.startprocess (

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

268: avalue => fnd_global.resp_id);
269:
270:
271: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
272: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
273: 'Calling WF_ENGINE.startprocess');
274: END IF;
275: WF_ENGINE.startprocess (
276: itemtype => l_wf_name,

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

278:
279:
280:
281: -- Update WF columns in OKC_REP_CONTRACTS_ALL
282: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
283: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
284: 'Updating workflow columns in OKC_REP_CONTRACTS_ALL');
285: END IF;
286: UPDATE OKC_REP_CONTRACTS_ALL

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

279:
280:
281: -- Update WF columns in OKC_REP_CONTRACTS_ALL
282: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
283: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
284: 'Updating workflow columns in OKC_REP_CONTRACTS_ALL');
285: END IF;
286: UPDATE OKC_REP_CONTRACTS_ALL
287: SET wf_item_type = l_wf_name, wf_item_key = l_wf_sequence

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

291:
292:
293: ELSE
294:
295: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
296: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
297: 'Calling the code hook to launch the custom approval workflow');
298: END IF;
299:

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

292:
293: ELSE
294:
295: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
296: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
297: 'Calling the code hook to launch the custom approval workflow');
298: END IF;
299:
300: okc_rep_app_wf_code_hook.launch_custom_app_wf(

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

306: x_msg_data => x_msg_data,
307: x_msg_count => x_msg_count,
308: x_return_status => x_return_status);
309:
310: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
311: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
312: 'okc_rep_app_wf_code_hook.launch_custom_app_wf return status is: '
313: || x_return_status);
314: END IF;

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

307: x_msg_count => x_msg_count,
308: x_return_status => x_return_status);
309:
310: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
311: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
312: 'okc_rep_app_wf_code_hook.launch_custom_app_wf return status is: '
313: || x_return_status);
314: END IF;
315: -------------------------------------------------------

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

327:
328: -- Standard call to get message count and if count is 1, get message info.
329: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
330:
331: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
333: 'Leaving OKC_REP_WF_PVT.submit_contract');
334: END IF;
335:

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

328: -- Standard call to get message count and if count is 1, get message info.
329: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
330:
331: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
333: 'Leaving OKC_REP_WF_PVT.submit_contract');
334: END IF;
335:
336: EXCEPTION

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

334: END IF;
335:
336: EXCEPTION
337: WHEN FND_API.G_EXC_ERROR THEN
338: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
339: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
340: g_module || l_api_name,
341: 'Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
342: END IF;

Line 339: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

335:
336: EXCEPTION
337: WHEN FND_API.G_EXC_ERROR THEN
338: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
339: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
340: g_module || l_api_name,
341: 'Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
342: END IF;
343: --close cursors

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

351: p_data => x_msg_data
352: );
353:
354: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
355: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
356: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
357: g_module || l_api_name,
358: 'Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
359: END IF;

Line 356: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

352: );
353:
354: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
355: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
356: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
357: g_module || l_api_name,
358: 'Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
359: END IF;
360: --close cursors

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

368: p_data => x_msg_data
369: );
370:
371: WHEN OTHERS THEN
372: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
373: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
374: g_module || l_api_name,
375: 'Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
376: END IF;

Line 373: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

369: );
370:
371: WHEN OTHERS THEN
372: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
373: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
374: g_module || l_api_name,
375: 'Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
376: END IF;
377: --close cursors

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

426: l_api_version NUMBER;
427:
428: BEGIN
429:
430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
432: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
433: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
434: 'Contract Id is: ' || to_char(p_contract_id));

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

427:
428: BEGIN
429:
430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
432: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
433: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
434: 'Contract Id is: ' || to_char(p_contract_id));
435: END IF;

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

429:
430: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
431: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
432: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
433: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
434: 'Contract Id is: ' || to_char(p_contract_id));
435: END IF;
436: l_api_name := 'delete_contacts';
437: l_api_version := 1.0;

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

460:
461: -- Standard call to get message count and if count is 1, get message info.
462: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
463:
464: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
465: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
466: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
467: END IF;
468:

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

461: -- Standard call to get message count and if count is 1, get message info.
462: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
463:
464: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
465: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
466: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_contacts');
467: END IF;
468:
469:

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

468:
469:
470: EXCEPTION
471: WHEN FND_API.G_EXC_ERROR THEN
472: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
473: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
474: g_module || l_api_name,
475: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');
476: END IF;

Line 473: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

469:
470: EXCEPTION
471: WHEN FND_API.G_EXC_ERROR THEN
472: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
473: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
474: g_module || l_api_name,
475: 'Leaving delete_contacts:FND_API.G_EXC_ERROR Exception');
476: END IF;
477: ROLLBACK TO delete_contacts_PVT;

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

481: p_data => x_msg_data
482: );
483:
484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
485: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
486: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
487: g_module || l_api_name,
488: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
489: END IF;

Line 486: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

482: );
483:
484: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
485: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
486: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
487: g_module || l_api_name,
488: 'Leaving delete_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
489: END IF;
490: ROLLBACK TO delete_contacts_PVT;

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

494: p_data => x_msg_data
495: );
496:
497: WHEN OTHERS THEN
498: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
499: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
500: g_module || l_api_name,
501: 'Leaving delete_contacts because of EXCEPTION: ' || sqlerrm);
502: END IF;

Line 499: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

495: );
496:
497: WHEN OTHERS THEN
498: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
499: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
500: g_module || l_api_name,
501: 'Leaving delete_contacts because of EXCEPTION: ' || sqlerrm);
502: END IF;
503: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

545: l_api_name VARCHAR2(30);
546: l_api_version NUMBER;
547: BEGIN
548:
549: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
550: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
551: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
552: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
553: 'Contract Id is: ' || p_contract_id);

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

546: l_api_version NUMBER;
547: BEGIN
548:
549: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
550: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
551: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
552: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
553: 'Contract Id is: ' || p_contract_id);
554: END IF;

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

548:
549: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
550: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
551: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
552: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
553: 'Contract Id is: ' || p_contract_id);
554: END IF;
555: l_api_name := 'delete_parties';
556: l_api_version := 1.0;

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

579:
580: -- Standard call to get message count and if count is 1, get message info.
581: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
582:
583: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
584: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
585: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
586: END IF;
587:

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

580: -- Standard call to get message count and if count is 1, get message info.
581: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
582:
583: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
584: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
585: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_parties');
586: END IF;
587:
588:

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

587:
588:
589: EXCEPTION
590: WHEN FND_API.G_EXC_ERROR THEN
591: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
592: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
593: g_module || l_api_name,
594: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');
595: END IF;

Line 592: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

588:
589: EXCEPTION
590: WHEN FND_API.G_EXC_ERROR THEN
591: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
592: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
593: g_module || l_api_name,
594: 'Leaving delete_parties:FND_API.G_EXC_ERROR Exception');
595: END IF;
596: ROLLBACK TO delete_parties_PVT;

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

600: p_data => x_msg_data
601: );
602:
603: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
604: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
605: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
606: g_module || l_api_name,
607: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
608: END IF;

Line 605: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

601: );
602:
603: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
604: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
605: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
606: g_module || l_api_name,
607: 'Leaving delete_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
608: END IF;
609: ROLLBACK TO delete_parties_PVT;

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

613: p_data => x_msg_data
614: );
615:
616: WHEN OTHERS THEN
617: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
618: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
619: g_module || l_api_name,
620: 'Leaving delete_parties because of EXCEPTION: ' || sqlerrm);
621: END IF;

Line 618: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

614: );
615:
616: WHEN OTHERS THEN
617: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
618: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
619: g_module || l_api_name,
620: 'Leaving delete_parties because of EXCEPTION: ' || sqlerrm);
621: END IF;
622: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

672: contract_rec contract_csr%ROWTYPE;
673:
674: BEGIN
675:
676: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
677: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
678: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
679: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
680: 'Contract Id is: ' || p_contract_id);

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

673:
674: BEGIN
675:
676: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
677: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
678: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
679: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
680: 'Contract Id is: ' || p_contract_id);
681: END IF;

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

675:
676: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
677: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
678: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
679: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
680: 'Contract Id is: ' || p_contract_id);
681: END IF;
682: l_api_name := 'delete_risks';
683: l_api_version := 1.0;

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

697: -- Get contract_type and version of the contract.
698: OPEN contract_csr;
699: FETCH contract_csr INTO contract_rec;
700: IF(contract_csr%NOTFOUND) THEN
701: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
702: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
703: G_MODULE||l_api_name,
704: 'Invalid Contract Id: '|| p_contract_id);
705: END IF;

Line 702: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

698: OPEN contract_csr;
699: FETCH contract_csr INTO contract_rec;
700: IF(contract_csr%NOTFOUND) THEN
701: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
702: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
703: G_MODULE||l_api_name,
704: 'Invalid Contract Id: '|| p_contract_id);
705: END IF;
706: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

724:
725: -- Standard call to get message count and if count is 1, get message info.
726: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
727:
728: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
729: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
730: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
731: END IF;
732:

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

725: -- Standard call to get message count and if count is 1, get message info.
726: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
727:
728: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
729: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
730: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_risks');
731: END IF;
732:
733:

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

732:
733:
734: EXCEPTION
735: WHEN FND_API.G_EXC_ERROR THEN
736: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
737: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
738: g_module || l_api_name,
739: 'Leaving delete_risks:FND_API.G_EXC_ERROR Exception');
740: END IF;

Line 737: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

733:
734: EXCEPTION
735: WHEN FND_API.G_EXC_ERROR THEN
736: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
737: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
738: g_module || l_api_name,
739: 'Leaving delete_risks:FND_API.G_EXC_ERROR Exception');
740: END IF;
741: --close cursors

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

749: p_data => x_msg_data
750: );
751:
752: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
753: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
754: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
755: g_module || l_api_name,
756: 'Leaving delete_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
757: END IF;

Line 754: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

750: );
751:
752: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
753: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
754: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
755: g_module || l_api_name,
756: 'Leaving delete_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
757: END IF;
758: --close cursors

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

766: p_data => x_msg_data
767: );
768:
769: WHEN OTHERS THEN
770: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
771: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
772: g_module || l_api_name,
773: 'Leaving delete_risks because of EXCEPTION: ' || sqlerrm);
774: END IF;

Line 771: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

767: );
768:
769: WHEN OTHERS THEN
770: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
771: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
772: g_module || l_api_name,
773: 'Leaving delete_risks because of EXCEPTION: ' || sqlerrm);
774: END IF;
775: --close cursors

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

830: contract_rec contract_csr%ROWTYPE;
831:
832: BEGIN
833:
834: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
835: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
836: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
837: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
838: 'Contract Id is: ' || p_contract_id);

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

831:
832: BEGIN
833:
834: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
835: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
836: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
837: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
838: 'Contract Id is: ' || p_contract_id);
839: END IF;

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

833:
834: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
835: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
836: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
837: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
838: 'Contract Id is: ' || p_contract_id);
839: END IF;
840: l_api_name := 'delete_related_contracts';
841: l_api_version := 1.0;

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

856: -- Get contract_type and version of the contract.
857: OPEN contract_csr;
858: FETCH contract_csr INTO contract_rec;
859: IF(contract_csr%NOTFOUND) THEN
860: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
861: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
862: G_MODULE||l_api_name,
863: 'Invalid Contract Id: '|| p_contract_id);
864: END IF;

Line 861: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

857: OPEN contract_csr;
858: FETCH contract_csr INTO contract_rec;
859: IF(contract_csr%NOTFOUND) THEN
860: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
861: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
862: G_MODULE||l_api_name,
863: 'Invalid Contract Id: '|| p_contract_id);
864: END IF;
865: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

883:
884: -- Standard call to get message count and if count is 1, get message info.
885: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
886:
887: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
888: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
889: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
890: END IF;
891:

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

884: -- Standard call to get message count and if count is 1, get message info.
885: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
886:
887: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
888: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
889: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts');
890: END IF;
891:
892:

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

891:
892:
893: EXCEPTION
894: WHEN FND_API.G_EXC_ERROR THEN
895: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
896: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
897: g_module || l_api_name,
898: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');
899: END IF;

Line 896: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

892:
893: EXCEPTION
894: WHEN FND_API.G_EXC_ERROR THEN
895: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
896: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
897: g_module || l_api_name,
898: 'Leaving delete_related_contracts:FND_API.G_EXC_ERROR Exception');
899: END IF;
900: ROLLBACK TO delete_related_contracts_PVT;

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

904: p_data => x_msg_data
905: );
906:
907: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
908: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
909: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
910: g_module || l_api_name,
911: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
912: END IF;

Line 909: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

905: );
906:
907: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
908: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
909: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
910: g_module || l_api_name,
911: 'Leaving delete_related_contracts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
912: END IF;
913: ROLLBACK TO delete_related_contracts_PVT;

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

917: p_data => x_msg_data
918: );
919:
920: WHEN OTHERS THEN
921: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
922: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
923: g_module || l_api_name,
924: 'Leaving delete_related_contracts because of EXCEPTION: ' || sqlerrm);
925: END IF;

Line 922: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

918: );
919:
920: WHEN OTHERS THEN
921: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
922: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
923: g_module || l_api_name,
924: 'Leaving delete_related_contracts because of EXCEPTION: ' || sqlerrm);
925: END IF;
926: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

986: AND fgrant.instance_pk1_value = to_char(p_contract_id);
987:
988: BEGIN
989:
990: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
991: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
992: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
993: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
994: 'Contract Id is: ' || p_contract_id);

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

987:
988: BEGIN
989:
990: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
991: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
992: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
993: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
994: 'Contract Id is: ' || p_contract_id);
995: END IF;

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

989:
990: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
991: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
992: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
993: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
994: 'Contract Id is: ' || p_contract_id);
995: END IF;
996: l_api_name := 'delete_ACL';
997: l_api_version := 1.0;

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

1009: -- Initialize API return status to success
1010: x_return_status := FND_API.G_RET_STS_SUCCESS;
1011:
1012: FOR acl_rec IN acl_csr LOOP
1013: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1014: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1015: 'grantee_type is: ' || acl_rec.grantee_type);
1016: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1017: 'grantee_key is: ' || acl_rec.grantee_key);

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

1010: x_return_status := FND_API.G_RET_STS_SUCCESS;
1011:
1012: FOR acl_rec IN acl_csr LOOP
1013: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1014: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1015: 'grantee_type is: ' || acl_rec.grantee_type);
1016: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1017: 'grantee_key is: ' || acl_rec.grantee_key);
1018: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

1012: FOR acl_rec IN acl_csr LOOP
1013: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1014: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1015: 'grantee_type is: ' || acl_rec.grantee_type);
1016: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1017: 'grantee_key is: ' || acl_rec.grantee_key);
1018: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1019: 'instance_type is: ' || acl_rec.instance_type);
1020: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

1014: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1015: 'grantee_type is: ' || acl_rec.grantee_type);
1016: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1017: 'grantee_key is: ' || acl_rec.grantee_key);
1018: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1019: 'instance_type is: ' || acl_rec.instance_type);
1020: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1021: 'instance_set_id is: ' || acl_rec.instance_set_id);
1022: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

1016: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1017: 'grantee_key is: ' || acl_rec.grantee_key);
1018: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1019: 'instance_type is: ' || acl_rec.instance_type);
1020: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1021: 'instance_set_id is: ' || acl_rec.instance_set_id);
1022: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1023: 'menu_name is: ' || acl_rec.menu_name);
1024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

1018: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1019: 'instance_type is: ' || acl_rec.instance_type);
1020: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1021: 'instance_set_id is: ' || acl_rec.instance_set_id);
1022: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1023: 'menu_name is: ' || acl_rec.menu_name);
1024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1025: 'program_name is: ' || acl_rec.program_name);
1026: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

1020: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1021: 'instance_set_id is: ' || acl_rec.instance_set_id);
1022: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1023: 'menu_name is: ' || acl_rec.menu_name);
1024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1025: 'program_name is: ' || acl_rec.program_name);
1026: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1027: 'program_tag is: ' || acl_rec.program_tag);
1028: END IF;

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

1022: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1023: 'menu_name is: ' || acl_rec.menu_name);
1024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1025: 'program_name is: ' || acl_rec.program_name);
1026: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1027: 'program_tag is: ' || acl_rec.program_tag);
1028: END IF;
1029: -- call FND_GRANT's delete api
1030: FND_GRANTS_PKG.delete_grant(

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

1054:
1055: -- Standard call to get message count and if count is 1, get message info.
1056: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1057:
1058: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1059: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1060: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
1061: END IF;
1062:

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

1055: -- Standard call to get message count and if count is 1, get message info.
1056: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1057:
1058: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1059: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1060: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL');
1061: END IF;
1062:
1063:

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

1062:
1063:
1064: EXCEPTION
1065: WHEN FND_API.G_EXC_ERROR THEN
1066: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1067: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1068: g_module || l_api_name,
1069: 'Leaving delete_ACL:FND_API.G_EXC_ERROR Exception');
1070: END IF;

Line 1067: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1063:
1064: EXCEPTION
1065: WHEN FND_API.G_EXC_ERROR THEN
1066: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1067: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1068: g_module || l_api_name,
1069: 'Leaving delete_ACL:FND_API.G_EXC_ERROR Exception');
1070: END IF;
1071: --close cursors

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

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

Line 1084: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1080: );
1081:
1082: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1083: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1084: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1085: g_module || l_api_name,
1086: 'Leaving delete_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1087: END IF;
1088: IF (acl_csr%ISOPEN) THEN

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_ACL 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_ACL because of EXCEPTION: ' || sqlerrm);
1103: END IF;
1104: IF (acl_csr%ISOPEN) THEN

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_status_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_status_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_status_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_status_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_status_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_status_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_status_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_status_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_status_history:FND_API.G_EXC_ERROR Exception');
1206: END IF;
1207: ROLLBACK TO delete_status_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_status_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_status_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1219: END IF;
1220: ROLLBACK TO delete_status_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_status_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_status_history because of EXCEPTION: ' || sqlerrm);
1232: END IF;
1233: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

1282: l_api_version NUMBER;
1283:
1284: BEGIN
1285:
1286: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1287: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1288: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1289: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1290: 'Contract Id is: ' || to_char(p_contract_id));

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

1283:
1284: BEGIN
1285:
1286: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1287: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1288: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1289: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1290: 'Contract Id is: ' || to_char(p_contract_id));
1291: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1285:
1286: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1287: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1288: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1289: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1290: 'Contract Id is: ' || to_char(p_contract_id));
1291: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1292: 'Contract Version is: ' || to_char(p_contract_version));
1293: END IF;

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

1287: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1288: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history');
1289: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1290: 'Contract Id is: ' || to_char(p_contract_id));
1291: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1292: 'Contract Version is: ' || to_char(p_contract_version));
1293: END IF;
1294: l_api_name := 'delete_approval_history';
1295: l_api_version := 1.0;

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

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

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

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

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

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

Line 1332: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1328:
1329: EXCEPTION
1330: WHEN FND_API.G_EXC_ERROR THEN
1331: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1332: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1333: g_module || l_api_name,
1334: 'Leaving delete_approval_history:FND_API.G_EXC_ERROR Exception');
1335: END IF;
1336: ROLLBACK TO delete_approval_history_PVT;

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

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

Line 1345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1341: );
1342:
1343: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1344: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1346: g_module || l_api_name,
1347: 'Leaving delete_approval_history:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1348: END IF;
1349: ROLLBACK TO delete_approval_history_PVT;

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

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

Line 1358: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

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

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

1407: l_api_version NUMBER;
1408:
1409: BEGIN
1410:
1411: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1412: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1413: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1414: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1415: 'Contract Id is: ' || p_contract_id);

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

1408:
1409: BEGIN
1410:
1411: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1412: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1413: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1414: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1415: 'Contract Id is: ' || p_contract_id);
1416: END IF;

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

1410:
1411: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1412: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1413: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1414: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1415: 'Contract Id is: ' || p_contract_id);
1416: END IF;
1417: l_api_name := 'delete_bookmarks';
1418: l_api_version := 1.0;

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

1445:
1446: -- Standard call to get message count and if count is 1, get message info.
1447: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1448:
1449: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1450: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1451: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1452: END IF;
1453:

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

1446: -- Standard call to get message count and if count is 1, get message info.
1447: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
1448:
1449: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1450: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1451: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks');
1452: END IF;
1453:
1454:

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

1453:
1454:
1455: EXCEPTION
1456: WHEN FND_API.G_EXC_ERROR THEN
1457: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1458: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1459: g_module || l_api_name,
1460: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');
1461: END IF;

Line 1458: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1454:
1455: EXCEPTION
1456: WHEN FND_API.G_EXC_ERROR THEN
1457: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1458: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1459: g_module || l_api_name,
1460: 'Leaving delete_bookmarks:FND_API.G_EXC_ERROR Exception');
1461: END IF;
1462: ROLLBACK TO delete_bookmarks_PVT;

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

1466: p_data => x_msg_data
1467: );
1468:
1469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1470: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1471: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1472: g_module || l_api_name,
1473: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1474: END IF;

Line 1471: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1467: );
1468:
1469: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1470: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1471: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1472: g_module || l_api_name,
1473: 'Leaving delete_bookmarks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1474: END IF;
1475: ROLLBACK TO delete_bookmarks_PVT;

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

1479: p_data => x_msg_data
1480: );
1481:
1482: WHEN OTHERS THEN
1483: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1484: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1485: g_module || l_api_name,
1486: 'Leaving delete_bookmarks because of EXCEPTION: ' || sqlerrm);
1487: END IF;

Line 1484: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1480: );
1481:
1482: WHEN OTHERS THEN
1483: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1484: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1485: g_module || l_api_name,
1486: 'Leaving delete_bookmarks because of EXCEPTION: ' || sqlerrm);
1487: END IF;
1488: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

1528: FROM OKC_REP_CONTRACTS_ALL
1529: WHERE CONTRACT_ID = cp_contract_id;
1530: BEGIN
1531:
1532: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1533: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1534: 'Entered Function OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1535: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1536: 'Contract Id is: ' || p_contract_id);

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

1529: WHERE CONTRACT_ID = cp_contract_id;
1530: BEGIN
1531:
1532: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1533: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1534: 'Entered Function OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1535: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1536: 'Contract Id is: ' || p_contract_id);
1537: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1531:
1532: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1533: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1534: 'Entered Function OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1535: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1536: 'Contract Id is: ' || p_contract_id);
1537: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1538: 'Object Version is: ' || p_object_version_number);
1539: END IF;

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

1533: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1534: 'Entered Function OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1535: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1536: 'Contract Id is: ' || p_contract_id);
1537: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1538: 'Object Version is: ' || p_object_version_number);
1539: END IF;
1540:
1541:

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

1547: CLOSE lock_csr;
1548:
1549: EXCEPTION
1550: WHEN E_Resource_Busy THEN
1551: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1552: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1553: g_module || l_api_name,
1554: 'Leaving Function Lock_Contract_Header:E_Resource_Busy Exception');
1555: END IF;

Line 1552: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1548:
1549: EXCEPTION
1550: WHEN E_Resource_Busy THEN
1551: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1552: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1553: g_module || l_api_name,
1554: 'Leaving Function Lock_Contract_Header:E_Resource_Busy Exception');
1555: END IF;
1556:

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

1581: ELSE
1582: l_return_status :=FND_API.G_RET_STS_SUCCESS;
1583: END IF;
1584:
1585: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1586: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1587: g_module || l_api_name,
1588: 'Leaving Function Lock_Contract_Header');
1589: END IF;

Line 1586: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,

1582: l_return_status :=FND_API.G_RET_STS_SUCCESS;
1583: END IF;
1584:
1585: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1586: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1587: g_module || l_api_name,
1588: 'Leaving Function Lock_Contract_Header');
1589: END IF;
1590:

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

1599: IF (lchk_csr%ISOPEN) THEN
1600: CLOSE lchk_csr;
1601: END IF;
1602:
1603: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1604: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1605: g_module || l_api_name,
1606: 'Leaving Function Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1607: END IF;

Line 1604: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1600: CLOSE lchk_csr;
1601: END IF;
1602:
1603: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1604: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1605: g_module || l_api_name,
1606: 'Leaving Function Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1607: END IF;
1608:

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

1641: l_api_name VARCHAR2(30);
1642:
1643: BEGIN
1644: l_api_name := 'Lock_Contract_header';
1645: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1646: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1647: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1648: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1649: 'Contract Id is: ' || p_contract_id);

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

1642:
1643: BEGIN
1644: l_api_name := 'Lock_Contract_header';
1645: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1646: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1647: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1648: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1649: 'Contract Id is: ' || p_contract_id);
1650: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1644: l_api_name := 'Lock_Contract_header';
1645: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1646: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1647: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1648: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1649: 'Contract Id is: ' || p_contract_id);
1650: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1651: 'Object Version is: ' || p_object_version_number);
1652: END IF;

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

1646: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1647: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header');
1648: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1649: 'Contract Id is: ' || p_contract_id);
1650: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1651: 'Object Version is: ' || p_object_version_number);
1652: END IF;
1653:
1654: --------------------------------------------

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

1664: ELSIF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1665: RAISE FND_API.G_EXC_ERROR;
1666: END IF;
1667: ----------------------------------------------------------
1668: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1669: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1670: g_module || l_api_name,
1671: 'Leaving Lock_Contract_Header');
1672: END IF;

Line 1669: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,

1665: RAISE FND_API.G_EXC_ERROR;
1666: END IF;
1667: ----------------------------------------------------------
1668: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1669: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1670: g_module || l_api_name,
1671: 'Leaving Lock_Contract_Header');
1672: END IF;
1673:

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

1672: END IF;
1673:
1674: EXCEPTION
1675: WHEN FND_API.G_EXC_ERROR THEN
1676: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1677: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1678: g_module || l_api_name,
1679: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1680: END IF;

Line 1677: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1673:
1674: EXCEPTION
1675: WHEN FND_API.G_EXC_ERROR THEN
1676: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1677: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1678: g_module || l_api_name,
1679: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1680: END IF;
1681: x_return_status := FND_API.G_RET_STS_ERROR;

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

1679: 'Leaving Lock_Contract_Header:FND_API.G_EXC_ERROR Exception');
1680: END IF;
1681: x_return_status := FND_API.G_RET_STS_ERROR;
1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1683: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1684: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1685: g_module || l_api_name,
1686: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1687: END IF;

Line 1684: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1680: END IF;
1681: x_return_status := FND_API.G_RET_STS_ERROR;
1682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1683: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1684: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1685: g_module || l_api_name,
1686: 'Leaving Lock_Contract_Header:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1687: END IF;
1688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1687: END IF;
1688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1689:
1690: WHEN OTHERS THEN
1691: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1692: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1693: g_module || l_api_name,
1694: 'Leaving Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1695: END IF;

Line 1692: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

1688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1689:
1690: WHEN OTHERS THEN
1691: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1692: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1693: g_module || l_api_name,
1694: 'Leaving Lock_Contract_Header because of EXCEPTION: '||sqlerrm);
1695: END IF;
1696: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1754: contract_rec contract_csr%ROWTYPE;
1755:
1756: BEGIN
1757:
1758: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1760: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
1761: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1762: 'Contract Id is: ' || p_contract_id);

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

1755:
1756: BEGIN
1757:
1758: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1760: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
1761: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1762: 'Contract Id is: ' || p_contract_id);
1763: END IF;

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

1757:
1758: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1760: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
1761: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1762: 'Contract Id is: ' || p_contract_id);
1763: END IF;
1764: l_api_name := 'delete_contract';
1765: l_api_version := 1.0;

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

1776:
1777: -- Initialize API return status to success
1778: x_return_status := FND_API.G_RET_STS_SUCCESS;
1779:
1780: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1781: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1782: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
1783: END IF;
1784: -- Lock the contract header

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

1777: -- Initialize API return status to success
1778: x_return_status := FND_API.G_RET_STS_SUCCESS;
1779:
1780: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1781: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1782: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
1783: END IF;
1784: -- Lock the contract header
1785: Lock_Contract_Header(

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

1786: p_contract_id => p_contract_id,
1787: p_object_version_number => NULL,
1788: x_return_status => x_return_status
1789: );
1790: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1791: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1792: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
1793: || x_return_status);
1794: END IF;

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

1787: p_object_version_number => NULL,
1788: x_return_status => x_return_status
1789: );
1790: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1791: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1792: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
1793: || x_return_status);
1794: END IF;
1795: -----------------------------------------------------

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

1804: -- Get contract_type and version required for deliverables and documents APIs
1805: OPEN contract_csr;
1806: FETCH contract_csr INTO contract_rec;
1807: IF(contract_csr%NOTFOUND) THEN
1808: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1809: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1810: G_MODULE||l_api_name,
1811: 'Invalid Contract Id: '|| p_contract_id);
1812: END IF;

Line 1809: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

1805: OPEN contract_csr;
1806: FETCH contract_csr INTO contract_rec;
1807: IF(contract_csr%NOTFOUND) THEN
1808: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1809: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1810: G_MODULE||l_api_name,
1811: 'Invalid Contract Id: '|| p_contract_id);
1812: END IF;
1813: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

1819: END IF;
1820:
1821:
1822: if (contract_rec.contract_version_num = 1) THEN
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_contacts()');
1826: END IF;
1827: delete_contacts(

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

1820:
1821:
1822: if (contract_rec.contract_version_num = 1) THEN
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_contacts()');
1826: END IF;
1827: delete_contacts(
1828: p_api_version => 1.0,

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

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

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

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

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

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

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

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

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

1857: p_contract_id => p_contract_id,
1858: x_msg_data => x_msg_data,
1859: x_msg_count => x_msg_count,
1860: x_return_status => x_return_status);
1861: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1862: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1863: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_parties return status is: '
1864: || x_return_status);
1865: END IF;

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

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

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

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

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

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

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

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

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

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

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

1897: END IF;
1898: --------------------------------------------------------
1899:
1900:
1901: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1902: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1903: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL()');
1904: END IF;
1905: delete_ACL(

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

1898: --------------------------------------------------------
1899:
1900:
1901: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1902: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1903: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL()');
1904: END IF;
1905: delete_ACL(
1906: p_api_version => 1.0,

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

1909: p_contract_id => p_contract_id,
1910: x_msg_data => x_msg_data,
1911: x_msg_count => x_msg_count,
1912: x_return_status => x_return_status);
1913: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1914: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1915: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL return status is: '
1916: || x_return_status);
1917: END IF;

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

1910: x_msg_data => x_msg_data,
1911: x_msg_count => x_msg_count,
1912: x_return_status => x_return_status);
1913: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1914: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1915: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_ACL return status is: '
1916: || x_return_status);
1917: END IF;
1918: -----------------------------------------------------

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

1923: END IF;
1924: --------------------------------------------------------
1925:
1926:
1927: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1928: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1929: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history()');
1930: END IF;
1931: delete_status_history(

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

1924: --------------------------------------------------------
1925:
1926:
1927: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1928: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1929: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history()');
1930: END IF;
1931: delete_status_history(
1932: p_api_version => 1.0,

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

1936: p_contract_version => contract_rec.contract_version_num,
1937: x_msg_data => x_msg_data,
1938: x_msg_count => x_msg_count,
1939: x_return_status => x_return_status);
1940: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1942: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history return status is: '
1943: || x_return_status);
1944: END IF;

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

1937: x_msg_data => x_msg_data,
1938: x_msg_count => x_msg_count,
1939: x_return_status => x_return_status);
1940: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1942: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_status_history return status is: '
1943: || x_return_status);
1944: END IF;
1945: -----------------------------------------------------

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

1950: END IF;
1951: --------------------------------------------------------
1952:
1953:
1954: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1956: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history()');
1957: END IF;
1958: delete_approval_history(

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

1951: --------------------------------------------------------
1952:
1953:
1954: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1956: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history()');
1957: END IF;
1958: delete_approval_history(
1959: p_api_version => 1.0,

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

1963: p_contract_version => contract_rec.contract_version_num,
1964: x_msg_data => x_msg_data,
1965: x_msg_count => x_msg_count,
1966: x_return_status => x_return_status);
1967: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1968: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1969: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history return status is: '
1970: || x_return_status);
1971: END IF;

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

1964: x_msg_data => x_msg_data,
1965: x_msg_count => x_msg_count,
1966: x_return_status => x_return_status);
1967: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1968: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1969: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_approval_history return status is: '
1970: || x_return_status);
1971: END IF;
1972: -----------------------------------------------------

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

1977: END IF;
1978: --------------------------------------------------------
1979:
1980:
1981: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1982: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1983: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks()');
1984: END IF;
1985: delete_bookmarks(

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

1978: --------------------------------------------------------
1979:
1980:
1981: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1982: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1983: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks()');
1984: END IF;
1985: delete_bookmarks(
1986: p_api_version => 1.0,

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

1990: p_contract_id => p_contract_id,
1991: x_msg_data => x_msg_data,
1992: x_msg_count => x_msg_count,
1993: x_return_status => x_return_status);
1994: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1995: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1996: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks return status is: '
1997: || x_return_status);
1998: END IF;

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

1991: x_msg_data => x_msg_data,
1992: x_msg_count => x_msg_count,
1993: x_return_status => x_return_status);
1994: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1995: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1996: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_bookmarks return status is: '
1997: || x_return_status);
1998: END IF;
1999: -----------------------------------------------------

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

2007: END IF; -- (contract_rec.contract_version_num = 1)
2008:
2009:
2010:
2011: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2012: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2013: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts()');
2014: END IF;
2015: delete_related_contracts(

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

2008:
2009:
2010:
2011: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2012: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2013: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts()');
2014: END IF;
2015: delete_related_contracts(
2016: p_api_version => 1.0,

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

2019: p_contract_id => p_contract_id,
2020: x_msg_data => x_msg_data,
2021: x_msg_count => x_msg_count,
2022: x_return_status => x_return_status);
2023: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2025: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts return status is: '
2026: || x_return_status);
2027: END IF;

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

2020: x_msg_data => x_msg_data,
2021: x_msg_count => x_msg_count,
2022: x_return_status => x_return_status);
2023: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2025: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_related_contracts return status is: '
2026: || x_return_status);
2027: END IF;
2028: -----------------------------------------------------

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

2033: END IF;
2034: --------------------------------------------------------
2035:
2036:
2037: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2038: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2039: 'Calling OKC_CONTRACT_DOCS_GRP.Delete_Ver_Attachments');
2040: END IF;
2041: -- Delete Contract Documents

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

2034: --------------------------------------------------------
2035:
2036:
2037: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2038: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2039: 'Calling OKC_CONTRACT_DOCS_GRP.Delete_Ver_Attachments');
2040: END IF;
2041: -- Delete Contract Documents
2042: -- The following package call should be uncommented once the package is compiling.

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

2048: x_return_status => x_return_status,
2049: x_msg_count => x_msg_count,
2050: x_msg_data => x_msg_data
2051: );
2052: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2054: 'OKC_CONTRACT_DOCS_GRP.Delete_Ver_Attachments return status is : '
2055: || x_return_status);
2056: END IF;

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

2049: x_msg_count => x_msg_count,
2050: x_msg_data => x_msg_data
2051: );
2052: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2054: 'OKC_CONTRACT_DOCS_GRP.Delete_Ver_Attachments return status is : '
2055: || x_return_status);
2056: END IF;
2057: -----------------------------------------------------

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

2062: END IF;
2063: --------------------------------------------------------
2064:
2065: /* 14543447 - kkolukul - Uda Integration */
2066: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2067: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2068: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values()');
2069: END IF;
2070: delete_uda_attribute_values(

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

2063: --------------------------------------------------------
2064:
2065: /* 14543447 - kkolukul - Uda Integration */
2066: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2067: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2068: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values()');
2069: END IF;
2070: delete_uda_attribute_values(
2071: p_api_version => 1.0,

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

2074: p_contract_id => p_contract_id,
2075: x_msg_data => x_msg_data,
2076: x_msg_count => x_msg_count,
2077: x_return_status => x_return_status);
2078: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2079: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2080: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values return status is: '
2081: || x_return_status);
2082: END IF;

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

2075: x_msg_data => x_msg_data,
2076: x_msg_count => x_msg_count,
2077: x_return_status => x_return_status);
2078: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2079: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2080: 'OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values return status is: '
2081: || x_return_status);
2082: END IF;
2083: -----------------------------------------------------

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

2090:
2091: IF (contract_rec.contract_version_num > 1) THEN
2092:
2093: -- Call this API only if the contract has previous versions
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: 'Calling OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
2097: END IF;
2098:

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

2091: IF (contract_rec.contract_version_num > 1) THEN
2092:
2093: -- Call this API only if the contract has previous versions
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: 'Calling OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current');
2097: END IF;
2098:
2099: -- Bug 5044121

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

2104: p_business_document_type => contract_rec.contract_type,
2105: p_business_document_id => p_contract_id,
2106: p_business_document_version => contract_rec.contract_version_num);
2107:
2108: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2109: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2110: 'OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current return status is : '
2111: || x_return_status);
2112: END IF;

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

2105: p_business_document_id => p_contract_id,
2106: p_business_document_version => contract_rec.contract_version_num);
2107:
2108: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2109: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2110: 'OKC_CONTRACT_DOCS_PVT.reset_bus_doc_ver_to_current return status is : '
2111: || x_return_status);
2112: END IF;
2113:

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

2121:
2122: END IF;
2123:
2124: -- Repository Enhancement 12.1 (For Delete Action)
2125: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1000: Calling Ptivate API to Delete the doc');
2127: END IF;
2128:
2129: -- If the contract has only one version, delete the terms.

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

2122: END IF;
2123:
2124: -- Repository Enhancement 12.1 (For Delete Action)
2125: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1000: Calling Ptivate API to Delete the doc');
2127: END IF;
2128:
2129: -- If the contract has only one version, delete the terms.
2130: -- Otherwise the only the terms versions have to be deleted.

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

2182:
2183:
2184: IF(contract_rec.contract_version_num = 1) THEN
2185:
2186: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2188: 'Calling OKC_DELIVERABLE_PROCESS_PVT.delete_deliverables');
2189: END IF;
2190:

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

2183:
2184: IF(contract_rec.contract_version_num = 1) THEN
2185:
2186: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2188: 'Calling OKC_DELIVERABLE_PROCESS_PVT.delete_deliverables');
2189: END IF;
2190:
2191: -- Delete Deliverables

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

2225: x_msg_data => x_msg_data);
2226:
2227: END IF;
2228:
2229: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2230: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2231: 'OKC_DELIVERABLE_PROCESS_PVT.deleteDeliverables return status is : '
2232: || x_return_status);
2233: END IF;

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

2226:
2227: END IF;
2228:
2229: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2230: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2231: 'OKC_DELIVERABLE_PROCESS_PVT.deleteDeliverables return status is : '
2232: || x_return_status);
2233: END IF;
2234:

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

2240: END IF;
2241: --------------------------------------------------------
2242:
2243:
2244: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2245: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2246: 'Deleting Contract header record');
2247: END IF;
2248: -- Delete contract header from the main header table OKC_REP_CONTRACTS_ALL

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

2241: --------------------------------------------------------
2242:
2243:
2244: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2245: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2246: 'Deleting Contract header record');
2247: END IF;
2248: -- Delete contract header from the main header table OKC_REP_CONTRACTS_ALL
2249: DELETE FROM OKC_REP_CONTRACTS_ALL

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

2248: -- Delete contract header from the main header table OKC_REP_CONTRACTS_ALL
2249: DELETE FROM OKC_REP_CONTRACTS_ALL
2250: WHERE contract_id = p_contract_id;
2251:
2252: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2253: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2254: 'Deleted Contract header record');
2255: END IF;
2256: -- If Version > 1, copy the latest version from the archive table.

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

2249: DELETE FROM OKC_REP_CONTRACTS_ALL
2250: WHERE contract_id = p_contract_id;
2251:
2252: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2253: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2254: 'Deleted Contract header record');
2255: END IF;
2256: -- If Version > 1, copy the latest version from the archive table.
2257: if (contract_rec.contract_version_num > 1) THEN

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

2405: CLOSE contract_csr;
2406: -- Standard call to get message count and if count is 1, get message info.
2407: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2408:
2409: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2410: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2411: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
2412: END IF;
2413:

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

2406: -- Standard call to get message count and if count is 1, get message info.
2407: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2408:
2409: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2410: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2411: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_contract');
2412: END IF;
2413:
2414:

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

2413:
2414:
2415: EXCEPTION
2416: WHEN FND_API.G_EXC_ERROR THEN
2417: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2418: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2419: g_module || l_api_name,
2420: 'Leaving delete_contract:FND_API.G_EXC_ERROR Exception');
2421: END IF;

Line 2418: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2414:
2415: EXCEPTION
2416: WHEN FND_API.G_EXC_ERROR THEN
2417: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2418: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2419: g_module || l_api_name,
2420: 'Leaving delete_contract:FND_API.G_EXC_ERROR Exception');
2421: END IF;
2422: --close cursors

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

2430: p_data => x_msg_data
2431: );
2432:
2433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2434: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2435: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2436: g_module || l_api_name,
2437: 'Leaving delete_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2438: END IF;

Line 2435: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2431: );
2432:
2433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2434: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2435: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2436: g_module || l_api_name,
2437: 'Leaving delete_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2438: END IF;
2439: --close cursors

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

2447: p_data => x_msg_data
2448: );
2449:
2450: WHEN OTHERS 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 delete_contract because of EXCEPTION: ' || sqlerrm);
2455: END IF;

Line 2452: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2448: );
2449:
2450: WHEN OTHERS 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 delete_contract because of EXCEPTION: ' || sqlerrm);
2455: END IF;
2456: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

2516: FROM OKC_REP_PARTY_CONTACTS
2517: WHERE contract_id = p_source_contract_id;
2518: BEGIN
2519:
2520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2522: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2524: 'Source Contract Id is: ' || to_char(p_source_contract_id));

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

2517: WHERE contract_id = p_source_contract_id;
2518: BEGIN
2519:
2520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2522: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2524: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2525: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2519:
2520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2522: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2524: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2525: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2526: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2527: END IF;

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

2521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2522: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts');
2523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2524: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2525: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2526: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2527: END IF;
2528: l_api_name := 'copy_contacts';
2529: l_api_version := 1.0;

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

2547: l_last_updated_by := l_created_by;
2548: l_last_update_login := Fnd_Global.Login_Id;
2549:
2550: FOR contact_rec IN contact_csr LOOP
2551: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2552: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2553: 'Party Id is: ' || contact_rec.party_id);
2554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2555: 'Party Role Code is: ' || contact_rec.party_role_code);

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

2548: l_last_update_login := Fnd_Global.Login_Id;
2549:
2550: FOR contact_rec IN contact_csr LOOP
2551: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2552: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2553: 'Party Id is: ' || contact_rec.party_id);
2554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2555: 'Party Role Code is: ' || contact_rec.party_role_code);
2556: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2550: FOR contact_rec IN contact_csr LOOP
2551: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2552: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2553: 'Party Id is: ' || contact_rec.party_id);
2554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2555: 'Party Role Code is: ' || contact_rec.party_role_code);
2556: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2557: 'Contact Id is: ' || contact_rec.contact_id);
2558: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2552: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2553: 'Party Id is: ' || contact_rec.party_id);
2554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2555: 'Party Role Code is: ' || contact_rec.party_role_code);
2556: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2557: 'Contact Id is: ' || contact_rec.contact_id);
2558: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2559: 'Contact Role Code is: ' || contact_rec.contact_role_id);
2560: END IF;

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

2554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2555: 'Party Role Code is: ' || contact_rec.party_role_code);
2556: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2557: 'Contact Id is: ' || contact_rec.contact_id);
2558: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2559: 'Contact Role Code is: ' || contact_rec.contact_role_id);
2560: END IF;
2561: -- INSERT THE NEW RECORDS into OKC_REP_PARTY_CONTACTS table
2562:

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_contacts');
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_contacts');
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_contacts: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_contacts:FND_API.G_EXC_ERROR Exception');
2612: END IF;
2613: ROLLBACK TO copy_contacts_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_contacts: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_contacts:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2625: END IF;
2626: ROLLBACK TO copy_contacts_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_contacts 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_contacts because of EXCEPTION: ' || sqlerrm);
2638: END IF;
2639: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

2695: FROM OKC_REP_CONTRACT_PARTIES
2696: WHERE contract_id = p_source_contract_id;
2697: BEGIN
2698:
2699: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2700: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2701: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2702: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2703: 'Source Contract Id is: ' || to_char(p_source_contract_id));

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

2696: WHERE contract_id = p_source_contract_id;
2697: BEGIN
2698:
2699: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2700: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2701: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2702: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2703: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2704: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2698:
2699: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2700: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2701: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2702: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2703: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2704: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2705: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2706: END IF;

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

2700: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2701: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2702: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2703: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2704: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2705: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2706: END IF;
2707: l_api_name := 'copy_parties';
2708: l_api_version := 1.0;

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

2726: l_last_updated_by := l_created_by;
2727: l_last_update_login := Fnd_Global.Login_Id;
2728:
2729: FOR party_rec IN party_csr LOOP
2730: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2732: 'Party Id is: ' || party_rec.party_id);
2733: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2734: 'Party Role Code is: ' || party_rec.party_role_code);

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

2727: l_last_update_login := Fnd_Global.Login_Id;
2728:
2729: FOR party_rec IN party_csr LOOP
2730: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2732: 'Party Id is: ' || party_rec.party_id);
2733: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2734: 'Party Role Code is: ' || party_rec.party_role_code);
2735: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2729: FOR party_rec IN party_csr LOOP
2730: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2732: 'Party Id is: ' || party_rec.party_id);
2733: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2734: 'Party Role Code is: ' || party_rec.party_role_code);
2735: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2736: 'Party Location ID is: ' || party_rec.party_location_id);
2737: END IF;

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

2731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2732: 'Party Id is: ' || party_rec.party_id);
2733: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2734: 'Party Role Code is: ' || party_rec.party_role_code);
2735: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2736: 'Party Location ID is: ' || party_rec.party_location_id);
2737: END IF;
2738: -- INSERT THE NEW RECORDS into OKC_REP_CONTRACT_PARTIES table
2739: INSERT INTO OKC_REP_CONTRACT_PARTIES (

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

2766:
2767: -- Standard call to get message count and if count is 1, get message info.
2768: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2769:
2770: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2771: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2772: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2773: END IF;
2774:

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

2767: -- Standard call to get message count and if count is 1, get message info.
2768: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2769:
2770: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2771: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2772: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_parties');
2773: END IF;
2774:
2775:

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

2774:
2775:
2776: EXCEPTION
2777: WHEN FND_API.G_EXC_ERROR THEN
2778: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2779: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2780: g_module || l_api_name,
2781: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');
2782: END IF;

Line 2779: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2775:
2776: EXCEPTION
2777: WHEN FND_API.G_EXC_ERROR THEN
2778: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2779: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2780: g_module || l_api_name,
2781: 'Leaving copy_parties:FND_API.G_EXC_ERROR Exception');
2782: END IF;
2783: ROLLBACK TO copy_parties_PVT;

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

2787: p_data => x_msg_data
2788: );
2789:
2790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2793: g_module || l_api_name,
2794: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2795: END IF;

Line 2792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2788: );
2789:
2790: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2793: g_module || l_api_name,
2794: 'Leaving copy_parties:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2795: END IF;
2796: ROLLBACK TO copy_parties_PVT;

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

2800: p_data => x_msg_data
2801: );
2802:
2803: WHEN OTHERS THEN
2804: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2805: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2806: g_module || l_api_name,
2807: 'Leaving copy_parties because of EXCEPTION: ' || sqlerrm);
2808: END IF;

Line 2805: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

2801: );
2802:
2803: WHEN OTHERS THEN
2804: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2805: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2806: g_module || l_api_name,
2807: 'Leaving copy_parties because of EXCEPTION: ' || sqlerrm);
2808: END IF;
2809: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

2876:
2877: contract_rec contract_csr%ROWTYPE;
2878: BEGIN
2879:
2880: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2881: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2882: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2883: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2884: 'Source Contract Id is: ' || to_char(p_source_contract_id));

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

2877: contract_rec contract_csr%ROWTYPE;
2878: BEGIN
2879:
2880: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2881: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2882: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2883: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2884: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2885: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2879:
2880: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2881: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2882: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2883: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2884: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2885: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2886: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2887: END IF;

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

2881: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2882: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
2883: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2884: 'Source Contract Id is: ' || to_char(p_source_contract_id));
2885: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2886: 'Target Contract Id is: ' || to_char(p_target_contract_id));
2887: END IF;
2888: l_api_name := 'copy_risks';
2889: l_api_version := 1.0;

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

2912: -- Get effective dates and version of the contract.
2913: OPEN contract_csr;
2914: FETCH contract_csr INTO contract_rec;
2915: IF(contract_csr%NOTFOUND) THEN
2916: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2917: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
2918: G_MODULE||l_api_name,
2919: 'Invalid Contract Id: '|| p_source_contract_id);
2920: END IF;

Line 2917: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

2913: OPEN contract_csr;
2914: FETCH contract_csr INTO contract_rec;
2915: IF(contract_csr%NOTFOUND) THEN
2916: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2917: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
2918: G_MODULE||l_api_name,
2919: 'Invalid Contract Id: '|| p_source_contract_id);
2920: END IF;
2921: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

2930: FOR risk_rec IN risk_csr(contract_rec.contract_type, p_source_contract_id) LOOP
2931: -- Get the id column.
2932: -- SELECT OKC_CONTRACT_RISKS_S.nextval INTO l_contract_risk_id FROM dual;
2933:
2934: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2935: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2936: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
2937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2938: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);

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

2931: -- Get the id column.
2932: -- SELECT OKC_CONTRACT_RISKS_S.nextval INTO l_contract_risk_id FROM dual;
2933:
2934: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2935: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2936: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
2937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2938: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);
2939: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2933:
2934: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2935: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2936: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
2937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2938: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);
2939: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2940: 'Contract Version is: ' || contract_rec.CONTRACT_VERSION_NUM);
2941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2935: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2936: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
2937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2938: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);
2939: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2940: 'Contract Version is: ' || contract_rec.CONTRACT_VERSION_NUM);
2941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2942: 'Risk Event ID is: ' || risk_rec.RISK_EVENT_ID);
2943: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2938: 'Contract Id is: ' || risk_rec.BUSINESS_DOCUMENT_ID);
2939: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2940: 'Contract Version is: ' || contract_rec.CONTRACT_VERSION_NUM);
2941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2942: 'Risk Event ID is: ' || risk_rec.RISK_EVENT_ID);
2943: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2944: 'Probability code is: ' || risk_rec.PROBABILITY_CODE);
2945: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2939: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2940: 'Contract Version is: ' || contract_rec.CONTRACT_VERSION_NUM);
2941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2942: 'Risk Event ID is: ' || risk_rec.RISK_EVENT_ID);
2943: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2944: 'Probability code is: ' || risk_rec.PROBABILITY_CODE);
2945: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2946: 'Impact Code is: ' || risk_rec.IMPACT_CODE);
2947: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2942: 'Risk Event ID is: ' || risk_rec.RISK_EVENT_ID);
2943: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2944: 'Probability code is: ' || risk_rec.PROBABILITY_CODE);
2945: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2946: 'Impact Code is: ' || risk_rec.IMPACT_CODE);
2947: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2948: 'Risk Occurred Flag is: ' || risk_rec.RISK_OCCURRED_FLAG);
2949: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2943: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2944: 'Probability code is: ' || risk_rec.PROBABILITY_CODE);
2945: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2946: 'Impact Code is: ' || risk_rec.IMPACT_CODE);
2947: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2948: 'Risk Occurred Flag is: ' || risk_rec.RISK_OCCURRED_FLAG);
2949: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2950: 'Occurence Date is: ' || to_char(risk_rec.OCCURRENCE_DATE));
2951: END IF;

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

2945: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2946: 'Impact Code is: ' || risk_rec.IMPACT_CODE);
2947: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2948: 'Risk Occurred Flag is: ' || risk_rec.RISK_OCCURRED_FLAG);
2949: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2950: 'Occurence Date is: ' || to_char(risk_rec.OCCURRENCE_DATE));
2951: END IF;
2952: -- INSERT THE NEW RECORDS into OKC_CONTRACT_RISKS table
2953: INSERT INTO OKC_CONTRACT_RISKS (

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

2993:
2994: -- Standard call to get message count and if count is 1, get message info.
2995: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2996:
2997: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2998: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2999: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
3000: END IF;
3001:

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

2994: -- Standard call to get message count and if count is 1, get message info.
2995: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
2996:
2997: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2998: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2999: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_risks');
3000: END IF;
3001:
3002:

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

3001:
3002:
3003: EXCEPTION
3004: WHEN FND_API.G_EXC_ERROR THEN
3005: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3006: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3007: g_module || l_api_name,
3008: 'Leaving copy_risks:FND_API.G_EXC_ERROR Exception');
3009: END IF;

Line 3006: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3002:
3003: EXCEPTION
3004: WHEN FND_API.G_EXC_ERROR THEN
3005: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3006: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3007: g_module || l_api_name,
3008: 'Leaving copy_risks:FND_API.G_EXC_ERROR Exception');
3009: END IF;
3010: --close cursors

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

3018: p_data => x_msg_data
3019: );
3020:
3021: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3022: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3023: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3024: g_module || l_api_name,
3025: 'Leaving copy_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3026: END IF;

Line 3023: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3019: );
3020:
3021: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3022: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3023: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3024: g_module || l_api_name,
3025: 'Leaving copy_risks:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3026: END IF;
3027: --close cursors

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

3035: p_data => x_msg_data
3036: );
3037:
3038: WHEN OTHERS THEN
3039: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3040: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3041: g_module || l_api_name,
3042: 'Leaving copy_risks because of EXCEPTION: ' || sqlerrm);
3043: END IF;

Line 3040: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3036: );
3037:
3038: WHEN OTHERS THEN
3039: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3040: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3041: g_module || l_api_name,
3042: 'Leaving copy_risks because of EXCEPTION: ' || sqlerrm);
3043: END IF;
3044: --close cursors

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

3116: AND fgrant.instance_pk1_value = to_char(p_source_contract_id);
3117:
3118: BEGIN
3119:
3120: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3121: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3122: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
3123: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3124: 'Source Contract Id is: ' || p_source_contract_id);

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

3117:
3118: BEGIN
3119:
3120: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3121: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3122: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
3123: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3124: 'Source Contract Id is: ' || p_source_contract_id);
3125: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

3119:
3120: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3121: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3122: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
3123: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3124: 'Source Contract Id is: ' || p_source_contract_id);
3125: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3126: 'Target Contract Id is: ' || p_target_contract_id);
3127: END IF;

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

3121: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3122: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
3123: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3124: 'Source Contract Id is: ' || p_source_contract_id);
3125: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3126: 'Target Contract Id is: ' || p_target_contract_id);
3127: END IF;
3128: l_api_name := 'copy_ACL';
3129: l_api_version := 1.0;

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

3141: -- Initialize API return status to success
3142: x_return_status := FND_API.G_RET_STS_SUCCESS;
3143:
3144: FOR acl_rec IN acl_csr LOOP
3145: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3146: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3147: 'grantee_type is: ' || acl_rec.grantee_type);
3148: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3149: 'grantee_key is: ' || acl_rec.grantee_key);

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

3142: x_return_status := FND_API.G_RET_STS_SUCCESS;
3143:
3144: FOR acl_rec IN acl_csr LOOP
3145: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3146: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3147: 'grantee_type is: ' || acl_rec.grantee_type);
3148: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3149: 'grantee_key is: ' || acl_rec.grantee_key);
3150: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3144: FOR acl_rec IN acl_csr LOOP
3145: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3146: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3147: 'grantee_type is: ' || acl_rec.grantee_type);
3148: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3149: 'grantee_key is: ' || acl_rec.grantee_key);
3150: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3151: 'instance_type is: ' || acl_rec.instance_type);
3152: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3146: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3147: 'grantee_type is: ' || acl_rec.grantee_type);
3148: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3149: 'grantee_key is: ' || acl_rec.grantee_key);
3150: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3151: 'instance_type is: ' || acl_rec.instance_type);
3152: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3153: 'instance_set_id is: ' || acl_rec.instance_set_id);
3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3148: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3149: 'grantee_key is: ' || acl_rec.grantee_key);
3150: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3151: 'instance_type is: ' || acl_rec.instance_type);
3152: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3153: 'instance_set_id is: ' || acl_rec.instance_set_id);
3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3155: 'menu_name is: ' || acl_rec.menu_name);
3156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3150: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3151: 'instance_type is: ' || acl_rec.instance_type);
3152: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3153: 'instance_set_id is: ' || acl_rec.instance_set_id);
3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3155: 'menu_name is: ' || acl_rec.menu_name);
3156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3157: 'program_name is: ' || acl_rec.program_name);
3158: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3152: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3153: 'instance_set_id is: ' || acl_rec.instance_set_id);
3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3155: 'menu_name is: ' || acl_rec.menu_name);
3156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3157: 'program_name is: ' || acl_rec.program_name);
3158: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3159: 'program_tag is: ' || acl_rec.program_tag);
3160: END IF;

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

3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3155: 'menu_name is: ' || acl_rec.menu_name);
3156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3157: 'program_name is: ' || acl_rec.program_name);
3158: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3159: 'program_tag is: ' || acl_rec.program_tag);
3160: END IF;
3161: -- call FND_GRANT's delete api
3162: FND_GRANTS_PKG.grant_function(

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

3193:
3194: -- Standard call to get message count and if count is 1, get message info.
3195: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3196:
3197: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3198: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3199: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
3200: END IF;
3201:

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

3194: -- Standard call to get message count and if count is 1, get message info.
3195: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3196:
3197: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3198: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3199: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL');
3200: END IF;
3201:
3202:

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

3201:
3202:
3203: EXCEPTION
3204: WHEN FND_API.G_EXC_ERROR THEN
3205: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3206: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3207: g_module || l_api_name,
3208: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');
3209: END IF;

Line 3206: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3202:
3203: EXCEPTION
3204: WHEN FND_API.G_EXC_ERROR THEN
3205: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3206: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3207: g_module || l_api_name,
3208: 'Leaving copy_ACL:FND_API.G_EXC_ERROR Exception');
3209: END IF;
3210: ROLLBACK TO copy_ACL_PVT;

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

3214: p_data => x_msg_data
3215: );
3216:
3217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3218: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3219: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3220: g_module || l_api_name,
3221: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3222: END IF;

Line 3219: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3215: );
3216:
3217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3218: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3219: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3220: g_module || l_api_name,
3221: 'Leaving copy_ACL:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3222: END IF;
3223: ROLLBACK TO copy_ACL_PVT;

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

3227: p_data => x_msg_data
3228: );
3229:
3230: WHEN OTHERS THEN
3231: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3232: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3233: g_module || l_api_name,
3234: 'Leaving copy_ACL because of EXCEPTION: ' || sqlerrm);
3235: END IF;

Line 3232: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3228: );
3229:
3230: WHEN OTHERS THEN
3231: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3232: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3233: g_module || l_api_name,
3234: 'Leaving copy_ACL because of EXCEPTION: ' || sqlerrm);
3235: END IF;
3236: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

3312:
3313:
3314: BEGIN
3315:
3316: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3317: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3318: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3319: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3320: 'Source Contract Id is: ' || p_source_contract_id);

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

3313:
3314: BEGIN
3315:
3316: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3317: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3318: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3319: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3320: 'Source Contract Id is: ' || p_source_contract_id);
3321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

3315:
3316: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3317: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3318: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3319: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3320: 'Source Contract Id is: ' || p_source_contract_id);
3321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3322: 'Target Contract Id is: ' || p_target_contract_id);
3323: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

3317: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3318: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3319: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3320: 'Source Contract Id is: ' || p_source_contract_id);
3321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3322: 'Target Contract Id is: ' || p_target_contract_id);
3323: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3324: 'Target Contract Number is: ' || p_target_contract_number);
3325: END IF;

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

3319: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3320: 'Source Contract Id is: ' || p_source_contract_id);
3321: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3322: 'Target Contract Id is: ' || p_target_contract_id);
3323: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3324: 'Target Contract Number is: ' || p_target_contract_number);
3325: END IF;
3326: l_api_name := 'copy_contract_details';
3327: l_api_version := 1.0;

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

3338:
3339: -- Initialize API return status to success
3340: x_return_status := FND_API.G_RET_STS_SUCCESS;
3341:
3342: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3343: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3344: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_parties()');
3345: END IF;
3346: copy_parties(

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

3339: -- Initialize API return status to success
3340: x_return_status := FND_API.G_RET_STS_SUCCESS;
3341:
3342: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3343: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3344: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_parties()');
3345: END IF;
3346: copy_parties(
3347: p_api_version => 1.0,

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

3351: p_target_contract_id => p_target_contract_id,
3352: x_msg_data => x_msg_data,
3353: x_msg_count => x_msg_count,
3354: x_return_status => x_return_status);
3355: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3356: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3357: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_parties return status is: '
3358: || x_return_status);
3359: END IF;

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

3352: x_msg_data => x_msg_data,
3353: x_msg_count => x_msg_count,
3354: x_return_status => x_return_status);
3355: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3356: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3357: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_parties return status is: '
3358: || x_return_status);
3359: END IF;
3360: ----------------------------------------------------

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

3365: END IF;
3366: --------------------------------------------------------
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_REP_CONTRACT_PROCESS_PVT.copy_contacts()');
3372: END IF;
3373: copy_contacts(

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

3366: --------------------------------------------------------
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_REP_CONTRACT_PROCESS_PVT.copy_contacts()');
3372: END IF;
3373: copy_contacts(
3374: p_api_version => 1.0,

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

3378: p_target_contract_id => p_target_contract_id,
3379: x_msg_data => x_msg_data,
3380: x_msg_count => x_msg_count,
3381: x_return_status => x_return_status);
3382: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3383: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3384: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts return status is: '
3385: || x_return_status);
3386: END IF;

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

3379: x_msg_data => x_msg_data,
3380: x_msg_count => x_msg_count,
3381: x_return_status => x_return_status);
3382: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3383: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3384: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_contacts return status is: '
3385: || x_return_status);
3386: END IF;
3387: -----------------------------------------------------

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

3391: RAISE OKC_API.G_EXCEPTION_ERROR;
3392: END IF;
3393: -----------------------------------------------------
3394:
3395: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3396: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3397: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_risks()');
3398: END IF;
3399: copy_risks(

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

3392: END IF;
3393: -----------------------------------------------------
3394:
3395: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3396: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3397: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_risks()');
3398: END IF;
3399: copy_risks(
3400: p_api_version => 1.0,

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

3404: p_target_contract_id => p_target_contract_id,
3405: x_msg_data => x_msg_data,
3406: x_msg_count => x_msg_count,
3407: x_return_status => x_return_status);
3408: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3409: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3410: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_risks return status is: '
3411: || x_return_status);
3412: END IF;

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

3405: x_msg_data => x_msg_data,
3406: x_msg_count => x_msg_count,
3407: x_return_status => x_return_status);
3408: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3409: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3410: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_risks return status is: '
3411: || x_return_status);
3412: END IF;
3413: -----------------------------------------------------

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

3417: RAISE OKC_API.G_EXCEPTION_ERROR;
3418: END IF;
3419: --------------------------------------------------------
3420:
3421: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3422: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3423: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL()');
3424: END IF;
3425: copy_ACL(

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

3418: END IF;
3419: --------------------------------------------------------
3420:
3421: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3422: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3423: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL()');
3424: END IF;
3425: copy_ACL(
3426: p_api_version => 1.0,

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

3430: p_target_contract_id => p_target_contract_id,
3431: x_msg_data => x_msg_data,
3432: x_msg_count => x_msg_count,
3433: x_return_status => x_return_status);
3434: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3435: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3436: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL return status is: '
3437: || x_return_status);
3438: END IF;

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

3431: x_msg_data => x_msg_data,
3432: x_msg_count => x_msg_count,
3433: x_return_status => x_return_status);
3434: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3435: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3436: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_ACL return status is: '
3437: || x_return_status);
3438: END IF;
3439: -----------------------------------------------------

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

3445: -----------------------------------------------------
3446:
3447: --14543447 - kkolukul- UDA Integration
3448:
3449: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3450: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3451: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values()');
3452: END IF;
3453: copy_uda_attribute_values(

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

3446:
3447: --14543447 - kkolukul- UDA Integration
3448:
3449: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3450: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3451: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values()');
3452: END IF;
3453: copy_uda_attribute_values(
3454: p_api_version => 1.0,

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

3458: p_target_contract_id => p_target_contract_id,
3459: x_msg_data => x_msg_data,
3460: x_msg_count => x_msg_count,
3461: x_return_status => x_return_status);
3462: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3463: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3464: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values return status is: '
3465: || x_return_status);
3466: END IF;

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

3459: x_msg_data => x_msg_data,
3460: x_msg_count => x_msg_count,
3461: x_return_status => x_return_status);
3462: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3463: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3464: 'OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values return status is: '
3465: || x_return_status);
3466: END IF;
3467: -----------------------------------------------------

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

3475: -- Get contract_type of source contract, required for deliverables and documents APIs
3476: OPEN source_contract_csr;
3477: FETCH source_contract_csr INTO source_contract_rec;
3478: IF(source_contract_csr%NOTFOUND) THEN
3479: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3480: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3481: G_MODULE||l_api_name,
3482: 'Invalid Contract Id: '|| p_source_contract_id);
3483: END IF;

Line 3480: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

3476: OPEN source_contract_csr;
3477: FETCH source_contract_csr INTO source_contract_rec;
3478: IF(source_contract_csr%NOTFOUND) THEN
3479: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3480: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3481: G_MODULE||l_api_name,
3482: 'Invalid Contract Id: '|| p_source_contract_id);
3483: END IF;
3484: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

3491: -- Get internal party_id. Needed for deliverables api
3492: OPEN party_csr;
3493: FETCH party_csr INTO l_internal_party_id;
3494: IF(party_csr%NOTFOUND) THEN
3495: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3496: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3497: G_MODULE||l_api_name,
3498: 'No internal party for the contract');
3499: END IF;

Line 3496: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

3492: OPEN party_csr;
3493: FETCH party_csr INTO l_internal_party_id;
3494: IF(party_csr%NOTFOUND) THEN
3495: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3496: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3497: G_MODULE||l_api_name,
3498: 'No internal party for the contract');
3499: END IF;
3500: RAISE FND_API.G_EXC_ERROR;

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

3499: END IF;
3500: RAISE FND_API.G_EXC_ERROR;
3501: END IF;
3502:
3503: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3504: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3505: 'Calling OKC_CONTRACT_DOCS_GRP.Copy_Attachments');
3506: END IF;
3507: OKC_CONTRACT_DOCS_GRP.Copy_Attachments(

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

3500: RAISE FND_API.G_EXC_ERROR;
3501: END IF;
3502:
3503: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3504: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3505: 'Calling OKC_CONTRACT_DOCS_GRP.Copy_Attachments');
3506: END IF;
3507: OKC_CONTRACT_DOCS_GRP.Copy_Attachments(
3508: p_api_version => 1,

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

3514: x_return_status => x_return_status,
3515: x_msg_count => x_msg_count,
3516: x_msg_data => x_msg_data
3517: );
3518: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3519: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3520: 'OKC_CONTRACT_DOCS_GRP.Copy_Attachments return status is : '
3521: || x_return_status);
3522: END IF;

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

3515: x_msg_count => x_msg_count,
3516: x_msg_data => x_msg_data
3517: );
3518: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3519: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3520: 'OKC_CONTRACT_DOCS_GRP.Copy_Attachments return status is : '
3521: || x_return_status);
3522: END IF;
3523: -----------------------------------------------------

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

3530:
3531: -- Repository Enhancement 12.1(For Duplicate Action)
3532:
3533:
3534: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3535: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3536: 'Calling OKC_TERMS_COPY_PVT.copy_tc');
3537: END IF;
3538:

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

3531: -- Repository Enhancement 12.1(For Duplicate Action)
3532:
3533:
3534: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3535: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3536: 'Calling OKC_TERMS_COPY_PVT.copy_tc');
3537: END IF;
3538:
3539: x_target_contract_type := source_contract_rec.contract_type;

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

3552: p_target_template_rec => G_TEMPLATE_MISS_REC ,
3553: x_return_status => x_return_status,
3554: x_msg_data => x_msg_data,
3555: x_msg_count => x_msg_count);
3556: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3557: 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);
3558: END IF;
3559:
3560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 3557: 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);

3553: x_return_status => x_return_status,
3554: x_msg_data => x_msg_data,
3555: x_msg_count => x_msg_count);
3556: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3557: 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);
3558: END IF;
3559:
3560: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3561: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

3564: END IF;
3565: -- Repository Enhancement 12.1 ends(For Duplicate Action)
3566:
3567:
3568: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3569: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3570: 'Calling OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables');
3571: END IF;
3572: OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables (

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

3565: -- Repository Enhancement 12.1 ends(For Duplicate Action)
3566:
3567:
3568: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3569: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3570: 'Calling OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables');
3571: END IF;
3572: OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables (
3573: p_api_version => 1.0,

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

3585: x_return_status => x_return_status,
3586: x_msg_count => x_msg_count,
3587: x_msg_data => x_msg_data
3588: );
3589: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3590: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3591: 'OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables return status is : '
3592: || x_return_status);
3593: END IF;

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

3586: x_msg_count => x_msg_count,
3587: x_msg_data => x_msg_data
3588: );
3589: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3590: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3591: 'OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables return status is : '
3592: || x_return_status);
3593: END IF;
3594: -----------------------------------------------------

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

3610:
3611: -- Standard call to get message count and if count is 1, get message info.
3612: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3613:
3614: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3615: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3616: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3617: END IF;
3618:

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

3611: -- Standard call to get message count and if count is 1, get message info.
3612: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3613:
3614: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3615: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3616: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_contract_details');
3617: END IF;
3618:
3619:

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

3618:
3619:
3620: EXCEPTION
3621: WHEN FND_API.G_EXC_ERROR THEN
3622: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3623: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3624: g_module || l_api_name,
3625: 'Leaving copy_contract_details:FND_API.G_EXC_ERROR Exception');
3626: END IF;

Line 3623: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3619:
3620: EXCEPTION
3621: WHEN FND_API.G_EXC_ERROR THEN
3622: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3623: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3624: g_module || l_api_name,
3625: 'Leaving copy_contract_details:FND_API.G_EXC_ERROR Exception');
3626: END IF;
3627: --close cursors

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

3638: p_data => x_msg_data
3639: );
3640:
3641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3642: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3643: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3644: g_module || l_api_name,
3645: 'Leaving copy_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3646: END IF;

Line 3643: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3639: );
3640:
3641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3642: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3643: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3644: g_module || l_api_name,
3645: 'Leaving copy_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3646: END IF;
3647: --close cursors

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

3658: p_data => x_msg_data
3659: );
3660:
3661: WHEN OTHERS THEN
3662: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3663: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3664: g_module || l_api_name,
3665: 'Leaving copy_contract_details because of EXCEPTION: ' || sqlerrm);
3666: END IF;

Line 3663: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3659: );
3660:
3661: WHEN OTHERS THEN
3662: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3663: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3664: g_module || l_api_name,
3665: 'Leaving copy_contract_details because of EXCEPTION: ' || sqlerrm);
3666: END IF;
3667: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

3740: contract_rec contract_csr%ROWTYPE;
3741:
3742: BEGIN
3743:
3744: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3745: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3746: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_contract_usages');
3747: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3748: ' Contract Id is: ' || to_char(p_contract_id));

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

3741:
3742: BEGIN
3743:
3744: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3745: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3746: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_contract_usages');
3747: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3748: ' Contract Id is: ' || to_char(p_contract_id));
3749: END IF;

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

3743:
3744: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3745: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3746: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_contract_usages');
3747: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3748: ' Contract Id is: ' || to_char(p_contract_id));
3749: END IF;
3750: l_api_name := 'version_contract_usages';
3751: l_api_version := 1.0;

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

3774: -- Get effective dates and version of the contract.
3775: OPEN contract_csr;
3776: FETCH contract_csr INTO contract_rec;
3777: IF(contract_csr%NOTFOUND) THEN
3778: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3779: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3780: G_MODULE||l_api_name,
3781: 'Invalid Contract Id: '|| p_contract_id);
3782: END IF;

Line 3779: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

3775: OPEN contract_csr;
3776: FETCH contract_csr INTO contract_rec;
3777: IF(contract_csr%NOTFOUND) THEN
3778: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3779: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
3780: G_MODULE||l_api_name,
3781: 'Invalid Contract Id: '|| p_contract_id);
3782: END IF;
3783: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

3789: END IF;
3790:
3791: FOR usages_rec IN usages_csr(contract_rec.contract_type, p_contract_id, contract_rec.contract_version_num) LOOP
3792:
3793: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3794: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3795: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
3796: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3797: 'Contract Id is: ' || usages_rec.BUSINESS_DOCUMENT_ID);

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

3790:
3791: FOR usages_rec IN usages_csr(contract_rec.contract_type, p_contract_id, contract_rec.contract_version_num) LOOP
3792:
3793: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3794: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3795: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
3796: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3797: 'Contract Id is: ' || usages_rec.BUSINESS_DOCUMENT_ID);
3798: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3792:
3793: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3794: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3795: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
3796: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3797: 'Contract Id is: ' || usages_rec.BUSINESS_DOCUMENT_ID);
3798: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3799: 'Contract Version is: ' || usages_rec.CONTRACT_VERSION);
3800: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3794: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3795: 'Contract Type is: ' || contract_rec.CONTRACT_TYPE);
3796: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3797: 'Contract Id is: ' || usages_rec.BUSINESS_DOCUMENT_ID);
3798: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3799: 'Contract Version is: ' || usages_rec.CONTRACT_VERSION);
3800: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3801: 'business_document_type is: ' || usages_rec.business_document_type);
3802: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3796: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3797: 'Contract Id is: ' || usages_rec.BUSINESS_DOCUMENT_ID);
3798: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3799: 'Contract Version is: ' || usages_rec.CONTRACT_VERSION);
3800: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3801: 'business_document_type is: ' || usages_rec.business_document_type);
3802: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3803: 'business_document_id is: ' || usages_rec.business_document_id);
3804: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3798: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3799: 'Contract Version is: ' || usages_rec.CONTRACT_VERSION);
3800: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3801: 'business_document_type is: ' || usages_rec.business_document_type);
3802: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3803: 'business_document_id is: ' || usages_rec.business_document_id);
3804: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3805: 'business_document_version: ' || usages_rec.business_document_version);
3806: END IF;

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

3800: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3801: 'business_document_type is: ' || usages_rec.business_document_type);
3802: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3803: 'business_document_id is: ' || usages_rec.business_document_id);
3804: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3805: 'business_document_version: ' || usages_rec.business_document_version);
3806: END IF;
3807: -- INSERT THE NEW RECORDS into OKC_REP_CONTRACT_USAGES table
3808:

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

3863:
3864: -- Standard call to get message count and if count is 1, get message info.
3865: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3866:
3867: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3868: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3869: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.');
3870: END IF;
3871:

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

3864: -- Standard call to get message count and if count is 1, get message info.
3865: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
3866:
3867: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3868: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3869: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.');
3870: END IF;
3871:
3872:

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

3871:
3872:
3873: EXCEPTION
3874: WHEN FND_API.G_EXC_ERROR THEN
3875: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3876: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3877: g_module || l_api_name,
3878: 'Leaving version_contract_usages:FND_API.G_EXC_ERROR Exception');
3879: END IF;

Line 3876: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3872:
3873: EXCEPTION
3874: WHEN FND_API.G_EXC_ERROR THEN
3875: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3876: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3877: g_module || l_api_name,
3878: 'Leaving version_contract_usages:FND_API.G_EXC_ERROR Exception');
3879: END IF;
3880: --close cursors

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

3888: p_data => x_msg_data
3889: );
3890:
3891: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3892: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3893: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3894: g_module || l_api_name,
3895: 'Leaving version_contract_usages:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3896: END IF;

Line 3893: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3889: );
3890:
3891: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3892: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3893: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3894: g_module || l_api_name,
3895: 'Leaving version_contract_usages:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3896: END IF;
3897: --close cursors

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

3905: p_data => x_msg_data
3906: );
3907:
3908: WHEN OTHERS THEN
3909: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3910: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3911: g_module || l_api_name,
3912: 'Leaving version_contract_usages because of EXCEPTION: ' || sqlerrm);
3913: END IF;

Line 3910: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

3906: );
3907:
3908: WHEN OTHERS THEN
3909: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3910: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
3911: g_module || l_api_name,
3912: 'Leaving version_contract_usages because of EXCEPTION: ' || sqlerrm);
3913: END IF;
3914: --close cursors

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

3979: -- Repository Enhancement 12.1 Ends (For Create New Version Action)
3980: l_contract_source VARCHAR2(30); -- For Bug# 6902073
3981: BEGIN
3982:
3983: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3984: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3985: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
3986: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3987: 'Contract Id is: ' || p_contract_id);

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

3980: l_contract_source VARCHAR2(30); -- For Bug# 6902073
3981: BEGIN
3982:
3983: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3984: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3985: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
3986: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3987: 'Contract Id is: ' || p_contract_id);
3988: END IF;

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

3982:
3983: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3984: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3985: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
3986: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3987: 'Contract Id is: ' || p_contract_id);
3988: END IF;
3989: l_api_name := 'version_contract_details';
3990: l_api_version := 1.0;

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

4002: -- Initialize API return status to success
4003: x_return_status := FND_API.G_RET_STS_SUCCESS;
4004:
4005: -- Lock the contract header
4006: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4007: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4008: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
4009: END IF;
4010: -- Lock the contract header

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

4003: x_return_status := FND_API.G_RET_STS_SUCCESS;
4004:
4005: -- Lock the contract header
4006: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4007: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4008: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
4009: END IF;
4010: -- Lock the contract header
4011: Lock_Contract_Header(

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

4012: p_contract_id => p_contract_id,
4013: p_object_version_number => NULL,
4014: x_return_status => x_return_status
4015: );
4016: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4017: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4018: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
4019: || x_return_status);
4020: END IF;

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

4013: p_object_version_number => NULL,
4014: x_return_status => x_return_status
4015: );
4016: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4017: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4018: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
4019: || x_return_status);
4020: END IF;
4021: -----------------------------------------------------

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

4025: RAISE OKC_API.G_EXCEPTION_ERROR;
4026: END IF;
4027: -----------------------------------------------------
4028:
4029: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4031: 'Populating contract header record in OKC_REP_CONTRACT_VERS');
4032: END IF;
4033: -- Copy the header record to versions table

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

4026: END IF;
4027: -----------------------------------------------------
4028:
4029: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4031: 'Populating contract header record in OKC_REP_CONTRACT_VERS');
4032: END IF;
4033: -- Copy the header record to versions table
4034: INSERT INTO OKC_REP_CONTRACT_VERS(

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

4173: -- Get contract_type of the contract, required for deliverables and documents APIs
4174: OPEN contract_csr;
4175: FETCH contract_csr INTO contract_rec;
4176: IF(contract_csr%NOTFOUND) THEN
4177: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4178: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4179: G_MODULE||l_api_name,
4180: 'Invalid Contract Id: '|| p_contract_id);
4181: END IF;

Line 4178: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

4174: OPEN contract_csr;
4175: FETCH contract_csr INTO contract_rec;
4176: IF(contract_csr%NOTFOUND) THEN
4177: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4178: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4179: G_MODULE||l_api_name,
4180: 'Invalid Contract Id: '|| p_contract_id);
4181: END IF;
4182: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

4186: RAISE FND_API.G_EXC_ERROR;
4187: -- RAISE NO_DATA_FOUND;
4188: END IF;
4189:
4190: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4191: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4192: 'Calling OKC_CONTRACT_DOCS_GRP.Version_Attachments');
4193: END IF;
4194:

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

4187: -- RAISE NO_DATA_FOUND;
4188: END IF;
4189:
4190: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4191: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4192: 'Calling OKC_CONTRACT_DOCS_GRP.Version_Attachments');
4193: END IF;
4194:
4195: /*Bug 6957819: Added an additional parameter in the call for not copying the system generated attachment to the new version*/

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

4203: x_msg_count => x_msg_count,
4204: x_msg_data => x_msg_data,
4205: p_include_gen_attach => 'N'
4206: );
4207: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4209: 'OKC_CONTRACT_DOCS_GRP.Version_Attachments return status is : '
4210: || x_return_status);
4211: END IF;

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

4204: x_msg_data => x_msg_data,
4205: p_include_gen_attach => 'N'
4206: );
4207: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4209: 'OKC_CONTRACT_DOCS_GRP.Version_Attachments return status is : '
4210: || x_return_status);
4211: END IF;
4212: -----------------------------------------------------

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

4235: IF l_contract_source = 'STRUCTURED' THEN
4236: --------------------------------------------
4237: -- Call internal Version_Doc
4238: --------------------------------------------
4239: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4240: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call Private Version_Doc ');
4241: END IF;
4242:
4243: OKC_TERMS_VERSION_PVT.Version_Doc(

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

4236: --------------------------------------------
4237: -- Call internal Version_Doc
4238: --------------------------------------------
4239: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4240: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'200: Call Private Version_Doc ');
4241: END IF;
4242:
4243: OKC_TERMS_VERSION_PVT.Version_Doc(
4244: x_return_status => x_return_status,

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

4259: --Only need to version usages record in case of offline authoring
4260: --------------------------------------------
4261: -- Call Create_Version for template usages
4262: --------------------------------------------
4263: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4264: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Call Create_Version for template usages');
4265: END IF;
4266:
4267: x_return_status := OKC_TEMPLATE_USAGES_PVT.Create_Version(

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

4260: --------------------------------------------
4261: -- Call Create_Version for template usages
4262: --------------------------------------------
4263: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4264: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'300: Call Create_Version for template usages');
4265: END IF;
4266:
4267: x_return_status := OKC_TEMPLATE_USAGES_PVT.Create_Version(
4268: p_doc_type => contract_rec.contract_type,

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

4285:
4286:
4287: -- If contract status not Signed, we need to version the deliverables as well
4288: IF (contract_rec.contract_status_code <> G_STATUS_SIGNED) THEN
4289: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4291: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
4292: END IF;
4293: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (

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

4286:
4287: -- If contract status not Signed, we need to version the deliverables as well
4288: IF (contract_rec.contract_status_code <> G_STATUS_SIGNED) THEN
4289: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4291: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
4292: END IF;
4293: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
4294: p_api_version => 1.0,

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

4299: x_return_status => x_return_status,
4300: x_msg_count => x_msg_count,
4301: x_msg_data => x_msg_data
4302: );
4303: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4304: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4305: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
4306: || x_return_status);
4307: END IF;

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

4300: x_msg_count => x_msg_count,
4301: x_msg_data => x_msg_data
4302: );
4303: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4304: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4305: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
4306: || x_return_status);
4307: END IF;
4308: -----------------------------------------------------

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

4313: END IF;
4314: --------------------------------------------------------
4315: END IF; -- contract_rec.contract_status_code <> G_STATUS_SIGNED
4316:
4317: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4318: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4319: 'Calling OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation');
4320: END IF;
4321: OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation (

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

4314: --------------------------------------------------------
4315: END IF; -- contract_rec.contract_status_code <> G_STATUS_SIGNED
4316:
4317: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4318: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4319: 'Calling OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation');
4320: END IF;
4321: OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation (
4322: p_api_version => 1.0,

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

4327: x_return_status => x_return_status,
4328: x_msg_count => x_msg_count,
4329: x_msg_data => x_msg_data
4330: );
4331: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4332: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4333: 'OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation return status is : '
4334: || x_return_status);
4335: END IF;

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

4328: x_msg_count => x_msg_count,
4329: x_msg_data => x_msg_data
4330: );
4331: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4332: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4333: 'OKC_DELIVERABLE_PROCESS_PVT.clear_amendment_operation return status is : '
4334: || x_return_status);
4335: END IF;
4336: -----------------------------------------------------

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

4340: RAISE OKC_API.G_EXCEPTION_ERROR;
4341: END IF;
4342: --------------------------------------------------------
4343: -- 14543447 - kkolukul- version uda attribte values
4344: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4345: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4346: 'Calling OKC_CONTRACT_PROCESS_PVT.version_uda_attribute_values');
4347: END IF;
4348:

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

4341: END IF;
4342: --------------------------------------------------------
4343: -- 14543447 - kkolukul- version uda attribte values
4344: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4345: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4346: 'Calling OKC_CONTRACT_PROCESS_PVT.version_uda_attribute_values');
4347: END IF;
4348:
4349: version_uda_attribute_values(

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

4355: x_return_status => x_return_status,
4356: x_msg_count => x_msg_count,
4357: x_msg_data => x_msg_data
4358: );
4359: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4360: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4361: 'OKC_CONTRACT_PROCESS_PVT.version_uda_attribute_values return status is : '
4362: || x_return_status);
4363: END IF;

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

4356: x_msg_count => x_msg_count,
4357: x_msg_data => x_msg_data
4358: );
4359: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4360: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4361: 'OKC_CONTRACT_PROCESS_PVT.version_uda_attribute_values return status is : '
4362: || x_return_status);
4363: END IF;
4364: -----------------------------------------------------

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

4378: x_return_status => x_return_status,
4379: x_msg_count => x_msg_count,
4380: x_msg_data => x_msg_data
4381: );
4382: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4383: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4384: 'OKC_CONTRACT_PROCESS_PVT.version_contract_usages return status is : '
4385: || x_return_status);
4386: END IF;

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

4379: x_msg_count => x_msg_count,
4380: x_msg_data => x_msg_data
4381: );
4382: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4383: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4384: 'OKC_CONTRACT_PROCESS_PVT.version_contract_usages return status is : '
4385: || x_return_status);
4386: END IF;
4387: -----------------------------------------------------

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

4394:
4395:
4396: CLOSE contract_csr;
4397:
4398: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4399: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4400: 'Delete contract header record.');
4401: END IF;
4402:

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

4395:
4396: CLOSE contract_csr;
4397:
4398: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4399: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4400: 'Delete contract header record.');
4401: END IF;
4402:
4403: -- If this is called from API versioning, do not delete the header

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

4414:
4415: -- Standard call to get message count and if count is 1, get message info.
4416: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
4417:
4418: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4419: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4420: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
4421: END IF;
4422:

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

4415: -- Standard call to get message count and if count is 1, get message info.
4416: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
4417:
4418: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4419: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4420: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.version_contract_details');
4421: END IF;
4422:
4423:

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

4422:
4423:
4424: EXCEPTION
4425: WHEN FND_API.G_EXC_ERROR THEN
4426: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4427: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4428: g_module || l_api_name,
4429: 'Leaving version_contract_details:FND_API.G_EXC_ERROR Exception');
4430: END IF;

Line 4427: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4423:
4424: EXCEPTION
4425: WHEN FND_API.G_EXC_ERROR THEN
4426: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4427: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4428: g_module || l_api_name,
4429: 'Leaving version_contract_details:FND_API.G_EXC_ERROR Exception');
4430: END IF;
4431: --close cursors

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

4439: p_data => x_msg_data
4440: );
4441:
4442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4443: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4445: g_module || l_api_name,
4446: 'Leaving version_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4447: END IF;

Line 4444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4440: );
4441:
4442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4443: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4444: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4445: g_module || l_api_name,
4446: 'Leaving version_contract_details:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4447: END IF;
4448: --close cursors

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

4456: p_data => x_msg_data
4457: );
4458:
4459: WHEN OTHERS THEN
4460: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4461: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4462: g_module || l_api_name,
4463: 'Leaving version_contract_details because of EXCEPTION: ' || sqlerrm);
4464: END IF;

Line 4461: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4457: );
4458:
4459: WHEN OTHERS THEN
4460: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4461: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4462: g_module || l_api_name,
4463: 'Leaving version_contract_details because of EXCEPTION: ' || sqlerrm);
4464: END IF;
4465: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

4538:
4539: l_expiration_date_matches_flag := FND_API.G_FALSE;
4540: l_effective_date_matches_flag := FND_API.G_FALSE;
4541:
4542: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4543: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4544: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4545: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4546: 'Contract Id is: ' || p_contract_id);

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

4539: l_expiration_date_matches_flag := FND_API.G_FALSE;
4540: l_effective_date_matches_flag := FND_API.G_FALSE;
4541:
4542: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4543: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4544: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4545: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4546: 'Contract Id is: ' || p_contract_id);
4547: END IF;

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

4541:
4542: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4543: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4544: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4545: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4546: 'Contract Id is: ' || p_contract_id);
4547: END IF;
4548: l_api_name := 'sign_contacts';
4549: l_api_version := 1.0;

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

4564: -- Get effective dates and version of the contract.
4565: OPEN contract_csr;
4566: FETCH contract_csr INTO contract_rec;
4567: IF(contract_csr%NOTFOUND) THEN
4568: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4569: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4570: G_MODULE||l_api_name,
4571: 'Invalid Contract Id: '|| p_contract_id);
4572: END IF;

Line 4569: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

4565: OPEN contract_csr;
4566: FETCH contract_csr INTO contract_rec;
4567: IF(contract_csr%NOTFOUND) THEN
4568: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4569: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4570: G_MODULE||l_api_name,
4571: 'Invalid Contract Id: '|| p_contract_id);
4572: END IF;
4573: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

4578: -- RAISE NO_DATA_FOUND;
4579: END IF;
4580:
4581: -- Lock the contract header
4582: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4583: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4584: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
4585: END IF;
4586: -- Lock the contract header

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

4579: END IF;
4580:
4581: -- Lock the contract header
4582: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4583: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4584: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
4585: END IF;
4586: -- Lock the contract header
4587: Lock_Contract_Header(

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

4588: p_contract_id => p_contract_id,
4589: p_object_version_number => NULL,
4590: x_return_status => x_return_status
4591: );
4592: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4593: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4594: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
4595: || x_return_status);
4596: END IF;

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

4589: p_object_version_number => NULL,
4590: x_return_status => x_return_status
4591: );
4592: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4593: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4594: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
4595: || x_return_status);
4596: END IF;
4597: -----------------------------------------------------

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

4601: RAISE OKC_API.G_EXCEPTION_ERROR;
4602: END IF;
4603: -----------------------------------------------------
4604:
4605: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4607: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
4608: END IF;
4609: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

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

4602: END IF;
4603: -----------------------------------------------------
4604:
4605: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4607: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
4608: END IF;
4609: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
4610: OKC_REP_UTIL_PVT.change_contract_status(

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

4617: p_note => NULL,
4618: x_msg_data => x_msg_data,
4619: x_msg_count => x_msg_count,
4620: x_return_status => x_return_status);
4621: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4622: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4623: g_module || l_api_name,
4624: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
4625: END IF;

Line 4622: fnd_log.string(FND_LOG.LEVEL_STATEMENT,

4618: x_msg_data => x_msg_data,
4619: x_msg_count => x_msg_count,
4620: x_return_status => x_return_status);
4621: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4622: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
4623: g_module || l_api_name,
4624: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
4625: END IF;
4626: -----------------------------------------------------

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

4631: END IF;
4632: ------------------------------------------------------
4633:
4634: -- We need to first version the deliverables
4635: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4636: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4637: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
4638: END IF;
4639: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (

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

4632: ------------------------------------------------------
4633:
4634: -- We need to first version the deliverables
4635: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4636: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4637: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
4638: END IF;
4639: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
4640: p_api_version => 1.0,

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

4645: x_return_status => x_return_status,
4646: x_msg_count => x_msg_count,
4647: x_msg_data => x_msg_data
4648: );
4649: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4650: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4651: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
4652: || x_return_status);
4653: END IF;

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

4646: x_msg_count => x_msg_count,
4647: x_msg_data => x_msg_data
4648: );
4649: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4650: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4651: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
4652: || x_return_status);
4653: END IF;
4654: -----------------------------------------------------

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

4658: RAISE OKC_API.G_EXCEPTION_ERROR;
4659: END IF;
4660: --------------------------------------------------------
4661:
4662: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4663: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4664: 'Latest signed version number is : '
4665: || contract_rec.latest_signed_ver_number);
4666: END IF;

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

4659: END IF;
4660: --------------------------------------------------------
4661:
4662: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4663: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4664: 'Latest signed version number is : '
4665: || contract_rec.latest_signed_ver_number);
4666: END IF;
4667: -- Now we need to activate deliverables

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

4670: ELSE
4671: l_sync_flag := FND_API.G_TRUE;
4672: END IF;
4673:
4674: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4676: 'l_sync_flag is : ' || l_sync_flag);
4677: END IF;
4678: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;

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

4671: l_sync_flag := FND_API.G_TRUE;
4672: END IF;
4673:
4674: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4676: 'l_sync_flag is : ' || l_sync_flag);
4677: END IF;
4678: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
4679: l_activate_event_tbl(1).event_date := contract_rec.contract_expiration_date;

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

4677: END IF;
4678: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
4679: l_activate_event_tbl(1).event_date := contract_rec.contract_expiration_date;
4680:
4681: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4682: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4683: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables');
4684: END IF;
4685:

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

4678: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
4679: l_activate_event_tbl(1).event_date := contract_rec.contract_expiration_date;
4680:
4681: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4682: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4683: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables');
4684: END IF;
4685:
4686: OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables (

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

4697: x_msg_data => x_msg_data,
4698: x_msg_count => x_msg_count,
4699: x_return_status => x_return_status);
4700:
4701: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4702: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4703: 'OKC_DELIVERABLE_PROCESS_PVT.activateDeliverables return status is : '
4704: || x_return_status);
4705: END IF;

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

4698: x_msg_count => x_msg_count,
4699: x_return_status => x_return_status);
4700:
4701: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4702: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4703: 'OKC_DELIVERABLE_PROCESS_PVT.activateDeliverables return status is : '
4704: || x_return_status);
4705: END IF;
4706: -----------------------------------------------------

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

4717: -- Get effective dates and version of the contract.
4718: OPEN arch_contract_csr(contract_rec.latest_signed_ver_number);
4719: FETCH arch_contract_csr INTO arch_contract_rec;
4720: IF(contract_csr%NOTFOUND) THEN
4721: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4722: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4723: G_MODULE||l_api_name,
4724: 'Invalid Contract Id: '|| p_contract_id);
4725: END IF;

Line 4722: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

4718: OPEN arch_contract_csr(contract_rec.latest_signed_ver_number);
4719: FETCH arch_contract_csr INTO arch_contract_rec;
4720: IF(contract_csr%NOTFOUND) THEN
4721: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4722: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
4723: G_MODULE||l_api_name,
4724: 'Invalid Contract Id: '|| p_contract_id);
4725: END IF;
4726: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

4733: l_prev_signed_effective_date := arch_contract_rec.contract_effective_date;
4734: l_prev_signed_expiration_date := arch_contract_rec.contract_expiration_date;
4735:
4736: CLOSE arch_contract_csr;
4737: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4738: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4739: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
4740: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4741: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));

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

4734: l_prev_signed_expiration_date := arch_contract_rec.contract_expiration_date;
4735:
4736: CLOSE arch_contract_csr;
4737: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4738: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4739: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
4740: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4741: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
4742: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4736: CLOSE arch_contract_csr;
4737: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4738: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4739: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
4740: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4741: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
4742: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4743: 'Current version expiration date: ' || trunc(contract_rec.contract_expiration_date));
4744: END IF;

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

4738: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4739: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
4740: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4741: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
4742: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4743: 'Current version expiration date: ' || trunc(contract_rec.contract_expiration_date));
4744: END IF;
4745: l_update_event_tbl(1).event_code := G_CONTRACT_EFFECTIVE_EVENT;
4746: l_update_event_tbl(1).event_date := contract_rec.contract_effective_date;

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

4757: l_effective_date_matches_flag := FND_API.G_TRUE;
4758: END IF;
4759:
4760: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
4761: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4762: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4763: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
4764: END IF;
4765: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (

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

4758: END IF;
4759:
4760: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
4761: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4762: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4763: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
4764: END IF;
4765: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
4766: p_api_version => 1.0,

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

4773: x_msg_data => x_msg_data,
4774: x_msg_count => x_msg_count,
4775: x_return_status => x_return_status);
4776:
4777: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4778: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4779: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
4780: || x_return_status);
4781: END IF;

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

4774: x_msg_count => x_msg_count,
4775: x_return_status => x_return_status);
4776:
4777: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4778: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4779: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
4780: || x_return_status);
4781: END IF;
4782: -----------------------------------------------------

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

4787: END IF;
4788: --------------------------------------------------------
4789: END IF; -- expiration date comparision
4790: -- Disable prev. version deliverables
4791: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4792: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4793: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
4794: END IF;
4795: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (

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

4788: --------------------------------------------------------
4789: END IF; -- expiration date comparision
4790: -- Disable prev. version deliverables
4791: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4792: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4793: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
4794: END IF;
4795: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (
4796: p_api_version => 1.0,

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

4802: x_msg_data => x_msg_data,
4803: x_msg_count => x_msg_count,
4804: x_return_status => x_return_status);
4805:
4806: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4807: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4808: 'OKC_DELIVERABLE_PROCESS_PVT.disableDeliverables return status is : '
4809: || x_return_status);
4810: END IF;

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

4803: x_msg_count => x_msg_count,
4804: x_return_status => x_return_status);
4805:
4806: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4807: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4808: 'OKC_DELIVERABLE_PROCESS_PVT.disableDeliverables return status is : '
4809: || x_return_status);
4810: END IF;
4811: -----------------------------------------------------

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

4815: RAISE OKC_API.G_EXCEPTION_ERROR;
4816: END IF;
4817: --------------------------------------------------------
4818: END IF; -- (l_sync_flag = 'Y')
4819: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4820: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4821: 'Updating latest_signed_ver_number column');
4822: END IF;
4823: UPDATE okc_rep_contracts_all

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

4816: END IF;
4817: --------------------------------------------------------
4818: END IF; -- (l_sync_flag = 'Y')
4819: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4820: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4821: 'Updating latest_signed_ver_number column');
4822: END IF;
4823: UPDATE okc_rep_contracts_all
4824: SET latest_signed_ver_number = contract_rec.contract_version_num

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

4831:
4832: -- Standard call to get message count and if count is 1, get message info.
4833: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
4834:
4835: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4836: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4837: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4838: END IF;
4839:

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

4832: -- Standard call to get message count and if count is 1, get message info.
4833: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
4834:
4835: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4836: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4837: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.sign_contract');
4838: END IF;
4839:
4840:

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

4839:
4840:
4841: EXCEPTION
4842: WHEN FND_API.G_EXC_ERROR THEN
4843: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4844: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4845: g_module || l_api_name,
4846: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');
4847: END IF;

Line 4844: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4840:
4841: EXCEPTION
4842: WHEN FND_API.G_EXC_ERROR THEN
4843: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4844: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4845: g_module || l_api_name,
4846: 'Leaving sign_contract:FND_API.G_EXC_ERROR Exception');
4847: END IF;
4848: --close cursors

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

4859: p_data => x_msg_data
4860: );
4861:
4862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4863: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4864: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4865: g_module || l_api_name,
4866: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4867: END IF;

Line 4864: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4860: );
4861:
4862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4863: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4864: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4865: g_module || l_api_name,
4866: 'Leaving sign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4867: END IF;
4868: --close cursors

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

4879: p_data => x_msg_data
4880: );
4881:
4882: WHEN OTHERS THEN
4883: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4884: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4885: g_module || l_api_name,
4886: 'Leaving sign_contract because of EXCEPTION: ' || sqlerrm);
4887: END IF;

Line 4884: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

4880: );
4881:
4882: WHEN OTHERS THEN
4883: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4884: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
4885: g_module || l_api_name,
4886: 'Leaving sign_contract because of EXCEPTION: ' || sqlerrm);
4887: END IF;
4888: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

4973:
4974:
4975: BEGIN
4976:
4977: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4978: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4979: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Esign_contract');
4980: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4981: 'Contract Id is: ' || p_contract_id);

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

4974:
4975: BEGIN
4976:
4977: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4978: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4979: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Esign_contract');
4980: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4981: 'Contract Id is: ' || p_contract_id);
4982: END IF;

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

4976:
4977: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4978: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4979: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.Esign_contract');
4980: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4981: 'Contract Id is: ' || p_contract_id);
4982: END IF;
4983: l_api_name := 'Esign_contract';
4984: l_api_version := 1.0;

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

4999: -- Get contract number
5000: OPEN contract_csr;
5001: FETCH contract_csr INTO contract_rec;
5002: IF(contract_csr%NOTFOUND) THEN
5003: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5004: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
5005: G_MODULE||l_api_name,
5006: 'Invalid Contract Id: '|| p_contract_id);
5007: END IF;

Line 5004: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

5000: OPEN contract_csr;
5001: FETCH contract_csr INTO contract_rec;
5002: IF(contract_csr%NOTFOUND) THEN
5003: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5004: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
5005: G_MODULE||l_api_name,
5006: 'Invalid Contract Id: '|| p_contract_id);
5007: END IF;
5008: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

5022: FETCH fetch_wf_name INTO l_wf_name;
5023: CLOSE fetch_wf_name;
5024:
5025: IF l_wf_name IS NULL THEN
5026: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5027: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
5028: G_MODULE||l_api_name,
5029: 'Workflow not associated for the Document');
5030: END IF;

Line 5027: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

5023: CLOSE fetch_wf_name;
5024:
5025: IF l_wf_name IS NULL THEN
5026: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5027: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
5028: G_MODULE||l_api_name,
5029: 'Workflow not associated for the Document');
5030: END IF;
5031: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

5036: END IF;
5037:
5038: CLOSE contract_csr;
5039:
5040: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5041: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5042: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
5043: END IF;
5044: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

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

5037:
5038: CLOSE contract_csr;
5039:
5040: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5041: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5042: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
5043: END IF;
5044: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
5045: OKC_REP_UTIL_PVT.change_contract_status(

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

5053: x_msg_data => x_msg_data,
5054: x_msg_count => x_msg_count,
5055: x_return_status => x_return_status);
5056:
5057: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5058: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5059: 'OKC_REP_UTIL_PVT.change_contract_status return status is: '
5060: || x_return_status);
5061: END IF;

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

5054: x_msg_count => x_msg_count,
5055: x_return_status => x_return_status);
5056:
5057: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5058: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5059: 'OKC_REP_UTIL_PVT.change_contract_status return status is: '
5060: || x_return_status);
5061: END IF;
5062: -----------------------------------------------------

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

5067: END IF;
5068: --------------------------------------------------------
5069:
5070: /*
5071: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5073: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
5074: END IF;
5075: -- Add a record in OKC_REP_CON_SIGNATURES table.

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

5068: --------------------------------------------------------
5069:
5070: /*
5071: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5073: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
5074: END IF;
5075: -- Add a record in OKC_REP_CON_SIGNATURES table.
5076: OKC_REP_UTIL_PVT.add_signature_hist_record(

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

5087: x_return_status => x_return_status,
5088: p_forward_user_id => NULL);
5089:
5090:
5091: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5093: 'OKC_REP_UTIL_PVT.add_signature_hist_record return status is: '
5094: || x_return_status);
5095: END IF;

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

5088: p_forward_user_id => NULL);
5089:
5090:
5091: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5093: 'OKC_REP_UTIL_PVT.add_signature_hist_record return status is: '
5094: || x_return_status);
5095: END IF;
5096: -------------------------------------------------------

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

5100: RAISE OKC_API.G_EXCEPTION_ERROR;
5101: END IF; */
5102: --------------------------------------------------------
5103:
5104: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5105: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5106: 'Workflow associated to the document type is '||l_wf_name);
5107: END IF;
5108:

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

5101: END IF; */
5102: --------------------------------------------------------
5103:
5104: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5105: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5106: 'Workflow associated to the document type is '||l_wf_name);
5107: END IF;
5108:
5109:

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

5109:
5110:
5111: IF l_wf_name IN ( G_SIGNATURE_ITEM_TYPE , G_SIG_ITEM_TYPE_2579) THEN
5112:
5113: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5114: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5115: 'Calling WF_ENGINE.createprocess');
5116: END IF;
5117:

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

5110:
5111: IF l_wf_name IN ( G_SIGNATURE_ITEM_TYPE , G_SIG_ITEM_TYPE_2579) THEN
5112:
5113: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5114: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5115: 'Calling WF_ENGINE.createprocess');
5116: END IF;
5117:
5118: WF_ENGINE.createprocess (

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

5120: itemkey => l_wf_sequence,
5121: process => G_SIGNATURE_PROCESS);
5122:
5123:
5124: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5125: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5126: 'Calling WF_ENGINE.SetItemUserKey');
5127: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5128: 'User key Value is: ' || l_user_key);

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

5121: process => G_SIGNATURE_PROCESS);
5122:
5123:
5124: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5125: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5126: 'Calling WF_ENGINE.SetItemUserKey');
5127: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5128: 'User key Value is: ' || l_user_key);
5129: END IF;

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

5123:
5124: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5125: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5126: 'Calling WF_ENGINE.SetItemUserKey');
5127: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5128: 'User key Value is: ' || l_user_key);
5129: END IF;
5130: WF_ENGINE.SetItemUserKey (
5131: itemtype => l_wf_name,

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

5131: itemtype => l_wf_name,
5132: itemkey => l_wf_sequence,
5133: userkey => l_user_key);
5134:
5135: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5136: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5137: 'Calling WF_ENGINE.SetItemOwner');
5138: END IF;
5139: WF_ENGINE.SetItemOwner (

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

5132: itemkey => l_wf_sequence,
5133: userkey => l_user_key);
5134:
5135: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5136: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5137: 'Calling WF_ENGINE.SetItemOwner');
5138: END IF;
5139: WF_ENGINE.SetItemOwner (
5140: itemtype => l_wf_name,

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

5141: itemkey => l_wf_sequence,
5142: owner => fnd_global.user_name);
5143:
5144:
5145: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5146: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5147: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_ID');
5148: END IF;
5149: WF_ENGINE.SetItemAttrText (

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

5142: owner => fnd_global.user_name);
5143:
5144:
5145: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5146: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5147: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_ID');
5148: END IF;
5149: WF_ENGINE.SetItemAttrText (
5150: itemtype => l_wf_name,

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

5151: itemkey => l_wf_sequence,
5152: aname => 'CONTRACT_ID',
5153: avalue => p_contract_id);
5154:
5155: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5157: 'Calling WF_ENGINE.startprocess for REQUESTOR');
5158: END IF;
5159: WF_ENGINE.SetItemAttrText (

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

5152: aname => 'CONTRACT_ID',
5153: avalue => p_contract_id);
5154:
5155: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5157: 'Calling WF_ENGINE.startprocess for REQUESTOR');
5158: END IF;
5159: WF_ENGINE.SetItemAttrText (
5160: itemtype => l_wf_name,

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

5161: itemkey => l_wf_sequence,
5162: aname => 'REQUESTER',
5163: avalue => fnd_global.user_name);
5164:
5165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5167: 'Calling WF_ENGINE.setitemattrnumber for CTX_USER_ID ' || fnd_global.user_id);
5168: END IF;
5169:

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

5162: aname => 'REQUESTER',
5163: avalue => fnd_global.user_name);
5164:
5165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5167: 'Calling WF_ENGINE.setitemattrnumber for CTX_USER_ID ' || fnd_global.user_id);
5168: END IF;
5169:
5170: WF_ENGINE.SetItemAttrNumber (

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

5172: itemkey => l_wf_sequence,
5173: aname => 'CTX_USER_ID',
5174: avalue => fnd_global.user_id);
5175:
5176: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5177: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5178: 'Calling WF_ENGINE.setitemattrnumber for CTX_APPL_ID ' || fnd_global.RESP_APPL_ID);
5179: END IF;
5180: WF_ENGINE.SetItemAttrNumber (

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

5173: aname => 'CTX_USER_ID',
5174: avalue => fnd_global.user_id);
5175:
5176: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5177: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5178: 'Calling WF_ENGINE.setitemattrnumber for CTX_APPL_ID ' || fnd_global.RESP_APPL_ID);
5179: END IF;
5180: WF_ENGINE.SetItemAttrNumber (
5181: itemtype => l_wf_name,

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

5182: itemkey => l_wf_sequence,
5183: aname => 'CTX_APPL_ID',
5184: avalue => fnd_global.RESP_APPL_ID);
5185:
5186: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5188: 'Calling WF_ENGINE.setitemattrnumber for CTX_RESP_ID ' || fnd_global.resp_id);
5189: END IF;
5190: WF_ENGINE.SetItemAttrNumber (

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

5183: aname => 'CTX_APPL_ID',
5184: avalue => fnd_global.RESP_APPL_ID);
5185:
5186: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5188: 'Calling WF_ENGINE.setitemattrnumber for CTX_RESP_ID ' || fnd_global.resp_id);
5189: END IF;
5190: WF_ENGINE.SetItemAttrNumber (
5191: itemtype => l_wf_name,

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

5192: itemkey => l_wf_sequence,
5193: aname => 'CTX_RESP_ID',
5194: avalue => fnd_global.resp_id);
5195:
5196: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5197: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5198: 'Calling WF_ENGINE.startprocess');
5199: END IF;
5200: WF_ENGINE.startprocess (

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

5193: aname => 'CTX_RESP_ID',
5194: avalue => fnd_global.resp_id);
5195:
5196: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5197: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5198: 'Calling WF_ENGINE.startprocess');
5199: END IF;
5200: WF_ENGINE.startprocess (
5201: itemtype => l_wf_name,

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

5203:
5204:
5205:
5206: -- Update WF columns in OKC_REP_CONTRACTS_ALL
5207: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5209: 'Updating workflow columns in OKC_REP_CONTRACTS_ALL');
5210: END IF;
5211:

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

5204:
5205:
5206: -- Update WF columns in OKC_REP_CONTRACTS_ALL
5207: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5209: 'Updating workflow columns in OKC_REP_CONTRACTS_ALL');
5210: END IF;
5211:
5212: /*UPDATE OKC_REP_CONTRACTS_ALL

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

5217:
5218:
5219: ELSE
5220:
5221: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5222: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5223: 'Calling the code hook to launch the custom sign workflow');
5224: END IF;
5225:

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

5218:
5219: ELSE
5220:
5221: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5222: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5223: 'Calling the code hook to launch the custom sign workflow');
5224: END IF;
5225:
5226: okc_rep_wf_code_hook.launch_custom_sign_wf(

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

5234:
5235: -- Standard call to get message count and if count is 1, get message info.
5236: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
5237:
5238: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5239: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5240: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.Esign_contract');
5241: END IF;
5242:

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

5235: -- Standard call to get message count and if count is 1, get message info.
5236: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
5237:
5238: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5239: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5240: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.Esign_contract');
5241: END IF;
5242:
5243: EXCEPTION

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

5241: END IF;
5242:
5243: EXCEPTION
5244: WHEN FND_API.G_EXC_ERROR THEN
5245: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5246: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5247: g_module || l_api_name,
5248: 'Leaving Esign_contract:FND_API.G_EXC_ERROR Exception');
5249: END IF;

Line 5246: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5242:
5243: EXCEPTION
5244: WHEN FND_API.G_EXC_ERROR THEN
5245: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5246: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5247: g_module || l_api_name,
5248: 'Leaving Esign_contract:FND_API.G_EXC_ERROR Exception');
5249: END IF;
5250: --close cursors

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

5258: p_data => x_msg_data
5259: );
5260:
5261: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5262: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5263: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5264: g_module || l_api_name,
5265: 'Leaving Esign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5266: END IF;

Line 5263: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5259: );
5260:
5261: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5262: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5263: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5264: g_module || l_api_name,
5265: 'Leaving Esign_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5266: END IF;
5267: --close cursors

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

5275: p_data => x_msg_data
5276: );
5277:
5278: WHEN OTHERS THEN
5279: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5280: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5281: g_module || l_api_name,
5282: 'Leaving Esign_contract because of EXCEPTION: ' || sqlerrm);
5283: END IF;

Line 5280: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5276: );
5277:
5278: WHEN OTHERS THEN
5279: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5280: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5281: g_module || l_api_name,
5282: 'Leaving Esign_contract because of EXCEPTION: ' || sqlerrm);
5283: END IF;
5284: --close cursors

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

5349:
5350: contract_rec contract_csr%ROWTYPE;
5351: BEGIN
5352:
5353: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5354: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5355: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
5356: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5357: 'Contract Id is: ' || p_contract_id);

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

5350: contract_rec contract_csr%ROWTYPE;
5351: BEGIN
5352:
5353: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5354: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5355: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
5356: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5357: 'Contract Id is: ' || p_contract_id);
5358: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5352:
5353: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5354: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5355: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
5356: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5357: 'Contract Id is: ' || p_contract_id);
5358: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5359: 'Termination date is: ' || to_char(p_termination_date));
5360: END IF;

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

5354: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5355: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
5356: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5357: 'Contract Id is: ' || p_contract_id);
5358: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5359: 'Termination date is: ' || to_char(p_termination_date));
5360: END IF;
5361: l_api_name := 'terminate_contacts';
5362: l_api_version := 1.0;

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

5377: -- Get effective dates and version of the contract.
5378: OPEN contract_csr;
5379: FETCH contract_csr INTO contract_rec;
5380: IF(contract_csr%NOTFOUND) THEN
5381: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5382: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
5383: G_MODULE||l_api_name,
5384: 'Invalid Contract Id: '|| p_contract_id);
5385: END IF;

Line 5382: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

5378: OPEN contract_csr;
5379: FETCH contract_csr INTO contract_rec;
5380: IF(contract_csr%NOTFOUND) THEN
5381: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5382: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
5383: G_MODULE||l_api_name,
5384: 'Invalid Contract Id: '|| p_contract_id);
5385: END IF;
5386: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

5391: -- RAISE NO_DATA_FOUND;
5392: END IF;
5393:
5394: -- Lock the contract header
5395: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5396: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5397: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
5398: END IF;
5399: -- Lock the contract header

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

5392: END IF;
5393:
5394: -- Lock the contract header
5395: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5396: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5397: 'Calling OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header()');
5398: END IF;
5399: -- Lock the contract header
5400: Lock_Contract_Header(

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

5401: p_contract_id => p_contract_id,
5402: p_object_version_number => NULL,
5403: x_return_status => x_return_status
5404: );
5405: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5406: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5407: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
5408: || x_return_status);
5409: END IF;

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

5402: p_object_version_number => NULL,
5403: x_return_status => x_return_status
5404: );
5405: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5406: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5407: 'OKC_REP_CONTRACT_PROCESS_PVT.Lock_Contract_Header return status is: '
5408: || x_return_status);
5409: END IF;
5410: -----------------------------------------------------

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

5414: RAISE OKC_API.G_EXCEPTION_ERROR;
5415: END IF;
5416: -----------------------------------------------------
5417: IF (trunc(p_termination_date) <= trunc(sysdate)) THEN
5418: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5419: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5420: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
5421: END IF;
5422:

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

5415: END IF;
5416: -----------------------------------------------------
5417: IF (trunc(p_termination_date) <= trunc(sysdate)) THEN
5418: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5419: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5420: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
5421: END IF;
5422:
5423: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

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

5431: p_note => NULL,
5432: x_msg_data => x_msg_data,
5433: x_msg_count => x_msg_count,
5434: x_return_status => x_return_status);
5435: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5436: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
5437: g_module || l_api_name,
5438: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
5439: END IF;

Line 5436: fnd_log.string(FND_LOG.LEVEL_STATEMENT,

5432: x_msg_data => x_msg_data,
5433: x_msg_count => x_msg_count,
5434: x_return_status => x_return_status);
5435: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5436: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
5437: g_module || l_api_name,
5438: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
5439: END IF;
5440: -----------------------------------------------------

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

5452: l_cancel_event_tbl(1).event_code := G_CONTRACT_EFFECTIVE_EVENT;
5453: l_cancel_event_tbl(1).event_date := contract_rec.contract_effective_date;
5454: l_cancel_event_tbl(2).event_code := G_CONTRACT_EXPIRE_EVENT;
5455: l_cancel_event_tbl(2).event_date := contract_rec.contract_expiration_date;
5456: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5457: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5458: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables ');
5459: END IF;
5460:

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

5453: l_cancel_event_tbl(1).event_date := contract_rec.contract_effective_date;
5454: l_cancel_event_tbl(2).event_code := G_CONTRACT_EXPIRE_EVENT;
5455: l_cancel_event_tbl(2).event_date := contract_rec.contract_expiration_date;
5456: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5457: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5458: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables ');
5459: END IF;
5460:
5461: OKC_MANAGE_DELIVERABLES_GRP.activateCloseOutDeliverables (

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

5471: x_msg_data => x_msg_data,
5472: x_msg_count => x_msg_count,
5473: x_return_status => x_return_status);
5474:
5475: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5476: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5477: 'OKC_DELIVERABLE_PROCESS_PVT.activateCloseOutDeliverables return status is : '
5478: || x_return_status);
5479: END IF;

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

5472: x_msg_count => x_msg_count,
5473: x_return_status => x_return_status);
5474:
5475: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5476: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5477: 'OKC_DELIVERABLE_PROCESS_PVT.activateCloseOutDeliverables return status is : '
5478: || x_return_status);
5479: END IF;
5480: -----------------------------------------------------

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

5488: IF (trunc(contract_rec.termination_date) <> trunc(p_termination_date)) THEN
5489: -- Update the deliverables
5490: l_update_event_tbl(1).event_code := G_CONTRACT_TERMINATED_EVENT;
5491: l_update_event_tbl(1).event_date := p_termination_date;
5492: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5493: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5494: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables ');
5495: END IF;
5496: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (

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

5489: -- Update the deliverables
5490: l_update_event_tbl(1).event_code := G_CONTRACT_TERMINATED_EVENT;
5491: l_update_event_tbl(1).event_date := p_termination_date;
5492: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5493: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5494: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables ');
5495: END IF;
5496: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
5497: p_api_version => 1.0,

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

5504: x_msg_data => x_msg_data,
5505: x_msg_count => x_msg_count,
5506: x_return_status => x_return_status);
5507:
5508: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5509: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5510: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
5511: || x_return_status);
5512: END IF;

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

5505: x_msg_count => x_msg_count,
5506: x_return_status => x_return_status);
5507:
5508: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5509: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5510: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
5511: || x_return_status);
5512: END IF;
5513: -----------------------------------------------------

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

5529:
5530: -- Standard call to get message count and if count is 1, get message info.
5531: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
5532:
5533: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5535: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
5536: END IF;
5537:

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

5530: -- Standard call to get message count and if count is 1, get message info.
5531: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
5532:
5533: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5534: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5535: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.terminate_contract');
5536: END IF;
5537:
5538:

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

5537:
5538:
5539: EXCEPTION
5540: WHEN FND_API.G_EXC_ERROR THEN
5541: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5542: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5543: g_module || l_api_name,
5544: 'Leaving terminate_contract:FND_API.G_EXC_ERROR Exception');
5545: END IF;

Line 5542: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5538:
5539: EXCEPTION
5540: WHEN FND_API.G_EXC_ERROR THEN
5541: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5542: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5543: g_module || l_api_name,
5544: 'Leaving terminate_contract:FND_API.G_EXC_ERROR Exception');
5545: END IF;
5546: --close cursors

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

5554: p_data => x_msg_data
5555: );
5556:
5557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5558: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5559: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5560: g_module || l_api_name,
5561: 'Leaving terminate_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5562: END IF;

Line 5559: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5555: );
5556:
5557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5558: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5559: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5560: g_module || l_api_name,
5561: 'Leaving terminate_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5562: END IF;
5563: --close cursors

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

5571: p_data => x_msg_data
5572: );
5573:
5574: WHEN OTHERS THEN
5575: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5576: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5577: g_module || l_api_name,
5578: 'Leaving terminate_contract because of EXCEPTION: ' || sqlerrm);
5579: END IF;

Line 5576: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

5572: );
5573:
5574: WHEN OTHERS THEN
5575: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5576: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
5577: g_module || l_api_name,
5578: 'Leaving terminate_contract because of EXCEPTION: ' || sqlerrm);
5579: END IF;
5580: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

5683: l_doc_type VARCHAR2(30);
5684:
5685:
5686: BEGIN
5687: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5688: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5689: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
5690: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5691: 'Contract Id is: ' || p_contract_id);

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

5684:
5685:
5686: BEGIN
5687: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5688: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5689: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
5690: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5691: 'Contract Id is: ' || p_contract_id);
5692: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5686: BEGIN
5687: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5688: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5689: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
5690: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5691: 'Contract Id is: ' || p_contract_id);
5692: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5693: 'Contract Number is: ' || p_contract_number);
5694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5688: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5689: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
5690: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5691: 'Contract Id is: ' || p_contract_id);
5692: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5693: 'Contract Number is: ' || p_contract_number);
5694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5695: 'Expired flag is: ' || p_expired_flag);
5696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5690: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5691: 'Contract Id is: ' || p_contract_id);
5692: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5693: 'Contract Number is: ' || p_contract_number);
5694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5695: 'Expired flag is: ' || p_expired_flag);
5696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5697: 'Contact Role Id is: ' || p_notify_contact_role_id);
5698: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5692: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5693: 'Contract Number is: ' || p_contract_number);
5694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5695: 'Expired flag is: ' || p_expired_flag);
5696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5697: 'Contact Role Id is: ' || p_notify_contact_role_id);
5698: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5699: 'Contract Version is: ' || p_contract_version);
5700: END IF;

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

5694: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5695: 'Expired flag is: ' || p_expired_flag);
5696: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5697: 'Contact Role Id is: ' || p_notify_contact_role_id);
5698: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5699: 'Contract Version is: ' || p_contract_version);
5700: END IF;
5701:
5702: --initialize variables

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

5739: CLOSE cur_contact_role;
5740:
5741: FOR contract_contacts_rec in CONTRACT_CONTACTS(p_contract_id) LOOP
5742:
5743: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5744: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5745: 'contract_contacts_rec.contact_id ' || contract_contacts_rec.contact_id);
5746: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5747: 'Calling WF_DIRECTORY.GetUserName()');

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

5740:
5741: FOR contract_contacts_rec in CONTRACT_CONTACTS(p_contract_id) LOOP
5742:
5743: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5744: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5745: 'contract_contacts_rec.contact_id ' || contract_contacts_rec.contact_id);
5746: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5747: 'Calling WF_DIRECTORY.GetUserName()');
5748: END IF;

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

5742:
5743: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5744: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5745: 'contract_contacts_rec.contact_id ' || contract_contacts_rec.contact_id);
5746: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5747: 'Calling WF_DIRECTORY.GetUserName()');
5748: END IF;
5749:
5750: -- Get WF user name for the current contact

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

5754: p_display_name => l_display_name);
5755:
5756: IF (l_user_name IS NULL) THEN
5757:
5758: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5759: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5760: 'Current contact does not have FND User');
5761: END IF;
5762:

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

5755:
5756: IF (l_user_name IS NULL) THEN
5757:
5758: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5759: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5760: 'Current contact does not have FND User');
5761: END IF;
5762:
5763: -- Get Email address of the current contact

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

5769: IF (l_email IS NOT NULL) THEN
5770:
5771: l_display_name := null;
5772:
5773: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5774: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5775: 'Calling WF_DIRECTORY.CreateAdHocUser() with email ' || l_email);
5776: END IF;
5777:

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

5770:
5771: l_display_name := null;
5772:
5773: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5774: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5775: 'Calling WF_DIRECTORY.CreateAdHocUser() with email ' || l_email);
5776: END IF;
5777:
5778: --create ad hoc user if user does not already exists

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

5783: description => 'Repository Ad Hoc User',
5784: notification_preference => 'MAILHTML',
5785: expiration_date => SYSDATE + 1);
5786:
5787: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5788: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5789: 'Adhoc User Name ' || l_user_name);
5790: END IF;
5791:

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

5784: notification_preference => 'MAILHTML',
5785: expiration_date => SYSDATE + 1);
5786:
5787: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5788: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5789: 'Adhoc User Name ' || l_user_name);
5790: END IF;
5791:
5792: ELSE

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

5790: END IF;
5791:
5792: ELSE
5793:
5794: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5795: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5796: 'Email address not available for the current contact');
5797: END IF;
5798:

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

5791:
5792: ELSE
5793:
5794: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5795: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5796: 'Email address not available for the current contact');
5797: END IF;
5798:
5799: END IF;

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

5799: END IF;
5800:
5801: ELSE
5802:
5803: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5804: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5805: 'WF User Name ' || l_user_name);
5806: END IF;
5807:

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

5800:
5801: ELSE
5802:
5803: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5804: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5805: 'WF User Name ' || l_user_name);
5806: END IF;
5807:
5808: END IF;

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

5821: END LOOP;
5822:
5823: IF (l_contract_contacts_all IS NOT NULL) THEN
5824:
5825: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5826: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5827: 'User names list ' || l_contract_contacts_all);
5828: END IF;
5829:

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

5822:
5823: IF (l_contract_contacts_all IS NOT NULL) THEN
5824:
5825: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5826: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5827: 'User names list ' || l_contract_contacts_all);
5828: END IF;
5829:
5830: --Get item key from sequence

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

5829:
5830: --Get item key from sequence
5831: SELECT TO_CHAR(okc_wf_notify_s1.NEXTVAL) INTO l_item_key FROM DUAL;
5832:
5833: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5834: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5835: 'Calling WF_DIRECTORY.createAdHocRole()');
5836: END IF;
5837:

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

5830: --Get item key from sequence
5831: SELECT TO_CHAR(okc_wf_notify_s1.NEXTVAL) INTO l_item_key FROM DUAL;
5832:
5833: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5834: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5835: 'Calling WF_DIRECTORY.createAdHocRole()');
5836: END IF;
5837:
5838: IF InStr(l_contract_contacts_all,',') = 0 THEN

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

5839: l_contract_contacts_role_name := l_user_name;
5840: l_contract_contacts_role_desc := l_display_name;
5841: ELSE
5842:
5843: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5844: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5845: 'Multiple Contacts exists, so creating adhoc role');
5846: END IF;
5847:

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

5840: l_contract_contacts_role_desc := l_display_name;
5841: ELSE
5842:
5843: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5844: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5845: 'Multiple Contacts exists, so creating adhoc role');
5846: END IF;
5847:
5848:

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

5863: expiration_date => SYSDATE + 1
5864: );
5865: END IF;
5866:
5867: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5868: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5869: 'Calling wf_engine.CreateProcess()');
5870: END IF;
5871:

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

5864: );
5865: END IF;
5866:
5867: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5868: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5869: 'Calling wf_engine.CreateProcess()');
5870: END IF;
5871:
5872: --Create the process

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

5958: itemkey => l_item_key,
5959: aname => l_item_message_subject,
5960: avalue => l_subject_text);
5961:
5962: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5963: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5964: 'Calling wf_engine.StartProcess()');
5965: END IF;
5966:

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

5959: aname => l_item_message_subject,
5960: avalue => l_subject_text);
5961:
5962: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5963: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5964: 'Calling wf_engine.StartProcess()');
5965: END IF;
5966:
5967: --Start the process

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

5968: wf_engine.StartProcess(
5969: itemtype => l_item_type,
5970: itemkey => l_item_key);
5971:
5972: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5973: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5974: 'Updating okc_rep_contracts_all and okc_rep_contract_vers with wf_exp_ntf_item_key ' || l_item_key);
5975: END IF;
5976:

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

5969: itemtype => l_item_type,
5970: itemkey => l_item_key);
5971:
5972: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5973: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5974: 'Updating okc_rep_contracts_all and okc_rep_contract_vers with wf_exp_ntf_item_key ' || l_item_key);
5975: END IF;
5976:
5977: --update contracts with sent notifications

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

5989: COMMIT;
5990:
5991: ELSE
5992:
5993: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5994: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5995: 'No WF users found for contacts of this contract');
5996: END IF;
5997:

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

5990:
5991: ELSE
5992:
5993: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5994: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5995: 'No WF users found for contacts of this contract');
5996: END IF;
5997:
5998: END IF;

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

6001: FND_MSG_PUB.Count_And_Get(
6002: p_count => x_msg_count,
6003: p_data => x_msg_data );
6004:
6005: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6006: FND_LOG.STRING(
6007: FND_LOG.LEVEL_PROCEDURE,
6008: G_MODULE||l_api_name,
6009: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');

Line 6006: FND_LOG.STRING(

6002: p_count => x_msg_count,
6003: p_data => x_msg_data );
6004:
6005: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6006: FND_LOG.STRING(
6007: FND_LOG.LEVEL_PROCEDURE,
6008: G_MODULE||l_api_name,
6009: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
6010: END IF;

Line 6007: FND_LOG.LEVEL_PROCEDURE,

6003: p_data => x_msg_data );
6004:
6005: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6006: FND_LOG.STRING(
6007: FND_LOG.LEVEL_PROCEDURE,
6008: G_MODULE||l_api_name,
6009: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.repository_notifier');
6010: END IF;
6011:

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

6011:
6012:
6013: EXCEPTION
6014: WHEN FND_API.G_EXC_ERROR THEN
6015: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6016: fnd_log.string(
6017: FND_LOG.LEVEL_EXCEPTION,
6018: g_module || l_api_name,
6019: 'Leaving repository_notifier:FND_API.G_EXC_ERROR Exception');

Line 6016: fnd_log.string(

6012:
6013: EXCEPTION
6014: WHEN FND_API.G_EXC_ERROR THEN
6015: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6016: fnd_log.string(
6017: FND_LOG.LEVEL_EXCEPTION,
6018: g_module || l_api_name,
6019: 'Leaving repository_notifier:FND_API.G_EXC_ERROR Exception');
6020: END IF;

Line 6017: FND_LOG.LEVEL_EXCEPTION,

6013: EXCEPTION
6014: WHEN FND_API.G_EXC_ERROR THEN
6015: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6016: fnd_log.string(
6017: FND_LOG.LEVEL_EXCEPTION,
6018: g_module || l_api_name,
6019: 'Leaving repository_notifier:FND_API.G_EXC_ERROR Exception');
6020: END IF;
6021: --close cursors

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

6033: p_data => x_msg_data
6034: );
6035:
6036: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6037: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6038: fnd_log.string(
6039: FND_LOG.LEVEL_EXCEPTION,
6040: g_module || l_api_name,
6041: 'Leaving repository_notifier:FND_API.G_EXC_UNEXPECTED_ERROR Exception');

Line 6038: fnd_log.string(

6034: );
6035:
6036: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6037: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6038: fnd_log.string(
6039: FND_LOG.LEVEL_EXCEPTION,
6040: g_module || l_api_name,
6041: 'Leaving repository_notifier:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6042: END IF;

Line 6039: FND_LOG.LEVEL_EXCEPTION,

6035:
6036: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6037: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6038: fnd_log.string(
6039: FND_LOG.LEVEL_EXCEPTION,
6040: g_module || l_api_name,
6041: 'Leaving repository_notifier:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6042: END IF;
6043: --close cursors

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

6055: p_data => x_msg_data
6056: );
6057:
6058: WHEN OTHERS THEN
6059: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6060: fnd_log.string(
6061: FND_LOG.LEVEL_EXCEPTION,
6062: g_module || l_api_name,
6063: 'Leaving repository_notifier because of EXCEPTION: ' || sqlerrm);

Line 6060: fnd_log.string(

6056: );
6057:
6058: WHEN OTHERS THEN
6059: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6060: fnd_log.string(
6061: FND_LOG.LEVEL_EXCEPTION,
6062: g_module || l_api_name,
6063: 'Leaving repository_notifier because of EXCEPTION: ' || sqlerrm);
6064: END IF;

Line 6061: FND_LOG.LEVEL_EXCEPTION,

6057:
6058: WHEN OTHERS THEN
6059: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6060: fnd_log.string(
6061: FND_LOG.LEVEL_EXCEPTION,
6062: g_module || l_api_name,
6063: 'Leaving repository_notifier because of EXCEPTION: ' || sqlerrm);
6064: END IF;
6065: Okc_Api.Set_Message(

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

6132:
6133:
6134: BEGIN
6135:
6136: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6137: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6138: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
6139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6140: 'Contract Id is: ' || p_contract_id);

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

6133:
6134: BEGIN
6135:
6136: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6137: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6138: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
6139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6140: 'Contract Id is: ' || p_contract_id);
6141: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6135:
6136: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6137: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6138: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
6139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6140: 'Contract Id is: ' || p_contract_id);
6141: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6142: 'Contract Version is: ' || p_contract_version);
6143: END IF;

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

6137: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6138: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
6139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6140: 'Contract Id is: ' || p_contract_id);
6141: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6142: 'Contract Version is: ' || p_contract_version);
6143: END IF;
6144: l_api_name := 'cancel_approval';
6145: l_api_version := 1.0;

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

6164: -- Get workflow information of the contract's approval process
6165: OPEN contract_csr;
6166: FETCH contract_csr into l_wf_type, l_wf_key, l_contract_status, l_contract_number;
6167: IF(contract_csr%NOTFOUND) THEN
6168: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6169: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
6170: G_MODULE||l_api_name,
6171: 'Invalid Contract Id: '|| p_contract_id);
6172: END IF;

Line 6169: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,

6165: OPEN contract_csr;
6166: FETCH contract_csr into l_wf_type, l_wf_key, l_contract_status, l_contract_number;
6167: IF(contract_csr%NOTFOUND) THEN
6168: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6169: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
6170: G_MODULE||l_api_name,
6171: 'Invalid Contract Id: '|| p_contract_id);
6172: END IF;
6173: CLOSE contract_csr;

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

6179: -- RAISE NO_DATA_FOUND;
6180: END IF;
6181: CLOSE contract_csr;
6182:
6183: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6184: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6185: 'Calling WF_ENGINE.AbortProcess');
6186: END IF;
6187:

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

6180: END IF;
6181: CLOSE contract_csr;
6182:
6183: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6184: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6185: 'Calling WF_ENGINE.AbortProcess');
6186: END IF;
6187:
6188: -- Check the status of the contract is Pending Approval before aborting the approval process

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

6205: verify_lock => false,
6206: cascade => true);
6207: END LOOP;
6208:
6209: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6210: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,g_module || l_api_name,
6211: 'Calling ame_api2.clearAllApprovals');
6212: END IF;
6213:

Line 6210: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,g_module || l_api_name,

6206: cascade => true);
6207: END LOOP;
6208:
6209: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6210: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,g_module || l_api_name,
6211: 'Calling ame_api2.clearAllApprovals');
6212: END IF;
6213:
6214: -- Repository Contracts ER's - Calling this after approval

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

6217: applicationIdIn => G_APPLICATION_ID,
6218: transactionTypeIn => G_TRANSACTION_TYPE,
6219: transactionIdIn => fnd_number.number_to_canonical(p_contract_id));
6220:
6221: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6222: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,g_module || l_api_name,
6223: 'After ame_api2.clearAllApprovals');
6224: END IF;
6225: ELSE

Line 6222: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,g_module || l_api_name,

6218: transactionTypeIn => G_TRANSACTION_TYPE,
6219: transactionIdIn => fnd_number.number_to_canonical(p_contract_id));
6220:
6221: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6222: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,g_module || l_api_name,
6223: 'After ame_api2.clearAllApprovals');
6224: END IF;
6225: ELSE
6226:

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

6233:
6234: END IF;
6235:
6236:
6237: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6238: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6239: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
6240: END IF;
6241:

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

6234: END IF;
6235:
6236:
6237: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6238: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6239: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
6240: END IF;
6241:
6242: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.

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

6250: p_note => NULL,
6251: x_msg_data => x_msg_data,
6252: x_msg_count => x_msg_count,
6253: x_return_status => x_return_status);
6254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6256: 'OKC_REP_UTIL_PVT.change_contract_status return status is: '
6257: || x_return_status);
6258: END IF;

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

6251: x_msg_data => x_msg_data,
6252: x_msg_count => x_msg_count,
6253: x_return_status => x_return_status);
6254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6256: 'OKC_REP_UTIL_PVT.change_contract_status return status is: '
6257: || x_return_status);
6258: END IF;
6259: -----------------------------------------------------

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

6264: END IF;
6265: --------------------------------------------------------
6266:
6267:
6268: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6269: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6270: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
6271: END IF;
6272:

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

6265: --------------------------------------------------------
6266:
6267:
6268: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6269: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6270: 'Calling OKC_REP_UTIL_PVT.add_approval_hist_record');
6271: END IF;
6272:
6273: -- Add a record in ONC_REP_CON_APPROVALS table.

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

6281: p_note => NULL,
6282: x_msg_data => x_msg_data,
6283: x_msg_count => x_msg_count,
6284: x_return_status => x_return_status);
6285: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6287: 'OKC_REP_UTIL_PVT.add_approval_hist_record return status is: '
6288: || x_return_status);
6289: END IF;

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

6282: x_msg_data => x_msg_data,
6283: x_msg_count => x_msg_count,
6284: x_return_status => x_return_status);
6285: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6287: 'OKC_REP_UTIL_PVT.add_approval_hist_record return status is: '
6288: || x_return_status);
6289: END IF;
6290: -------------------------------------------------------

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

6299:
6300: -- Standard call to get message count and if count is 1, get message info.
6301: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6302:
6303: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6304: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6305: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
6306: END IF;
6307:

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

6300: -- Standard call to get message count and if count is 1, get message info.
6301: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6302:
6303: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6304: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6305: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.cancel_approval');
6306: END IF;
6307:
6308: EXCEPTION

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

6306: END IF;
6307:
6308: EXCEPTION
6309: WHEN FND_API.G_EXC_ERROR THEN
6310: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6311: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6312: g_module || l_api_name,
6313: 'Leaving cancel_approval:FND_API.G_EXC_ERROR Exception');
6314: END IF;

Line 6311: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6307:
6308: EXCEPTION
6309: WHEN FND_API.G_EXC_ERROR THEN
6310: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6311: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6312: g_module || l_api_name,
6313: 'Leaving cancel_approval:FND_API.G_EXC_ERROR Exception');
6314: END IF;
6315: --close cursors

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

6323: p_data => x_msg_data
6324: );
6325:
6326: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6327: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6329: g_module || l_api_name,
6330: 'Leaving cancel_approval:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6331: END IF;

Line 6328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6324: );
6325:
6326: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6327: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6328: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6329: g_module || l_api_name,
6330: 'Leaving cancel_approval:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6331: END IF;
6332: --close cursors

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

6340: p_data => x_msg_data
6341: );
6342:
6343: WHEN OTHERS THEN
6344: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6346: g_module || l_api_name,
6347: 'Leaving cancel_approval because of EXCEPTION: ' || sqlerrm);
6348: END IF;

Line 6345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6341: );
6342:
6343: WHEN OTHERS THEN
6344: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6345: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6346: g_module || l_api_name,
6347: 'Leaving cancel_approval because of EXCEPTION: ' || sqlerrm);
6348: END IF;
6349: --close cursors

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

6444: AND ROWNUM < 2;
6445:
6446: BEGIN
6447:
6448: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6449: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6450: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
6451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6452: 'Org Id is: ' || p_org_id);

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

6445:
6446: BEGIN
6447:
6448: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6449: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6450: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
6451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6452: 'Org Id is: ' || p_org_id);
6453: END IF;

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

6447:
6448: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6449: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6450: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
6451: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6452: 'Org Id is: ' || p_org_id);
6453: END IF;
6454: l_api_name := 'get_next_contract_number';
6455: l_api_version := 1.0;

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

6485: l_row_notfound := l_get_sob_csr%NOTFOUND;
6486: CLOSE l_get_sob_csr;
6487:
6488: IF l_row_notfound THEN
6489: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6490: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6491: 'Set of book id not found');
6492: END IF;
6493:

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

6486: CLOSE l_get_sob_csr;
6487:
6488: IF l_row_notfound THEN
6489: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6490: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6491: 'Set of book id not found');
6492: END IF;
6493:
6494: CLOSE l_get_sob_csr;

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

6567:
6568: -- Standard call to get message count and if count is 1, get message info.
6569: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6570:
6571: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6572: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6573: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
6574: END IF;
6575:

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

6568: -- Standard call to get message count and if count is 1, get message info.
6569: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6570:
6571: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6572: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6573: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.get_next_contract_number');
6574: END IF;
6575:
6576: EXCEPTION

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

6574: END IF;
6575:
6576: EXCEPTION
6577: WHEN FND_API.G_EXC_ERROR THEN
6578: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6579: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6580: g_module || l_api_name,
6581: 'Leaving get_next_contract_number:FND_API.G_EXC_ERROR Exception');
6582: END IF;

Line 6579: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6575:
6576: EXCEPTION
6577: WHEN FND_API.G_EXC_ERROR THEN
6578: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6579: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6580: g_module || l_api_name,
6581: 'Leaving get_next_contract_number:FND_API.G_EXC_ERROR Exception');
6582: END IF;
6583: --close cursors

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

6596: p_data => x_msg_data
6597: );
6598:
6599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6600: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6601: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6602: g_module || l_api_name,
6603: 'Leaving get_next_contract_number:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6604: END IF;

Line 6601: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6597: );
6598:
6599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6600: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6601: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6602: g_module || l_api_name,
6603: 'Leaving get_next_contract_number:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6604: END IF;
6605: --close cursors

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

6618: p_data => x_msg_data
6619: );
6620:
6621: WHEN OTHERS THEN
6622: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6623: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6624: g_module || l_api_name,
6625: 'Leaving get_next_contract_number because of EXCEPTION: ' || sqlerrm);
6626: END IF;

Line 6623: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6619: );
6620:
6621: WHEN OTHERS THEN
6622: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6623: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6624: g_module || l_api_name,
6625: 'Leaving get_next_contract_number because of EXCEPTION: ' || sqlerrm);
6626: END IF;
6627: --close cursors

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

6682: l_api_version NUMBER;
6683: l_con_version NUMBER;
6684: BEGIN
6685:
6686: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6687: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6688: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values');
6689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6690: 'Contract Id is: ' || to_char(p_contract_id));

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

6683: l_con_version NUMBER;
6684: BEGIN
6685:
6686: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6687: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6688: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values');
6689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6690: 'Contract Id is: ' || to_char(p_contract_id));
6691: END IF;

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

6685:
6686: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6687: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6688: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values');
6689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6690: 'Contract Id is: ' || to_char(p_contract_id));
6691: END IF;
6692: l_api_name := 'delete_uda_attribute_values';
6693: l_api_version := 1.0;

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

7064:
7065: -- Standard call to get message count and if count is 1, get message info.
7066: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7067:
7068: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7069: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7070: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values');
7071: END IF;
7072:

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

7065: -- Standard call to get message count and if count is 1, get message info.
7066: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7067:
7068: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7069: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7070: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.delete_uda_attribute_values');
7071: END IF;
7072:
7073:

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

7072:
7073:
7074: EXCEPTION
7075: WHEN FND_API.G_EXC_ERROR THEN
7076: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7077: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7078: g_module || l_api_name,
7079: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7080: END IF;

Line 7077: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7073:
7074: EXCEPTION
7075: WHEN FND_API.G_EXC_ERROR THEN
7076: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7077: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7078: g_module || l_api_name,
7079: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7080: END IF;
7081: ROLLBACK TO delete_uda_attr_values_PVT;

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

7085: p_data => x_msg_data
7086: );
7087:
7088: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7089: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7090: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7091: g_module || l_api_name,
7092: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7093: END IF;

Line 7090: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7086: );
7087:
7088: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7089: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7090: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7091: g_module || l_api_name,
7092: 'Leaving delete_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7093: END IF;
7094: ROLLBACK TO delete_uda_attr_values_PVT;

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

7098: p_data => x_msg_data
7099: );
7100:
7101: WHEN OTHERS THEN
7102: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7103: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7104: g_module || l_api_name,
7105: 'Leaving delete_uda_attribute_values because of EXCEPTION: ' || sqlerrm);
7106: END IF;

Line 7103: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7099: );
7100:
7101: WHEN OTHERS THEN
7102: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7103: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7104: g_module || l_api_name,
7105: 'Leaving delete_uda_attribute_values because of EXCEPTION: ' || sqlerrm);
7106: END IF;
7107: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

7173: WHERE contract_id = p_contract_id;
7174:
7175: BEGIN
7176:
7177: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7179: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values');
7180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7181: 'Source Contract Id is: ' || p_source_contract_id);

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

7174:
7175: BEGIN
7176:
7177: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7179: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values');
7180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7181: 'Source Contract Id is: ' || p_source_contract_id);
7182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

7176:
7177: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7179: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values');
7180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7181: 'Source Contract Id is: ' || p_source_contract_id);
7182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7183: 'Target Contract Id is: ' || p_target_contract_id);
7184: END IF;

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

7178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7179: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values');
7180: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7181: 'Source Contract Id is: ' || p_source_contract_id);
7182: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7183: 'Target Contract Id is: ' || p_target_contract_id);
7184: END IF;
7185: l_api_name := 'copy_uda_attribute_values';
7186: l_api_version := 1.0;

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

7248: END LOOP;
7249:
7250: l_from_where_pk_sql := SUBSTR(l_from_where_pk_sql, 1, LENGTH(l_from_where_pk_sql) - LENGTH(' AND'));
7251:
7252: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7253: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7254: 'l_from_where_pk_sql '|| l_from_where_pk_sql);
7255: END IF;
7256:

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

7249:
7250: l_from_where_pk_sql := SUBSTR(l_from_where_pk_sql, 1, LENGTH(l_from_where_pk_sql) - LENGTH(' AND'));
7251:
7252: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7253: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7254: 'l_from_where_pk_sql '|| l_from_where_pk_sql);
7255: END IF;
7256:
7257: l_index := 0;

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

7272: END LOOP;
7273:
7274: l_to_where_pk_sql := SUBSTR(l_to_where_pk_sql, 1, LENGTH(l_to_where_pk_sql) - LENGTH(' AND'));
7275:
7276: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7277: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7278: 'l_to_where_pk_sql '|| l_to_where_pk_sql);
7279: END IF;
7280:

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

7273:
7274: l_to_where_pk_sql := SUBSTR(l_to_where_pk_sql, 1, LENGTH(l_to_where_pk_sql) - LENGTH(' AND'));
7275:
7276: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7277: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7278: 'l_to_where_pk_sql '|| l_to_where_pk_sql);
7279: END IF;
7280:
7281: SELECT *

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

7312:
7313: -- Standard call to get message count and if count is 1, get message info.
7314: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7315:
7316: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7317: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7318: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values');
7319: END IF;
7320:

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

7313: -- Standard call to get message count and if count is 1, get message info.
7314: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7315:
7316: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7317: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7318: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.copy_uda_attribute_values');
7319: END IF;
7320:
7321:

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

7320:
7321:
7322: EXCEPTION
7323: WHEN FND_API.G_EXC_ERROR THEN
7324: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7325: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7326: g_module || l_api_name,
7327: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7328: END IF;

Line 7325: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7321:
7322: EXCEPTION
7323: WHEN FND_API.G_EXC_ERROR THEN
7324: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7325: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7326: g_module || l_api_name,
7327: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7328: END IF;
7329: ROLLBACK TO copy_uda_attribute_values_PVT;

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

7333: p_data => x_msg_data
7334: );
7335:
7336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7337: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7338: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7339: g_module || l_api_name,
7340: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7341: END IF;

Line 7338: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7334: );
7335:
7336: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7337: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7338: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7339: g_module || l_api_name,
7340: 'Leaving copy_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7341: END IF;
7342: ROLLBACK TO copy_uda_attribute_values_PVT;

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

7346: p_data => x_msg_data
7347: );
7348:
7349: WHEN OTHERS THEN
7350: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7351: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7352: g_module || l_api_name,
7353: 'Leaving copy_uda_attribute_values because of EXCEPTION: ' || sqlerrm);
7354: END IF;

Line 7351: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7347: );
7348:
7349: WHEN OTHERS THEN
7350: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7351: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7352: g_module || l_api_name,
7353: 'Leaving copy_uda_attribute_values because of EXCEPTION: ' || sqlerrm);
7354: END IF;
7355: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

7410:
7411:
7412: BEGIN
7413:
7414: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7415: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7416: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_uda_attribute_values');
7417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7418: 'Contract Id is: ' || to_char(p_contract_id));

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

7411:
7412: BEGIN
7413:
7414: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7415: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7416: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_uda_attribute_values');
7417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7418: 'Contract Id is: ' || to_char(p_contract_id));
7419: END IF;

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

7413:
7414: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7415: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7416: 'Entered OKC_REP_CONTRACT_PROCESS_PVT.version_uda_attribute_values');
7417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7418: 'Contract Id is: ' || to_char(p_contract_id));
7419: END IF;
7420: l_api_name := 'version_uda_attribute_values';
7421: l_api_version := 1.0;

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

7779:
7780: -- Standard call to get message count and if count is 1, get message info.
7781: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7782:
7783: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7785: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.version_uda_attribute_values');
7786: END IF;
7787:

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

7780: -- Standard call to get message count and if count is 1, get message info.
7781: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7782:
7783: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7785: 'Leaving OKC_REP_CONTRACT_PROCESS_PVT.version_uda_attribute_values');
7786: END IF;
7787:
7788:

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

7787:
7788:
7789: EXCEPTION
7790: WHEN FND_API.G_EXC_ERROR THEN
7791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7793: g_module || l_api_name,
7794: 'Leaving version_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7795: END IF;

Line 7792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7788:
7789: EXCEPTION
7790: WHEN FND_API.G_EXC_ERROR THEN
7791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7792: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7793: g_module || l_api_name,
7794: 'Leaving version_uda_attribute_values:FND_API.G_EXC_ERROR Exception');
7795: END IF;
7796: ROLLBACK TO version_uda_attr_values_PVT;

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

7800: p_data => x_msg_data
7801: );
7802:
7803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7804: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7805: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7806: g_module || l_api_name,
7807: 'Leaving version_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7808: END IF;

Line 7805: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7801: );
7802:
7803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7804: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7805: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7806: g_module || l_api_name,
7807: 'Leaving version_uda_attribute_values:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7808: END IF;
7809: ROLLBACK TO version_uda_attr_values_PVT;

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

7813: p_data => x_msg_data
7814: );
7815:
7816: WHEN OTHERS THEN
7817: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7818: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7819: g_module || l_api_name,
7820: 'Leaving version_uda_attribute_values because of EXCEPTION: ' || sqlerrm);
7821: END IF;

Line 7818: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7814: );
7815:
7816: WHEN OTHERS THEN
7817: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7818: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7819: g_module || l_api_name,
7820: 'Leaving version_uda_attribute_values because of EXCEPTION: ' || sqlerrm);
7821: END IF;
7822: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

7849:
7850: BEGIN
7851: l_api_name := 'call_contract_preview_cp_yn';
7852: l_return_status := 'N';
7853: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7854: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: Entered OKC_REP_CONTRACT_PROCESS_PVT.call_contract_preview_cp_yn');
7855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_id is: ' || p_contract_id);
7856: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_type is: ' || p_contract_type);
7857: END IF;

Line 7854: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: Entered OKC_REP_CONTRACT_PROCESS_PVT.call_contract_preview_cp_yn');

7850: BEGIN
7851: l_api_name := 'call_contract_preview_cp_yn';
7852: l_return_status := 'N';
7853: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7854: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: Entered OKC_REP_CONTRACT_PROCESS_PVT.call_contract_preview_cp_yn');
7855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_id is: ' || p_contract_id);
7856: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_type is: ' || p_contract_type);
7857: END IF;
7858:

Line 7855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_id is: ' || p_contract_id);

7851: l_api_name := 'call_contract_preview_cp_yn';
7852: l_return_status := 'N';
7853: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7854: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: Entered OKC_REP_CONTRACT_PROCESS_PVT.call_contract_preview_cp_yn');
7855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_id is: ' || p_contract_id);
7856: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_type is: ' || p_contract_type);
7857: END IF;
7858:
7859: SELECT layout_template_id INTO l_layout_template_id

Line 7856: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_type is: ' || p_contract_type);

7852: l_return_status := 'N';
7853: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7854: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: Entered OKC_REP_CONTRACT_PROCESS_PVT.call_contract_preview_cp_yn');
7855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_id is: ' || p_contract_id);
7856: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '100: p_contract_type is: ' || p_contract_type);
7857: END IF;
7858:
7859: SELECT layout_template_id INTO l_layout_template_id
7860: FROM okc_bus_doc_types_b

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

7860: FROM okc_bus_doc_types_b
7861: WHERE document_type = p_contract_type;
7862:
7863: IF (l_layout_template_id IS NOT NULL) THEN
7864: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7865: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '101: Contract attachment CP can be called Y/N is: Y');
7866: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '101: Leaving call_contract_preview_cp_yn');
7867: END IF;
7868: RETURN 'Y';

Line 7865: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '101: Contract attachment CP can be called Y/N is: Y');

7861: WHERE document_type = p_contract_type;
7862:
7863: IF (l_layout_template_id IS NOT NULL) THEN
7864: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7865: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '101: Contract attachment CP can be called Y/N is: Y');
7866: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '101: Leaving call_contract_preview_cp_yn');
7867: END IF;
7868: RETURN 'Y';
7869: ELSE

Line 7866: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '101: Leaving call_contract_preview_cp_yn');

7862:
7863: IF (l_layout_template_id IS NOT NULL) THEN
7864: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7865: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '101: Contract attachment CP can be called Y/N is: Y');
7866: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '101: Leaving call_contract_preview_cp_yn');
7867: END IF;
7868: RETURN 'Y';
7869: ELSE
7870: BEGIN

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

7872: FROM okc_template_usages
7873: WHERE document_id = p_contract_id AND document_type = p_contract_type;
7874: EXCEPTION
7875: WHEN NO_DATA_FOUND THEN
7876: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7877: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '102: Contract attachment CP can be called Y/N is: N');
7878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '102: Leaving call_contract_preview_cp_yn');
7879: END IF;
7880: RETURN 'N';

Line 7877: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '102: Contract attachment CP can be called Y/N is: N');

7873: WHERE document_id = p_contract_id AND document_type = p_contract_type;
7874: EXCEPTION
7875: WHEN NO_DATA_FOUND THEN
7876: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7877: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '102: Contract attachment CP can be called Y/N is: N');
7878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '102: Leaving call_contract_preview_cp_yn');
7879: END IF;
7880: RETURN 'N';
7881: WHEN OTHERS THEN

Line 7878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '102: Leaving call_contract_preview_cp_yn');

7874: EXCEPTION
7875: WHEN NO_DATA_FOUND THEN
7876: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7877: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '102: Contract attachment CP can be called Y/N is: N');
7878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '102: Leaving call_contract_preview_cp_yn');
7879: END IF;
7880: RETURN 'N';
7881: WHEN OTHERS THEN
7882: RAISE;

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

7887: FROM okc_terms_templates_all
7888: WHERE template_id = l_terms_template_id;
7889: EXCEPTION
7890: WHEN NO_DATA_FOUND THEN
7891: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7892: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '103: Contract attachment CP can be called Y/N is: N');
7893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '103: Leaving call_contract_preview_cp_yn');
7894: END IF;
7895:

Line 7892: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '103: Contract attachment CP can be called Y/N is: N');

7888: WHERE template_id = l_terms_template_id;
7889: EXCEPTION
7890: WHEN NO_DATA_FOUND THEN
7891: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7892: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '103: Contract attachment CP can be called Y/N is: N');
7893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '103: Leaving call_contract_preview_cp_yn');
7894: END IF;
7895:
7896: RETURN 'N';

Line 7893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '103: Leaving call_contract_preview_cp_yn');

7889: EXCEPTION
7890: WHEN NO_DATA_FOUND THEN
7891: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7892: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '103: Contract attachment CP can be called Y/N is: N');
7893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '103: Leaving call_contract_preview_cp_yn');
7894: END IF;
7895:
7896: RETURN 'N';
7897: WHEN OTHERS THEN

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

7902: l_return_status := 'Y';
7903: END IF;
7904: END IF;
7905:
7906: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '104: Contract attachment CP can be called Y/N is: ' || l_return_status);
7908: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '104: Leaving call_contract_preview_cp_yn');
7909: END IF;
7910:

Line 7907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '104: Contract attachment CP can be called Y/N is: ' || l_return_status);

7903: END IF;
7904: END IF;
7905:
7906: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '104: Contract attachment CP can be called Y/N is: ' || l_return_status);
7908: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '104: Leaving call_contract_preview_cp_yn');
7909: END IF;
7910:
7911: RETURN l_return_status;

Line 7908: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '104: Leaving call_contract_preview_cp_yn');

7904: END IF;
7905:
7906: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '104: Contract attachment CP can be called Y/N is: ' || l_return_status);
7908: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, '104: Leaving call_contract_preview_cp_yn');
7909: END IF;
7910:
7911: RETURN l_return_status;
7912: EXCEPTION

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

7910:
7911: RETURN l_return_status;
7912: EXCEPTION
7913: WHEN OTHERS THEN
7914: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7915: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name, '105: Leaving call_contract_preview_cp_yn: Exception ocuured');
7916: END IF;
7917: RAISE;
7918: END call_contract_preview_cp_yn;

Line 7915: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name, '105: Leaving call_contract_preview_cp_yn: Exception ocuured');

7911: RETURN l_return_status;
7912: EXCEPTION
7913: WHEN OTHERS THEN
7914: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7915: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name, '105: Leaving call_contract_preview_cp_yn: Exception ocuured');
7916: END IF;
7917: RAISE;
7918: END call_contract_preview_cp_yn;
7919: