eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKC_REP_UTIL_PVT dependencies on FND_LOG

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

134: BEGIN
135:
136: l_api_name := 'check_contract_access_external';
137:
138: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
140: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
141: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
142: '101: Contract Id is: ' || to_char(p_contract_id));

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

135:
136: l_api_name := 'check_contract_access_external';
137:
138: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
140: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
141: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
142: '101: Contract Id is: ' || to_char(p_contract_id));
143: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

137:
138: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
140: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
141: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
142: '101: Contract Id is: ' || to_char(p_contract_id));
143: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
144: '102: Contract Type is: ' || p_contract_type);
145: END IF;

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

139: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
140: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
141: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
142: '101: Contract Id is: ' || to_char(p_contract_id));
143: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
144: '102: Contract Type is: ' || p_contract_type);
145: END IF;
146: -- Initialize message list if p_init_msg_list is set to TRUE.
147: IF FND_API.to_Boolean( p_init_msg_list ) THEN

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

183: CLOSE quote_contract_csr;
184:
185: END IF;
186:
187: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
188: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
189: 'Values from contract_csr: l_org_id = ' || l_org_id );
190: END IF;
191:

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

184:
185: END IF;
186:
187: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
188: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
189: 'Values from contract_csr: l_org_id = ' || l_org_id );
190: END IF;
191:
192: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

203: END IF;
204:
205: CLOSE mo_check_csr;
206:
207: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
209: 'Values after mo_check_csr fetch: l_org_id = ' || l_org_id || ', from mo_check_csr%FOUND: l_result = ' || l_result);
210: END IF;
211:

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

204:
205: CLOSE mo_check_csr;
206:
207: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
209: 'Values after mo_check_csr fetch: l_org_id = ' || l_org_id || ', from mo_check_csr%FOUND: l_result = ' || l_result);
210: END IF;
211:
212: IF (l_result = 'Y') THEN

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

222: END IF;
223:
224: CLOSE intents_csr;
225:
226: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
227: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
228: 'Values after intents_csr fetch: l_result = ' || l_result);
229: END IF;
230:

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

223:
224: CLOSE intents_csr;
225:
226: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
227: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
228: 'Values after intents_csr fetch: l_result = ' || l_result);
229: END IF;
230:
231: IF (l_result = 'Y') THEN

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

231: IF (l_result = 'Y') THEN
232:
233: x_has_access := FND_API.G_TRUE;
234:
235: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
236: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
237: 'intents check passed');
238: END IF;
239:

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

232:
233: x_has_access := FND_API.G_TRUE;
234:
235: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
236: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
237: 'intents check passed');
238: END IF;
239:
240: IF p_contract_type = 'QUOTE' THEN

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

253: IF l_result = 'Y' THEN
254:
255: x_has_access := FND_API.G_TRUE;
256:
257: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
258: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
259: 'IF l_result = Y for quoting security');
260: END IF;
261: ELSE

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

254:
255: x_has_access := FND_API.G_TRUE;
256:
257: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
258: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
259: 'IF l_result = Y for quoting security');
260: END IF;
261: ELSE
262:

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

261: ELSE
262:
263: x_has_access := FND_API.G_FALSE;
264:
265: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
266: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
267: 'IF l_result = N for quoting security');
268: END IF;
269: END IF;

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

262:
263: x_has_access := FND_API.G_FALSE;
264:
265: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
266: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
267: 'IF l_result = N for quoting security');
268: END IF;
269: END IF;
270:

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

273: END IF; -- End of intent profile check
274:
275: END IF; -- End of MO_GLOBAL check
276:
277: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
278: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
279: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
280: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
281: '111: x_has_access is: ' || x_has_access);

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

274:
275: END IF; -- End of MO_GLOBAL check
276:
277: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
278: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
279: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
280: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
281: '111: x_has_access is: ' || x_has_access);
282: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

276:
277: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
278: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
279: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
280: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
281: '111: x_has_access is: ' || x_has_access);
282: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
283: '112: x_return_status is: ' || x_return_status);
284: END IF;

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

278: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
279: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
280: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
281: '111: x_has_access is: ' || x_has_access);
282: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
283: '112: x_return_status is: ' || x_return_status);
284: END IF;
285:
286: EXCEPTION

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

310: IF (mo_check_csr%ISOPEN) THEN
311: CLOSE mo_check_csr ;
312: END IF;
313:
314: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
315: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
316: g_module || l_api_name || '.exception',
317: '115: Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
318: END IF;

Line 315: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

311: CLOSE mo_check_csr ;
312: END IF;
313:
314: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
315: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
316: g_module || l_api_name || '.exception',
317: '115: Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
318: END IF;
319: x_return_status := FND_API.G_RET_STS_ERROR;

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

348: IF (mo_check_csr%ISOPEN) THEN
349: CLOSE mo_check_csr ;
350: END IF;
351:
352: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
353: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
354: g_module || l_api_name || '.exception',
355: '116:Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
356: END IF;

Line 353: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

349: CLOSE mo_check_csr ;
350: END IF;
351:
352: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
353: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
354: g_module || l_api_name || '.exception',
355: '116:Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
356: END IF;
357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

387: CLOSE mo_check_csr ;
388: END IF;
389:
390:
391: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
392: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
393: g_module || l_api_name || '.exception',
394: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
395: END IF;

Line 392: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

388: END IF;
389:
390:
391: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
392: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
393: g_module || l_api_name || '.exception',
394: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
395: END IF;
396: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

522: BEGIN
523:
524: l_api_name := 'check_contract_access';
525:
526: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
527: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
528: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
529: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
530: '101: Contract Id is: ' || to_char(p_contract_id));

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

523:
524: l_api_name := 'check_contract_access';
525:
526: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
527: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
528: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
529: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
530: '101: Contract Id is: ' || to_char(p_contract_id));
531: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

525:
526: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
527: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
528: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
529: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
530: '101: Contract Id is: ' || to_char(p_contract_id));
531: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
532: '102: Fucntion Name is: ' || p_function_name);
533: END IF;

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

527: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
528: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
529: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
530: '101: Contract Id is: ' || to_char(p_contract_id));
531: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
532: '102: Fucntion Name is: ' || p_function_name);
533: END IF;
534: -- Initialize message list if p_init_msg_list is set to TRUE.
535: IF FND_API.to_Boolean( p_init_msg_list ) THEN

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

539: OPEN contract_csr(p_contract_id);
540: FETCH contract_csr INTO l_org_id, l_owner_id, l_use_acl_flag, l_contract_type;
541: CLOSE contract_csr;
542:
543: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
544: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
545: 'Values from contract_csr: l_org_id = ' || l_org_id || ', l_owner_id = ' || l_owner_id || ',l_use_acl_flag = ' || l_use_acl_flag);
546: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
547: 'Values : FND_GLOBAL.user_id() = ' || FND_GLOBAL.user_id() || ', FND_GLOBAL.user_name() = ' || FND_GLOBAL.user_name());

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

540: FETCH contract_csr INTO l_org_id, l_owner_id, l_use_acl_flag, l_contract_type;
541: CLOSE contract_csr;
542:
543: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
544: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
545: 'Values from contract_csr: l_org_id = ' || l_org_id || ', l_owner_id = ' || l_owner_id || ',l_use_acl_flag = ' || l_use_acl_flag);
546: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
547: 'Values : FND_GLOBAL.user_id() = ' || FND_GLOBAL.user_id() || ', FND_GLOBAL.user_name() = ' || FND_GLOBAL.user_name());
548: END IF;

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

542:
543: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
544: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
545: 'Values from contract_csr: l_org_id = ' || l_org_id || ', l_owner_id = ' || l_owner_id || ',l_use_acl_flag = ' || l_use_acl_flag);
546: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
547: 'Values : FND_GLOBAL.user_id() = ' || FND_GLOBAL.user_id() || ', FND_GLOBAL.user_name() = ' || FND_GLOBAL.user_name());
548: END IF;
549:
550: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

551: x_has_access := FND_API.G_FALSE;
552:
553: IF ( p_function_name = G_UPDATE_ACCESS_LEVEL AND NOT( FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y') OR FND_FUNCTION.TEST(G_FUNC_OKC_REP_USER_FUNC,'Y') ) ) THEN
554:
555: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
556: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
557: 'returning FALSE, queried for UPDATE access, not an Admin, not a User, must be a Viewer');
558: END IF;
559:

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

552:
553: IF ( p_function_name = G_UPDATE_ACCESS_LEVEL AND NOT( FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y') OR FND_FUNCTION.TEST(G_FUNC_OKC_REP_USER_FUNC,'Y') ) ) THEN
554:
555: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
556: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
557: 'returning FALSE, queried for UPDATE access, not an Admin, not a User, must be a Viewer');
558: END IF;
559:
560: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

567:
568: -- Call multi-org API to check access to contract's organization by current user
569: l_result := MO_GLOBAL.check_access(p_org_id => l_org_id);
570:
571: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
573: 'Values after calling MOAC API l_result = ' || l_result);
574: END IF;
575:

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

568: -- Call multi-org API to check access to contract's organization by current user
569: l_result := MO_GLOBAL.check_access(p_org_id => l_org_id);
570:
571: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
573: 'Values after calling MOAC API l_result = ' || l_result);
574: END IF;
575:
576: IF (l_result = 'Y') THEN

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

586: END IF;
587:
588: CLOSE intents_csr;
589:
590: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
591: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
592: 'Values after intents_csr fetch: l_result = ' || l_result);
593: END IF;
594:

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

587:
588: CLOSE intents_csr;
589:
590: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
591: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
592: 'Values after intents_csr fetch: l_result = ' || l_result);
593: END IF;
594:
595: IF (l_result = 'Y') THEN

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

595: IF (l_result = 'Y') THEN
596:
597: l_user_id := FND_GLOBAL.user_id();
598:
599: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
600: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
601: 'Value from FND_GLOBAL.user_id() call: l_user_id = ' || l_user_id);
602: END IF;
603:

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

596:
597: l_user_id := FND_GLOBAL.user_id();
598:
599: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
600: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
601: 'Value from FND_GLOBAL.user_id() call: l_user_id = ' || l_user_id);
602: END IF;
603:
604: -- Check if the current user is owner of the contract

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

604: -- Check if the current user is owner of the contract
605: IF (l_user_id = l_owner_id) THEN
606: x_has_access := FND_API.G_TRUE;
607:
608: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
609: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
610: 'IF (l_user_id = l_owner_id) THEN: TRUE: x_has_access = ' || x_has_access);
611: END IF;
612: ELSE

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

605: IF (l_user_id = l_owner_id) THEN
606: x_has_access := FND_API.G_TRUE;
607:
608: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
609: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
610: 'IF (l_user_id = l_owner_id) THEN: TRUE: x_has_access = ' || x_has_access);
611: END IF;
612: ELSE
613:

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

610: 'IF (l_user_id = l_owner_id) THEN: TRUE: x_has_access = ' || x_has_access);
611: END IF;
612: ELSE
613:
614: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
615: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
616: 'checking OKC_REP_ADMINISTRATOR function: ' || G_FUNC_OKC_REP_ADMINISTRATOR);
617: END IF;
618:

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

611: END IF;
612: ELSE
613:
614: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
615: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
616: 'checking OKC_REP_ADMINISTRATOR function: ' || G_FUNC_OKC_REP_ADMINISTRATOR);
617: END IF;
618:
619: IF (FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y')) THEN

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

619: IF (FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y')) THEN
620:
621: x_has_access := FND_API.G_TRUE;
622:
623: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
624: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
625: 'IF (FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,''Y'')) THEN: TRUE: x_has_access = ' || x_has_access);
626: END IF;
627: ELSE

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

620:
621: x_has_access := FND_API.G_TRUE;
622:
623: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
624: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
625: 'IF (FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,''Y'')) THEN: TRUE: x_has_access = ' || x_has_access);
626: END IF;
627: ELSE
628:

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

628:
629: -- Check if Use ACL flag is enabled for the current contract
630: IF (l_use_acl_flag = 'Y') THEN
631:
632: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
633: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
634: 'IF (l_use_acl_flag = ''Y'') THEN: TRUE: x_has_access = ' || x_has_access);
635: END IF;
636:

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

629: -- Check if Use ACL flag is enabled for the current contract
630: IF (l_use_acl_flag = 'Y') THEN
631:
632: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
633: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
634: 'IF (l_use_acl_flag = ''Y'') THEN: TRUE: x_has_access = ' || x_has_access);
635: END IF;
636:
637: -- Get current user's resource_id

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

653:
654: IF (grants_csr%FOUND) THEN
655: x_has_access := FND_API.G_TRUE;
656:
657: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
658: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
659: 'IF (grants_csr%FOUND) THEN: TRUE: x_has_access = ' || x_has_access);
660: END IF;
661: ELSE

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

654: IF (grants_csr%FOUND) THEN
655: x_has_access := FND_API.G_TRUE;
656:
657: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
658: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
659: 'IF (grants_csr%FOUND) THEN: TRUE: x_has_access = ' || x_has_access);
660: END IF;
661: ELSE
662: x_has_access := FND_API.G_FALSE;

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

660: END IF;
661: ELSE
662: x_has_access := FND_API.G_FALSE;
663:
664: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
665: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
666: 'IF (grants_csr%FOUND) THEN: FALSE: x_has_access = ' || x_has_access);
667: END IF;
668: END IF;

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

661: ELSE
662: x_has_access := FND_API.G_FALSE;
663:
664: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
665: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
666: 'IF (grants_csr%FOUND) THEN: FALSE: x_has_access = ' || x_has_access);
667: END IF;
668: END IF;
669:

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

670: CLOSE grants_csr;
671: ELSE
672: x_has_access := FND_API.G_TRUE;
673:
674: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
676: 'IF (l_use_acl_flag = ''Y'') THEN: FALSE: x_has_access = ' || x_has_access);
677: END IF;
678: END IF; -- End of Use ACL flag check

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

671: ELSE
672: x_has_access := FND_API.G_TRUE;
673:
674: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
676: 'IF (l_use_acl_flag = ''Y'') THEN: FALSE: x_has_access = ' || x_has_access);
677: END IF;
678: END IF; -- End of Use ACL flag check
679:

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

684: END IF; -- End of intent profile check
685:
686: END IF; -- End of MO_GLOBAL check
687:
688: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
690: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
691: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
692: '111: x_has_access is: ' || x_has_access);

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

685:
686: END IF; -- End of MO_GLOBAL check
687:
688: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
690: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
691: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
692: '111: x_has_access is: ' || x_has_access);
693: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

687:
688: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
690: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
691: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
692: '111: x_has_access is: ' || x_has_access);
693: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
694: '112: x_return_status is: ' || x_return_status);
695: END IF;

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

689: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
690: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
691: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
692: '111: x_has_access is: ' || x_has_access);
693: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
694: '112: x_return_status is: ' || x_return_status);
695: END IF;
696:
697: EXCEPTION

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

706: IF (grants_csr%ISOPEN) THEN
707: CLOSE grants_csr ;
708: END IF;
709:
710: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
711: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
712: g_module || l_api_name || '.exception',
713: '115: Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
714: END IF;

Line 711: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

707: CLOSE grants_csr ;
708: END IF;
709:
710: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
711: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
712: g_module || l_api_name || '.exception',
713: '115: Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
714: END IF;
715: x_return_status := FND_API.G_RET_STS_ERROR;

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

729: IF (grants_csr%ISOPEN) THEN
730: CLOSE grants_csr ;
731: END IF;
732:
733: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
734: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
735: g_module || l_api_name || '.exception',
736: '116:Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
737: END IF;

Line 734: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

730: CLOSE grants_csr ;
731: END IF;
732:
733: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
734: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
735: g_module || l_api_name || '.exception',
736: '116:Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
737: END IF;
738: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

752: IF (grants_csr%ISOPEN) THEN
753: CLOSE grants_csr ;
754: END IF;
755:
756: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
757: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
758: g_module || l_api_name || '.exception',
759: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
760: END IF;

Line 757: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

753: CLOSE grants_csr ;
754: END IF;
755:
756: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
757: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
758: g_module || l_api_name || '.exception',
759: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
760: END IF;
761: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

799:
800: l_api_name := 'check_contract_access_external';
801: l_has_access := 'N';
802:
803: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
804: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
805: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
806: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
807: 'Contract Id is: ' || p_contract_id);

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

800: l_api_name := 'check_contract_access_external';
801: l_has_access := 'N';
802:
803: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
804: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
805: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
806: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
807: 'Contract Id is: ' || p_contract_id);
808: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

802:
803: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
804: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
805: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
806: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
807: 'Contract Id is: ' || p_contract_id);
808: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
809: 'Contract Type is: ' || p_contract_type);
810: END IF;

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

804: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
805: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
806: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
807: 'Contract Id is: ' || p_contract_id);
808: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
809: 'Contract Type is: ' || p_contract_type);
810: END IF;
811: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
812: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

807: 'Contract Id is: ' || p_contract_id);
808: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
809: 'Contract Type is: ' || p_contract_type);
810: END IF;
811: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
812: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
813: 'Calling OKC_REP_UTIL_PVT.has_contract_access');
814: END IF;
815: --- Call check_contract_access procedure.

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

808: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
809: 'Contract Type is: ' || p_contract_type);
810: END IF;
811: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
812: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
813: 'Calling OKC_REP_UTIL_PVT.has_contract_access');
814: END IF;
815: --- Call check_contract_access procedure.
816: check_contract_access_external(

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

822: x_msg_data => l_msg_data,
823: x_msg_count => l_msg_count,
824: x_return_status => l_return_status
825: );
826: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
827: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
828: 'OKC_REP_UTIL_PVT.check_contract_access return status is: '
829: || l_return_status);
830: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

823: x_msg_count => l_msg_count,
824: x_return_status => l_return_status
825: );
826: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
827: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
828: 'OKC_REP_UTIL_PVT.check_contract_access return status is: '
829: || l_return_status);
830: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
831: 'OKC_REP_UTIL_PVT.check_contract_access returns has_access as : '

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

826: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
827: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
828: 'OKC_REP_UTIL_PVT.check_contract_access return status is: '
829: || l_return_status);
830: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
831: 'OKC_REP_UTIL_PVT.check_contract_access returns has_access as : '
832: || l_has_access);
833: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
834: 'Leaving Function has_contract_access');

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

829: || l_return_status);
830: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
831: 'OKC_REP_UTIL_PVT.check_contract_access returns has_access as : '
832: || l_has_access);
833: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
834: 'Leaving Function has_contract_access');
835: END IF;
836: RETURN l_has_access ;
837:

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

836: RETURN l_has_access ;
837:
838: EXCEPTION
839: WHEN OTHERS THEN
840: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
841: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
842: 'Leaving Function has_contract_access because of EXCEPTION: '||sqlerrm);
843: END IF;
844: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 841: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

837:
838: EXCEPTION
839: WHEN OTHERS THEN
840: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
841: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
842: 'Leaving Function has_contract_access because of EXCEPTION: '||sqlerrm);
843: END IF;
844: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
845: p_msg_name => G_UNEXPECTED_ERROR,

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

883:
884: l_api_name := 'has_contract_access';
885: l_has_access := 'N';
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: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
890: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
891: 'Contract Id is: ' || p_contract_id);

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

884: l_api_name := 'has_contract_access';
885: l_has_access := 'N';
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: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
890: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
891: 'Contract Id is: ' || p_contract_id);
892: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

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: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
890: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
891: 'Contract Id is: ' || p_contract_id);
892: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
893: 'Access Function Name is: ' || p_function_name);
894: END IF;

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

888: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
889: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
890: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
891: 'Contract Id is: ' || p_contract_id);
892: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
893: 'Access Function Name is: ' || p_function_name);
894: END IF;
895: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
896: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

891: 'Contract Id is: ' || p_contract_id);
892: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
893: 'Access Function Name is: ' || p_function_name);
894: END IF;
895: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
896: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
897: 'Calling OKC_REP_UTIL_PVT.has_contract_access');
898: END IF;
899: --- Call check_contract_access procedure.

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

892: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
893: 'Access Function Name is: ' || p_function_name);
894: END IF;
895: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
896: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
897: 'Calling OKC_REP_UTIL_PVT.has_contract_access');
898: END IF;
899: --- Call check_contract_access procedure.
900: check_contract_access(

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

906: x_msg_data => l_msg_data,
907: x_msg_count => l_msg_count,
908: x_return_status => l_return_status
909: );
910: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
911: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
912: 'OKC_REP_UTIL_PVT.check_contract_access return status is: '
913: || l_return_status);
914: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

907: x_msg_count => l_msg_count,
908: x_return_status => l_return_status
909: );
910: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
911: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
912: 'OKC_REP_UTIL_PVT.check_contract_access return status is: '
913: || l_return_status);
914: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
915: 'OKC_REP_UTIL_PVT.check_contract_access returns has_access as : '

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

910: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
911: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
912: 'OKC_REP_UTIL_PVT.check_contract_access return status is: '
913: || l_return_status);
914: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
915: 'OKC_REP_UTIL_PVT.check_contract_access returns has_access as : '
916: || l_has_access);
917: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
918: 'Leaving Function has_contract_access');

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

913: || l_return_status);
914: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
915: 'OKC_REP_UTIL_PVT.check_contract_access returns has_access as : '
916: || l_has_access);
917: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
918: 'Leaving Function has_contract_access');
919: END IF;
920: RETURN l_has_access ;
921:

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

920: RETURN l_has_access ;
921:
922: EXCEPTION
923: WHEN OTHERS THEN
924: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
925: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
926: 'Leaving Function has_contract_access because of EXCEPTION: '||sqlerrm);
927: END IF;
928: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 925: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

921:
922: EXCEPTION
923: WHEN OTHERS THEN
924: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
925: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
926: 'Leaving Function has_contract_access because of EXCEPTION: '||sqlerrm);
927: END IF;
928: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
929: p_msg_name => G_UNEXPECTED_ERROR,

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

963: BEGIN
964:
965: l_api_name := 'change_contract_status';
966:
967: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
969: '200: Entered OKC_REP_UTIL_PVT.change_contract_status');
970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
971: '201: Contract Id is: ' || to_char(p_contract_id));

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

964:
965: l_api_name := 'change_contract_status';
966:
967: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
969: '200: Entered OKC_REP_UTIL_PVT.change_contract_status');
970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
971: '201: Contract Id is: ' || to_char(p_contract_id));
972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

966:
967: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
969: '200: Entered OKC_REP_UTIL_PVT.change_contract_status');
970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
971: '201: Contract Id is: ' || to_char(p_contract_id));
972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
973: '202: Contract version is: ' || p_contract_version);
974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
969: '200: Entered OKC_REP_UTIL_PVT.change_contract_status');
970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
971: '201: Contract Id is: ' || to_char(p_contract_id));
972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
973: '202: Contract version is: ' || p_contract_version);
974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
975: '203: Status code is: ' || p_status_code);
976: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
971: '201: Contract Id is: ' || to_char(p_contract_id));
972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
973: '202: Contract version is: ' || p_contract_version);
974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
975: '203: Status code is: ' || p_status_code);
976: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
977: '204: USer Id is: ' || to_char(p_user_id));
978: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
973: '202: Contract version is: ' || p_contract_version);
974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
975: '203: Status code is: ' || p_status_code);
976: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
977: '204: USer Id is: ' || to_char(p_user_id));
978: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
979: '205: Note is: ' || p_note);
980: END IF;

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

974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
975: '203: Status code is: ' || p_status_code);
976: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
977: '204: USer Id is: ' || to_char(p_user_id));
978: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
979: '205: Note is: ' || p_note);
980: END IF;
981:
982: -- Initialize message list if p_init_msg_list is set to TRUE.

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

986:
987: x_return_status := FND_API.G_RET_STS_SUCCESS;
988:
989:
990: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
991: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
992: g_module || l_api_name || '.begin',
993: 'Before updating Contract Status');
994: END IF;

Line 991: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

987: x_return_status := FND_API.G_RET_STS_SUCCESS;
988:
989:
990: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
991: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
992: g_module || l_api_name || '.begin',
993: 'Before updating Contract Status');
994: END IF;
995:

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

1000: contract_last_updated_by = FND_GLOBAL.user_id()
1001: WHERE contract_id = p_contract_id
1002: AND contract_version_num = p_contract_version;
1003:
1004: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1005: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1006: g_module || l_api_name,
1007: 'After updating Contract Status');
1008: END IF;

Line 1005: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1001: WHERE contract_id = p_contract_id
1002: AND contract_version_num = p_contract_version;
1003:
1004: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1005: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1006: g_module || l_api_name,
1007: 'After updating Contract Status');
1008: END IF;
1009:

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

1010: -- Log this status change into OKC_REP_CON_STATUS_HIST table
1011: IF (p_user_id IS NULL) THEN
1012: l_user_id := FND_GLOBAL.user_id();
1013:
1014: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1015: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1016: g_module || l_api_name || '.begin',
1017: 'Current user id' || l_user_id);
1018: END IF;

Line 1015: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1011: IF (p_user_id IS NULL) THEN
1012: l_user_id := FND_GLOBAL.user_id();
1013:
1014: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1015: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1016: g_module || l_api_name || '.begin',
1017: 'Current user id' || l_user_id);
1018: END IF;
1019:

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

1020: ELSE
1021: l_user_id := p_user_id;
1022: END IF; -- End of p_user_id IS NULL
1023:
1024: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1026: g_module || l_api_name,
1027: 'Before inserting a row into OKC_REP_CON_STATUS_HIST');
1028: END IF;

Line 1025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1021: l_user_id := p_user_id;
1022: END IF; -- End of p_user_id IS NULL
1023:
1024: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1026: g_module || l_api_name,
1027: 'Before inserting a row into OKC_REP_CON_STATUS_HIST');
1028: END IF;
1029:

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

1052: l_user_id,
1053: sysdate,
1054: l_user_id);
1055:
1056: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1057: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1058: g_module || l_api_name,
1059: 'After inserting a row into OKC_REP_CON_STATUS_HIST');
1060: END IF;

Line 1057: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1053: sysdate,
1054: l_user_id);
1055:
1056: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1057: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1058: g_module || l_api_name,
1059: 'After inserting a row into OKC_REP_CON_STATUS_HIST');
1060: END IF;
1061: EXCEPTION

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

1059: 'After inserting a row into OKC_REP_CON_STATUS_HIST');
1060: END IF;
1061: EXCEPTION
1062: WHEN FND_API.G_EXC_ERROR THEN
1063: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1064: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1065: g_module || l_api_name || '.exception',
1066: 'Leaving change_contract_status:FND_API.G_EXC_ERROR Exception');
1067: END IF;

Line 1064: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1060: END IF;
1061: EXCEPTION
1062: WHEN FND_API.G_EXC_ERROR THEN
1063: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1064: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1065: g_module || l_api_name || '.exception',
1066: 'Leaving change_contract_status:FND_API.G_EXC_ERROR Exception');
1067: END IF;
1068: x_return_status := FND_API.G_RET_STS_ERROR;

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

1070: p_count => x_msg_count,
1071: p_data => x_msg_data
1072: );
1073: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1074: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1075: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1076: g_module || l_api_name || '.exception',
1077: 'Leaving change_contract_status: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1078: END IF;

Line 1075: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1071: p_data => x_msg_data
1072: );
1073: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1074: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1075: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1076: g_module || l_api_name || '.exception',
1077: 'Leaving change_contract_status: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1078: END IF;
1079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1081: p_count => x_msg_count,
1082: p_data => x_msg_data
1083: );
1084: WHEN OTHERS THEN
1085: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1086: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1087: g_module || l_api_name || '.exception',
1088: 'Leaving change_contract_status because of EXCEPTION: ' || sqlerrm);
1089: END IF;

Line 1086: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1082: p_data => x_msg_data
1083: );
1084: WHEN OTHERS THEN
1085: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1086: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1087: g_module || l_api_name || '.exception',
1088: 'Leaving change_contract_status because of EXCEPTION: ' || sqlerrm);
1089: END IF;
1090: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

1143: BEGIN
1144:
1145: l_api_name := 'add_approval_hist_record';
1146:
1147: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1148: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1149: '300: Entered OKC_REP_UTIL_PVT.add_approval_hist_record');
1150: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1151: '301: Contract Id is: ' || to_char(p_contract_id));

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

1144:
1145: l_api_name := 'add_approval_hist_record';
1146:
1147: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1148: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1149: '300: Entered OKC_REP_UTIL_PVT.add_approval_hist_record');
1150: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1151: '301: Contract Id is: ' || to_char(p_contract_id));
1152: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1146:
1147: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1148: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1149: '300: Entered OKC_REP_UTIL_PVT.add_approval_hist_record');
1150: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1151: '301: Contract Id is: ' || to_char(p_contract_id));
1152: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1153: '302: Contract version is: ' || p_contract_version);
1154: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1148: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1149: '300: Entered OKC_REP_UTIL_PVT.add_approval_hist_record');
1150: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1151: '301: Contract Id is: ' || to_char(p_contract_id));
1152: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1153: '302: Contract version is: ' || p_contract_version);
1154: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1155: '303: Action code is: ' || p_action_code);
1156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1150: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1151: '301: Contract Id is: ' || to_char(p_contract_id));
1152: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1153: '302: Contract version is: ' || p_contract_version);
1154: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1155: '303: Action code is: ' || p_action_code);
1156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1157: '304: USer Id is: ' || to_char(p_user_id));
1158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1152: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1153: '302: Contract version is: ' || p_contract_version);
1154: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1155: '303: Action code is: ' || p_action_code);
1156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1157: '304: USer Id is: ' || to_char(p_user_id));
1158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1159: '305: Note is: ' || p_note);
1160: END IF;

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

1154: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1155: '303: Action code is: ' || p_action_code);
1156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1157: '304: USer Id is: ' || to_char(p_user_id));
1158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1159: '305: Note is: ' || p_note);
1160: END IF;
1161: -- Initialize message list if p_init_msg_list is set to TRUE.
1162: IF FND_API.to_Boolean( p_init_msg_list ) THEN

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

1164: END IF;
1165:
1166: x_return_status := FND_API.G_RET_STS_SUCCESS;
1167:
1168: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1169: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1170: g_module || l_api_name,
1171: 'Before inserting a row into OKC_REP_CON_APPROVALS');
1172: END IF;

Line 1169: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1165:
1166: x_return_status := FND_API.G_RET_STS_SUCCESS;
1167:
1168: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1169: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1170: g_module || l_api_name,
1171: 'Before inserting a row into OKC_REP_CON_APPROVALS');
1172: END IF;
1173:

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

1198: p_user_id,
1199: sysdate,
1200: p_user_id);
1201:
1202: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1203: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1204: g_module || l_api_name,
1205: 'After inserting a row into OKC_REP_CON_APPROVALS');
1206: END IF;

Line 1203: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1199: sysdate,
1200: p_user_id);
1201:
1202: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1203: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1204: g_module || l_api_name,
1205: 'After inserting a row into OKC_REP_CON_APPROVALS');
1206: END IF;
1207: EXCEPTION

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

1205: 'After inserting a row into OKC_REP_CON_APPROVALS');
1206: END IF;
1207: EXCEPTION
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1210: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1211: g_module || l_api_name || '.exception',
1212: 'Leaving add_approval_hist_record:FND_API.G_EXC_ERROR Exception');
1213: END IF;

Line 1210: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1206: END IF;
1207: EXCEPTION
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1210: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1211: g_module || l_api_name || '.exception',
1212: 'Leaving add_approval_hist_record:FND_API.G_EXC_ERROR Exception');
1213: END IF;
1214: x_return_status := FND_API.G_RET_STS_ERROR;

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

1216: p_count => x_msg_count,
1217: p_data => x_msg_data
1218: );
1219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1220: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1221: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1222: g_module || l_api_name || '.exception',
1223: 'Leaving add_approval_hist_record: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1224: END IF;

Line 1221: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1217: p_data => x_msg_data
1218: );
1219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1220: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1221: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1222: g_module || l_api_name || '.exception',
1223: 'Leaving add_approval_hist_record: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1224: END IF;
1225: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1227: p_count => x_msg_count,
1228: p_data => x_msg_data
1229: );
1230: WHEN OTHERS THEN
1231: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1233: g_module || l_api_name || '.exception',
1234: 'Leaving add_approval_hist_record because of EXCEPTION: ' || sqlerrm);
1235: END IF;

Line 1232: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1228: p_data => x_msg_data
1229: );
1230: WHEN OTHERS THEN
1231: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1233: g_module || l_api_name || '.exception',
1234: 'Leaving add_approval_hist_record because of EXCEPTION: ' || sqlerrm);
1235: END IF;
1236: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

1402: BEGIN
1403:
1404: l_api_name := 'validate_contract_party';
1405:
1406: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1407: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1408: 'Entered OKC_REP_WF_PVT.validate_contract_party');
1409: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1410: 'p_contract_id = ' || p_contract_id);

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

1403:
1404: l_api_name := 'validate_contract_party';
1405:
1406: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1407: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1408: 'Entered OKC_REP_WF_PVT.validate_contract_party');
1409: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1410: 'p_contract_id = ' || p_contract_id);
1411: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1405:
1406: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1407: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1408: 'Entered OKC_REP_WF_PVT.validate_contract_party');
1409: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1410: 'p_contract_id = ' || p_contract_id);
1411: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1412: 'p_intent = ' || p_intent);
1413: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1407: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1408: 'Entered OKC_REP_WF_PVT.validate_contract_party');
1409: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1410: 'p_contract_id = ' || p_contract_id);
1411: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1412: 'p_intent = ' || p_intent);
1413: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1414: 'p_party_role_code = ' || p_party_role_code);
1415: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1409: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1410: 'p_contract_id = ' || p_contract_id);
1411: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1412: 'p_intent = ' || p_intent);
1413: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1414: 'p_party_role_code = ' || p_party_role_code);
1415: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1416: 'p_party_role_txt = ' || p_party_role_txt);
1417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1411: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1412: 'p_intent = ' || p_intent);
1413: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1414: 'p_party_role_code = ' || p_party_role_code);
1415: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1416: 'p_party_role_txt = ' || p_party_role_txt);
1417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1418: 'p_party_id = ' || p_party_id);
1419: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1413: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1414: 'p_party_role_code = ' || p_party_role_code);
1415: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1416: 'p_party_role_txt = ' || p_party_role_txt);
1417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1418: 'p_party_id = ' || p_party_id);
1419: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1420: 'p_party_name = ' || p_party_name);
1421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1415: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1416: 'p_party_role_txt = ' || p_party_role_txt);
1417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1418: 'p_party_id = ' || p_party_id);
1419: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1420: 'p_party_name = ' || p_party_name);
1421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1422: 'p_location_id = ' || p_location_id);
1423: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1418: 'p_party_id = ' || p_party_id);
1419: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1420: 'p_party_name = ' || p_party_name);
1421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1422: 'p_location_id = ' || p_location_id);
1423: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1424: 'p_mode = ' || p_mode);
1425: END IF;

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

1419: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1420: 'p_party_name = ' || p_party_name);
1421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1422: 'p_location_id = ' || p_location_id);
1423: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1424: 'p_mode = ' || p_mode);
1425: END IF;
1426:
1427: -- Standard call to check for call compatibility.

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

1438: x_return_status := FND_API.G_RET_STS_SUCCESS;
1439:
1440: x_valid_party_flag := 'Y';
1441:
1442: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1443: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1444: 'Validating Contract Party for ' || p_mode || ' module');
1445: END IF;
1446:

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

1439:
1440: x_valid_party_flag := 'Y';
1441:
1442: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1443: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1444: 'Validating Contract Party for ' || p_mode || ' module');
1445: END IF;
1446:
1447: IF(p_mode = G_P_MODE_IMPORT) THEN

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

1446:
1447: IF(p_mode = G_P_MODE_IMPORT) THEN
1448:
1449: -- Check existence of the party role
1450: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1451: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1452: 'Checking existence of the party role');
1453: END IF;
1454:

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

1447: IF(p_mode = G_P_MODE_IMPORT) THEN
1448:
1449: -- Check existence of the party role
1450: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1451: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1452: 'Checking existence of the party role');
1453: END IF;
1454:
1455: OPEN party_role_exist_csr;

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

1455: OPEN party_role_exist_csr;
1456: FETCH party_role_exist_csr INTO p_party_role_code;
1457:
1458: IF party_role_exist_csr%NOTFOUND THEN
1459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1460: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1461: 'Party role not found');
1462: END IF;
1463:

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

1456: FETCH party_role_exist_csr INTO p_party_role_code;
1457:
1458: IF party_role_exist_csr%NOTFOUND THEN
1459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1460: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1461: 'Party role not found');
1462: END IF;
1463:
1464: CLOSE party_role_exist_csr;

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

1465:
1466: x_valid_party_flag := 'N';
1467: x_error_code := 'ROLE_NOT_EXIST';
1468:
1469: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1470: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1471: 'x_valid_party_flag: ' || x_valid_party_flag);
1472: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1473: 'x_error_code: ' || x_error_code);

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

1466: x_valid_party_flag := 'N';
1467: x_error_code := 'ROLE_NOT_EXIST';
1468:
1469: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1470: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1471: 'x_valid_party_flag: ' || x_valid_party_flag);
1472: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1473: 'x_error_code: ' || x_error_code);
1474: END IF;

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

1468:
1469: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1470: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1471: 'x_valid_party_flag: ' || x_valid_party_flag);
1472: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1473: 'x_error_code: ' || x_error_code);
1474: END IF;
1475:
1476: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1475:
1476: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1477: p_data => x_msg_data);
1478:
1479: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1480: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1481: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1482: END IF;
1483:

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

1476: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1477: p_data => x_msg_data);
1478:
1479: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1480: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1481: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1482: END IF;
1483:
1484: return;

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

1485: END IF;
1486:
1487: CLOSE party_role_exist_csr;
1488:
1489: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1490: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1491: 'Party Role found with code ' || p_party_role_code);
1492: END IF;
1493:

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

1486:
1487: CLOSE party_role_exist_csr;
1488:
1489: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1490: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1491: 'Party Role found with code ' || p_party_role_code);
1492: END IF;
1493:
1494:

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

1492: END IF;
1493:
1494:
1495: -- Check validity of the party role and contract intent combination
1496: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1497: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1498: 'Checking validity of the party role and contract intent combination');
1499: END IF;
1500:

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

1493:
1494:
1495: -- Check validity of the party role and contract intent combination
1496: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1497: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1498: 'Checking validity of the party role and contract intent combination');
1499: END IF;
1500:
1501: OPEN party_role_valid_csr;

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

1501: OPEN party_role_valid_csr;
1502: FETCH party_role_valid_csr INTO l_temp;
1503:
1504: IF party_role_valid_csr%NOTFOUND THEN
1505: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1506: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1507: 'Party role and contract intent combination is invalid');
1508: END IF;
1509:

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

1502: FETCH party_role_valid_csr INTO l_temp;
1503:
1504: IF party_role_valid_csr%NOTFOUND THEN
1505: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1506: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1507: 'Party role and contract intent combination is invalid');
1508: END IF;
1509:
1510: CLOSE party_role_valid_csr;

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

1511:
1512: x_valid_party_flag := 'N';
1513: x_error_code := 'INV_ROLE_INTENT';
1514:
1515: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1516: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1517: 'x_valid_party_flag: ' || x_valid_party_flag);
1518: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1519: 'x_error_code: ' || x_error_code);

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

1512: x_valid_party_flag := 'N';
1513: x_error_code := 'INV_ROLE_INTENT';
1514:
1515: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1516: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1517: 'x_valid_party_flag: ' || x_valid_party_flag);
1518: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1519: 'x_error_code: ' || x_error_code);
1520: END IF;

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

1514:
1515: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1516: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1517: 'x_valid_party_flag: ' || x_valid_party_flag);
1518: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1519: 'x_error_code: ' || x_error_code);
1520: END IF;
1521:
1522: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1521:
1522: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1523: p_data => x_msg_data);
1524:
1525: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1526: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1527: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1528: END IF;
1529:

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

1522: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1523: p_data => x_msg_data);
1524:
1525: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1526: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1527: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1528: END IF;
1529:
1530: return;

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

1531: END IF;
1532:
1533: CLOSE party_role_valid_csr;
1534:
1535: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1536: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1537: 'Party role and contract intent combination is valid');
1538: END IF;
1539:

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

1532:
1533: CLOSE party_role_valid_csr;
1534:
1535: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1536: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1537: 'Party role and contract intent combination is valid');
1538: END IF;
1539:
1540: -- Check existence of the party

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

1537: 'Party role and contract intent combination is valid');
1538: END IF;
1539:
1540: -- Check existence of the party
1541: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1542: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1543: 'Checking existence of the party');
1544: END IF;
1545:

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

1538: END IF;
1539:
1540: -- Check existence of the party
1541: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1542: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1543: 'Checking existence of the party');
1544: END IF;
1545:
1546: IF (p_party_role_code = 'INTERNAL_ORG') THEN

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

1548: OPEN internal_party_exist_csr;
1549: FETCH internal_party_exist_csr INTO p_party_id;
1550:
1551: IF internal_party_exist_csr%NOTFOUND THEN
1552: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1553: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1554: 'Party not found');
1555: END IF;
1556:

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

1549: FETCH internal_party_exist_csr INTO p_party_id;
1550:
1551: IF internal_party_exist_csr%NOTFOUND THEN
1552: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1553: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1554: 'Party not found');
1555: END IF;
1556:
1557: CLOSE internal_party_exist_csr;

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

1558:
1559: x_valid_party_flag := 'N';
1560: x_error_code := 'PARTY_NOT_EXIST';
1561:
1562: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1564: 'x_valid_party_flag: ' || x_valid_party_flag);
1565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1566: 'x_error_code: ' || x_error_code);

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

1559: x_valid_party_flag := 'N';
1560: x_error_code := 'PARTY_NOT_EXIST';
1561:
1562: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1564: 'x_valid_party_flag: ' || x_valid_party_flag);
1565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1566: 'x_error_code: ' || x_error_code);
1567: END IF;

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

1561:
1562: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1564: 'x_valid_party_flag: ' || x_valid_party_flag);
1565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1566: 'x_error_code: ' || x_error_code);
1567: END IF;
1568:
1569: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1568:
1569: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1570: p_data => x_msg_data);
1571:
1572: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1573: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1574: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1575: END IF;
1576:

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

1569: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1570: p_data => x_msg_data);
1571:
1572: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1573: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1574: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1575: END IF;
1576:
1577: return;

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

1585: OPEN tca_party_exist_csr;
1586: FETCH tca_party_exist_csr INTO p_party_id;
1587:
1588: IF tca_party_exist_csr%NOTFOUND THEN
1589: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1590: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1591: 'Party not found');
1592: END IF;
1593:

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

1586: FETCH tca_party_exist_csr INTO p_party_id;
1587:
1588: IF tca_party_exist_csr%NOTFOUND THEN
1589: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1590: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1591: 'Party not found');
1592: END IF;
1593:
1594: CLOSE tca_party_exist_csr;

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

1595:
1596: x_valid_party_flag := 'N';
1597: x_error_code := 'PARTY_NOT_EXIST';
1598:
1599: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1600: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1601: 'x_valid_party_flag: ' || x_valid_party_flag);
1602: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1603: 'x_error_code: ' || x_error_code);

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

1596: x_valid_party_flag := 'N';
1597: x_error_code := 'PARTY_NOT_EXIST';
1598:
1599: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1600: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1601: 'x_valid_party_flag: ' || x_valid_party_flag);
1602: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1603: 'x_error_code: ' || x_error_code);
1604: END IF;

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

1598:
1599: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1600: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1601: 'x_valid_party_flag: ' || x_valid_party_flag);
1602: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1603: 'x_error_code: ' || x_error_code);
1604: END IF;
1605:
1606: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1605:
1606: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1607: p_data => x_msg_data);
1608:
1609: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1610: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1611: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1612: END IF;
1613:

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

1606: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1607: p_data => x_msg_data);
1608:
1609: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1610: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1611: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1612: END IF;
1613:
1614: return;

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

1626:
1627: x_valid_party_flag := 'N';
1628: x_error_code := 'PARTY_NOT_EXIST';
1629:
1630: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1631: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1632: 'x_valid_party_flag: ' || x_valid_party_flag);
1633: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1634: 'x_error_code: ' || x_error_code);

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

1627: x_valid_party_flag := 'N';
1628: x_error_code := 'PARTY_NOT_EXIST';
1629:
1630: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1631: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1632: 'x_valid_party_flag: ' || x_valid_party_flag);
1633: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1634: 'x_error_code: ' || x_error_code);
1635: END IF;

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

1629:
1630: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1631: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1632: 'x_valid_party_flag: ' || x_valid_party_flag);
1633: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1634: 'x_error_code: ' || x_error_code);
1635: END IF;
1636:
1637: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1636:
1637: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1638: p_data => x_msg_data);
1639:
1640: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1641: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1642: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1643: END IF;
1644:

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

1637: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1638: p_data => x_msg_data);
1639:
1640: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1641: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1642: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1643: END IF;
1644:
1645: return;

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

1648: CLOSE vendor_exist_csr;
1649:
1650: END IF;
1651:
1652: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1653: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1654: 'Party found with id ' || p_party_id);
1655: END IF;
1656:

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

1649:
1650: END IF;
1651:
1652: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1653: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1654: 'Party found with id ' || p_party_id);
1655: END IF;
1656:
1657: END IF; -- End of p_mode = 'IMPORT'

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

1657: END IF; -- End of p_mode = 'IMPORT'
1658:
1659:
1660: -- If p_mode = 'AUTHORING', then check uniqueness of the contract party in the repository table
1661: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1662: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1663: 'Checking uniqueness of the party in contract');
1664: END IF;
1665:

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

1658:
1659:
1660: -- If p_mode = 'AUTHORING', then check uniqueness of the contract party in the repository table
1661: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1662: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1663: 'Checking uniqueness of the party in contract');
1664: END IF;
1665:
1666: IF (p_mode = G_P_MODE_AUTHORING) THEN

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

1674: FETCH rep_party_unique_csr INTO l_temp;
1675:
1676: IF (rep_party_unique_csr%FOUND) THEN
1677:
1678: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1679: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1680: 'Party already exist in the contract');
1681: END IF;
1682:

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

1675:
1676: IF (rep_party_unique_csr%FOUND) THEN
1677:
1678: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1679: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1680: 'Party already exist in the contract');
1681: END IF;
1682:
1683: CLOSE rep_party_unique_csr;

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

1684:
1685: x_valid_party_flag := 'N';
1686: x_error_code := 'PARTY_NOT_UNIQUE';
1687:
1688: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1689: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1690: 'x_valid_party_flag: ' || x_valid_party_flag);
1691: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1692: 'x_error_code: ' || x_error_code);

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

1685: x_valid_party_flag := 'N';
1686: x_error_code := 'PARTY_NOT_UNIQUE';
1687:
1688: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1689: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1690: 'x_valid_party_flag: ' || x_valid_party_flag);
1691: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1692: 'x_error_code: ' || x_error_code);
1693: END IF;

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

1687:
1688: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1689: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1690: 'x_valid_party_flag: ' || x_valid_party_flag);
1691: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1692: 'x_error_code: ' || x_error_code);
1693: END IF;
1694:
1695: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1694:
1695: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1696: p_data => x_msg_data);
1697:
1698: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1699: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1700: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1701: END IF;
1702:

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

1695: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1696: p_data => x_msg_data);
1697:
1698: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1699: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1700: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1701: END IF;
1702:
1703: return;

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

1714: FETCH imp_party_unique_csr INTO p_party_id;
1715:
1716: IF imp_party_unique_csr%FOUND THEN
1717:
1718: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1719: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1720: 'Party already exist in the contract');
1721: END IF;
1722:

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

1715:
1716: IF imp_party_unique_csr%FOUND THEN
1717:
1718: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1719: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1720: 'Party already exist in the contract');
1721: END IF;
1722:
1723: CLOSE imp_party_unique_csr;

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

1724:
1725: x_valid_party_flag := 'N';
1726: x_error_code := 'PARTY_NOT_UNIQUE';
1727:
1728: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1729: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1730: 'x_valid_party_flag: ' || x_valid_party_flag);
1731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1732: 'x_error_code: ' || x_error_code);

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

1725: x_valid_party_flag := 'N';
1726: x_error_code := 'PARTY_NOT_UNIQUE';
1727:
1728: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1729: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1730: 'x_valid_party_flag: ' || x_valid_party_flag);
1731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1732: 'x_error_code: ' || x_error_code);
1733: END IF;

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

1727:
1728: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1729: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1730: 'x_valid_party_flag: ' || x_valid_party_flag);
1731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1732: 'x_error_code: ' || x_error_code);
1733: END IF;
1734:
1735: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1734:
1735: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1736: p_data => x_msg_data);
1737:
1738: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1739: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1740: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1741: END IF;
1742:

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

1735: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1736: p_data => x_msg_data);
1737:
1738: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1739: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1740: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1741: END IF;
1742:
1743: return;

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

1746: CLOSE imp_party_unique_csr;
1747:
1748: END IF;
1749:
1750: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1751: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1752: 'Party is unique in the contract');
1753: END IF;
1754:

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

1747:
1748: END IF;
1749:
1750: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1751: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1752: 'Party is unique in the contract');
1753: END IF;
1754:
1755: IF (p_mode = G_P_MODE_AUTHORING) THEN

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

1754:
1755: IF (p_mode = G_P_MODE_AUTHORING) THEN
1756:
1757: -- Check validity of party role and party combination
1758: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1759: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1760: 'Checking validity of party role and party combination');
1761: END IF;
1762:

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

1755: IF (p_mode = G_P_MODE_AUTHORING) THEN
1756:
1757: -- Check validity of party role and party combination
1758: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1759: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1760: 'Checking validity of party role and party combination');
1761: END IF;
1762:
1763: IF (p_party_role_code = G_PARTY_ROLE_INTERNAL) THEN

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

1766: FETCH internal_party_and_role_csr INTO l_temp;
1767:
1768: IF internal_party_and_role_csr%NOTFOUND THEN
1769:
1770: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1771: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1772: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table HR_ALL_ORGANIZATION_UNITS');
1773: END IF;
1774:

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

1767:
1768: IF internal_party_and_role_csr%NOTFOUND THEN
1769:
1770: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1771: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1772: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table HR_ALL_ORGANIZATION_UNITS');
1773: END IF;
1774:
1775: CLOSE internal_party_and_role_csr;

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

1776:
1777: x_valid_party_flag := 'N';
1778: x_error_code := 'INV_ROLE_PARTY';
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: 'x_valid_party_flag: ' || x_valid_party_flag);
1783: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1784: 'x_error_code: ' || x_error_code);

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

1777: x_valid_party_flag := 'N';
1778: x_error_code := 'INV_ROLE_PARTY';
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: 'x_valid_party_flag: ' || x_valid_party_flag);
1783: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1784: 'x_error_code: ' || x_error_code);
1785: END IF;

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

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: 'x_valid_party_flag: ' || x_valid_party_flag);
1783: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1784: 'x_error_code: ' || x_error_code);
1785: END IF;
1786:
1787: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1786:
1787: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1788: p_data => x_msg_data);
1789:
1790: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1791: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1792: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1793: END IF;
1794:

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

1787: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1788: p_data => x_msg_data);
1789:
1790: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1791: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1792: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1793: END IF;
1794:
1795: return;

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

1804: FETCH tca_party_and_role_csr INTO l_temp;
1805:
1806: IF tca_party_and_role_csr%NOTFOUND THEN
1807:
1808: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1809: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1810: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table HZ_PARTIES');
1811: END IF;
1812:

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

1805:
1806: IF tca_party_and_role_csr%NOTFOUND THEN
1807:
1808: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1809: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1810: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table HZ_PARTIES');
1811: END IF;
1812:
1813: CLOSE tca_party_and_role_csr;

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

1814:
1815: x_valid_party_flag := 'N';
1816: x_error_code := 'INV_ROLE_PARTY';
1817:
1818: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1819: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1820: 'x_valid_party_flag: ' || x_valid_party_flag);
1821: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1822: 'x_error_code: ' || x_error_code);

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

1815: x_valid_party_flag := 'N';
1816: x_error_code := 'INV_ROLE_PARTY';
1817:
1818: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1819: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1820: 'x_valid_party_flag: ' || x_valid_party_flag);
1821: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1822: 'x_error_code: ' || x_error_code);
1823: END IF;

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

1817:
1818: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1819: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1820: 'x_valid_party_flag: ' || x_valid_party_flag);
1821: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1822: 'x_error_code: ' || x_error_code);
1823: END IF;
1824:
1825: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1824:
1825: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1826: p_data => x_msg_data);
1827:
1828: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1829: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1830: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1831: END IF;
1832:

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

1825: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1826: p_data => x_msg_data);
1827:
1828: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1829: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1830: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1831: END IF;
1832:
1833: return;

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

1841: FETCH vendor_and_role_csr INTO l_temp;
1842:
1843: IF vendor_and_role_csr%NOTFOUND THEN
1844:
1845: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1846: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1847: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table PO_VENDORS');
1848: END IF;
1849:

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

1842:
1843: IF vendor_and_role_csr%NOTFOUND THEN
1844:
1845: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1846: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1847: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table PO_VENDORS');
1848: END IF;
1849:
1850: CLOSE vendor_and_role_csr;

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

1851:
1852: x_valid_party_flag := 'N';
1853: x_error_code := 'INV_ROLE_PARTY';
1854:
1855: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1856: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1857: 'x_valid_party_flag: ' || x_valid_party_flag);
1858: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1859: 'x_error_code: ' || x_error_code);

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

1852: x_valid_party_flag := 'N';
1853: x_error_code := 'INV_ROLE_PARTY';
1854:
1855: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1856: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1857: 'x_valid_party_flag: ' || x_valid_party_flag);
1858: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1859: 'x_error_code: ' || x_error_code);
1860: END IF;

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

1854:
1855: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1856: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1857: 'x_valid_party_flag: ' || x_valid_party_flag);
1858: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1859: 'x_error_code: ' || x_error_code);
1860: END IF;
1861:
1862: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1861:
1862: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1863: p_data => x_msg_data);
1864:
1865: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1866: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1867: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1868: END IF;
1869:

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

1862: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1863: p_data => x_msg_data);
1864:
1865: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1866: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1867: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1868: END IF;
1869:
1870: return;

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

1873: CLOSE vendor_and_role_csr;
1874:
1875: END IF;
1876:
1877: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1879: 'Party role and party combination is valid');
1880: END IF;
1881:

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

1874:
1875: END IF;
1876:
1877: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1879: 'Party role and party combination is valid');
1880: END IF;
1881:
1882: -- Check validity of party and location combination

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

1879: 'Party role and party combination is valid');
1880: END IF;
1881:
1882: -- Check validity of party and location combination
1883: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1884: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1885: 'Checking validity of party role and party address combination');
1886: END IF;
1887:

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

1880: END IF;
1881:
1882: -- Check validity of party and location combination
1883: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1884: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1885: 'Checking validity of party role and party address combination');
1886: END IF;
1887:
1888: -- Bug 4247146. Added null check for party location id as the Party

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

1895: FETCH tca_location_valid_csr INTO l_temp;
1896:
1897: IF tca_location_valid_csr%NOTFOUND THEN
1898:
1899: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1900: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1901: 'Party role and party address combination is invalid');
1902: END IF;
1903:

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

1896:
1897: IF tca_location_valid_csr%NOTFOUND THEN
1898:
1899: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1900: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1901: 'Party role and party address combination is invalid');
1902: END IF;
1903:
1904: CLOSE tca_location_valid_csr;

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

1905:
1906: x_valid_party_flag := 'N';
1907: x_error_code := 'INV_ROLE_LOCATION';
1908:
1909: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1910: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1911: 'x_valid_party_flag: ' || x_valid_party_flag);
1912: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1913: 'x_error_code: ' || x_error_code);

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

1906: x_valid_party_flag := 'N';
1907: x_error_code := 'INV_ROLE_LOCATION';
1908:
1909: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1910: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1911: 'x_valid_party_flag: ' || x_valid_party_flag);
1912: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1913: 'x_error_code: ' || x_error_code);
1914: END IF;

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

1908:
1909: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1910: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1911: 'x_valid_party_flag: ' || x_valid_party_flag);
1912: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1913: 'x_error_code: ' || x_error_code);
1914: END IF;
1915:
1916: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1915:
1916: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1917: p_data => x_msg_data);
1918:
1919: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1920: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1921: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1922: END IF;
1923:

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

1916: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1917: p_data => x_msg_data);
1918:
1919: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1920: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1921: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1922: END IF;
1923:
1924: return;

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

1933: FETCH vendor_location_valid_csr INTO l_temp;
1934:
1935: IF vendor_location_valid_csr%NOTFOUND THEN
1936:
1937: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1938: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1939: 'Party role and party address combination is invalid');
1940: END IF;
1941:

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

1934:
1935: IF vendor_location_valid_csr%NOTFOUND THEN
1936:
1937: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1938: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1939: 'Party role and party address combination is invalid');
1940: END IF;
1941:
1942: CLOSE vendor_location_valid_csr;

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

1943:
1944: x_valid_party_flag := 'N';
1945: x_error_code := 'INV_ROLE_LOCATION';
1946:
1947: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1948: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1949: 'x_valid_party_flag: ' || x_valid_party_flag);
1950: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1951: 'x_error_code: ' || x_error_code);

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

1944: x_valid_party_flag := 'N';
1945: x_error_code := 'INV_ROLE_LOCATION';
1946:
1947: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1948: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1949: 'x_valid_party_flag: ' || x_valid_party_flag);
1950: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1951: 'x_error_code: ' || x_error_code);
1952: END IF;

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

1946:
1947: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1948: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1949: 'x_valid_party_flag: ' || x_valid_party_flag);
1950: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1951: 'x_error_code: ' || x_error_code);
1952: END IF;
1953:
1954: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1953:
1954: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1955: p_data => x_msg_data);
1956:
1957: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1958: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1959: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1960: END IF;
1961:

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

1954: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1955: p_data => x_msg_data);
1956:
1957: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1958: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1959: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1960: END IF;
1961:
1962: return;

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

1965: CLOSE vendor_location_valid_csr;
1966:
1967: END IF;
1968:
1969: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1970: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1971: 'Party role and party address combination is valid');
1972: END IF;
1973:

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

1966:
1967: END IF;
1968:
1969: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1970: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1971: 'Party role and party address combination is valid');
1972: END IF;
1973:
1974: END IF; -- End of p_mode = 'AUTHORING'

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

2015: IF (vendor_location_valid_csr%ISOPEN) THEN
2016: CLOSE vendor_location_valid_csr ;
2017: END IF;
2018:
2019: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2020: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2021: 'Leaving validate_contract_party:FND_API.G_EXC_ERROR Exception');
2022: END IF;
2023:

Line 2020: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2016: CLOSE vendor_location_valid_csr ;
2017: END IF;
2018:
2019: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2020: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2021: 'Leaving validate_contract_party:FND_API.G_EXC_ERROR Exception');
2022: END IF;
2023:
2024: x_return_status := FND_API.G_RET_STS_ERROR;

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

2064: IF (vendor_location_valid_csr%ISOPEN) THEN
2065: CLOSE vendor_location_valid_csr ;
2066: END IF;
2067:
2068: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2069: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2070: 'Leaving validate_contract_party:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2071: END IF;
2072:

Line 2069: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2065: CLOSE vendor_location_valid_csr ;
2066: END IF;
2067:
2068: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2069: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2070: 'Leaving validate_contract_party:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2071: END IF;
2072:
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

2113: IF (vendor_location_valid_csr%ISOPEN) THEN
2114: CLOSE vendor_location_valid_csr ;
2115: END IF;
2116:
2117: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2118: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2119: 'Leaving validate_contract_party because of EXCEPTION: ' || sqlerrm);
2120: END IF;
2121:

Line 2118: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2114: CLOSE vendor_location_valid_csr ;
2115: END IF;
2116:
2117: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2118: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2119: 'Leaving validate_contract_party because of EXCEPTION: ' || sqlerrm);
2120: END IF;
2121:
2122: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

2226: BEGIN
2227:
2228: l_api_name := 'validate_party_contact';
2229:
2230: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2231: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2232: 'Entered OKC_REP_WF_PVT.validate_party_contact');
2233: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2234: 'p_contract_id = ' || p_contract_id);

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

2227:
2228: l_api_name := 'validate_party_contact';
2229:
2230: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2231: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2232: 'Entered OKC_REP_WF_PVT.validate_party_contact');
2233: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2234: 'p_contract_id = ' || p_contract_id);
2235: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2229:
2230: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2231: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2232: 'Entered OKC_REP_WF_PVT.validate_party_contact');
2233: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2234: 'p_contract_id = ' || p_contract_id);
2235: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2236: 'p_party_role_code = ' || p_party_role_code);
2237: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2231: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2232: 'Entered OKC_REP_WF_PVT.validate_party_contact');
2233: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2234: 'p_contract_id = ' || p_contract_id);
2235: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2236: 'p_party_role_code = ' || p_party_role_code);
2237: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2238: 'p_party_id = ' || p_party_id);
2239: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2233: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2234: 'p_contract_id = ' || p_contract_id);
2235: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2236: 'p_party_role_code = ' || p_party_role_code);
2237: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2238: 'p_party_id = ' || p_party_id);
2239: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2240: 'p_contact_id = ' || p_contact_id);
2241: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2235: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2236: 'p_party_role_code = ' || p_party_role_code);
2237: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2238: 'p_party_id = ' || p_party_id);
2239: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2240: 'p_contact_id = ' || p_contact_id);
2241: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2242: 'p_contact_name = ' || p_contact_name);
2243: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2237: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2238: 'p_party_id = ' || p_party_id);
2239: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2240: 'p_contact_id = ' || p_contact_id);
2241: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2242: 'p_contact_name = ' || p_contact_name);
2243: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2244: 'p_contact_role_id = ' || p_contact_role_id);
2245: END IF;

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

2239: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2240: 'p_contact_id = ' || p_contact_id);
2241: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2242: 'p_contact_name = ' || p_contact_name);
2243: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2244: 'p_contact_role_id = ' || p_contact_role_id);
2245: END IF;
2246:
2247: -- Standard call to check for call compatibility.

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

2259:
2260: x_valid_contact_flag := 'Y';
2261:
2262: -- Check uniqueness of the party contact
2263: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2264: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2265: 'Checking uniqueness of the party contact');
2266: END IF;
2267:

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

2260: x_valid_contact_flag := 'Y';
2261:
2262: -- Check uniqueness of the party contact
2263: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2264: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2265: 'Checking uniqueness of the party contact');
2266: END IF;
2267:
2268: OPEN contact_unique_csr;

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

2269: FETCH contact_unique_csr INTO l_temp;
2270:
2271: IF (contact_unique_csr%FOUND) THEN
2272:
2273: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2274: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2275: 'Contact already exist in the party');
2276: END IF;
2277:

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

2270:
2271: IF (contact_unique_csr%FOUND) THEN
2272:
2273: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2274: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2275: 'Contact already exist in the party');
2276: END IF;
2277:
2278: CLOSE contact_unique_csr;

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

2279:
2280: x_valid_contact_flag := 'N';
2281: x_error_code := 'CONTACT_NOT_UNIQUE';
2282:
2283: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2284: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2285: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2287: 'x_error_code: ' || x_error_code);

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

2280: x_valid_contact_flag := 'N';
2281: x_error_code := 'CONTACT_NOT_UNIQUE';
2282:
2283: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2284: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2285: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2287: 'x_error_code: ' || x_error_code);
2288: END IF;

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

2282:
2283: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2284: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2285: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2287: 'x_error_code: ' || x_error_code);
2288: END IF;
2289:
2290: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2289:
2290: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2291: p_data => x_msg_data);
2292:
2293: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2294: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2295: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2296: END IF;
2297:

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

2290: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2291: p_data => x_msg_data);
2292:
2293: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2294: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2295: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2296: END IF;
2297:
2298: return;

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

2303:
2304:
2305:
2306: -- Check validity of party and contact combination
2307: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2308: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2309: 'Checking validity of party and contact combination');
2310: END IF;
2311:

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

2304:
2305:
2306: -- Check validity of party and contact combination
2307: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2308: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2309: 'Checking validity of party and contact combination');
2310: END IF;
2311:
2312: IF (p_party_role_code = G_PARTY_ROLE_INTERNAL) THEN

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

2315: FETCH internal_party_contact_csr INTO l_temp;
2316:
2317: IF (internal_party_contact_csr%NOTFOUND) THEN
2318:
2319: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2321: 'Combination of party and contact is invalid');
2322: END IF;
2323:

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

2316:
2317: IF (internal_party_contact_csr%NOTFOUND) THEN
2318:
2319: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2321: 'Combination of party and contact is invalid');
2322: END IF;
2323:
2324: CLOSE internal_party_contact_csr;

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

2325:
2326: x_valid_contact_flag := 'N';
2327: x_error_code := 'CONTACT_NOT_EXIST';
2328:
2329: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2330: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2331: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2332: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2333: 'x_error_code: ' || x_error_code);

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

2326: x_valid_contact_flag := 'N';
2327: x_error_code := 'CONTACT_NOT_EXIST';
2328:
2329: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2330: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2331: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2332: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2333: 'x_error_code: ' || x_error_code);
2334: END IF;

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

2328:
2329: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2330: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2331: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2332: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2333: 'x_error_code: ' || x_error_code);
2334: END IF;
2335:
2336: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2335:
2336: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2337: p_data => x_msg_data);
2338:
2339: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2340: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2341: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2342: END IF;
2343:

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

2336: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2337: p_data => x_msg_data);
2338:
2339: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2340: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2341: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2342: END IF;
2343:
2344: return;

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

2354: FETCH tca_party_contact_csr INTO l_temp;
2355:
2356: IF (tca_party_contact_csr%NOTFOUND) THEN
2357:
2358: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2359: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2360: 'Combination of party and contact is invalid');
2361: END IF;
2362:

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

2355:
2356: IF (tca_party_contact_csr%NOTFOUND) THEN
2357:
2358: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2359: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2360: 'Combination of party and contact is invalid');
2361: END IF;
2362:
2363: CLOSE tca_party_contact_csr;

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

2364:
2365: x_valid_contact_flag := 'N';
2366: x_error_code := 'CONTACT_NOT_EXIST';
2367:
2368: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2369: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2370: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2371: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2372: 'x_error_code: ' || x_error_code);

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

2365: x_valid_contact_flag := 'N';
2366: x_error_code := 'CONTACT_NOT_EXIST';
2367:
2368: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2369: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2370: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2371: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2372: 'x_error_code: ' || x_error_code);
2373: END IF;

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

2367:
2368: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2369: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2370: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2371: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2372: 'x_error_code: ' || x_error_code);
2373: END IF;
2374:
2375: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2374:
2375: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2376: p_data => x_msg_data);
2377:
2378: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2379: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2380: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2381: END IF;
2382:

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

2375: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2376: p_data => x_msg_data);
2377:
2378: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2379: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2380: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2381: END IF;
2382:
2383: return;

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

2392: FETCH vendor_party_contact_csr INTO l_temp;
2393:
2394: IF (vendor_party_contact_csr%NOTFOUND) THEN
2395:
2396: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2397: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2398: 'Combination of party and contact is invalid');
2399: END IF;
2400:

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

2393:
2394: IF (vendor_party_contact_csr%NOTFOUND) THEN
2395:
2396: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2397: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2398: 'Combination of party and contact is invalid');
2399: END IF;
2400:
2401: CLOSE vendor_party_contact_csr;

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

2402:
2403: x_valid_contact_flag := 'N';
2404: x_error_code := 'CONTACT_NOT_EXIST';
2405:
2406: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2407: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2408: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2409: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2410: 'x_error_code: ' || x_error_code);

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

2403: x_valid_contact_flag := 'N';
2404: x_error_code := 'CONTACT_NOT_EXIST';
2405:
2406: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2407: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2408: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2409: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2410: 'x_error_code: ' || x_error_code);
2411: END IF;

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

2405:
2406: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2407: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2408: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2409: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2410: 'x_error_code: ' || x_error_code);
2411: END IF;
2412:
2413: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2412:
2413: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2414: p_data => x_msg_data);
2415:
2416: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2418: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2419: END IF;
2420:

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

2413: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2414: p_data => x_msg_data);
2415:
2416: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2417: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2418: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2419: END IF;
2420:
2421: return;

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

2425: CLOSE vendor_party_contact_csr;
2426:
2427: END IF;
2428:
2429: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2430: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2431: 'Party and contact combination is valid');
2432: END IF;
2433:

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

2426:
2427: END IF;
2428:
2429: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2430: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2431: 'Party and contact combination is valid');
2432: END IF;
2433:
2434:

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

2449: IF (vendor_party_contact_csr%ISOPEN) THEN
2450: CLOSE vendor_party_contact_csr ;
2451: END IF;
2452:
2453: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2454: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2455: 'Leaving validate_party_contact:FND_API.G_EXC_ERROR Exception');
2456: END IF;
2457:

Line 2454: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2450: CLOSE vendor_party_contact_csr ;
2451: END IF;
2452:
2453: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2454: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2455: 'Leaving validate_party_contact:FND_API.G_EXC_ERROR Exception');
2456: END IF;
2457:
2458: x_return_status := FND_API.G_RET_STS_ERROR;

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

2474: IF (vendor_party_contact_csr%ISOPEN) THEN
2475: CLOSE vendor_party_contact_csr ;
2476: END IF;
2477:
2478: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2479: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2480: 'Leaving validate_party_contact:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2481: END IF;
2482:

Line 2479: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2475: CLOSE vendor_party_contact_csr ;
2476: END IF;
2477:
2478: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2479: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2480: 'Leaving validate_party_contact:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2481: END IF;
2482:
2483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

2499: IF (vendor_party_contact_csr%ISOPEN) THEN
2500: CLOSE vendor_party_contact_csr ;
2501: END IF;
2502:
2503: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2504: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2505: 'Leaving validate_party_contact because of EXCEPTION: ' || sqlerrm);
2506: END IF;
2507:

Line 2504: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2500: CLOSE vendor_party_contact_csr ;
2501: END IF;
2502:
2503: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2504: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2505: 'Leaving validate_party_contact because of EXCEPTION: ' || sqlerrm);
2506: END IF;
2507:
2508: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

2573: BEGIN
2574:
2575: l_api_name := 'populate_import_errors';
2576:
2577: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2579: 'Entered OKC_REP_UTIL_PVT.populate_import_errors');
2580: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2581: 'p_contract_id = ' || p_contract_id);

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

2574:
2575: l_api_name := 'populate_import_errors';
2576:
2577: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2579: 'Entered OKC_REP_UTIL_PVT.populate_import_errors');
2580: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2581: 'p_contract_id = ' || p_contract_id);
2582: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2576:
2577: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2579: 'Entered OKC_REP_UTIL_PVT.populate_import_errors');
2580: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2581: 'p_contract_id = ' || p_contract_id);
2582: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2583: 'p_error_obj_type = ' || p_error_obj_type);
2584: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2578: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2579: 'Entered OKC_REP_UTIL_PVT.populate_import_errors');
2580: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2581: 'p_contract_id = ' || p_contract_id);
2582: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2583: 'p_error_obj_type = ' || p_error_obj_type);
2584: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2585: 'p_error_obj_id = ' || p_error_obj_id);
2586: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2580: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2581: 'p_contract_id = ' || p_contract_id);
2582: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2583: 'p_error_obj_type = ' || p_error_obj_type);
2584: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2585: 'p_error_obj_id = ' || p_error_obj_id);
2586: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2587: 'p_error_msg_txt = ' || p_error_msg_txt);
2588: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2582: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2583: 'p_error_obj_type = ' || p_error_obj_type);
2584: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2585: 'p_error_obj_id = ' || p_error_obj_id);
2586: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2587: 'p_error_msg_txt = ' || p_error_msg_txt);
2588: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2589: 'p_program_id = ' || p_program_id);
2590: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2584: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2585: 'p_error_obj_id = ' || p_error_obj_id);
2586: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2587: 'p_error_msg_txt = ' || p_error_msg_txt);
2588: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2589: 'p_program_id = ' || p_program_id);
2590: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2591: 'p_program_login_id = ' || p_program_login_id);
2592: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2586: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2587: 'p_error_msg_txt = ' || p_error_msg_txt);
2588: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2589: 'p_program_id = ' || p_program_id);
2590: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2591: 'p_program_login_id = ' || p_program_login_id);
2592: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2593: 'p_program_app_id = ' || p_program_app_id);
2594: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2588: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2589: 'p_program_id = ' || p_program_id);
2590: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2591: 'p_program_login_id = ' || p_program_login_id);
2592: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2593: 'p_program_app_id = ' || p_program_app_id);
2594: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2595: 'p_request_id = ' || p_request_id);
2596:

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

2590: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2591: 'p_program_login_id = ' || p_program_login_id);
2592: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2593: 'p_program_app_id = ' || p_program_app_id);
2594: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2595: 'p_request_id = ' || p_request_id);
2596:
2597:
2598: END IF;

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

2615: OPEN ERROR_ID_CSR;
2616: FETCH ERROR_ID_CSR INTO l_imp_error_id;
2617: CLOSE ERROR_ID_CSR;
2618:
2619: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2620: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2621: 'l_imp_error_id: '||l_imp_error_id);
2622: END IF;
2623:

Line 2620: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2616: FETCH ERROR_ID_CSR INTO l_imp_error_id;
2617: CLOSE ERROR_ID_CSR;
2618:
2619: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2620: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2621: 'l_imp_error_id: '||l_imp_error_id);
2622: END IF;
2623:
2624: INSERT INTO OKC_REP_IMP_ERRORS_T(

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

2644: p_program_app_id,
2645: p_request_id
2646: );
2647:
2648: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2649: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2650: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
2651: END IF;
2652:

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

2645: p_request_id
2646: );
2647:
2648: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2649: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2650: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
2651: END IF;
2652:
2653: EXCEPTION

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

2660:
2661: IF ERROR_ID_CSR%ISOPEN THEN
2662: CLOSE ERROR_ID_CSR;
2663: END IF;
2664: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2665: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2666: 'Leaving populate_import_errors:FND_API.G_EXC_ERROR Exception');
2667: END IF;
2668:

Line 2665: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2661: IF ERROR_ID_CSR%ISOPEN THEN
2662: CLOSE ERROR_ID_CSR;
2663: END IF;
2664: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2665: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2666: 'Leaving populate_import_errors:FND_API.G_EXC_ERROR Exception');
2667: END IF;
2668:
2669: x_return_status := FND_API.G_RET_STS_ERROR;

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

2680: IF ERROR_ID_CSR%ISOPEN THEN
2681: CLOSE ERROR_ID_CSR;
2682: END IF;
2683:
2684: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2685: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2686: 'Leaving populate_import_errors:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2687: END IF;
2688:

Line 2685: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2681: CLOSE ERROR_ID_CSR;
2682: END IF;
2683:
2684: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2685: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2686: 'Leaving populate_import_errors:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2687: END IF;
2688:
2689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

2700: IF ERROR_ID_CSR%ISOPEN THEN
2701: CLOSE ERROR_ID_CSR;
2702: END IF;
2703:
2704: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2705: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2706: 'Leaving populate_import_errors because of EXCEPTION: ' || sqlerrm);
2707: END IF;
2708:

Line 2705: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

2701: CLOSE ERROR_ID_CSR;
2702: END IF;
2703:
2704: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2705: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2706: 'Leaving populate_import_errors because of EXCEPTION: ' || sqlerrm);
2707: END IF;
2708:
2709: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

2786: BEGIN
2787:
2788: l_api_name := 'validate_import_documents';
2789:
2790: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2791: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2792: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
2793: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2794: 'p_request_id = ' || p_request_id);

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

2787:
2788: l_api_name := 'validate_import_documents';
2789:
2790: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2791: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2792: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
2793: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2794: 'p_request_id = ' || p_request_id);
2795:

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

2789:
2790: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2791: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2792: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
2793: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2794: 'p_request_id = ' || p_request_id);
2795:
2796: END IF;
2797:

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

2819: l_error_msg := NULL;
2820:
2821: --If l_valid_flag is already set to 'N', we do not perform any more checks
2822: --File Name should exist
2823: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2824: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2825: 'Checking if user enters file name');
2826: END IF;
2827: IF l_import_documents_rec.FILE_NAME IS NOT NULL THEN

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

2820:
2821: --If l_valid_flag is already set to 'N', we do not perform any more checks
2822: --File Name should exist
2823: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2824: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2825: 'Checking if user enters file name');
2826: END IF;
2827: IF l_import_documents_rec.FILE_NAME IS NOT NULL THEN
2828: l_import_documents_rec.FILE_NAME := LTRIM(l_import_documents_rec.FILE_NAME);

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

2834: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_DOC_NAME');
2835: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2836: VALUE => l_import_documents_rec.document_index);
2837: l_error_msg := fnd_message.get;
2838: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2839: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2840: 'Document Name is missing');
2841: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2842: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

2835: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2836: VALUE => l_import_documents_rec.document_index);
2837: l_error_msg := fnd_message.get;
2838: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2839: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2840: 'Document Name is missing');
2841: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2842: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2843: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2837: l_error_msg := fnd_message.get;
2838: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2839: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2840: 'Document Name is missing');
2841: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2842: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2843: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2844: 'Document ID: '||l_import_documents_rec.imp_document_id);
2845: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2839: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2840: 'Document Name is missing');
2841: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2842: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2843: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2844: 'Document ID: '||l_import_documents_rec.imp_document_id);
2845: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2846: 'l_error_msg: '||l_error_msg);
2847: END IF;

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

2841: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2842: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2843: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2844: 'Document ID: '||l_import_documents_rec.imp_document_id);
2845: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2846: 'l_error_msg: '||l_error_msg);
2847: END IF;
2848:
2849:

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

2850:
2851: END IF;
2852:
2853: --If l_valid_flag is already set to 'N', we do not perform any more checks
2854: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2856: 'Checking if file name is too long');
2857: END IF;
2858: --File Name should be <= 256

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

2851: END IF;
2852:
2853: --If l_valid_flag is already set to 'N', we do not perform any more checks
2854: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2856: 'Checking if file name is too long');
2857: END IF;
2858: --File Name should be <= 256
2859: IF (l_valid_flag = 'Y' AND LENGTH(l_import_documents_rec.file_name) > l_file_name_length) THEN

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

2862: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_LONG_DOC_NAME');
2863: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2864: VALUE => l_import_documents_rec.document_index);
2865: l_error_msg := fnd_message.get;
2866: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2867: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2868: 'Document Name is too long');
2869: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2870: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

2863: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2864: VALUE => l_import_documents_rec.document_index);
2865: l_error_msg := fnd_message.get;
2866: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2867: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2868: 'Document Name is too long');
2869: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2870: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2871: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2865: l_error_msg := fnd_message.get;
2866: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2867: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2868: 'Document Name is too long');
2869: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2870: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2871: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2872: 'Document ID: '||l_import_documents_rec.imp_document_id);
2873: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2867: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2868: 'Document Name is too long');
2869: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2870: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2871: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2872: 'Document ID: '||l_import_documents_rec.imp_document_id);
2873: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2874: 'l_error_msg: '||l_error_msg);
2875: END IF;

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

2869: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2870: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2871: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2872: 'Document ID: '||l_import_documents_rec.imp_document_id);
2873: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2874: 'l_error_msg: '||l_error_msg);
2875: END IF;
2876: END IF;
2877:

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

2875: END IF;
2876: END IF;
2877:
2878: --If l_valid_flag is already set to 'N', we do not perform any more checks
2879: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2880: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2881: 'Checking if file description is too long');
2882: END IF;
2883: --File Name should be <= 256

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

2876: END IF;
2877:
2878: --If l_valid_flag is already set to 'N', we do not perform any more checks
2879: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2880: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2881: 'Checking if file description is too long');
2882: END IF;
2883: --File Name should be <= 256
2884: IF (l_valid_flag = 'Y' AND l_import_documents_rec.document_desc IS NOT NULL AND LENGTH(l_import_documents_rec.document_desc) > l_file_desc_length) THEN

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

2887: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_LONG_DOC_DESC');
2888: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2889: VALUE => l_import_documents_rec.document_index);
2890: l_error_msg := fnd_message.get;
2891: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2892: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2893: 'Document Description is too long');
2894: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2895: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

2888: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2889: VALUE => l_import_documents_rec.document_index);
2890: l_error_msg := fnd_message.get;
2891: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2892: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2893: 'Document Description is too long');
2894: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2895: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2896: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2890: l_error_msg := fnd_message.get;
2891: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2892: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2893: 'Document Description is too long');
2894: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2895: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2896: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2897: 'Document ID: '||l_import_documents_rec.imp_document_id);
2898: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2892: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2893: 'Document Description is too long');
2894: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2895: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2896: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2897: 'Document ID: '||l_import_documents_rec.imp_document_id);
2898: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2899: 'l_error_msg: '||l_error_msg);
2900: END IF;

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

2894: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2895: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2896: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2897: 'Document ID: '||l_import_documents_rec.imp_document_id);
2898: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2899: 'l_error_msg: '||l_error_msg);
2900: END IF;
2901: END IF;
2902:

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

2901: END IF;
2902:
2903:
2904: --If l_valid_flag is already set to 'N', we do not perform any more checks
2905: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2906: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2907: 'Checking if user enters category name');
2908: END IF;
2909: --Category Name Text should exist

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

2902:
2903:
2904: --If l_valid_flag is already set to 'N', we do not perform any more checks
2905: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2906: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2907: 'Checking if user enters category name');
2908: END IF;
2909: --Category Name Text should exist
2910: IF l_import_documents_rec.category_name_txt IS NOT NULL THEN

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

2918: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_DOC_CATEGORY');
2919: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2920: VALUE => l_import_documents_rec.document_index);
2921: l_error_msg := fnd_message.get;
2922: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2923: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2924: 'Document Category is missing');
2925: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2926: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

2919: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2920: VALUE => l_import_documents_rec.document_index);
2921: l_error_msg := fnd_message.get;
2922: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2923: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2924: 'Document Category is missing');
2925: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2926: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2927: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2921: l_error_msg := fnd_message.get;
2922: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2923: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2924: 'Document Category is missing');
2925: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2926: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2927: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2928: 'Document ID: '||l_import_documents_rec.imp_document_id);
2929: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2923: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2924: 'Document Category is missing');
2925: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2926: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2927: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2928: 'Document ID: '||l_import_documents_rec.imp_document_id);
2929: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2930: 'l_error_msg: '||l_error_msg);
2931: END IF;

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

2925: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2926: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2927: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2928: 'Document ID: '||l_import_documents_rec.imp_document_id);
2929: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2930: 'l_error_msg: '||l_error_msg);
2931: END IF;
2932: END IF;
2933:

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

2932: END IF;
2933:
2934: --If l_valid_flag is already set to 'N', we do not perform any more checks
2935: IF l_valid_flag = 'Y' THEN
2936: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2938: 'Checking if category name is valid');
2939: END IF;
2940:

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

2933:
2934: --If l_valid_flag is already set to 'N', we do not perform any more checks
2935: IF l_valid_flag = 'Y' THEN
2936: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2938: 'Checking if category name is valid');
2939: END IF;
2940:
2941: OPEN document_category_csr(l_import_documents_rec.category_name_txt);

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

2948: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_INV_DOC_CATEGORY');
2949: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2950: VALUE => l_import_documents_rec.document_index);
2951: l_error_msg := fnd_message.get;
2952: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2953: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2954: 'Category ID not found with given category name: '||l_import_documents_rec.category_name_txt);
2955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2956: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

2949: fnd_message.set_token(TOKEN => 'DOC_INDEX',
2950: VALUE => l_import_documents_rec.document_index);
2951: l_error_msg := fnd_message.get;
2952: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2953: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2954: 'Category ID not found with given category name: '||l_import_documents_rec.category_name_txt);
2955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2956: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2957: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2951: l_error_msg := fnd_message.get;
2952: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2953: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2954: 'Category ID not found with given category name: '||l_import_documents_rec.category_name_txt);
2955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2956: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2957: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2958: 'Document ID: '||l_import_documents_rec.imp_document_id);
2959: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2953: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2954: 'Category ID not found with given category name: '||l_import_documents_rec.category_name_txt);
2955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2956: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2957: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2958: 'Document ID: '||l_import_documents_rec.imp_document_id);
2959: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2960: 'l_error_msg: '||l_error_msg);
2961: END IF;

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

2955: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2956: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
2957: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2958: 'Document ID: '||l_import_documents_rec.imp_document_id);
2959: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2960: 'l_error_msg: '||l_error_msg);
2961: END IF;
2962: END IF;
2963:

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

2964: CLOSE document_category_csr;
2965: END IF;
2966:
2967: --Populate the valid_flag and category_code columns in OKC_REP_IMP_DOCUMENTS_T
2968: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2970: 'Updating OKC_REP_IMP_DOCUMENTS_T');
2971: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2972: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);

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

2965: END IF;
2966:
2967: --Populate the valid_flag and category_code columns in OKC_REP_IMP_DOCUMENTS_T
2968: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2970: 'Updating OKC_REP_IMP_DOCUMENTS_T');
2971: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2972: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);
2973: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2967: --Populate the valid_flag and category_code columns in OKC_REP_IMP_DOCUMENTS_T
2968: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2970: 'Updating OKC_REP_IMP_DOCUMENTS_T');
2971: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2972: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);
2973: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2974: 'l_category_code: '||l_category_code);
2975: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

2969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2970: 'Updating OKC_REP_IMP_DOCUMENTS_T');
2971: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2972: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);
2973: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2974: 'l_category_code: '||l_category_code);
2975: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2976: 'l_valid_flag: '||l_valid_flag);
2977: END IF;

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

2971: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2972: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);
2973: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2974: 'l_category_code: '||l_category_code);
2975: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2976: 'l_valid_flag: '||l_valid_flag);
2977: END IF;
2978:
2979: --Populate the error message table

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

3013: --bug fix for 4209521
3014: --need to commit or the Java layer will not pick up the changes
3015: COMMIT;
3016:
3017: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3018: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3019: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
3020: END IF;
3021:

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

3014: --need to commit or the Java layer will not pick up the changes
3015: COMMIT;
3016:
3017: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3018: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3019: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
3020: END IF;
3021:
3022: EXCEPTION

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

3027:
3028: IF document_category_csr%ISOPEN THEN
3029: CLOSE document_category_csr;
3030: END IF;
3031: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3032: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3033: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3034: END IF;
3035:

Line 3032: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

3028: IF document_category_csr%ISOPEN THEN
3029: CLOSE document_category_csr;
3030: END IF;
3031: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3032: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3033: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3034: END IF;
3035:
3036: x_return_status := FND_API.G_RET_STS_ERROR;

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

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

Line 3049: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

3045: IF document_category_csr%ISOPEN THEN
3046: CLOSE document_category_csr;
3047: END IF;
3048: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3049: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3050: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3051: END IF;
3052:
3053: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

3061:
3062: IF document_category_csr%ISOPEN THEN
3063: CLOSE document_category_csr;
3064: END IF;
3065: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3066: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3067: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
3068: END IF;
3069:

Line 3066: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

3062: IF document_category_csr%ISOPEN THEN
3063: CLOSE document_category_csr;
3064: END IF;
3065: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3066: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3067: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
3068: END IF;
3069:
3070: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

3149: BEGIN
3150:
3151: l_api_name := 'validate_import_parties';
3152:
3153: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3154: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3155: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3157: 'p_request_id = ' || p_request_id);

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

3150:
3151: l_api_name := 'validate_import_parties';
3152:
3153: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3154: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3155: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3157: 'p_request_id = ' || p_request_id);
3158:

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

3152:
3153: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3154: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3155: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3156: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3157: 'p_request_id = ' || p_request_id);
3158:
3159: END IF;
3160:

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

3182: l_error_msg := NULL;
3183:
3184: --If l_valid_flag is already set to 'N', we do not perform any more checks
3185: --Party Name should exist
3186: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3188: 'Checking if user enters party name');
3189: END IF;
3190: IF l_import_parties_rec.party_name_txt IS NOT NULL THEN

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

3183:
3184: --If l_valid_flag is already set to 'N', we do not perform any more checks
3185: --Party Name should exist
3186: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3188: 'Checking if user enters party name');
3189: END IF;
3190: IF l_import_parties_rec.party_name_txt IS NOT NULL THEN
3191: l_import_parties_rec.party_name_txt := LTRIM(l_import_parties_rec.party_name_txt);

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

3197: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_PARTY_NAME');
3198: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3199: VALUE => l_import_parties_rec.party_index);
3200: l_error_msg := fnd_message.get;
3201: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3202: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3203: 'Party Name is missing');
3204: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3205: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3198: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3199: VALUE => l_import_parties_rec.party_index);
3200: l_error_msg := fnd_message.get;
3201: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3202: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3203: 'Party Name is missing');
3204: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3205: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3200: l_error_msg := fnd_message.get;
3201: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3202: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3203: 'Party Name is missing');
3204: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3205: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3207: 'Party ID: '||l_import_parties_rec.imp_party_id);
3208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3202: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3203: 'Party Name is missing');
3204: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3205: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3207: 'Party ID: '||l_import_parties_rec.imp_party_id);
3208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3209: 'l_error_msg: '||l_error_msg);
3210: END IF;

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

3204: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3205: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3207: 'Party ID: '||l_import_parties_rec.imp_party_id);
3208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3209: 'l_error_msg: '||l_error_msg);
3210: END IF;
3211: END IF;
3212:

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

3211: END IF;
3212:
3213: --If l_valid_flag is already set to 'N', we do not perform any more checks
3214: --Party Role should exist
3215: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3216: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3217: 'Checking if user enters party role');
3218: END IF;
3219: IF l_import_parties_rec.party_role_txt IS NOT NULL THEN

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

3212:
3213: --If l_valid_flag is already set to 'N', we do not perform any more checks
3214: --Party Role should exist
3215: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3216: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3217: 'Checking if user enters party role');
3218: END IF;
3219: IF l_import_parties_rec.party_role_txt IS NOT NULL THEN
3220: l_import_parties_rec.party_role_txt := LTRIM(l_import_parties_rec.party_role_txt);

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

3226: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_PARTY_ROLE');
3227: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3228: VALUE => l_import_parties_rec.party_index);
3229: l_error_msg := fnd_message.get;
3230: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3232: 'Party Role is missing');
3233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3234: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3227: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3228: VALUE => l_import_parties_rec.party_index);
3229: l_error_msg := fnd_message.get;
3230: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3232: 'Party Role is missing');
3233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3234: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3229: l_error_msg := fnd_message.get;
3230: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3232: 'Party Role is missing');
3233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3234: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3236: 'Party ID: '||l_import_parties_rec.imp_party_id);
3237: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3232: 'Party Role is missing');
3233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3234: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3236: 'Party ID: '||l_import_parties_rec.imp_party_id);
3237: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3238: 'l_error_msg: '||l_error_msg);
3239: END IF;

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

3233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3234: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3236: 'Party ID: '||l_import_parties_rec.imp_party_id);
3237: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3238: 'l_error_msg: '||l_error_msg);
3239: END IF;
3240:
3241: END IF;

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

3241: END IF;
3242:
3243: --If l_valid_flag is already set to 'N', we do not perform any more checks
3244: --Party Signed By should exist
3245: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3246: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3247: 'Checking if user enters party signed by');
3248: END IF;
3249: IF l_import_parties_rec.signed_by_txt IS NOT NULL THEN

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

3242:
3243: --If l_valid_flag is already set to 'N', we do not perform any more checks
3244: --Party Signed By should exist
3245: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3246: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3247: 'Checking if user enters party signed by');
3248: END IF;
3249: IF l_import_parties_rec.signed_by_txt IS NOT NULL THEN
3250: l_import_parties_rec.signed_by_txt := LTRIM(l_import_parties_rec.signed_by_txt);

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

3256: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_SIGNED_BY');
3257: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3258: VALUE => l_import_parties_rec.party_index);
3259: l_error_msg := fnd_message.get;
3260: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3262: 'Party Signed By is missing');
3263: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3264: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3257: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3258: VALUE => l_import_parties_rec.party_index);
3259: l_error_msg := fnd_message.get;
3260: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3262: 'Party Signed By is missing');
3263: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3264: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3259: l_error_msg := fnd_message.get;
3260: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3262: 'Party Signed By is missing');
3263: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3264: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3266: 'Party ID: '||l_import_parties_rec.imp_party_id);
3267: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3262: 'Party Signed By is missing');
3263: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3264: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3266: 'Party ID: '||l_import_parties_rec.imp_party_id);
3267: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3268: 'l_error_msg: '||l_error_msg);
3269: END IF;

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

3263: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3264: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3266: 'Party ID: '||l_import_parties_rec.imp_party_id);
3267: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3268: 'l_error_msg: '||l_error_msg);
3269: END IF;
3270:
3271: END IF;

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

3271: END IF;
3272:
3273: --If l_valid_flag is already set to 'N', we do not perform any more checks
3274: --Party Signed By should be <150
3275: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3276: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3277: 'Checking if party signed by is too long');
3278: END IF;
3279: IF (l_valid_flag = 'Y' AND l_import_parties_rec.signed_by_txt IS NOT NULL

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

3272:
3273: --If l_valid_flag is already set to 'N', we do not perform any more checks
3274: --Party Signed By should be <150
3275: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3276: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3277: 'Checking if party signed by is too long');
3278: END IF;
3279: IF (l_valid_flag = 'Y' AND l_import_parties_rec.signed_by_txt IS NOT NULL
3280: AND LENGTH(l_import_parties_rec.signed_by_txt) > l_signed_by_length) THEN

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

3283: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_LONG_SIGNED_BY');
3284: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3285: VALUE => l_import_parties_rec.party_index);
3286: l_error_msg := fnd_message.get;
3287: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3288: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3289: 'Party Signed By is too long');
3290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3291: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3284: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3285: VALUE => l_import_parties_rec.party_index);
3286: l_error_msg := fnd_message.get;
3287: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3288: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3289: 'Party Signed By is too long');
3290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3291: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3292: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3286: l_error_msg := fnd_message.get;
3287: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3288: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3289: 'Party Signed By is too long');
3290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3291: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3292: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3293: 'Party ID: '||l_import_parties_rec.imp_party_id);
3294: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3288: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3289: 'Party Signed By is too long');
3290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3291: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3292: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3293: 'Party ID: '||l_import_parties_rec.imp_party_id);
3294: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3295: 'l_error_msg: '||l_error_msg);
3296: END IF;

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

3290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3291: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3292: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3293: 'Party ID: '||l_import_parties_rec.imp_party_id);
3294: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3295: 'l_error_msg: '||l_error_msg);
3296: END IF;
3297:
3298: END IF;

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

3298: END IF;
3299:
3300: --If l_valid_flag is already set to 'N', we do not perform any more checks
3301: --Party Signed Date should exist
3302: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3303: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3304: 'Checking if user enters party signed date');
3305: END IF;
3306: IF l_import_parties_rec.signed_date IS NOT NULL THEN

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

3299:
3300: --If l_valid_flag is already set to 'N', we do not perform any more checks
3301: --Party Signed Date should exist
3302: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3303: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3304: 'Checking if user enters party signed date');
3305: END IF;
3306: IF l_import_parties_rec.signed_date IS NOT NULL THEN
3307: l_import_parties_rec.signed_date := LTRIM(l_import_parties_rec.signed_date);

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

3313: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_SIGNED_DATE');
3314: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3315: VALUE => l_import_parties_rec.party_index);
3316: l_error_msg := fnd_message.get;
3317: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3318: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3319: 'Party Signed Date is missing');
3320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3321: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3314: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3315: VALUE => l_import_parties_rec.party_index);
3316: l_error_msg := fnd_message.get;
3317: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3318: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3319: 'Party Signed Date is missing');
3320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3321: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3322: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3316: l_error_msg := fnd_message.get;
3317: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3318: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3319: 'Party Signed Date is missing');
3320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3321: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3322: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3323: 'Party ID: '||l_import_parties_rec.imp_party_id);
3324: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3318: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3319: 'Party Signed Date is missing');
3320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3321: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3322: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3323: 'Party ID: '||l_import_parties_rec.imp_party_id);
3324: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3325: 'l_error_msg: '||l_error_msg);
3326: END IF;

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

3320: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3321: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3322: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3323: 'Party ID: '||l_import_parties_rec.imp_party_id);
3324: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3325: 'l_error_msg: '||l_error_msg);
3326: END IF;
3327:
3328: END IF;

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

3328: END IF;
3329:
3330: --If l_valid_flag is already set to 'N', we do not perform any more checks
3331: --Party Signed Date should be the right format
3332: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3333: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3334: 'Checking if party signed date is in the correct format');
3335: END IF;
3336: IF (l_valid_flag = 'Y' AND l_import_parties_rec.signed_date IS NOT NULL) THEN

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

3329:
3330: --If l_valid_flag is already set to 'N', we do not perform any more checks
3331: --Party Signed Date should be the right format
3332: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3333: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3334: 'Checking if party signed date is in the correct format');
3335: END IF;
3336: IF (l_valid_flag = 'Y' AND l_import_parties_rec.signed_date IS NOT NULL) THEN
3337: BEGIN

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

3343: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3344: VALUE => l_import_parties_rec.party_index);
3345: l_error_msg := fnd_message.get;
3346:
3347: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3348: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3349: 'Party Signed Date is not valid');
3350: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3351: 'Party ID: '||l_import_parties_rec.imp_contract_id);

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

3344: VALUE => l_import_parties_rec.party_index);
3345: l_error_msg := fnd_message.get;
3346:
3347: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3348: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3349: 'Party Signed Date is not valid');
3350: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3351: 'Party ID: '||l_import_parties_rec.imp_contract_id);
3352: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3346:
3347: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3348: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3349: 'Party Signed Date is not valid');
3350: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3351: 'Party ID: '||l_import_parties_rec.imp_contract_id);
3352: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3353: 'l_error_msg: '||l_error_msg);
3354: END IF;

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

3348: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3349: 'Party Signed Date is not valid');
3350: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3351: 'Party ID: '||l_import_parties_rec.imp_contract_id);
3352: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3353: 'l_error_msg: '||l_error_msg);
3354: END IF;
3355: END;
3356: END IF;

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

3361: IF (l_valid_flag = 'Y') THEN
3362: OPEN CONTRACT_INTENT_CSR (l_import_parties_rec.imp_contract_id);
3363: FETCH CONTRACT_INTENT_CSR INTO l_contract_intent;
3364:
3365: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3366: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3367: 'l_contract_intent: '||l_contract_intent);
3368: END IF;
3369:

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

3362: OPEN CONTRACT_INTENT_CSR (l_import_parties_rec.imp_contract_id);
3363: FETCH CONTRACT_INTENT_CSR INTO l_contract_intent;
3364:
3365: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3366: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3367: 'l_contract_intent: '||l_contract_intent);
3368: END IF;
3369:
3370: IF (l_contract_intent IS NOT NULL ) THEN

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

3383: x_return_status => x_return_status,
3384: x_msg_count => x_msg_count,
3385: x_msg_data => x_msg_data);
3386:
3387: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3388: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3389: 'After calling validate_contract_party, l_valid_flag: '||l_valid_flag);
3390: END IF;
3391:

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

3384: x_msg_count => x_msg_count,
3385: x_msg_data => x_msg_data);
3386:
3387: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3388: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3389: 'After calling validate_contract_party, l_valid_flag: '||l_valid_flag);
3390: END IF;
3391:
3392: IF(l_valid_flag = 'N') THEN

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

3434: END IF;
3435:
3436: END IF;
3437: /* ELSE
3438: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3439: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3440: 'Contract type is invalid in csv file');
3441: END IF;
3442: --contract intent does not exist

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

3435:
3436: END IF;
3437: /* ELSE
3438: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3439: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3440: 'Contract type is invalid in csv file');
3441: END IF;
3442: --contract intent does not exist
3443: --this means that contract_type_txt is invalid

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

3509:
3510: END LOOP;
3511: CLOSE IMPORT_PARTIES_CSR;
3512:
3513: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3514: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3515: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
3516: END IF;
3517:

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

3510: END LOOP;
3511: CLOSE IMPORT_PARTIES_CSR;
3512:
3513: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3514: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3515: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
3516: END IF;
3517:
3518: EXCEPTION

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

3526: IF IMPORT_PARTIES_CSR%ISOPEN THEN
3527: CLOSE IMPORT_PARTIES_CSR;
3528: END IF;
3529:
3530: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3531: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3532: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3533: END IF;
3534:

Line 3531: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

3527: CLOSE IMPORT_PARTIES_CSR;
3528: END IF;
3529:
3530: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3531: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3532: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3533: END IF;
3534:
3535: x_return_status := FND_API.G_RET_STS_ERROR;

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

3545: IF IMPORT_PARTIES_CSR%ISOPEN THEN
3546: CLOSE IMPORT_PARTIES_CSR;
3547: END IF;
3548:
3549: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3550: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3551: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3552: END IF;
3553:

Line 3550: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

3546: CLOSE IMPORT_PARTIES_CSR;
3547: END IF;
3548:
3549: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3550: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3551: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3552: END IF;
3553:
3554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

3564: IF IMPORT_PARTIES_CSR%ISOPEN THEN
3565: CLOSE IMPORT_PARTIES_CSR;
3566: END IF;
3567:
3568: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3569: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3570: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
3571: END IF;
3572:

Line 3569: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

3565: CLOSE IMPORT_PARTIES_CSR;
3566: END IF;
3567:
3568: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3569: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3570: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
3571: END IF;
3572:
3573: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

3783: BEGIN
3784:
3785: l_api_name := 'validate_import_contracts';
3786:
3787: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3788: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3789: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3790: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3791: 'p_request_id = ' || p_request_id);

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

3784:
3785: l_api_name := 'validate_import_contracts';
3786:
3787: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3788: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3789: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3790: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3791: 'p_request_id = ' || p_request_id);
3792:

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

3786:
3787: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3788: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3789: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3790: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3791: 'p_request_id = ' || p_request_id);
3792:
3793: END IF;
3794:

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

3826:
3827:
3828: --If l_valid_flag is already set to 'N', we do not perform any more checks
3829: --Contract Number is required, if autonumbering is turned off
3830: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3831: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3832: 'Checking if user enters contract number');
3833: END IF;
3834: --Checking profile option value

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

3827:
3828: --If l_valid_flag is already set to 'N', we do not perform any more checks
3829: --Contract Number is required, if autonumbering is turned off
3830: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3831: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3832: 'Checking if user enters contract number');
3833: END IF;
3834: --Checking profile option value
3835: FND_PROFILE.GET(NAME => l_auto_number_option, VAL => l_auto_number_yn);

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

3832: 'Checking if user enters contract number');
3833: END IF;
3834: --Checking profile option value
3835: FND_PROFILE.GET(NAME => l_auto_number_option, VAL => l_auto_number_yn);
3836: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3837: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3838: 'Profile OKC_REP_AUTO_CON_NUMBER value is: '||l_auto_number_yn);
3839: END IF;
3840: IF l_auto_number_yn = 'Y' THEN

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

3833: END IF;
3834: --Checking profile option value
3835: FND_PROFILE.GET(NAME => l_auto_number_option, VAL => l_auto_number_yn);
3836: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3837: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3838: 'Profile OKC_REP_AUTO_CON_NUMBER value is: '||l_auto_number_yn);
3839: END IF;
3840: IF l_auto_number_yn = 'Y' THEN
3841: --If auto number is on

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

3843: --otherwise system should error out
3844: IF(l_import_contracts_rec.contract_number IS NOT NULL) THEN
3845: l_valid_flag := 'N';
3846: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONNULL_NUMBER');
3847: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3848: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3849: 'Auto number is turned on, but contract number is not null');
3850: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3851: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

3844: IF(l_import_contracts_rec.contract_number IS NOT NULL) THEN
3845: l_valid_flag := 'N';
3846: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONNULL_NUMBER');
3847: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3848: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3849: 'Auto number is turned on, but contract number is not null');
3850: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3851: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3852: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3846: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONNULL_NUMBER');
3847: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3848: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3849: 'Auto number is turned on, but contract number is not null');
3850: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3851: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3852: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3853: 'l_error_msg: '||l_error_msg);
3854: END IF;

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

3848: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3849: 'Auto number is turned on, but contract number is not null');
3850: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3851: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3852: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3853: 'l_error_msg: '||l_error_msg);
3854: END IF;
3855: END IF;
3856: ELSE

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

3859: --otherwise system should error out
3860: IF(l_import_contracts_rec.contract_number IS NULL) THEN
3861: l_valid_flag := 'N';
3862: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NUMBER');
3863: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3864: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3865: 'Auto number is turned off, but contract number is missing');
3866: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3867: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

3860: IF(l_import_contracts_rec.contract_number IS NULL) THEN
3861: l_valid_flag := 'N';
3862: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NUMBER');
3863: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3864: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3865: 'Auto number is turned off, but contract number is missing');
3866: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3867: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3868: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3862: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NUMBER');
3863: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3864: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3865: 'Auto number is turned off, but contract number is missing');
3866: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3867: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3868: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3869: 'l_error_msg: '||l_error_msg);
3870: END IF;

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

3864: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3865: 'Auto number is turned off, but contract number is missing');
3866: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3867: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3868: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3869: 'l_error_msg: '||l_error_msg);
3870: END IF;
3871: ELSE
3872: --contract number is entered

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

3873: --we need to check for length
3874: IF(LENGTH(l_import_contracts_rec.contract_number) > l_contract_number_length) THEN
3875: l_valid_flag := 'N';
3876: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NUMBER');
3877: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3879: 'Conract number is too long');
3880: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3881: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

3874: IF(LENGTH(l_import_contracts_rec.contract_number) > l_contract_number_length) THEN
3875: l_valid_flag := 'N';
3876: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NUMBER');
3877: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3879: 'Conract number is too long');
3880: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3881: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3882: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3876: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NUMBER');
3877: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3879: 'Conract number is too long');
3880: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3881: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3882: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3883: 'l_error_msg: '||l_error_msg);
3884: END IF;

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

3878: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3879: 'Conract number is too long');
3880: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3881: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3882: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3883: 'l_error_msg: '||l_error_msg);
3884: END IF;
3885:
3886: END IF;

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

3894: FETCH CONTRACT_NUMBER_UNIQUE_CSR INTO l_unique_contract_number;
3895: IF CONTRACT_NUMBER_UNIQUE_CSR%FOUND THEN
3896: l_valid_flag := 'N';
3897: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONUNIQUE_NUMBER');
3898: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3899: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3900: 'Conract number is not unique');
3901: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3902: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

3895: IF CONTRACT_NUMBER_UNIQUE_CSR%FOUND THEN
3896: l_valid_flag := 'N';
3897: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONUNIQUE_NUMBER');
3898: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3899: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3900: 'Conract number is not unique');
3901: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3902: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3903: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3897: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONUNIQUE_NUMBER');
3898: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3899: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3900: 'Conract number is not unique');
3901: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3902: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3903: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3904: 'l_error_msg: '||l_error_msg);
3905: END IF;

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

3899: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3900: 'Conract number is not unique');
3901: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3902: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3903: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3904: 'l_error_msg: '||l_error_msg);
3905: END IF;
3906: END IF;
3907: CLOSE CONTRACT_NUMBER_UNIQUE_CSR;

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

3908: END IF;
3909:
3910: --If l_valid_flag is already set to 'N', we do not perform any more checks
3911: --Contract Name is required
3912: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3913: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3914: 'Checking if user enters contract name');
3915: END IF;
3916: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_name IS NULL) THEN

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

3909:
3910: --If l_valid_flag is already set to 'N', we do not perform any more checks
3911: --Contract Name is required
3912: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3913: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3914: 'Checking if user enters contract name');
3915: END IF;
3916: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_name IS NULL) THEN
3917: l_valid_flag := 'N';

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

3915: END IF;
3916: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_name IS NULL) THEN
3917: l_valid_flag := 'N';
3918: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NAME');
3919: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3920: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3921: 'Contract Name is missing');
3922: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3923: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

3916: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_name IS NULL) THEN
3917: l_valid_flag := 'N';
3918: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NAME');
3919: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3920: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3921: 'Contract Name is missing');
3922: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3923: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3924: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3918: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NAME');
3919: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3920: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3921: 'Contract Name is missing');
3922: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3923: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3924: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3925: 'l_error_msg: '||l_error_msg);
3926: END IF;

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

3920: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3921: 'Contract Name is missing');
3922: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3923: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3924: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3925: 'l_error_msg: '||l_error_msg);
3926: END IF;
3927: END IF;
3928:

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

3927: END IF;
3928:
3929: --If l_valid_flag is already set to 'N', we do not perform any more checks
3930: --Contract Name should be <450
3931: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3932: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3933: 'Checking if contract name is too long');
3934: END IF;
3935: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.contract_name)>l_contract_name_length) THEN

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

3928:
3929: --If l_valid_flag is already set to 'N', we do not perform any more checks
3930: --Contract Name should be <450
3931: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3932: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3933: 'Checking if contract name is too long');
3934: END IF;
3935: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.contract_name)>l_contract_name_length) THEN
3936: l_valid_flag := 'N';

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

3934: END IF;
3935: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.contract_name)>l_contract_name_length) THEN
3936: l_valid_flag := 'N';
3937: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NAME');
3938: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3939: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3940: 'Contract Name is too long');
3941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3942: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

3935: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.contract_name)>l_contract_name_length) THEN
3936: l_valid_flag := 'N';
3937: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NAME');
3938: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3939: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3940: 'Contract Name is too long');
3941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3942: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3943: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3937: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NAME');
3938: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3939: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3940: 'Contract Name is too long');
3941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3942: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3943: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3944: 'l_error_msg: '||l_error_msg);
3945: END IF;

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

3939: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3940: 'Contract Name is too long');
3941: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3942: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3943: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3944: 'l_error_msg: '||l_error_msg);
3945: END IF;
3946: END IF;
3947:

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

3946: END IF;
3947:
3948: -- If l_valid_flag is already set to 'N', we do not perform any more checks
3949: -- Validating to report error if a BUY contract is imported in Sales Workbench
3950: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3951: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3952: 'Checking if BUY intent contract is being imported in Sales Workbench');
3953: END IF;
3954: IF (l_valid_flag = 'Y') THEN

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

3947:
3948: -- If l_valid_flag is already set to 'N', we do not perform any more checks
3949: -- Validating to report error if a BUY contract is imported in Sales Workbench
3950: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3951: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3952: 'Checking if BUY intent contract is being imported in Sales Workbench');
3953: END IF;
3954: IF (l_valid_flag = 'Y') THEN
3955: OPEN CONTRACT_INTENT_CSR (l_import_contracts_rec.imp_contract_id);

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

3953: END IF;
3954: IF (l_valid_flag = 'Y') THEN
3955: OPEN CONTRACT_INTENT_CSR (l_import_contracts_rec.imp_contract_id);
3956: FETCH CONTRACT_INTENT_CSR INTO l_contract_intent;
3957: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3958: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3959: 'l_contract_intent: '||l_contract_intent);
3960: END IF;
3961: IF ((is_sales_workbench() = 'Y') AND (l_contract_intent = G_INTENT_BUY)) THEN

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

3954: IF (l_valid_flag = 'Y') THEN
3955: OPEN CONTRACT_INTENT_CSR (l_import_contracts_rec.imp_contract_id);
3956: FETCH CONTRACT_INTENT_CSR INTO l_contract_intent;
3957: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3958: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3959: 'l_contract_intent: '||l_contract_intent);
3960: END IF;
3961: IF ((is_sales_workbench() = 'Y') AND (l_contract_intent = G_INTENT_BUY)) THEN
3962: l_valid_flag := 'N';

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

3960: END IF;
3961: IF ((is_sales_workbench() = 'Y') AND (l_contract_intent = G_INTENT_BUY)) THEN
3962: l_valid_flag := 'N';
3963: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_SWB_INV_INTENT');
3964: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3965: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3966: 'Buy Intent Contract can not be imported in Sales Workbench ');
3967: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3968: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

3961: IF ((is_sales_workbench() = 'Y') AND (l_contract_intent = G_INTENT_BUY)) THEN
3962: l_valid_flag := 'N';
3963: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_SWB_INV_INTENT');
3964: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3965: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3966: 'Buy Intent Contract can not be imported in Sales Workbench ');
3967: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3968: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3963: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_SWB_INV_INTENT');
3964: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3965: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3966: 'Buy Intent Contract can not be imported in Sales Workbench ');
3967: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3968: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3970: 'l_error_msg: '||l_error_msg);
3971: END IF;

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

3965: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3966: 'Buy Intent Contract can not be imported in Sales Workbench ');
3967: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3968: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3969: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3970: 'l_error_msg: '||l_error_msg);
3971: END IF;
3972: END IF;
3973: CLOSE CONTRACT_INTENT_CSR;

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

3973: CLOSE CONTRACT_INTENT_CSR;
3974: END IF;
3975: --If l_valid_flag is already set to 'N', we do not perform any more checks
3976: --Original System Reference Code should be <30
3977: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3979: 'Checking if Original System Reference Code is too long');
3980: END IF;
3981: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_code)>l_orig_system_code_length) THEN

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

3974: END IF;
3975: --If l_valid_flag is already set to 'N', we do not perform any more checks
3976: --Original System Reference Code should be <30
3977: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3979: 'Checking if Original System Reference Code is too long');
3980: END IF;
3981: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_code)>l_orig_system_code_length) THEN
3982: l_valid_flag := 'N';

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

3980: END IF;
3981: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_code)>l_orig_system_code_length) THEN
3982: l_valid_flag := 'N';
3983: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_CODE');
3984: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3985: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3986: 'Original System Reference Code is too long');
3987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3988: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

3981: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_code)>l_orig_system_code_length) THEN
3982: l_valid_flag := 'N';
3983: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_CODE');
3984: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3985: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3986: 'Original System Reference Code is too long');
3987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3988: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3983: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_CODE');
3984: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3985: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3986: 'Original System Reference Code is too long');
3987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3988: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3990: 'l_error_msg: '||l_error_msg);
3991: END IF;

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

3985: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3986: 'Original System Reference Code is too long');
3987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3988: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
3989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3990: 'l_error_msg: '||l_error_msg);
3991: END IF;
3992: END IF;
3993:

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

3992: END IF;
3993:
3994: --If l_valid_flag is already set to 'N', we do not perform any more checks
3995: --Original System ID1 should be <100
3996: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3997: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3998: 'Checking if Original System ID1 is too long');
3999: END IF;
4000: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id1)>l_orig_system_id1_length) THEN

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

3993:
3994: --If l_valid_flag is already set to 'N', we do not perform any more checks
3995: --Original System ID1 should be <100
3996: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3997: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3998: 'Checking if Original System ID1 is too long');
3999: END IF;
4000: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id1)>l_orig_system_id1_length) THEN
4001: l_valid_flag := 'N';

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

3999: END IF;
4000: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id1)>l_orig_system_id1_length) THEN
4001: l_valid_flag := 'N';
4002: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID1');
4003: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4004: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4005: 'Original System ID1 is too long');
4006: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4007: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4000: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id1)>l_orig_system_id1_length) THEN
4001: l_valid_flag := 'N';
4002: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID1');
4003: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4004: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4005: 'Original System ID1 is too long');
4006: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4007: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4008: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4002: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID1');
4003: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4004: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4005: 'Original System ID1 is too long');
4006: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4007: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4008: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4009: 'l_error_msg: '||l_error_msg);
4010: END IF;

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

4004: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4005: 'Original System ID1 is too long');
4006: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4007: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4008: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4009: 'l_error_msg: '||l_error_msg);
4010: END IF;
4011: END IF;
4012:

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

4011: END IF;
4012:
4013: --If l_valid_flag is already set to 'N', we do not perform any more checks
4014: --Original System ID2 should be <100
4015: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4016: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4017: 'Checking if Original System ID2 is too long');
4018: END IF;
4019: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id2)>l_orig_system_id2_length) THEN

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

4012:
4013: --If l_valid_flag is already set to 'N', we do not perform any more checks
4014: --Original System ID2 should be <100
4015: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4016: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4017: 'Checking if Original System ID2 is too long');
4018: END IF;
4019: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id2)>l_orig_system_id2_length) THEN
4020: l_valid_flag := 'N';

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

4018: END IF;
4019: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id2)>l_orig_system_id2_length) THEN
4020: l_valid_flag := 'N';
4021: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID2');
4022: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4023: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4024: 'Original System ID2 is too long');
4025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4026: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4019: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id2)>l_orig_system_id2_length) THEN
4020: l_valid_flag := 'N';
4021: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID2');
4022: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4023: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4024: 'Original System ID2 is too long');
4025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4026: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4027: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4021: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID2');
4022: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4023: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4024: 'Original System ID2 is too long');
4025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4026: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4027: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4028: 'l_error_msg: '||l_error_msg);
4029: END IF;

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

4023: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4024: 'Original System ID2 is too long');
4025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4026: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4027: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4028: 'l_error_msg: '||l_error_msg);
4029: END IF;
4030: END IF;
4031:

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

4030: END IF;
4031:
4032: --If l_valid_flag is already set to 'N', we do not perform any more checks
4033: --Contract Status is required
4034: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4035: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4036: 'Checking if user enters contract status');
4037: END IF;
4038: IF l_import_contracts_rec.contract_status_txt IS NOT NULL THEN

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

4031:
4032: --If l_valid_flag is already set to 'N', we do not perform any more checks
4033: --Contract Status is required
4034: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4035: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4036: 'Checking if user enters contract status');
4037: END IF;
4038: IF l_import_contracts_rec.contract_status_txt IS NOT NULL THEN
4039: l_import_contracts_rec.contract_status_txt := LTRIM(l_import_contracts_rec.contract_status_txt);

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

4042:
4043: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.contract_status_txt IS NULL OR LENGTH(l_import_contracts_rec.contract_status_txt)=0)) THEN
4044: l_valid_flag := 'N';
4045: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_STATUS');
4046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4048: 'Contract Status is missing');
4049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4050: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4043: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.contract_status_txt IS NULL OR LENGTH(l_import_contracts_rec.contract_status_txt)=0)) THEN
4044: l_valid_flag := 'N';
4045: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_STATUS');
4046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4048: 'Contract Status is missing');
4049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4050: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4045: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_STATUS');
4046: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4048: 'Contract Status is missing');
4049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4050: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4052: 'l_error_msg: '||l_error_msg);
4053: END IF;

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

4047: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4048: 'Contract Status is missing');
4049: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4050: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4052: 'l_error_msg: '||l_error_msg);
4053: END IF;
4054: END IF;
4055:

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

4054: END IF;
4055:
4056: --If l_valid_flag is already set to 'N', we do not perform any more checks
4057: --Contract Status can only be 'SIGNED'
4058: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4059: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4060: 'Checking if status is valid');
4061: END IF;
4062: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_status_txt IS NOT NULL) THEN

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

4055:
4056: --If l_valid_flag is already set to 'N', we do not perform any more checks
4057: --Contract Status can only be 'SIGNED'
4058: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4059: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4060: 'Checking if status is valid');
4061: END IF;
4062: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_status_txt IS NOT NULL) THEN
4063: OPEN CONTRACT_STATUS_CSR(l_import_contracts_rec.contract_status_txt);

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

4065: IF CONTRACT_STATUS_CSR%NOTFOUND THEN
4066: l_valid_flag := 'N';
4067: l_status_code := NULL;
4068: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_STATUS');
4069: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4070: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4071: 'Contract Status is invalid');
4072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4073: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4066: l_valid_flag := 'N';
4067: l_status_code := NULL;
4068: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_STATUS');
4069: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4070: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4071: 'Contract Status is invalid');
4072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4073: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4074: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4068: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_STATUS');
4069: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4070: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4071: 'Contract Status is invalid');
4072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4073: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4074: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4075: 'l_error_msg: '||l_error_msg);
4076: END IF;

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

4070: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4071: 'Contract Status is invalid');
4072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4073: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4074: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4075: 'l_error_msg: '||l_error_msg);
4076: END IF;
4077: END IF;
4078: CLOSE CONTRACT_STATUS_CSR;

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

4079: END IF;
4080:
4081: --If l_valid_flag is already set to 'N', we do not perform any more checks
4082: --Contract Type is required
4083: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4084: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4085: 'Checking if user enters contract type');
4086: END IF;
4087: IF l_import_contracts_rec.contract_type_txt IS NOT NULL THEN

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

4080:
4081: --If l_valid_flag is already set to 'N', we do not perform any more checks
4082: --Contract Type is required
4083: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4084: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4085: 'Checking if user enters contract type');
4086: END IF;
4087: IF l_import_contracts_rec.contract_type_txt IS NOT NULL THEN
4088: l_import_contracts_rec.contract_type_txt := LTRIM(l_import_contracts_rec.contract_type_txt);

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

4090: END IF;
4091: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.contract_type_txt IS NULL OR LENGTH(l_import_contracts_rec.contract_type_txt)=0)) THEN
4092: l_valid_flag := 'N';
4093: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CON_TYPE');
4094: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4095: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4096: 'Contract Type is missing');
4097: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4098: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4091: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.contract_type_txt IS NULL OR LENGTH(l_import_contracts_rec.contract_type_txt)=0)) THEN
4092: l_valid_flag := 'N';
4093: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CON_TYPE');
4094: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4095: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4096: 'Contract Type is missing');
4097: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4098: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4093: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CON_TYPE');
4094: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4095: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4096: 'Contract Type is missing');
4097: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4098: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4100: 'l_error_msg: '||l_error_msg);
4101: END IF;

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

4095: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4096: 'Contract Type is missing');
4097: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4098: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4100: 'l_error_msg: '||l_error_msg);
4101: END IF;
4102: END IF;
4103:

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

4102: END IF;
4103:
4104: --If l_valid_flag is already set to 'N', we do not perform any more checks
4105: --Contract Type should resolve to valid contract type code
4106: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4107: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4108: 'Checking if contract type is valid');
4109: END IF;
4110: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_type_txt IS NOT NULL) THEN

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

4103:
4104: --If l_valid_flag is already set to 'N', we do not perform any more checks
4105: --Contract Type should resolve to valid contract type code
4106: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4107: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4108: 'Checking if contract type is valid');
4109: END IF;
4110: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_type_txt IS NOT NULL) THEN
4111: OPEN CONTRACT_TYPE_CSR(l_import_contracts_rec.contract_type_txt);

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

4112: FETCH CONTRACT_TYPE_CSR INTO l_contract_type;
4113: IF CONTRACT_TYPE_CSR%NOTFOUND THEN
4114: l_valid_flag := 'N';
4115: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CON_TYPE');
4116: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4117: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4118: 'Contract Type is invalid');
4119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4120: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4113: IF CONTRACT_TYPE_CSR%NOTFOUND THEN
4114: l_valid_flag := 'N';
4115: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CON_TYPE');
4116: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4117: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4118: 'Contract Type is invalid');
4119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4120: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4121: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4115: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CON_TYPE');
4116: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4117: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4118: 'Contract Type is invalid');
4119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4120: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4121: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4122: 'l_error_msg: '||l_error_msg);
4123: END IF;

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

4117: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4118: 'Contract Type is invalid');
4119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4120: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4121: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4122: 'l_error_msg: '||l_error_msg);
4123: END IF;
4124: END IF;
4125: CLOSE CONTRACT_TYPE_CSR;

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

4126: END IF;
4127:
4128: --If l_valid_flag is already set to 'N', we do not perform any more checks
4129: --Contract Effective Date is required
4130: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4131: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4132: 'Checking if user enters contract effective date');
4133: END IF;
4134: IF l_import_contracts_rec.contract_effective_date IS NOT NULL THEN

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

4127:
4128: --If l_valid_flag is already set to 'N', we do not perform any more checks
4129: --Contract Effective Date is required
4130: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4131: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4132: 'Checking if user enters contract effective date');
4133: END IF;
4134: IF l_import_contracts_rec.contract_effective_date IS NOT NULL THEN
4135: l_import_contracts_rec.contract_effective_date := LTRIM(l_import_contracts_rec.contract_effective_date);

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

4138:
4139: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.contract_effective_date IS NULL OR LENGTH(l_import_contracts_rec.contract_effective_date)=0)) THEN
4140: l_valid_flag := 'N';
4141: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_EFF_DATE');
4142: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4144: 'Contract Effective Date is missing');
4145: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4146: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4139: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.contract_effective_date IS NULL OR LENGTH(l_import_contracts_rec.contract_effective_date)=0)) THEN
4140: l_valid_flag := 'N';
4141: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_EFF_DATE');
4142: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4144: 'Contract Effective Date is missing');
4145: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4146: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4147: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4141: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_EFF_DATE');
4142: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4144: 'Contract Effective Date is missing');
4145: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4146: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4147: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4148: 'l_error_msg: '||l_error_msg);
4149: END IF;

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

4143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4144: 'Contract Effective Date is missing');
4145: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4146: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4147: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4148: 'l_error_msg: '||l_error_msg);
4149: END IF;
4150: END IF;
4151:

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

4150: END IF;
4151:
4152: --If l_valid_flag is already set to 'N', we do not perform any more checks
4153: --Contract Effective Date should be in the format specified by user language preference
4154: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4155: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4156: 'Checking if contract effective date is in the correct format');
4157: END IF;
4158: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_effective_date IS NOT NULL) THEN

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

4151:
4152: --If l_valid_flag is already set to 'N', we do not perform any more checks
4153: --Contract Effective Date should be in the format specified by user language preference
4154: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4155: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4156: 'Checking if contract effective date is in the correct format');
4157: END IF;
4158: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_effective_date IS NOT NULL) THEN
4159: BEGIN

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

4161: EXCEPTION
4162: WHEN OTHERS THEN
4163: l_valid_flag := 'N';
4164: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EFF_DATE');
4165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4167: 'Contract Effective Date is not valid');
4168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4169: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4162: WHEN OTHERS THEN
4163: l_valid_flag := 'N';
4164: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EFF_DATE');
4165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4167: 'Contract Effective Date is not valid');
4168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4169: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4170: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4164: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EFF_DATE');
4165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4167: 'Contract Effective Date is not valid');
4168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4169: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4170: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4171: 'l_error_msg: '||l_error_msg);
4172: END IF;

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

4166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4167: 'Contract Effective Date is not valid');
4168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4169: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4170: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4171: 'l_error_msg: '||l_error_msg);
4172: END IF;
4173: END;
4174: END IF;

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

4174: END IF;
4175:
4176: --If l_valid_flag is already set to 'N', we do not perform any more checks
4177: --Contract Expiration Date should be in the format specified by user language preference
4178: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4179: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4180: 'Checking if contract expriation date is in the correct format');
4181: END IF;
4182: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_expiration_date IS NOT NULL) THEN

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

4175:
4176: --If l_valid_flag is already set to 'N', we do not perform any more checks
4177: --Contract Expiration Date should be in the format specified by user language preference
4178: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4179: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4180: 'Checking if contract expriation date is in the correct format');
4181: END IF;
4182: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_expiration_date IS NOT NULL) THEN
4183: BEGIN

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

4185: EXCEPTION
4186: WHEN OTHERS THEN
4187: l_valid_flag := 'N';
4188: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
4189: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4190: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4191: 'Contract Expiration Date is not valid');
4192: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4193: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4186: WHEN OTHERS THEN
4187: l_valid_flag := 'N';
4188: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
4189: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4190: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4191: 'Contract Expiration Date is not valid');
4192: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4193: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4194: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4188: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
4189: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4190: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4191: 'Contract Expiration Date is not valid');
4192: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4193: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4194: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4195: 'l_error_msg: '||l_error_msg);
4196: END IF;

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

4190: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4191: 'Contract Expiration Date is not valid');
4192: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4193: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4194: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4195: 'l_error_msg: '||l_error_msg);
4196: END IF;
4197: END;
4198: END IF;

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

4198: END IF;
4199:
4200: --If l_valid_flag is already set to 'N', we do not perform any more checks
4201: --Contract Expiration Date should be after Contract Effective Date
4202: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4203: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4204: 'Checking if contract expriation date is in the correct format');
4205: END IF;
4206: IF (l_valid_flag = 'Y'

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

4199:
4200: --If l_valid_flag is already set to 'N', we do not perform any more checks
4201: --Contract Expiration Date should be after Contract Effective Date
4202: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4203: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4204: 'Checking if contract expriation date is in the correct format');
4205: END IF;
4206: IF (l_valid_flag = 'Y'
4207: AND l_import_contracts_rec.contract_effective_date IS NOT NULL

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

4210: --so it is safe to convert the dates
4211: IF TRUNC(to_date(l_import_contracts_rec.contract_effective_date,G_IMP_DATE_FORMAT)) > TRUNC(to_date(l_import_contracts_rec.contract_expiration_date,G_IMP_DATE_FORMAT)) THEN
4212: l_valid_flag := 'N';
4213: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_EXP_BEFORE_EFF');
4214: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4215: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4216: 'Contract Expiration Date is before Contract Effective Date');
4217: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4218: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4211: IF TRUNC(to_date(l_import_contracts_rec.contract_effective_date,G_IMP_DATE_FORMAT)) > TRUNC(to_date(l_import_contracts_rec.contract_expiration_date,G_IMP_DATE_FORMAT)) THEN
4212: l_valid_flag := 'N';
4213: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_EXP_BEFORE_EFF');
4214: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4215: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4216: 'Contract Expiration Date is before Contract Effective Date');
4217: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4218: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4219: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4213: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_EXP_BEFORE_EFF');
4214: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4215: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4216: 'Contract Expiration Date is before Contract Effective Date');
4217: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4218: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4219: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4220: 'l_error_msg: '||l_error_msg);
4221: END IF;

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

4215: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4216: 'Contract Expiration Date is before Contract Effective Date');
4217: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4218: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4219: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4220: 'l_error_msg: '||l_error_msg);
4221: END IF;
4222: END IF;
4223: END IF;

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

4223: END IF;
4224:
4225: --If l_valid_flag is already set to 'N', we do not perform any more checks
4226: --Organization Name is required
4227: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4228: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4229: 'Checking if user enters organization name');
4230: END IF;
4231: IF l_import_contracts_rec.org_name IS NOT NULL THEN

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

4224:
4225: --If l_valid_flag is already set to 'N', we do not perform any more checks
4226: --Organization Name is required
4227: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4228: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4229: 'Checking if user enters organization name');
4230: END IF;
4231: IF l_import_contracts_rec.org_name IS NOT NULL THEN
4232: l_import_contracts_rec.org_name := LTRIM(l_import_contracts_rec.org_name);

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

4234: END IF;
4235: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.org_name IS NULL OR LENGTH(l_import_contracts_rec.org_name)=0)) THEN
4236: l_valid_flag := 'N';
4237: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_ORG');
4238: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4239: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4240: 'Operating Unit is missing');
4241: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4242: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4235: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.org_name IS NULL OR LENGTH(l_import_contracts_rec.org_name)=0)) THEN
4236: l_valid_flag := 'N';
4237: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_ORG');
4238: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4239: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4240: 'Operating Unit is missing');
4241: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4242: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4243: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4237: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_ORG');
4238: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4239: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4240: 'Operating Unit is missing');
4241: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4242: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4243: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4244: 'l_error_msg: '||l_error_msg);
4245: END IF;

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

4239: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4240: 'Operating Unit is missing');
4241: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4242: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4243: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4244: 'l_error_msg: '||l_error_msg);
4245: END IF;
4246: END IF;
4247:

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

4246: END IF;
4247:
4248: --If l_valid_flag is already set to 'N', we do not perform any more checks
4249: --Organization Name should resolve to a valid Org ID
4250: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4251: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4252: 'Checking if organization name is valid');
4253: END IF;
4254: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.org_name IS NOT NULL) THEN

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

4247:
4248: --If l_valid_flag is already set to 'N', we do not perform any more checks
4249: --Organization Name should resolve to a valid Org ID
4250: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4251: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4252: 'Checking if organization name is valid');
4253: END IF;
4254: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.org_name IS NOT NULL) THEN
4255: OPEN ORG_NAME_CSR(l_import_contracts_rec.org_name);

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

4256: FETCH ORG_NAME_CSR INTO l_org_id;
4257: IF ORG_NAME_CSR%NOTFOUND THEN
4258: l_valid_flag := 'N';
4259: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_ORG');
4260: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4262: 'Operating Unit is invalid');
4263: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4264: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4257: IF ORG_NAME_CSR%NOTFOUND THEN
4258: l_valid_flag := 'N';
4259: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_ORG');
4260: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4262: 'Operating Unit is invalid');
4263: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4264: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4259: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_ORG');
4260: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4262: 'Operating Unit is invalid');
4263: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4264: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4266: 'l_error_msg: '||l_error_msg);
4267: END IF;

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

4261: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4262: 'Operating Unit is invalid');
4263: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4264: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4265: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4266: 'l_error_msg: '||l_error_msg);
4267: END IF;
4268: END IF;
4269: CLOSE ORG_NAME_CSR;

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

4270: END IF;
4271:
4272: --If l_valid_flag is already set to 'N', we do not perform any more checks
4273: --Organization Name is required
4274: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4275: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4276: 'Checking if user enters owner user name');
4277: END IF;
4278: IF l_import_contracts_rec.owner_user_name IS NOT NULL THEN

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

4271:
4272: --If l_valid_flag is already set to 'N', we do not perform any more checks
4273: --Organization Name is required
4274: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4275: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4276: 'Checking if user enters owner user name');
4277: END IF;
4278: IF l_import_contracts_rec.owner_user_name IS NOT NULL THEN
4279: l_import_contracts_rec.owner_user_name := LTRIM(l_import_contracts_rec.owner_user_name);

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

4281: END IF;
4282: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.owner_user_name IS NULL OR LENGTH(l_import_contracts_rec.owner_user_name)=0)) THEN
4283: l_valid_flag := 'N';
4284: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_OWNER');
4285: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4287: 'Owner User Name is missing');
4288: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4289: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4282: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.owner_user_name IS NULL OR LENGTH(l_import_contracts_rec.owner_user_name)=0)) THEN
4283: l_valid_flag := 'N';
4284: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_OWNER');
4285: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4287: 'Owner User Name is missing');
4288: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4289: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4284: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_OWNER');
4285: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4287: 'Owner User Name is missing');
4288: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4289: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4291: 'l_error_msg: '||l_error_msg);
4292: END IF;

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

4286: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4287: 'Owner User Name is missing');
4288: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4289: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4291: 'l_error_msg: '||l_error_msg);
4292: END IF;
4293: END IF;
4294:

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

4294:
4295: --If l_valid_flag is already set to 'N', we do not perform any more checks
4296: --Owner User Name should resolve to a valid FND User ID
4297: --Also, the owner needs to be an employee
4298: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4299: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4300: 'Checking if owner user name is valid');
4301: END IF;
4302: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.owner_user_name IS NOT NULL) THEN

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

4295: --If l_valid_flag is already set to 'N', we do not perform any more checks
4296: --Owner User Name should resolve to a valid FND User ID
4297: --Also, the owner needs to be an employee
4298: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4299: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4300: 'Checking if owner user name is valid');
4301: END IF;
4302: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.owner_user_name IS NOT NULL) THEN
4303: OPEN OWNER_NAME_CSR(l_import_contracts_rec.owner_user_name);

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

4304: FETCH OWNER_NAME_CSR INTO l_owner_user_id;
4305: IF OWNER_NAME_CSR%NOTFOUND THEN
4306: l_valid_flag := 'N';
4307: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_OWNER');
4308: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4309: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4310: 'Owner User Name is invalid');
4311: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4312: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4305: IF OWNER_NAME_CSR%NOTFOUND THEN
4306: l_valid_flag := 'N';
4307: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_OWNER');
4308: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4309: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4310: 'Owner User Name is invalid');
4311: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4312: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4313: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4307: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_OWNER');
4308: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4309: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4310: 'Owner User Name is invalid');
4311: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4312: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4313: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4314: 'l_error_msg: '||l_error_msg);
4315: END IF;

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

4309: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4310: 'Owner User Name is invalid');
4311: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4312: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4313: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4314: 'l_error_msg: '||l_error_msg);
4315: END IF;
4316: END IF;
4317: CLOSE OWNER_NAME_CSR;

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

4318: END IF;
4319:
4320: --If l_valid_flag is already set to 'N', we do not perform any more checks
4321: --Currency Code is required if Amount is entered
4322: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4323: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4324: 'Checking if user enters currency when amount is entered');
4325: END IF;
4326: IF l_import_contracts_rec.currency_code IS NOT NULL THEN

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

4319:
4320: --If l_valid_flag is already set to 'N', we do not perform any more checks
4321: --Currency Code is required if Amount is entered
4322: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4323: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4324: 'Checking if user enters currency when amount is entered');
4325: END IF;
4326: IF l_import_contracts_rec.currency_code IS NOT NULL THEN
4327: l_import_contracts_rec.currency_code := LTRIM(l_import_contracts_rec.currency_code);

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

4331: AND l_import_contracts_rec.contract_amount IS NOT NULL
4332: AND (l_import_contracts_rec.currency_code IS NULL OR LENGTH(l_import_contracts_rec.currency_code)=0)) THEN
4333: l_valid_flag := 'N';
4334: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CURRENCY');
4335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4337: 'Owner User Name is missing');
4338: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4339: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4332: AND (l_import_contracts_rec.currency_code IS NULL OR LENGTH(l_import_contracts_rec.currency_code)=0)) THEN
4333: l_valid_flag := 'N';
4334: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CURRENCY');
4335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4337: 'Owner User Name is missing');
4338: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4339: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4340: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4334: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CURRENCY');
4335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4337: 'Owner User Name is missing');
4338: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4339: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4340: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4341: 'l_error_msg: '||l_error_msg);
4342: END IF;

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

4336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4337: 'Owner User Name is missing');
4338: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4339: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4340: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4341: 'l_error_msg: '||l_error_msg);
4342: END IF;
4343: END IF;
4344:

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

4343: END IF;
4344:
4345: --If l_valid_flag is already set to 'N', we do not perform any more checks
4346: --Currency should exist in FND_CURRENCIES table
4347: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4348: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4349: 'Checking if currency is valid');
4350: END IF;
4351: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.currency_code IS NOT NULL) THEN

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

4344:
4345: --If l_valid_flag is already set to 'N', we do not perform any more checks
4346: --Currency should exist in FND_CURRENCIES table
4347: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4348: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4349: 'Checking if currency is valid');
4350: END IF;
4351: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.currency_code IS NOT NULL) THEN
4352: OPEN CURRENCY_CSR(l_import_contracts_rec.currency_code);

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

4353: FETCH CURRENCY_CSR INTO l_currency_code;
4354: IF CURRENCY_CSR%NOTFOUND THEN
4355: l_valid_flag := 'N';
4356: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CURRENCY');
4357: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4358: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4359: 'Currency is invalid');
4360: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4361: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4354: IF CURRENCY_CSR%NOTFOUND THEN
4355: l_valid_flag := 'N';
4356: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CURRENCY');
4357: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4358: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4359: 'Currency is invalid');
4360: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4361: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4362: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4356: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CURRENCY');
4357: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4358: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4359: 'Currency is invalid');
4360: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4361: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4362: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4363: 'l_error_msg: '||l_error_msg);
4364: END IF;

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

4358: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4359: 'Currency is invalid');
4360: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4361: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4362: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4363: 'l_error_msg: '||l_error_msg);
4364: END IF;
4365: END IF;
4366: CLOSE CURRENCY_CSR;

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

4367: END IF;
4368:
4369: --If l_valid_flag is already set to 'N', we do not perform any more checks
4370: --Amout should be in the format specified by user language preference
4371: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4372: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4373: 'Checking if amount is in the correct format');
4374: END IF;
4375: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_amount IS NOT NULL) THEN

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

4368:
4369: --If l_valid_flag is already set to 'N', we do not perform any more checks
4370: --Amout should be in the format specified by user language preference
4371: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4372: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4373: 'Checking if amount is in the correct format');
4374: END IF;
4375: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_amount IS NOT NULL) THEN
4376: BEGIN

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

4378: EXCEPTION
4379: WHEN OTHERS THEN
4380: l_valid_flag := 'N';
4381: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AMOUNT');
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: 'Amount is not valid');
4385: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4386: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4379: WHEN OTHERS THEN
4380: l_valid_flag := 'N';
4381: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AMOUNT');
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: 'Amount is not valid');
4385: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4386: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4387: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4381: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AMOUNT');
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: 'Amount is not valid');
4385: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4386: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4387: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4388: 'l_error_msg: '||l_error_msg);
4389: END IF;

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

4383: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4384: 'Amount is not valid');
4385: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4386: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4387: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4388: 'l_error_msg: '||l_error_msg);
4389: END IF;
4390: END;
4391:

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

4393: END IF;
4394:
4395: --If l_valid_flag is already set to 'N', we do not perform any more checks
4396: --Authoring Party should resolve to valid authoring_party_code
4397: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4398: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4399: 'Checking if authoring party is valid');
4400: END IF;
4401: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.authoring_party_txt IS NOT NULL) THEN

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

4394:
4395: --If l_valid_flag is already set to 'N', we do not perform any more checks
4396: --Authoring Party should resolve to valid authoring_party_code
4397: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4398: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4399: 'Checking if authoring party is valid');
4400: END IF;
4401: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.authoring_party_txt IS NOT NULL) THEN
4402: OPEN AUTHORING_PARTY_CSR(l_import_contracts_rec.authoring_party_txt);

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

4403: FETCH AUTHORING_PARTY_CSR INTO l_authoring_party_code;
4404: IF AUTHORING_PARTY_CSR%NOTFOUND THEN
4405: l_valid_flag := 'N';
4406: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AUTH_PARTY');
4407: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4408: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4409: 'Authoring Party is invalid');
4410: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4411: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4404: IF AUTHORING_PARTY_CSR%NOTFOUND THEN
4405: l_valid_flag := 'N';
4406: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AUTH_PARTY');
4407: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4408: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4409: 'Authoring Party is invalid');
4410: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4411: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4412: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4406: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AUTH_PARTY');
4407: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4408: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4409: 'Authoring Party is invalid');
4410: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4411: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4412: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4413: 'l_error_msg: '||l_error_msg);
4414: END IF;

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

4408: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4409: 'Authoring Party is invalid');
4410: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4411: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4412: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4413: 'l_error_msg: '||l_error_msg);
4414: END IF;
4415: END IF;
4416: CLOSE AUTHORING_PARTY_CSR;

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

4417: END IF;
4418:
4419: --If l_valid_flag is already set to 'N', we do not perform any more checks
4420: --Physical Location should be <2000
4421: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4422: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4423: 'Checking if Physical Location is too long');
4424: END IF;
4425: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.physical_location)>l_location_length) THEN

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

4418:
4419: --If l_valid_flag is already set to 'N', we do not perform any more checks
4420: --Physical Location should be <2000
4421: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4422: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4423: 'Checking if Physical Location is too long');
4424: END IF;
4425: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.physical_location)>l_location_length) THEN
4426: l_valid_flag := 'N';

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

4424: END IF;
4425: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.physical_location)>l_location_length) THEN
4426: l_valid_flag := 'N';
4427: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_LOCATION');
4428: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4429: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4430: 'Physical Location is too long');
4431: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4432: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4425: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.physical_location)>l_location_length) THEN
4426: l_valid_flag := 'N';
4427: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_LOCATION');
4428: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4429: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4430: 'Physical Location is too long');
4431: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4432: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4433: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4427: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_LOCATION');
4428: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4429: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4430: 'Physical Location is too long');
4431: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4432: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4433: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4434: 'l_error_msg: '||l_error_msg);
4435: END IF;

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

4429: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4430: 'Physical Location is too long');
4431: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4432: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4433: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4434: 'l_error_msg: '||l_error_msg);
4435: END IF;
4436: END IF;
4437:

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

4436: END IF;
4437:
4438: --If l_valid_flag is already set to 'N', we do not perform any more checks
4439: --Keywords should be <2000
4440: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4441: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4442: 'Checking if keywords is too long');
4443: END IF;
4444: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.keywords)>l_keywords_length) THEN

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

4437:
4438: --If l_valid_flag is already set to 'N', we do not perform any more checks
4439: --Keywords should be <2000
4440: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4441: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4442: 'Checking if keywords is too long');
4443: END IF;
4444: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.keywords)>l_keywords_length) THEN
4445: l_valid_flag := 'N';

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

4443: END IF;
4444: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.keywords)>l_keywords_length) THEN
4445: l_valid_flag := 'N';
4446: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_KEYWORDS');
4447: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4448: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4449: 'Keywords is too long');
4450: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4451: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4444: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.keywords)>l_keywords_length) THEN
4445: l_valid_flag := 'N';
4446: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_KEYWORDS');
4447: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4448: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4449: 'Keywords is too long');
4450: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4451: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4452: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4446: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_KEYWORDS');
4447: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4448: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4449: 'Keywords is too long');
4450: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4451: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4452: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4453: 'l_error_msg: '||l_error_msg);
4454: END IF;

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

4448: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4449: 'Keywords is too long');
4450: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4451: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4452: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4453: 'l_error_msg: '||l_error_msg);
4454: END IF;
4455: END IF;
4456:

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

4455: END IF;
4456:
4457: --If l_valid_flag is already set to 'N', we do not perform any more checks
4458: --Description should be <2000
4459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4460: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4461: 'Checking if description is too long');
4462: END IF;
4463: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.description)>l_description_length) THEN

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

4456:
4457: --If l_valid_flag is already set to 'N', we do not perform any more checks
4458: --Description should be <2000
4459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4460: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4461: 'Checking if description is too long');
4462: END IF;
4463: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.description)>l_description_length) THEN
4464: l_valid_flag := 'N';

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

4462: END IF;
4463: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.description)>l_description_length) THEN
4464: l_valid_flag := 'N';
4465: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_DESC');
4466: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4467: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4468: 'Description is too long');
4469: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4470: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4463: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.description)>l_description_length) THEN
4464: l_valid_flag := 'N';
4465: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_DESC');
4466: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4467: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4468: 'Description is too long');
4469: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4470: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4471: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4465: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_DESC');
4466: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4467: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4468: 'Description is too long');
4469: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4470: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4471: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4472: 'l_error_msg: '||l_error_msg);
4473: END IF;

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

4467: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4468: 'Description is too long');
4469: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4470: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4471: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4472: 'l_error_msg: '||l_error_msg);
4473: END IF;
4474: END IF;
4475:

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

4474: END IF;
4475:
4476: --If l_valid_flag is already set to 'N', we do not perform any more checks
4477: --Version Comments should be <2000
4478: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4479: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4480: 'Checking if version comments is too long');
4481: END IF;
4482: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.version_comments)>l_version_comments_length) THEN

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

4475:
4476: --If l_valid_flag is already set to 'N', we do not perform any more checks
4477: --Version Comments should be <2000
4478: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4479: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4480: 'Checking if version comments is too long');
4481: END IF;
4482: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.version_comments)>l_version_comments_length) THEN
4483: l_valid_flag := 'N';

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

4481: END IF;
4482: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.version_comments)>l_version_comments_length) THEN
4483: l_valid_flag := 'N';
4484: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
4485: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4486: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4487: 'Version Comments is too long');
4488: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4489: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4482: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.version_comments)>l_version_comments_length) THEN
4483: l_valid_flag := 'N';
4484: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
4485: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4486: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4487: 'Version Comments is too long');
4488: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4489: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4490: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4484: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
4485: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4486: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4487: 'Version Comments is too long');
4488: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4489: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4490: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4491: 'l_error_msg: '||l_error_msg);
4492: END IF;

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

4486: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4487: 'Version Comments is too long');
4488: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4489: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4490: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4491: 'l_error_msg: '||l_error_msg);
4492: END IF;
4493: END IF;
4494:

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

4495: --If l_valid_flag is already set to 'N', we do not perform any more checks
4496: --Validate Contract Parties
4497: --1. There should exactly one internal party
4498: --2. There should be at least one external party
4499: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4500: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4501: 'Validating contract parties');
4502: END IF;
4503: IF (l_valid_flag = 'Y') THEN

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

4496: --Validate Contract Parties
4497: --1. There should exactly one internal party
4498: --2. There should be at least one external party
4499: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4500: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4501: 'Validating contract parties');
4502: END IF;
4503: IF (l_valid_flag = 'Y') THEN
4504: OPEN CONTRACT_PARTIES_CSR(l_import_contracts_rec.imp_contract_id);

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

4518:
4519: IF l_int_parties_count <> 1 THEN
4520: l_valid_flag := 'N';
4521: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTIES');
4522: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4523: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4524: 'There are not exactly one internal party');
4525: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4526: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4519: IF l_int_parties_count <> 1 THEN
4520: l_valid_flag := 'N';
4521: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTIES');
4522: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4523: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4524: 'There are not exactly one internal party');
4525: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4526: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4521: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTIES');
4522: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4523: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4524: 'There are not exactly one internal party');
4525: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4526: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4528: 'l_error_msg: '||l_error_msg);
4529: END IF;

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

4523: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4524: 'There are not exactly one internal party');
4525: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4526: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4528: 'l_error_msg: '||l_error_msg);
4529: END IF;
4530: ELSE
4531: --fix bug 4160416, need to validate internal party name with the org name in the header

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

4531: --fix bug 4160416, need to validate internal party name with the org name in the header
4532: IF l_import_contracts_rec.org_name <> l_int_party_name THEN
4533: l_valid_flag := 'N';
4534: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTY_NAME');
4535: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4536: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4537: 'Internal party name and org name are not matching');
4538: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4539: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4532: IF l_import_contracts_rec.org_name <> l_int_party_name THEN
4533: l_valid_flag := 'N';
4534: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTY_NAME');
4535: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4536: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4537: 'Internal party name and org name are not matching');
4538: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4539: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4540: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4534: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTY_NAME');
4535: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4536: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4537: 'Internal party name and org name are not matching');
4538: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4539: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4540: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4541: 'l_error_msg: '||l_error_msg);
4542: END IF;

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

4536: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4537: 'Internal party name and org name are not matching');
4538: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4539: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4540: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4541: 'l_error_msg: '||l_error_msg);
4542: END IF;
4543: END IF;
4544: END IF;

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

4545:
4546: IF l_ext_parties_count <1 THEN
4547: l_valid_flag := 'N';
4548: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXT_PARTIES');
4549: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4550: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4551: 'There are less than one external party');
4552: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4553: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4546: IF l_ext_parties_count <1 THEN
4547: l_valid_flag := 'N';
4548: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXT_PARTIES');
4549: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4550: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4551: 'There are less than one external party');
4552: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4553: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4548: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXT_PARTIES');
4549: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4550: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4551: 'There are less than one external party');
4552: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4553: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4555: 'l_error_msg: '||l_error_msg);
4556: END IF;

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

4550: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4551: 'There are less than one external party');
4552: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4553: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4555: 'l_error_msg: '||l_error_msg);
4556: END IF;
4557: END IF;
4558: END IF;

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

4568: EXIT WHEN VALID_PARTIES_CSR%NOTFOUND;
4569:
4570: IF l_valid_parties_rec.valid_flag = 'N' THEN
4571: l_valid_flag := 'N';
4572: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4573: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4574: 'One of the contract parties is invalid');
4575: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4576: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4569:
4570: IF l_valid_parties_rec.valid_flag = 'N' THEN
4571: l_valid_flag := 'N';
4572: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4573: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4574: 'One of the contract parties is invalid');
4575: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4576: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4577: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4571: l_valid_flag := 'N';
4572: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4573: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4574: 'One of the contract parties is invalid');
4575: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4576: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4577: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4578: 'Party ID: '||l_valid_parties_rec.imp_party_id);
4579: END IF;

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

4573: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4574: 'One of the contract parties is invalid');
4575: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4576: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4577: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4578: 'Party ID: '||l_valid_parties_rec.imp_party_id);
4579: END IF;
4580: END IF;
4581: END LOOP;

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

4590: EXIT WHEN VALID_DOCUMENTS_CSR%NOTFOUND;
4591:
4592: IF l_valid_documents_rec.valid_flag = 'N' THEN
4593: l_valid_flag := 'N';
4594: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4595: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4596: 'One of the contract documents is invalid');
4597: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4598: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4591:
4592: IF l_valid_documents_rec.valid_flag = 'N' THEN
4593: l_valid_flag := 'N';
4594: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4595: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4596: 'One of the contract documents is invalid');
4597: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4598: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4599: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4593: l_valid_flag := 'N';
4594: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4595: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4596: 'One of the contract documents is invalid');
4597: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4598: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4599: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4600: 'Document ID: '||l_valid_documents_rec.imp_document_id);
4601: END IF;

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

4595: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4596: 'One of the contract documents is invalid');
4597: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4598: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4599: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4600: 'Document ID: '||l_valid_documents_rec.imp_document_id);
4601: END IF;
4602: END IF;
4603: END LOOP;

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

4651: CLOSE CONTRACT_NUMBER_CSR;
4652: END IF;
4653: END IF;
4654:
4655: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4656: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4657: 'l_contract_id: '||l_contract_id);
4658: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4659: 'l_contract_number: '||l_contract_number);

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

4652: END IF;
4653: END IF;
4654:
4655: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4656: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4657: 'l_contract_id: '||l_contract_id);
4658: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4659: 'l_contract_number: '||l_contract_number);
4660: END IF;

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

4654:
4655: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4656: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4657: 'l_contract_id: '||l_contract_id);
4658: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4659: 'l_contract_number: '||l_contract_number);
4660: END IF;
4661:
4662: IF (l_valid_flag = 'Y') THEN

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

4687: END IF;
4688: END LOOP;
4689: CLOSE IMPORT_CONTRACTS_CSR;
4690:
4691: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4692: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4693: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
4694: END IF;
4695:

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

4688: END LOOP;
4689: CLOSE IMPORT_CONTRACTS_CSR;
4690:
4691: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4692: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4693: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
4694: END IF;
4695:
4696:

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

4746: IF VALID_DOCUMENTS_CSR%ISOPEN THEN
4747: CLOSE VALID_DOCUMENTS_CSR;
4748: END IF;
4749:
4750: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4751: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
4752: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
4753: END IF;
4754:

Line 4751: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

4747: CLOSE VALID_DOCUMENTS_CSR;
4748: END IF;
4749:
4750: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4751: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
4752: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
4753: END IF;
4754:
4755: x_return_status := FND_API.G_RET_STS_ERROR;

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

4805: IF VALID_DOCUMENTS_CSR%ISOPEN THEN
4806: CLOSE VALID_DOCUMENTS_CSR;
4807: END IF;
4808:
4809: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4810: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
4811: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4812: END IF;
4813:

Line 4810: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

4806: CLOSE VALID_DOCUMENTS_CSR;
4807: END IF;
4808:
4809: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4810: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
4811: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
4812: END IF;
4813:
4814: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

4866: CLOSE VALID_DOCUMENTS_CSR;
4867: END IF;
4868:
4869:
4870: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4871: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
4872: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
4873: END IF;
4874:

Line 4871: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

4867: END IF;
4868:
4869:
4870: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4871: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
4872: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
4873: END IF;
4874:
4875: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

4975:
4976: -- Initialize API return status to success
4977: x_return_status := FND_API.G_RET_STS_SUCCESS;
4978:
4979: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4980: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4981: 'Inserting contracts into production table...');
4982: END IF;
4983:

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

4976: -- Initialize API return status to success
4977: x_return_status := FND_API.G_RET_STS_SUCCESS;
4978:
4979: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4980: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4981: 'Inserting contracts into production table...');
4982: END IF;
4983:
4984: l_min_contract_id := 0;

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

5382: l_api_name CONSTANT VARCHAR2(30):='validate_contracts';
5383: l_api_version CONSTANT NUMBER := 1.0;
5384:
5385: BEGIN
5386: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5387: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5388: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
5389: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5390: 'p_request_id = ' || p_request_id);

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

5383: l_api_version CONSTANT NUMBER := 1.0;
5384:
5385: BEGIN
5386: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5387: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5388: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
5389: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5390: 'p_request_id = ' || p_request_id);
5391:

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

5385: BEGIN
5386: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5387: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5388: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
5389: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5390: 'p_request_id = ' || p_request_id);
5391:
5392: END IF;
5393:

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

5404: -- Initialize API return status to success
5405: x_return_status := FND_API.G_RET_STS_SUCCESS;
5406:
5407: --We need to validate documents and parties before we validate contract headers
5408: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5409: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5410: 'Validating Contract Documents...');
5411: END IF;
5412:

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

5405: x_return_status := FND_API.G_RET_STS_SUCCESS;
5406:
5407: --We need to validate documents and parties before we validate contract headers
5408: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5409: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5410: 'Validating Contract Documents...');
5411: END IF;
5412:
5413: validate_import_documents(p_api_version => 1.0,

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

5416: x_return_status => x_return_status,
5417: x_msg_count => x_msg_count,
5418: x_msg_data => x_msg_data);
5419:
5420: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5422: 'Validating Contract Parties...');
5423: END IF;
5424:

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

5417: x_msg_count => x_msg_count,
5418: x_msg_data => x_msg_data);
5419:
5420: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5422: 'Validating Contract Parties...');
5423: END IF;
5424:
5425: validate_import_parties(p_api_version => 1.0,

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

5428: x_return_status => x_return_status,
5429: x_msg_count => x_msg_count,
5430: x_msg_data => x_msg_data);
5431:
5432: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5433: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5434: 'Validating Contract Headers...');
5435: END IF;
5436:

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

5429: x_msg_count => x_msg_count,
5430: x_msg_data => x_msg_data);
5431:
5432: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5433: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5434: 'Validating Contract Headers...');
5435: END IF;
5436:
5437: validate_import_contracts(p_api_version => 1.0,

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

5440: x_return_status => x_return_status,
5441: x_msg_count => x_msg_count,
5442: x_msg_data => x_msg_data);
5443:
5444: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5445: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5446: 'Finished validating Contracts. Now we will insert valid headers and parties into production tables.');
5447: END IF;
5448:

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

5441: x_msg_count => x_msg_count,
5442: x_msg_data => x_msg_data);
5443:
5444: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5445: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5446: 'Finished validating Contracts. Now we will insert valid headers and parties into production tables.');
5447: END IF;
5448:
5449: insert_prod_data(p_api_version => 1.0,

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

5456: x_number_inserted => x_number_inserted);
5457:
5458: EXCEPTION
5459: WHEN FND_API.G_EXC_ERROR THEN
5460: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5461: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5462: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
5463: END IF;
5464:

Line 5461: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

5457:
5458: EXCEPTION
5459: WHEN FND_API.G_EXC_ERROR THEN
5460: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5461: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5462: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
5463: END IF;
5464:
5465: x_return_status := FND_API.G_RET_STS_ERROR;

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

5467: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5468: p_data => x_msg_data);
5469:
5470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5471: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5472: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5473: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5474: END IF;
5475:

Line 5472: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

5468: p_data => x_msg_data);
5469:
5470: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5471: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5472: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5473: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5474: END IF;
5475:
5476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

5478: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5479: p_data => x_msg_data);
5480:
5481: WHEN OTHERS THEN
5482: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5483: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5484: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
5485: END IF;
5486:

Line 5483: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

5479: p_data => x_msg_data);
5480:
5481: WHEN OTHERS THEN
5482: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5483: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5484: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
5485: END IF;
5486:
5487: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

5556: BEGIN
5557:
5558: l_api_name := 'delete_import_contract';
5559:
5560: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5561: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5562: 'Entered OKC_REP_UTIL_PVT.delete_import_contract');
5563: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5564: 'p_contract_id = ' || p_contract_id);

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

5557:
5558: l_api_name := 'delete_import_contract';
5559:
5560: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5561: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5562: 'Entered OKC_REP_UTIL_PVT.delete_import_contract');
5563: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5564: 'p_contract_id = ' || p_contract_id);
5565: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5559:
5560: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5561: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5562: 'Entered OKC_REP_UTIL_PVT.delete_import_contract');
5563: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5564: 'p_contract_id = ' || p_contract_id);
5565: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5566: 'p_imp_document_id = ' || p_imp_document_id);
5567: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5561: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5562: 'Entered OKC_REP_UTIL_PVT.delete_import_contract');
5563: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5564: 'p_contract_id = ' || p_contract_id);
5565: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5566: 'p_imp_document_id = ' || p_imp_document_id);
5567: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5568: 'p_error_msg_txt = ' || p_error_msg_txt);
5569: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5563: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5564: 'p_contract_id = ' || p_contract_id);
5565: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5566: 'p_imp_document_id = ' || p_imp_document_id);
5567: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5568: 'p_error_msg_txt = ' || p_error_msg_txt);
5569: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5570: 'p_program_id = ' || p_program_id);
5571: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5565: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5566: 'p_imp_document_id = ' || p_imp_document_id);
5567: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5568: 'p_error_msg_txt = ' || p_error_msg_txt);
5569: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5570: 'p_program_id = ' || p_program_id);
5571: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5572: 'p_program_login_id = ' || p_program_login_id);
5573: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5567: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5568: 'p_error_msg_txt = ' || p_error_msg_txt);
5569: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5570: 'p_program_id = ' || p_program_id);
5571: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5572: 'p_program_login_id = ' || p_program_login_id);
5573: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5574: 'p_program_app_id = ' || p_program_app_id);
5575: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

5569: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5570: 'p_program_id = ' || p_program_id);
5571: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5572: 'p_program_login_id = ' || p_program_login_id);
5573: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5574: 'p_program_app_id = ' || p_program_app_id);
5575: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5576: 'p_request_id = ' || p_request_id);
5577:

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

5571: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5572: 'p_program_login_id = ' || p_program_login_id);
5573: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5574: 'p_program_app_id = ' || p_program_app_id);
5575: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5576: 'p_request_id = ' || p_request_id);
5577:
5578:
5579: END IF;

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

5601: x_msg_count => x_msg_count,
5602: x_return_status => x_return_status);
5603:
5604:
5605: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
5607: 'Called okc_rep_contract_process_pvt.delete_contract');
5608: END IF;
5609:

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

5602: x_return_status => x_return_status);
5603:
5604:
5605: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
5607: 'Called okc_rep_contract_process_pvt.delete_contract');
5608: END IF;
5609:
5610: -- Update valid_flag

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

5611: UPDATE OKC_REP_IMP_CONTRACTS_T
5612: SET valid_flag = 'N'
5613: WHERE CONTRACT_ID = p_contract_id;
5614:
5615: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5616: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
5617: 'Updated valid_flag to N');
5618: END IF;
5619:

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

5612: SET valid_flag = 'N'
5613: WHERE CONTRACT_ID = p_contract_id;
5614:
5615: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5616: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
5617: 'Updated valid_flag to N');
5618: END IF;
5619:
5620: -- Insert error message

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

5631: x_return_status => x_return_status,
5632: x_msg_count => x_msg_count,
5633: x_msg_data => x_msg_data);
5634:
5635: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5636: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
5637: 'Inserted error into okc_rep_imp_errors_t');
5638: END IF;
5639:

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

5632: x_msg_count => x_msg_count,
5633: x_msg_data => x_msg_data);
5634:
5635: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5636: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
5637: 'Inserted error into okc_rep_imp_errors_t');
5638: END IF;
5639:
5640:

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

5639:
5640:
5641: IF(p_commit = FND_API.G_TRUE) THEN
5642: COMMIT;
5643: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5644: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
5645: 'Committed transaction');
5646: END IF;
5647:

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

5640:
5641: IF(p_commit = FND_API.G_TRUE) THEN
5642: COMMIT;
5643: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5644: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
5645: 'Committed transaction');
5646: END IF;
5647:
5648: END IF;

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

5647:
5648: END IF;
5649:
5650:
5651: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5652: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5653: 'Leaving OKC_REP_UTIL_PVT.delete_import_contract');
5654: END IF;
5655:

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

5648: END IF;
5649:
5650:
5651: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5652: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5653: 'Leaving OKC_REP_UTIL_PVT.delete_import_contract');
5654: END IF;
5655:
5656: EXCEPTION

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

5655:
5656: EXCEPTION
5657:
5658: WHEN FND_API.G_EXC_ERROR THEN
5659: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5660: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5661: 'Leaving delete_import_contract:FND_API.G_EXC_ERROR Exception');
5662: END IF;
5663:

Line 5660: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

5656: EXCEPTION
5657:
5658: WHEN FND_API.G_EXC_ERROR THEN
5659: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5660: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5661: 'Leaving delete_import_contract:FND_API.G_EXC_ERROR Exception');
5662: END IF;
5663:
5664: x_return_status := FND_API.G_RET_STS_ERROR;

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

5666: p_data => x_msg_data);
5667:
5668: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5669:
5670: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5671: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5672: 'Leaving delete_import_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5673: END IF;
5674:

Line 5671: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

5667:
5668: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5669:
5670: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5671: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5672: 'Leaving delete_import_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5673: END IF;
5674:
5675: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

5677: p_data => x_msg_data);
5678:
5679: WHEN OTHERS THEN
5680:
5681: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5682: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5683: 'Leaving delete_import_contract because of EXCEPTION: ' || sqlerrm);
5684: END IF;
5685:

Line 5682: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

5678:
5679: WHEN OTHERS THEN
5680:
5681: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5682: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5683: 'Leaving delete_import_contract because of EXCEPTION: ' || sqlerrm);
5684: END IF;
5685:
5686: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

5722: BEGIN
5723:
5724: l_api_name := 'add_quotes';
5725:
5726: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5727: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5728: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
5729: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5730: 'p_string is: ' || p_string);

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

5723:
5724: l_api_name := 'add_quotes';
5725:
5726: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5727: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5728: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
5729: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5730: 'p_string is: ' || p_string);
5731: END IF;

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

5725:
5726: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5727: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5728: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
5729: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5730: 'p_string is: ' || p_string);
5731: END IF;
5732:
5733: l_string := NULL;

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

5745: ELSE
5746: l_string := p_string;
5747: END IF;
5748:
5749: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5750: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5751: 'Leaving Function OKC_REP_UTIL_PVT.'||l_api_name);
5752: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5753: 'l_string is: ' || l_string);

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

5746: l_string := p_string;
5747: END IF;
5748:
5749: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5750: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5751: 'Leaving Function OKC_REP_UTIL_PVT.'||l_api_name);
5752: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5753: 'l_string is: ' || l_string);
5754: END IF;

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

5748:
5749: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5750: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5751: 'Leaving Function OKC_REP_UTIL_PVT.'||l_api_name);
5752: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5753: 'l_string is: ' || l_string);
5754: END IF;
5755:
5756: return l_string;

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

5756: return l_string;
5757:
5758: EXCEPTION
5759: WHEN OTHERS THEN
5760: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5761: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
5762: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
5763: END IF;
5764: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 5761: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

5757:
5758: EXCEPTION
5759: WHEN OTHERS THEN
5760: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5761: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
5762: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
5763: END IF;
5764: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
5765: p_msg_name => G_UNEXPECTED_ERROR,

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

5869: BEGIN
5870:
5871: l_api_name := 'get_csv_error_string';
5872:
5873: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5874: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5875: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
5876: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5877: 'p_imp_contract_id is: ' || p_imp_contract_id);

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

5870:
5871: l_api_name := 'get_csv_error_string';
5872:
5873: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5874: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5875: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
5876: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5877: 'p_imp_contract_id is: ' || p_imp_contract_id);
5878: END IF;

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

5872:
5873: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5874: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5875: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
5876: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5877: 'p_imp_contract_id is: ' || p_imp_contract_id);
5878: END IF;
5879:
5880: --initialize l_csv_error_string

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

5882:
5883: OPEN IMP_CONTRACT_CSR;
5884: FETCH IMP_CONTRACT_CSR INTO l_imp_contract_rec;
5885: IF IMP_CONTRACT_CSR%NOTFOUND THEN
5886: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5887: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5888: 'p_imp_contract_id does not exist in okc_rep_imp_contracts_t: '||p_imp_contract_id);
5889: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5890: 'returning null');

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

5883: OPEN IMP_CONTRACT_CSR;
5884: FETCH IMP_CONTRACT_CSR INTO l_imp_contract_rec;
5885: IF IMP_CONTRACT_CSR%NOTFOUND THEN
5886: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5887: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5888: 'p_imp_contract_id does not exist in okc_rep_imp_contracts_t: '||p_imp_contract_id);
5889: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5890: 'returning null');
5891: END IF;

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

5885: IF IMP_CONTRACT_CSR%NOTFOUND THEN
5886: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5887: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5888: 'p_imp_contract_id does not exist in okc_rep_imp_contracts_t: '||p_imp_contract_id);
5889: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5890: 'returning null');
5891: END IF;
5892: RETURN l_csv_error_string;
5893: END IF;

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

5987:
5988: l_csv_error_string := l_csv_error_string || FND_GLOBAL.Newline;
5989:
5990:
5991: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5992: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5993: 'Leaving Function '||l_api_name);
5994: END IF;
5995: RETURN l_csv_error_string;

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

5988: l_csv_error_string := l_csv_error_string || FND_GLOBAL.Newline;
5989:
5990:
5991: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5992: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5993: 'Leaving Function '||l_api_name);
5994: END IF;
5995: RETURN l_csv_error_string;
5996:

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

6010: IF (IMP_ERRORS_CSR%ISOPEN) THEN
6011: CLOSE IMP_ERRORS_CSR ;
6012: END IF;
6013:
6014: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6015: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6016: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6017: END IF;
6018: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 6015: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

6011: CLOSE IMP_ERRORS_CSR ;
6012: END IF;
6013:
6014: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6015: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6016: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6017: END IF;
6018: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6019: p_msg_name => G_UNEXPECTED_ERROR,

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

6058: BEGIN
6059:
6060: l_api_name := 'get_csv_header_string';
6061:
6062: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6063: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6064: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6065: END IF;
6066:

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

6059:
6060: l_api_name := 'get_csv_header_string';
6061:
6062: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6063: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6064: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6065: END IF;
6066:
6067: l_csv_header_string := NULL;

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

6077: --we need to remove the last ','
6078: l_csv_header_string := substr(l_csv_header_string,1, length(l_csv_header_string)-1);
6079: END IF;
6080:
6081: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6082: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6083: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6084: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6085: 'l_csv_header_string is: ' || l_csv_header_string);

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

6078: l_csv_header_string := substr(l_csv_header_string,1, length(l_csv_header_string)-1);
6079: END IF;
6080:
6081: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6082: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6083: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6084: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6085: 'l_csv_header_string is: ' || l_csv_header_string);
6086: END IF;

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

6080:
6081: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6082: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6083: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6084: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6085: 'l_csv_header_string is: ' || l_csv_header_string);
6086: END IF;
6087:
6088: RETURN l_csv_header_string;

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

6093: IF (CSV_HEADER_CSR%ISOPEN) THEN
6094: CLOSE CSV_HEADER_CSR ;
6095: END IF;
6096:
6097: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6098: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6099: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6100: END IF;
6101: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 6098: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

6094: CLOSE CSV_HEADER_CSR ;
6095: END IF;
6096:
6097: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6098: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6099: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6100: END IF;
6101: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6102: p_msg_name => G_UNEXPECTED_ERROR,

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

6159: BEGIN
6160:
6161: l_api_name := 'get_vendor_userlist';
6162:
6163: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6164: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6165: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
6166: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6167: 'p_document_id is: ' || to_char(p_document_id));

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

6160:
6161: l_api_name := 'get_vendor_userlist';
6162:
6163: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6164: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6165: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
6166: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6167: 'p_document_id is: ' || to_char(p_document_id));
6168: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6162:
6163: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6164: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6165: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
6166: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6167: 'p_document_id is: ' || to_char(p_document_id));
6168: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6169: 'p_external_party_id is: ' || to_char(p_external_party_id));
6170: END IF;

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

6164: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6165: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
6166: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6167: 'p_document_id is: ' || to_char(p_document_id));
6168: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6169: 'p_external_party_id is: ' || to_char(p_external_party_id));
6170: END IF;
6171:
6172: -- Standard call to check for call compatibility.

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

6203:
6204: -- Standard call to get message count and if count is 1, get message info.
6205: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6206:
6207: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6208: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6209: 'Leaving OKC_REP_UTIL_PVT.get_vendor_userlist');
6210: END IF;
6211:

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

6204: -- Standard call to get message count and if count is 1, get message info.
6205: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6206:
6207: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6208: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6209: 'Leaving OKC_REP_UTIL_PVT.get_vendor_userlist');
6210: END IF;
6211:
6212:

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

6211:
6212:
6213: EXCEPTION
6214: WHEN FND_API.G_EXC_ERROR THEN
6215: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6216: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6217: g_module || l_api_name,
6218: 'Leaving get_vendor_userlist:FND_API.G_EXC_ERROR Exception');
6219: END IF;

Line 6216: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6212:
6213: EXCEPTION
6214: WHEN FND_API.G_EXC_ERROR THEN
6215: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6216: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6217: g_module || l_api_name,
6218: 'Leaving get_vendor_userlist:FND_API.G_EXC_ERROR Exception');
6219: END IF;
6220: --close cursor

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

6230: p_data => x_msg_data
6231: );
6232:
6233: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6234: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6235: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6236: g_module || l_api_name,
6237: 'Leaving get_vendor_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6238: END IF;

Line 6235: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6231: );
6232:
6233: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6234: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6235: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6236: g_module || l_api_name,
6237: 'Leaving get_vendor_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6238: END IF;
6239: --close cursor

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

6249: p_data => x_msg_data
6250: );
6251:
6252: WHEN OTHERS THEN
6253: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6254: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6255: g_module || l_api_name,
6256: 'Leaving get_vendor_userlist because of EXCEPTION: ' || sqlerrm);
6257: END IF;

Line 6254: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6250: );
6251:
6252: WHEN OTHERS THEN
6253: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6254: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6255: g_module || l_api_name,
6256: 'Leaving get_vendor_userlist because of EXCEPTION: ' || sqlerrm);
6257: END IF;
6258: --close cursor

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

6327: AND cp.contact_point_type = 'EMAIL';
6328: BEGIN
6329: l_api_name := 'get_customer_userlist';
6330:
6331: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6333: 'Entered OKC_REP_UTIL_PVT.get_customer_userlist');
6334: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6335: 'p_document_id is: ' || to_char(p_document_id));

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

6328: BEGIN
6329: l_api_name := 'get_customer_userlist';
6330:
6331: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6333: 'Entered OKC_REP_UTIL_PVT.get_customer_userlist');
6334: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6335: 'p_document_id is: ' || to_char(p_document_id));
6336: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6330:
6331: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6333: 'Entered OKC_REP_UTIL_PVT.get_customer_userlist');
6334: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6335: 'p_document_id is: ' || to_char(p_document_id));
6336: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6337: 'p_external_party_id is: ' || to_char(p_external_party_id));
6338: END IF;

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

6332: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6333: 'Entered OKC_REP_UTIL_PVT.get_customer_userlist');
6334: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6335: 'p_document_id is: ' || to_char(p_document_id));
6336: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6337: 'p_external_party_id is: ' || to_char(p_external_party_id));
6338: END IF;
6339:
6340: -- Standard call to check for call compatibility.

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

6370:
6371: -- Standard call to get message count and if count is 1, get message info.
6372: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6373:
6374: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6376: 'Leaving OKC_REP_UTIL_PVT.get_customer_userlist');
6377: END IF;
6378:

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

6371: -- Standard call to get message count and if count is 1, get message info.
6372: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6373:
6374: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6376: 'Leaving OKC_REP_UTIL_PVT.get_customer_userlist');
6377: END IF;
6378:
6379:

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

6378:
6379:
6380: EXCEPTION
6381: WHEN FND_API.G_EXC_ERROR THEN
6382: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6383: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6384: g_module || l_api_name,
6385: 'Leaving get_customer_userlist:FND_API.G_EXC_ERROR Exception');
6386: END IF;

Line 6383: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6379:
6380: EXCEPTION
6381: WHEN FND_API.G_EXC_ERROR THEN
6382: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6383: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6384: g_module || l_api_name,
6385: 'Leaving get_customer_userlist:FND_API.G_EXC_ERROR Exception');
6386: END IF;
6387: IF (tca_contact_csr%ISOPEN) THEN

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

6396: p_data => x_msg_data
6397: );
6398:
6399: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6400: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6401: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6402: g_module || l_api_name,
6403: 'Leaving get_customer_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6404: END IF;

Line 6401: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6397: );
6398:
6399: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6400: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6401: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6402: g_module || l_api_name,
6403: 'Leaving get_customer_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6404: END IF;
6405: IF (tca_contact_csr%ISOPEN) THEN

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

6414: p_data => x_msg_data
6415: );
6416:
6417: WHEN OTHERS THEN
6418: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6419: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6420: g_module || l_api_name,
6421: 'Leaving get_customer_userlist because of EXCEPTION: ' || sqlerrm);
6422: END IF;

Line 6419: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6415: );
6416:
6417: WHEN OTHERS THEN
6418: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6419: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6420: g_module || l_api_name,
6421: 'Leaving get_customer_userlist because of EXCEPTION: ' || sqlerrm);
6422: END IF;
6423: IF (tca_contact_csr%ISOPEN) THEN

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

6481: BEGIN
6482:
6483: l_api_name := 'get_external_userlist';
6484:
6485: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6486: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6487: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
6488: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6489: 'p_document_id is: ' || to_char(p_document_id));

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

6482:
6483: l_api_name := 'get_external_userlist';
6484:
6485: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6486: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6487: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
6488: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6489: 'p_document_id is: ' || to_char(p_document_id));
6490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6484:
6485: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6486: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6487: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
6488: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6489: 'p_document_id is: ' || to_char(p_document_id));
6490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6491: 'p_document_type is: ' || to_char(p_document_type));
6492: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6486: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6487: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
6488: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6489: 'p_document_id is: ' || to_char(p_document_id));
6490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6491: 'p_document_type is: ' || to_char(p_document_type));
6492: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6493: 'p_external_party_id is: ' || to_char(p_external_party_id));
6494: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6488: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6489: 'p_document_id is: ' || to_char(p_document_id));
6490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6491: 'p_document_type is: ' || to_char(p_document_type));
6492: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6493: 'p_external_party_id is: ' || to_char(p_external_party_id));
6494: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6495: 'p_external_party_role is: ' || to_char(p_external_party_role));
6496: END IF;

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

6490: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6491: 'p_document_type is: ' || to_char(p_document_type));
6492: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6493: 'p_external_party_id is: ' || to_char(p_external_party_id));
6494: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6495: 'p_external_party_role is: ' || to_char(p_external_party_role));
6496: END IF;
6497:
6498: -- Standard call to check for call compatibility.

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

6532:
6533: -- Standard call to get message count and if count is 1, get message info.
6534: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6535:
6536: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6537: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6538: 'Leaving OKC_REP_UTIL_PVT.get_external_userlist');
6539: END IF;
6540:

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

6533: -- Standard call to get message count and if count is 1, get message info.
6534: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6535:
6536: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6537: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6538: 'Leaving OKC_REP_UTIL_PVT.get_external_userlist');
6539: END IF;
6540:
6541:

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

6540:
6541:
6542: EXCEPTION
6543: WHEN FND_API.G_EXC_ERROR THEN
6544: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6545: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6546: g_module || l_api_name,
6547: 'Leaving get_external_userlist:FND_API.G_EXC_ERROR Exception');
6548: END IF;

Line 6545: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6541:
6542: EXCEPTION
6543: WHEN FND_API.G_EXC_ERROR THEN
6544: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6545: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6546: g_module || l_api_name,
6547: 'Leaving get_external_userlist:FND_API.G_EXC_ERROR Exception');
6548: END IF;
6549: x_return_status := FND_API.G_RET_STS_ERROR;

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

6552: p_data => x_msg_data
6553: );
6554:
6555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6556: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6557: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6558: g_module || l_api_name,
6559: 'Leaving get_external_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6560: END IF;

Line 6557: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6553: );
6554:
6555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6556: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6557: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6558: g_module || l_api_name,
6559: 'Leaving get_external_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6560: END IF;
6561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

6564: p_data => x_msg_data
6565: );
6566:
6567: WHEN OTHERS THEN
6568: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6569: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6570: g_module || l_api_name,
6571: 'Leaving get_external_userlist because of EXCEPTION: ' || sqlerrm);
6572: END IF;

Line 6569: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

6565: );
6566:
6567: WHEN OTHERS THEN
6568: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6569: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
6570: g_module || l_api_name,
6571: 'Leaving get_external_userlist because of EXCEPTION: ' || sqlerrm);
6572: END IF;
6573: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

6633:
6634:
6635: BEGIN
6636:
6637: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6639: 'Entered OKC_REP_WF_PVT.ok_to_commit');
6640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6641: 'p_doc_id = ' || p_doc_id);

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

6634:
6635: BEGIN
6636:
6637: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6639: 'Entered OKC_REP_WF_PVT.ok_to_commit');
6640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6641: 'p_doc_id = ' || p_doc_id);
6642: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6636:
6637: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6639: 'Entered OKC_REP_WF_PVT.ok_to_commit');
6640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6641: 'p_doc_id = ' || p_doc_id);
6642: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6643: 'p_validation_string = ' || p_validation_string);
6644: END IF;

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

6638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6639: 'Entered OKC_REP_WF_PVT.ok_to_commit');
6640: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6641: 'p_doc_id = ' || p_doc_id);
6642: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6643: 'p_validation_string = ' || p_validation_string);
6644: END IF;
6645:
6646: l_api_version := 1.0;

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

6666: IF (p_validation_string is NULL) THEN
6667: OPEN l_contract_exist_csr;
6668: FETCH l_contract_exist_csr INTO l_temp;
6669: IF (l_contract_exist_csr%NOTFOUND) THEN
6670: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6671: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6672: 'Contract not found');
6673: END IF;
6674: l_ok_to_commit := FND_API.G_FALSE;

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

6667: OPEN l_contract_exist_csr;
6668: FETCH l_contract_exist_csr INTO l_temp;
6669: IF (l_contract_exist_csr%NOTFOUND) THEN
6670: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6671: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6672: 'Contract not found');
6673: END IF;
6674: l_ok_to_commit := FND_API.G_FALSE;
6675: CLOSE l_contract_exist_csr;

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

6686: ELSE
6687: OPEN l_contract_updatable_csr;
6688: FETCH l_contract_updatable_csr INTO l_temp;
6689: IF (l_contract_updatable_csr%NOTFOUND) THEN
6690: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6691: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6692: 'Contract not found');
6693: END IF;
6694: l_ok_to_commit := FND_API.G_FALSE;

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

6687: OPEN l_contract_updatable_csr;
6688: FETCH l_contract_updatable_csr INTO l_temp;
6689: IF (l_contract_updatable_csr%NOTFOUND) THEN
6690: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6691: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6692: 'Contract not found');
6693: END IF;
6694: l_ok_to_commit := FND_API.G_FALSE;
6695: CLOSE l_contract_updatable_csr;

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

6705: END IF; -- (l_contract_updatable_csr%NOTFOUND)
6706: END IF; -- (p_validation_string is NULL)
6707: -- Standard call to get message count and if count is 1, get message info.
6708: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6709: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6710: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
6711: '110: Leaving OKC_REP_UTIL_PVT.ok_to_commit');
6712: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6713: '111: Output is: ' || l_ok_to_commit);

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

6706: END IF; -- (p_validation_string is NULL)
6707: -- Standard call to get message count and if count is 1, get message info.
6708: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6709: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6710: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
6711: '110: Leaving OKC_REP_UTIL_PVT.ok_to_commit');
6712: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6713: '111: Output is: ' || l_ok_to_commit);
6714: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6708: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
6709: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6710: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
6711: '110: Leaving OKC_REP_UTIL_PVT.ok_to_commit');
6712: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6713: '111: Output is: ' || l_ok_to_commit);
6714: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6715: '112: x_return_status is: ' || x_return_status);
6716: END IF;

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

6710: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
6711: '110: Leaving OKC_REP_UTIL_PVT.ok_to_commit');
6712: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6713: '111: Output is: ' || l_ok_to_commit);
6714: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6715: '112: x_return_status is: ' || x_return_status);
6716: END IF;
6717: return l_ok_to_commit;
6718: EXCEPTION

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

6717: return l_ok_to_commit;
6718: EXCEPTION
6719:
6720: WHEN OTHERS THEN
6721: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6722: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6723: 'Leaving Function ok_to_commit because of EXCEPTION: '||sqlerrm);
6724: END IF;
6725:

Line 6722: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

6718: EXCEPTION
6719:
6720: WHEN OTHERS THEN
6721: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6722: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6723: 'Leaving Function ok_to_commit because of EXCEPTION: '||sqlerrm);
6724: END IF;
6725:
6726: IF (l_contract_exist_csr%ISOPEN) THEN

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

6765: l_api_name := 'purge_recent_contracts';
6766:
6767: retcode := G_RETURN_CODE_ERROR;
6768:
6769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6770: FND_LOG.STRING(
6771: FND_LOG.LEVEL_PROCEDURE,
6772: G_MODULE||l_api_name,
6773: 'Entering OKC_REP_UTIL_PVT.purge_recent_contracts');

Line 6770: FND_LOG.STRING(

6766:
6767: retcode := G_RETURN_CODE_ERROR;
6768:
6769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6770: FND_LOG.STRING(
6771: FND_LOG.LEVEL_PROCEDURE,
6772: G_MODULE||l_api_name,
6773: 'Entering OKC_REP_UTIL_PVT.purge_recent_contracts');
6774: END IF;

Line 6771: FND_LOG.LEVEL_PROCEDURE,

6767: retcode := G_RETURN_CODE_ERROR;
6768:
6769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6770: FND_LOG.STRING(
6771: FND_LOG.LEVEL_PROCEDURE,
6772: G_MODULE||l_api_name,
6773: 'Entering OKC_REP_UTIL_PVT.purge_recent_contracts');
6774: END IF;
6775:

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

6775:
6776: DELETE FROM okc_rep_recent_contracts c
6777: WHERE c.last_visited_date < SYSDATE - p_num_days;
6778:
6779: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6780: FND_LOG.STRING(
6781: FND_LOG.LEVEL_PROCEDURE,
6782: G_MODULE||l_api_name,
6783: 'Leaving OKC_REP_UTIL_PVT.purge_recent_contracts');

Line 6780: FND_LOG.STRING(

6776: DELETE FROM okc_rep_recent_contracts c
6777: WHERE c.last_visited_date < SYSDATE - p_num_days;
6778:
6779: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6780: FND_LOG.STRING(
6781: FND_LOG.LEVEL_PROCEDURE,
6782: G_MODULE||l_api_name,
6783: 'Leaving OKC_REP_UTIL_PVT.purge_recent_contracts');
6784: END IF;

Line 6781: FND_LOG.LEVEL_PROCEDURE,

6777: WHERE c.last_visited_date < SYSDATE - p_num_days;
6778:
6779: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6780: FND_LOG.STRING(
6781: FND_LOG.LEVEL_PROCEDURE,
6782: G_MODULE||l_api_name,
6783: 'Leaving OKC_REP_UTIL_PVT.purge_recent_contracts');
6784: END IF;
6785:

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

6786: retcode := G_RETURN_CODE_SUCCESS;
6787:
6788: EXCEPTION
6789: WHEN OTHERS THEN
6790: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6791: fnd_log.string(
6792: FND_LOG.LEVEL_EXCEPTION,
6793: G_MODULE || l_api_name,
6794: 'Leaving purge_recent_contracts because of EXCEPTION: ' || SQLERRM);

Line 6791: fnd_log.string(

6787:
6788: EXCEPTION
6789: WHEN OTHERS THEN
6790: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6791: fnd_log.string(
6792: FND_LOG.LEVEL_EXCEPTION,
6793: G_MODULE || l_api_name,
6794: 'Leaving purge_recent_contracts because of EXCEPTION: ' || SQLERRM);
6795: errbuf := substr(SQLERRM, 1, 200);

Line 6792: FND_LOG.LEVEL_EXCEPTION,

6788: EXCEPTION
6789: WHEN OTHERS THEN
6790: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6791: fnd_log.string(
6792: FND_LOG.LEVEL_EXCEPTION,
6793: G_MODULE || l_api_name,
6794: 'Leaving purge_recent_contracts because of EXCEPTION: ' || SQLERRM);
6795: errbuf := substr(SQLERRM, 1, 200);
6796: END IF;

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

6815:
6816: l_api_name := 'can_update';
6817: l_can_update := 'N';
6818:
6819: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6820: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6821: 'Entered Function OKC_REP_UTIL_PVT.can_update');
6822: END IF;
6823:

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

6816: l_api_name := 'can_update';
6817: l_can_update := 'N';
6818:
6819: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6820: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6821: 'Entered Function OKC_REP_UTIL_PVT.can_update');
6822: END IF;
6823:
6824: IF FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y') OR FND_FUNCTION.TEST(G_FUNC_OKC_REP_USER_FUNC,'Y') THEN

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

6824: IF FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y') OR FND_FUNCTION.TEST(G_FUNC_OKC_REP_USER_FUNC,'Y') THEN
6825: l_can_update := 'Y';
6826: END IF;
6827:
6828: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6829: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6830: 'OKC_REP_UTIL_PVT.check_contract_access returns l_can_update as : '
6831: || l_can_update);
6832: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

6825: l_can_update := 'Y';
6826: END IF;
6827:
6828: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6829: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6830: 'OKC_REP_UTIL_PVT.check_contract_access returns l_can_update as : '
6831: || l_can_update);
6832: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6833: 'Leaving Function l_can_update');

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

6828: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6829: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6830: 'OKC_REP_UTIL_PVT.check_contract_access returns l_can_update as : '
6831: || l_can_update);
6832: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6833: 'Leaving Function l_can_update');
6834: END IF;
6835: RETURN l_can_update;
6836:

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

6835: RETURN l_can_update;
6836:
6837: EXCEPTION
6838: WHEN OTHERS THEN
6839: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6840: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6841: 'Leaving Function can_update because of EXCEPTION: '||sqlerrm);
6842: END IF;
6843: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 6840: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

6836:
6837: EXCEPTION
6838: WHEN OTHERS THEN
6839: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6840: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6841: 'Leaving Function can_update because of EXCEPTION: '||sqlerrm);
6842: END IF;
6843: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6844: p_msg_name => G_UNEXPECTED_ERROR,

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

6869:
6870: l_api_name := 'is_sales_workbench';
6871: l_is_sales_workbench := 'N';
6872:
6873: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6874: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6875: 'Entered Function OKC_REP_UTIL_PVT.is_sales_workbench');
6876: END IF;
6877:

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

6870: l_api_name := 'is_sales_workbench';
6871: l_is_sales_workbench := 'N';
6872:
6873: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6874: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6875: 'Entered Function OKC_REP_UTIL_PVT.is_sales_workbench');
6876: END IF;
6877:
6878: IF FND_FUNCTION.TEST(G_FUNC_OKC_REP_SALES_WB_USER,'Y') THEN

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

6878: IF FND_FUNCTION.TEST(G_FUNC_OKC_REP_SALES_WB_USER,'Y') THEN
6879: l_is_sales_workbench := 'Y';
6880: END IF;
6881:
6882: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6883: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6884: 'OKC_REP_UTIL_PVT.is_sales_workbench returns l_is_sales_workbench as : '
6885: || l_is_sales_workbench);
6886: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

6879: l_is_sales_workbench := 'Y';
6880: END IF;
6881:
6882: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6883: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6884: 'OKC_REP_UTIL_PVT.is_sales_workbench returns l_is_sales_workbench as : '
6885: || l_is_sales_workbench);
6886: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6887: 'Leaving Function is_sales_workbench');

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

6882: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6883: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6884: 'OKC_REP_UTIL_PVT.is_sales_workbench returns l_is_sales_workbench as : '
6885: || l_is_sales_workbench);
6886: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6887: 'Leaving Function is_sales_workbench');
6888: END IF;
6889:
6890: RETURN l_is_sales_workbench;

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

6890: RETURN l_is_sales_workbench;
6891:
6892: EXCEPTION
6893: WHEN OTHERS THEN
6894: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6895: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6896: 'Leaving Function is_sales_workbench because of EXCEPTION: '||sqlerrm);
6897: END IF;
6898: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 6895: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

6891:
6892: EXCEPTION
6893: WHEN OTHERS THEN
6894: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6895: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6896: 'Leaving Function is_sales_workbench because of EXCEPTION: '||sqlerrm);
6897: END IF;
6898: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6899: p_msg_name => G_UNEXPECTED_ERROR,

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

6959:
6960: BEGIN
6961: l_api_name := 'insert_new_vendor_contact';
6962:
6963: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6964: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
6965: 'Entering OKC_REP_UTIL_PVT.insert_new_vendor_contact');
6966: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6967: 'p_vendor_site_id: ' || p_vendor_site_id);

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

6960: BEGIN
6961: l_api_name := 'insert_new_vendor_contact';
6962:
6963: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6964: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
6965: 'Entering OKC_REP_UTIL_PVT.insert_new_vendor_contact');
6966: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6967: 'p_vendor_site_id: ' || p_vendor_site_id);
6968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6962:
6963: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6964: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
6965: 'Entering OKC_REP_UTIL_PVT.insert_new_vendor_contact');
6966: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6967: 'p_vendor_site_id: ' || p_vendor_site_id);
6968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6969: 'p_contract_id: ' || p_contract_id);
6970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6964: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
6965: 'Entering OKC_REP_UTIL_PVT.insert_new_vendor_contact');
6966: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6967: 'p_vendor_site_id: ' || p_vendor_site_id);
6968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6969: 'p_contract_id: ' || p_contract_id);
6970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6971: 'p_first_name: ' || p_first_name);
6972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6966: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6967: 'p_vendor_site_id: ' || p_vendor_site_id);
6968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6969: 'p_contract_id: ' || p_contract_id);
6970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6971: 'p_first_name: ' || p_first_name);
6972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6973: 'p_last_name: ' || p_last_name);
6974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6968: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6969: 'p_contract_id: ' || p_contract_id);
6970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6971: 'p_first_name: ' || p_first_name);
6972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6973: 'p_last_name: ' || p_last_name);
6974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6975: 'p_area_code: ' || p_area_code);
6976: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6971: 'p_first_name: ' || p_first_name);
6972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6973: 'p_last_name: ' || p_last_name);
6974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6975: 'p_area_code: ' || p_area_code);
6976: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6977: 'p_phone: ' || p_phone);
6978: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6972: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6973: 'p_last_name: ' || p_last_name);
6974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6975: 'p_area_code: ' || p_area_code);
6976: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6977: 'p_phone: ' || p_phone);
6978: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6979: 'p_email_address: ' || p_email_address);
6980: END IF;

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

6974: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6975: 'p_area_code: ' || p_area_code);
6976: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6977: 'p_phone: ' || p_phone);
6978: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6979: 'p_email_address: ' || p_email_address);
6980: END IF;
6981:
6982: -- Populate the record structure required by AP API

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

6979: 'p_email_address: ' || p_email_address);
6980: END IF;
6981:
6982: -- Populate the record structure required by AP API
6983: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6984: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6985: 'Populate the record structure required by AP API');
6986: END IF;
6987:

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

6980: END IF;
6981:
6982: -- Populate the record structure required by AP API
6983: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6984: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
6985: 'Populate the record structure required by AP API');
6986: END IF;
6987:
6988: OPEN contract_org_csr;

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

7005: l_vendor_contact_rec.PHONE := p_phone;
7006: l_vendor_contact_rec.EMAIL_ADDRESS := p_email_address;
7007:
7008: -- Call the API to create a vendor contact
7009: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7010: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7011: 'Before calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7012: END IF;
7013:

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

7006: l_vendor_contact_rec.EMAIL_ADDRESS := p_email_address;
7007:
7008: -- Call the API to create a vendor contact
7009: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7010: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7011: 'Before calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7012: END IF;
7013:
7014: -- Call AP API to create a vendor contact as per user entered information

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

7025: x_rel_id => l_rel_id,
7026: x_org_contact_id => l_org_contact_id,
7027: x_party_site_id => l_party_site_id);
7028:
7029: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7031: 'After calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7032: END IF;
7033:

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

7026: x_org_contact_id => l_org_contact_id,
7027: x_party_site_id => l_party_site_id);
7028:
7029: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7031: 'After calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7032: END IF;
7033:
7034: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

7030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7031: 'After calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7032: END IF;
7033:
7034: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7035: FND_LOG.STRING(
7036: FND_LOG.LEVEL_PROCEDURE,
7037: G_MODULE||l_api_name,
7038: 'Leaving OKC_REP_UTIL_PVT.insert_new_vendor_contact');

Line 7035: FND_LOG.STRING(

7031: 'After calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7032: END IF;
7033:
7034: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7035: FND_LOG.STRING(
7036: FND_LOG.LEVEL_PROCEDURE,
7037: G_MODULE||l_api_name,
7038: 'Leaving OKC_REP_UTIL_PVT.insert_new_vendor_contact');
7039: END IF;

Line 7036: FND_LOG.LEVEL_PROCEDURE,

7032: END IF;
7033:
7034: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7035: FND_LOG.STRING(
7036: FND_LOG.LEVEL_PROCEDURE,
7037: G_MODULE||l_api_name,
7038: 'Leaving OKC_REP_UTIL_PVT.insert_new_vendor_contact');
7039: END IF;
7040:

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

7039: END IF;
7040:
7041: EXCEPTION
7042: WHEN OTHERS THEN
7043: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7044: fnd_log.string(
7045: FND_LOG.LEVEL_EXCEPTION,
7046: G_MODULE || l_api_name,
7047: 'Leaving insert_new_vendor_contact because of EXCEPTION: ' || SQLERRM);

Line 7044: fnd_log.string(

7040:
7041: EXCEPTION
7042: WHEN OTHERS THEN
7043: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7044: fnd_log.string(
7045: FND_LOG.LEVEL_EXCEPTION,
7046: G_MODULE || l_api_name,
7047: 'Leaving insert_new_vendor_contact because of EXCEPTION: ' || SQLERRM);
7048: END IF;

Line 7045: FND_LOG.LEVEL_EXCEPTION,

7041: EXCEPTION
7042: WHEN OTHERS THEN
7043: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7044: fnd_log.string(
7045: FND_LOG.LEVEL_EXCEPTION,
7046: G_MODULE || l_api_name,
7047: 'Leaving insert_new_vendor_contact because of EXCEPTION: ' || SQLERRM);
7048: END IF;
7049:

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

7110:
7111: -- Initialize API return status to success
7112: x_return_status := FND_API.G_RET_STS_SUCCESS;
7113:
7114: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7115: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7116: 'Entering OKC_REP_UTIL_PVT.sync_con_header_attributes');
7117: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7118: 'p_contract_id: ' || p_contract_id);

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

7111: -- Initialize API return status to success
7112: x_return_status := FND_API.G_RET_STS_SUCCESS;
7113:
7114: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7115: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7116: 'Entering OKC_REP_UTIL_PVT.sync_con_header_attributes');
7117: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7118: 'p_contract_id: ' || p_contract_id);
7119: END IF;

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

7113:
7114: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7115: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7116: 'Entering OKC_REP_UTIL_PVT.sync_con_header_attributes');
7117: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7118: 'p_contract_id: ' || p_contract_id);
7119: END IF;
7120:
7121: OPEN contract_attribs_csr;

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

7121: OPEN contract_attribs_csr;
7122: FETCH contract_attribs_csr INTO l_desc, l_use_acl_flag, l_expire_ntf_flag, l_expire_ntf_period, l_ntf_contact_role_id;
7123: CLOSE contract_attribs_csr;
7124:
7125: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7127: 'l_desc : ' || l_desc);
7128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7129: 'l_use_acl_flag : ' || l_use_acl_flag);

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

7122: FETCH contract_attribs_csr INTO l_desc, l_use_acl_flag, l_expire_ntf_flag, l_expire_ntf_period, l_ntf_contact_role_id;
7123: CLOSE contract_attribs_csr;
7124:
7125: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7127: 'l_desc : ' || l_desc);
7128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7129: 'l_use_acl_flag : ' || l_use_acl_flag);
7130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

7124:
7125: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7127: 'l_desc : ' || l_desc);
7128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7129: 'l_use_acl_flag : ' || l_use_acl_flag);
7130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7131: 'l_expire_ntf_flag : ' || l_expire_ntf_flag);
7132: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

7126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7127: 'l_desc : ' || l_desc);
7128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7129: 'l_use_acl_flag : ' || l_use_acl_flag);
7130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7131: 'l_expire_ntf_flag : ' || l_expire_ntf_flag);
7132: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7133: 'l_expire_ntf_period : ' || l_expire_ntf_period);
7134: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

7128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7129: 'l_use_acl_flag : ' || l_use_acl_flag);
7130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7131: 'l_expire_ntf_flag : ' || l_expire_ntf_flag);
7132: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7133: 'l_expire_ntf_period : ' || l_expire_ntf_period);
7134: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7135: 'l_ntf_contact_role_id : ' || l_ntf_contact_role_id);
7136: END IF;

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

7130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7131: 'l_expire_ntf_flag : ' || l_expire_ntf_flag);
7132: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7133: 'l_expire_ntf_period : ' || l_expire_ntf_period);
7134: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7135: 'l_ntf_contact_role_id : ' || l_ntf_contact_role_id);
7136: END IF;
7137:
7138: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

7134: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7135: 'l_ntf_contact_role_id : ' || l_ntf_contact_role_id);
7136: END IF;
7137:
7138: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7139: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7140: 'Updating Archived versions of Contract with new Contract header attribute values');
7141: END IF;
7142:

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

7135: 'l_ntf_contact_role_id : ' || l_ntf_contact_role_id);
7136: END IF;
7137:
7138: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7139: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7140: 'Updating Archived versions of Contract with new Contract header attribute values');
7141: END IF;
7142:
7143: -- Update all the rows in archived contract versions table with new contract header details

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

7153:
7154: -- Standard call to get message count and if count is 1, get message info.
7155: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7156:
7157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7159: 'Leaving OKC_REP_UTIL_PVT.sync_con_header_attributes');
7160: END IF;
7161:

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

7154: -- Standard call to get message count and if count is 1, get message info.
7155: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7156:
7157: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7158: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7159: 'Leaving OKC_REP_UTIL_PVT.sync_con_header_attributes');
7160: END IF;
7161:
7162: EXCEPTION

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

7160: END IF;
7161:
7162: EXCEPTION
7163: WHEN OTHERS THEN
7164: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7165: fnd_log.string(
7166: FND_LOG.LEVEL_EXCEPTION,
7167: G_MODULE || l_api_name,
7168: 'Leaving sync_con_header_attributes because of EXCEPTION: ' || SQLERRM);

Line 7165: fnd_log.string(

7161:
7162: EXCEPTION
7163: WHEN OTHERS THEN
7164: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7165: fnd_log.string(
7166: FND_LOG.LEVEL_EXCEPTION,
7167: G_MODULE || l_api_name,
7168: 'Leaving sync_con_header_attributes because of EXCEPTION: ' || SQLERRM);
7169: END IF;

Line 7166: FND_LOG.LEVEL_EXCEPTION,

7162: EXCEPTION
7163: WHEN OTHERS THEN
7164: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7165: fnd_log.string(
7166: FND_LOG.LEVEL_EXCEPTION,
7167: G_MODULE || l_api_name,
7168: 'Leaving sync_con_header_attributes because of EXCEPTION: ' || SQLERRM);
7169: END IF;
7170:

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

7232:
7233: EXCEPTION
7234: WHEN OTHERS THEN
7235:
7236: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7237: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
7238: g_module || 'check_contract_doc_access.exception',
7239: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
7240: END IF;

Line 7237: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

7233: EXCEPTION
7234: WHEN OTHERS THEN
7235:
7236: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7237: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
7238: g_module || 'check_contract_doc_access.exception',
7239: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
7240: END IF;
7241: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

7262:
7263: l_api_name := 'get_accessible_ous';
7264:
7265:
7266: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7267: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7268: 'Entered Function OKC_REP_UTIL_PVT.get_accessible_ous');
7269: END IF;
7270:

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

7263: l_api_name := 'get_accessible_ous';
7264:
7265:
7266: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7267: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7268: 'Entered Function OKC_REP_UTIL_PVT.get_accessible_ous');
7269: END IF;
7270:
7271: l_ou_tab := MO_GLOBAL.get_ou_tab;

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

7285: END LOOP;
7286:
7287: END IF;
7288:
7289: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7291: 'OKC_REP_UTIL_PVT.get_accessible_ous returns l_ou_list as : '
7292: || l_ou_list);
7293: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

7286:
7287: END IF;
7288:
7289: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7291: 'OKC_REP_UTIL_PVT.get_accessible_ous returns l_ou_list as : '
7292: || l_ou_list);
7293: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7294: 'Leaving Function get_accessible_ous');

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

7289: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7290: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7291: 'OKC_REP_UTIL_PVT.get_accessible_ous returns l_ou_list as : '
7292: || l_ou_list);
7293: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7294: 'Leaving Function get_accessible_ous');
7295: END IF;
7296: RETURN l_ou_list;
7297:

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

7296: RETURN l_ou_list;
7297:
7298: EXCEPTION
7299: WHEN OTHERS THEN
7300: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7301: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7302: 'Leaving Function get_accessible_ous because of EXCEPTION: '||sqlerrm);
7303: END IF;
7304: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 7301: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

7297:
7298: EXCEPTION
7299: WHEN OTHERS THEN
7300: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7301: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7302: 'Leaving Function get_accessible_ous because of EXCEPTION: '||sqlerrm);
7303: END IF;
7304: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
7305: p_msg_name => G_UNEXPECTED_ERROR,

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

7338: BEGIN
7339:
7340: l_api_name := 'get_quote_access';
7341:
7342: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7343: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7344: 'Entered Function OKC_REP_UTIL_PVT.get_quote_access');
7345: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7346: 'Resource Id is: ' || p_resource_id);

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

7339:
7340: l_api_name := 'get_quote_access';
7341:
7342: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7343: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7344: 'Entered Function OKC_REP_UTIL_PVT.get_quote_access');
7345: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7346: 'Resource Id is: ' || p_resource_id);
7347: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

7341:
7342: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7343: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7344: 'Entered Function OKC_REP_UTIL_PVT.get_quote_access');
7345: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7346: 'Resource Id is: ' || p_resource_id);
7347: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7348: 'Quote Number is: ' || p_quote_number);
7349: END IF;

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

7343: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7344: 'Entered Function OKC_REP_UTIL_PVT.get_quote_access');
7345: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7346: 'Resource Id is: ' || p_resource_id);
7347: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7348: 'Quote Number is: ' || p_quote_number);
7349: END IF;
7350: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7351: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

7346: 'Resource Id is: ' || p_resource_id);
7347: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7348: 'Quote Number is: ' || p_quote_number);
7349: END IF;
7350: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7351: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7352: 'checking security profile - ASO_ENABLE_SECURITY_CHECK');
7353: END IF;
7354:

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

7347: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7348: 'Quote Number is: ' || p_quote_number);
7349: END IF;
7350: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7351: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7352: 'checking security profile - ASO_ENABLE_SECURITY_CHECK');
7353: END IF;
7354:
7355: FND_PROFILE.GET(NAME => G_SALES_QUOTE_SEC_PROFILE, VAL => l_check_security_access);

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

7352: 'checking security profile - ASO_ENABLE_SECURITY_CHECK');
7353: END IF;
7354:
7355: FND_PROFILE.GET(NAME => G_SALES_QUOTE_SEC_PROFILE, VAL => l_check_security_access);
7356: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7357: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7358: 'Profile ASO_ENABLE_SECURITY_CHECK value is: '||l_check_security_access);
7359: END IF;
7360: IF (l_check_security_access = 'N') THEN

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

7353: END IF;
7354:
7355: FND_PROFILE.GET(NAME => G_SALES_QUOTE_SEC_PROFILE, VAL => l_check_security_access);
7356: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7357: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7358: 'Profile ASO_ENABLE_SECURITY_CHECK value is: '||l_check_security_access);
7359: END IF;
7360: IF (l_check_security_access = 'N') THEN
7361: l_access := G_SALES_QUOTE_UPDATE_ACCESS;

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

7359: END IF;
7360: IF (l_check_security_access = 'N') THEN
7361: l_access := G_SALES_QUOTE_UPDATE_ACCESS;
7362: ELSE
7363: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7364: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7365: 'Calling ASO_SECURITY_INT.get_quote_access to get the access');
7366: END IF;
7367: l_access := ASO_SECURITY_INT.get_quote_access(p_resource_id, p_quote_number);

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

7360: IF (l_check_security_access = 'N') THEN
7361: l_access := G_SALES_QUOTE_UPDATE_ACCESS;
7362: ELSE
7363: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7364: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7365: 'Calling ASO_SECURITY_INT.get_quote_access to get the access');
7366: END IF;
7367: l_access := ASO_SECURITY_INT.get_quote_access(p_resource_id, p_quote_number);
7368: END IF;

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

7365: 'Calling ASO_SECURITY_INT.get_quote_access to get the access');
7366: END IF;
7367: l_access := ASO_SECURITY_INT.get_quote_access(p_resource_id, p_quote_number);
7368: END IF;
7369: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7370: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7371: 'OKC_REP_UTIL_PVT.get_quote_access returns l_access as : '
7372: || l_access);
7373: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

7366: END IF;
7367: l_access := ASO_SECURITY_INT.get_quote_access(p_resource_id, p_quote_number);
7368: END IF;
7369: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7370: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7371: 'OKC_REP_UTIL_PVT.get_quote_access returns l_access as : '
7372: || l_access);
7373: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7374: 'Leaving Function get_quote_access');

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

7369: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7370: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7371: 'OKC_REP_UTIL_PVT.get_quote_access returns l_access as : '
7372: || l_access);
7373: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7374: 'Leaving Function get_quote_access');
7375: END IF;
7376: RETURN l_access ;
7377:

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

7376: RETURN l_access ;
7377:
7378: EXCEPTION
7379: WHEN OTHERS THEN
7380: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7381: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7382: 'Leaving Function get_quote_access because of EXCEPTION: '||sqlerrm);
7383: END IF;
7384: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 7381: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

7377:
7378: EXCEPTION
7379: WHEN OTHERS THEN
7380: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7381: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7382: 'Leaving Function get_quote_access because of EXCEPTION: '||sqlerrm);
7383: END IF;
7384: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
7385: p_msg_name => G_UNEXPECTED_ERROR,

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

7416: BEGIN
7417:
7418: l_api_name := 'contract_terms_disabled_yn';
7419:
7420: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7422: 'Entered Procedure OKC_REP_UTIL_PVT.contract_terms_disabled_yn');
7423: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7424: 'Contract Type is: ' || p_contract_type);

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

7417:
7418: l_api_name := 'contract_terms_disabled_yn';
7419:
7420: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7422: 'Entered Procedure OKC_REP_UTIL_PVT.contract_terms_disabled_yn');
7423: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7424: 'Contract Type is: ' || p_contract_type);
7425:

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

7419:
7420: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7421: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7422: 'Entered Procedure OKC_REP_UTIL_PVT.contract_terms_disabled_yn');
7423: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7424: 'Contract Type is: ' || p_contract_type);
7425:
7426: END IF;
7427:

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

7429: SELECT Nvl((SELECT 'Y' FROM okc_template_usages WHERE document_type = p_contract_type AND ROWNUM =1),'N') INTO x_disable_contract_terms_yn FROM dual;
7430:
7431:
7432:
7433: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7434: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7435: 'OKC_REP_UTIL_PVT.contract_terms_disabled_yn returns x_disable_contract_terms_yn as : '
7436: || x_disable_contract_terms_yn);
7437: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

7430:
7431:
7432:
7433: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7434: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7435: 'OKC_REP_UTIL_PVT.contract_terms_disabled_yn returns x_disable_contract_terms_yn as : '
7436: || x_disable_contract_terms_yn);
7437: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7438: 'Leaving Procedure contract_terms_disabled_yn');

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

7433: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7434: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7435: 'OKC_REP_UTIL_PVT.contract_terms_disabled_yn returns x_disable_contract_terms_yn as : '
7436: || x_disable_contract_terms_yn);
7437: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7438: 'Leaving Procedure contract_terms_disabled_yn');
7439: END IF;
7440:
7441: EXCEPTION

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

7440:
7441: EXCEPTION
7442: WHEN OTHERS THEN
7443:
7444: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7445: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7446: 'Leaving Function contract_terms_disabled_yn because of EXCEPTION: '||sqlerrm);
7447: END IF;
7448:

Line 7445: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

7441: EXCEPTION
7442: WHEN OTHERS THEN
7443:
7444: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7445: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7446: 'Leaving Function contract_terms_disabled_yn because of EXCEPTION: '||sqlerrm);
7447: END IF;
7448:
7449: Okc_Api.Set_Message(p_app_name => G_APP_NAME,