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 140: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 317: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

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

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

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

Line 355: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

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

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

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

Line 394: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

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

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

542: BEGIN
543:
544: l_api_name := 'check_contract_access';
545:
546: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
547: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
548: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
549: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
550: '101: Contract Id is: ' || to_char(p_contract_id));

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

543:
544: l_api_name := 'check_contract_access';
545:
546: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
547: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
548: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
549: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
550: '101: Contract Id is: ' || to_char(p_contract_id));
551: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

545:
546: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
547: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
548: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
549: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
550: '101: Contract Id is: ' || to_char(p_contract_id));
551: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
552: '102: Fucntion Name is: ' || p_function_name);
553: END IF;

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

547: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
548: '100: Entered OKC_REP_UTIL_PVT.check_contract_access');
549: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
550: '101: Contract Id is: ' || to_char(p_contract_id));
551: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
552: '102: Fucntion Name is: ' || p_function_name);
553: END IF;
554: -- Initialize message list if p_init_msg_list is set to TRUE.
555: IF FND_API.to_Boolean( p_init_msg_list ) THEN

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

559: OPEN contract_csr(p_contract_id);
560: FETCH contract_csr INTO l_org_id, l_owner_id, l_use_acl_flag, l_contract_type, l_status_code, l_sign_type;
561: CLOSE contract_csr;
562:
563: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
565: 'Values from contract_csr: l_org_id = ' || l_org_id || ', l_owner_id = ' || l_owner_id || ',l_use_acl_flag = ' || l_use_acl_flag);
566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
567: 'Values from contract_csr: l_contract_type = ' || l_contract_type || ', l_status_code = ' || l_status_code || ',l_sign_type = ' || l_sign_type);

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

560: FETCH contract_csr INTO l_org_id, l_owner_id, l_use_acl_flag, l_contract_type, l_status_code, l_sign_type;
561: CLOSE contract_csr;
562:
563: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
565: 'Values from contract_csr: l_org_id = ' || l_org_id || ', l_owner_id = ' || l_owner_id || ',l_use_acl_flag = ' || l_use_acl_flag);
566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
567: 'Values from contract_csr: l_contract_type = ' || l_contract_type || ', l_status_code = ' || l_status_code || ',l_sign_type = ' || l_sign_type);
568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

562:
563: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
565: 'Values from contract_csr: l_org_id = ' || l_org_id || ', l_owner_id = ' || l_owner_id || ',l_use_acl_flag = ' || l_use_acl_flag);
566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
567: 'Values from contract_csr: l_contract_type = ' || l_contract_type || ', l_status_code = ' || l_status_code || ',l_sign_type = ' || l_sign_type);
568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
569: 'Values : FND_GLOBAL.user_id() = ' || FND_GLOBAL.user_id() || ', FND_GLOBAL.user_name() = ' || FND_GLOBAL.user_name());
570: END IF;

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

564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
565: 'Values from contract_csr: l_org_id = ' || l_org_id || ', l_owner_id = ' || l_owner_id || ',l_use_acl_flag = ' || l_use_acl_flag);
566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
567: 'Values from contract_csr: l_contract_type = ' || l_contract_type || ', l_status_code = ' || l_status_code || ',l_sign_type = ' || l_sign_type);
568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
569: 'Values : FND_GLOBAL.user_id() = ' || FND_GLOBAL.user_id() || ', FND_GLOBAL.user_name() = ' || FND_GLOBAL.user_name());
570: END IF;
571:
572: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

579:
580: -- Call multi-org API to check access to contract's organization by current user
581: l_result := MO_GLOBAL.check_access(p_org_id => l_org_id);
582:
583: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
584: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
585: 'Values after calling MOAC API l_result = ' || l_result);
586: END IF;
587:

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

580: -- Call multi-org API to check access to contract's organization by current user
581: l_result := MO_GLOBAL.check_access(p_org_id => l_org_id);
582:
583: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
584: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
585: 'Values after calling MOAC API l_result = ' || l_result);
586: END IF;
587:
588: IF (l_result = 'Y') THEN -- if the currenct user has org access of the contract in which it is created

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

587:
588: IF (l_result = 'Y') THEN -- if the currenct user has org access of the contract in which it is created
589: ---for pending approval documents, need to check if user falls in the list of approvers, then give them access to view/update contract details
590: IF (l_status_code = 'PENDING_APPROVAL') THEN
591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, 'checking whether user is present in approvers list');
593: END IF;
594:
595: ame_api2.getallapprovers1(

Line 592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, 'checking whether user is present in approvers list');

588: IF (l_result = 'Y') THEN -- if the currenct user has org access of the contract in which it is created
589: ---for pending approval documents, need to check if user falls in the list of approvers, then give them access to view/update contract details
590: IF (l_status_code = 'PENDING_APPROVAL') THEN
591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, 'checking whether user is present in approvers list');
593: END IF;
594:
595: ame_api2.getallapprovers1(
596: applicationIdIn => G_APPLICATION_ID,

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

607: LOOP
608: IF l_approversOut(i).name = l_user_name THEN
609: x_has_access := FND_API.G_TRUE;
610:
611: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
612: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Approver is the current user. so user have access.');
613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
614: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
615: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');

Line 612: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Approver is the current user. so user have access.');

608: IF l_approversOut(i).name = l_user_name THEN
609: x_has_access := FND_API.G_TRUE;
610:
611: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
612: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Approver is the current user. so user have access.');
613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
614: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
615: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');
616: END IF;

Line 613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);

609: x_has_access := FND_API.G_TRUE;
610:
611: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
612: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Approver is the current user. so user have access.');
613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
614: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
615: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');
616: END IF;
617:

Line 614: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);

610:
611: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
612: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Approver is the current user. so user have access.');
613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
614: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
615: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');
616: END IF;
617:
618: RETURN;

Line 615: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');

611: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
612: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Approver is the current user. so user have access.');
613: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
614: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
615: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');
616: END IF;
617:
618: RETURN;
619: END IF;

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

621: END IF; --l_status_code = 'PENDING_APPROVAL'
622:
623: ---for pending signature documents, need to check if user falls in the list of igners, then give them access to view/update contract details
624: IF (l_status_code = 'PENDING_SIGNATURE' and l_sign_type = 'E') THEN
625: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
626: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, 'checking whether user is present in signers list');
627: END IF;
628:
629: FOR REC IN contract_signers_csr(p_contract_id)

Line 626: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, 'checking whether user is present in signers list');

622:
623: ---for pending signature documents, need to check if user falls in the list of igners, then give them access to view/update contract details
624: IF (l_status_code = 'PENDING_SIGNATURE' and l_sign_type = 'E') THEN
625: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
626: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name, 'checking whether user is present in signers list');
627: END IF;
628:
629: FOR REC IN contract_signers_csr(p_contract_id)
630: LOOP

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

630: LOOP
631: IF (REC.user_id = l_user_id) THEN
632: x_has_access := FND_API.G_TRUE;
633:
634: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '210:Signer is the current user. so user have access.');
636: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
637: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');

Line 635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '210:Signer is the current user. so user have access.');

631: IF (REC.user_id = l_user_id) THEN
632: x_has_access := FND_API.G_TRUE;
633:
634: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '210:Signer is the current user. so user have access.');
636: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
637: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');
639: END IF;

Line 636: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);

632: x_has_access := FND_API.G_TRUE;
633:
634: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '210:Signer is the current user. so user have access.');
636: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
637: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');
639: END IF;
640:

Line 637: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);

633:
634: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '210:Signer is the current user. so user have access.');
636: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
637: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');
639: END IF;
640:
641: RETURN;

Line 638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');

634: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '210:Signer is the current user. so user have access.');
636: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_has_access is: ' || x_has_access);
637: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name, '200:x_return_status is: ' || x_return_status);
638: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, '200:Leaving OKC_REP_UTIL_PVT.check_contract_access');
639: END IF;
640:
641: RETURN;
642: END IF;

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

645: END IF; --l_result ='Y'
646:
647: 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
648:
649: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
650: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
651: 'returning FALSE, queried for UPDATE access, not an Admin, not a User, must be a Viewer');
652: END IF;
653:

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

646:
647: 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
648:
649: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
650: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
651: 'returning FALSE, queried for UPDATE access, not an Admin, not a User, must be a Viewer');
652: END IF;
653:
654: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

669: END IF;
670:
671: CLOSE intents_csr;
672:
673: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
674: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
675: 'Values after intents_csr fetch: l_result = ' || l_result);
676: END IF;
677:

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

670:
671: CLOSE intents_csr;
672:
673: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
674: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
675: 'Values after intents_csr fetch: l_result = ' || l_result);
676: END IF;
677:
678: IF (l_result = 'Y') THEN

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

676: END IF;
677:
678: IF (l_result = 'Y') THEN
679:
680: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
681: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
682: 'Value from FND_GLOBAL.user_id() call: l_user_id = ' || l_user_id);
683: END IF;
684:

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

677:
678: IF (l_result = 'Y') THEN
679:
680: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
681: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
682: 'Value from FND_GLOBAL.user_id() call: l_user_id = ' || l_user_id);
683: END IF;
684:
685: -- Check if the current user is owner of the contract

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

685: -- Check if the current user is owner of the contract
686: IF (l_user_id = l_owner_id) THEN
687: x_has_access := FND_API.G_TRUE;
688:
689: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
690: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
691: 'IF (l_user_id = l_owner_id) THEN: TRUE: x_has_access = ' || x_has_access);
692: END IF;
693: ELSE

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

686: IF (l_user_id = l_owner_id) THEN
687: x_has_access := FND_API.G_TRUE;
688:
689: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
690: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
691: 'IF (l_user_id = l_owner_id) THEN: TRUE: x_has_access = ' || x_has_access);
692: END IF;
693: ELSE
694:

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

691: 'IF (l_user_id = l_owner_id) THEN: TRUE: x_has_access = ' || x_has_access);
692: END IF;
693: ELSE
694:
695: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
696: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
697: 'checking OKC_REP_ADMINISTRATOR function: ' || G_FUNC_OKC_REP_ADMINISTRATOR);
698: END IF;
699:

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

692: END IF;
693: ELSE
694:
695: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
696: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
697: 'checking OKC_REP_ADMINISTRATOR function: ' || G_FUNC_OKC_REP_ADMINISTRATOR);
698: END IF;
699:
700: IF (FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y')) THEN

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

700: IF (FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y')) THEN
701:
702: x_has_access := FND_API.G_TRUE;
703:
704: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
705: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
706: 'IF (FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,''Y'')) THEN: TRUE: x_has_access = ' || x_has_access);
707: END IF;
708: ELSE

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

701:
702: x_has_access := FND_API.G_TRUE;
703:
704: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
705: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
706: 'IF (FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,''Y'')) THEN: TRUE: x_has_access = ' || x_has_access);
707: END IF;
708: ELSE
709:

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

709:
710: -- Check if Use ACL flag is enabled for the current contract
711: IF (l_use_acl_flag = 'Y') THEN
712:
713: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
714: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
715: 'IF (l_use_acl_flag = ''Y'') THEN: TRUE: x_has_access = ' || x_has_access);
716: END IF;
717:

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

710: -- Check if Use ACL flag is enabled for the current contract
711: IF (l_use_acl_flag = 'Y') THEN
712:
713: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
714: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
715: 'IF (l_use_acl_flag = ''Y'') THEN: TRUE: x_has_access = ' || x_has_access);
716: END IF;
717:
718: -- Get current user's resource_id

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

734:
735: IF (grants_csr%FOUND) THEN
736: x_has_access := FND_API.G_TRUE;
737:
738: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
739: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
740: 'IF (grants_csr%FOUND) THEN: TRUE: x_has_access = ' || x_has_access);
741: END IF;
742: ELSE

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

735: IF (grants_csr%FOUND) THEN
736: x_has_access := FND_API.G_TRUE;
737:
738: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
739: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
740: 'IF (grants_csr%FOUND) THEN: TRUE: x_has_access = ' || x_has_access);
741: END IF;
742: ELSE
743: x_has_access := FND_API.G_FALSE;

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

741: END IF;
742: ELSE
743: x_has_access := FND_API.G_FALSE;
744:
745: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
746: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
747: 'IF (grants_csr%FOUND) THEN: FALSE: x_has_access = ' || x_has_access);
748: END IF;
749: END IF;

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

742: ELSE
743: x_has_access := FND_API.G_FALSE;
744:
745: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
746: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
747: 'IF (grants_csr%FOUND) THEN: FALSE: x_has_access = ' || x_has_access);
748: END IF;
749: END IF;
750:

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

751: CLOSE grants_csr;
752: ELSE
753: x_has_access := FND_API.G_FALSE;
754:
755: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
756: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
757: 'IF (l_use_acl_flag = ''Y'') THEN: FALSE: x_has_access = ' || x_has_access);
758: END IF;
759: END IF; -- End of Use ACL flag check

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

752: ELSE
753: x_has_access := FND_API.G_FALSE;
754:
755: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
756: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
757: 'IF (l_use_acl_flag = ''Y'') THEN: FALSE: x_has_access = ' || x_has_access);
758: END IF;
759: END IF; -- End of Use ACL flag check
760:

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

765: END IF; -- End of intent profile check
766:
767: END IF; -- End of MO_GLOBAL check
768:
769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
770: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
771: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
772: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
773: '111: x_has_access is: ' || x_has_access);

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

766:
767: END IF; -- End of MO_GLOBAL check
768:
769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
770: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
771: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
772: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
773: '111: x_has_access is: ' || x_has_access);
774: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

768:
769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
770: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
771: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
772: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
773: '111: x_has_access is: ' || x_has_access);
774: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
775: '112: x_return_status is: ' || x_return_status);
776: END IF;

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

770: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
771: '110: Leaving OKC_REP_UTIL_PVT.check_contract_access');
772: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
773: '111: x_has_access is: ' || x_has_access);
774: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
775: '112: x_return_status is: ' || x_return_status);
776: END IF;
777:
778: EXCEPTION

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

787: IF (grants_csr%ISOPEN) THEN
788: CLOSE grants_csr ;
789: END IF;
790:
791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
792: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
793: g_module || l_api_name || '.exception',
794: '115: Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
795: END IF;

Line 792: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

788: CLOSE grants_csr ;
789: END IF;
790:
791: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
792: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
793: g_module || l_api_name || '.exception',
794: '115: Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
795: END IF;
796: x_return_status := FND_API.G_RET_STS_ERROR;

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

810: IF (grants_csr%ISOPEN) THEN
811: CLOSE grants_csr ;
812: END IF;
813:
814: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
815: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
816: g_module || l_api_name || '.exception',
817: '116:Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
818: END IF;

Line 815: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

811: CLOSE grants_csr ;
812: END IF;
813:
814: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
815: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
816: g_module || l_api_name || '.exception',
817: '116:Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
818: END IF;
819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

833: IF (grants_csr%ISOPEN) THEN
834: CLOSE grants_csr ;
835: END IF;
836:
837: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
838: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
839: g_module || l_api_name || '.exception',
840: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
841: END IF;

Line 838: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

834: CLOSE grants_csr ;
835: END IF;
836:
837: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
838: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
839: g_module || l_api_name || '.exception',
840: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
841: END IF;
842: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

880:
881: l_api_name := 'check_contract_access_external';
882: l_has_access := 'N';
883:
884: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
885: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
886: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
887: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
888: 'Contract Id is: ' || p_contract_id);

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

881: l_api_name := 'check_contract_access_external';
882: l_has_access := 'N';
883:
884: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
885: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
886: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
887: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
888: 'Contract Id is: ' || p_contract_id);
889: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

883:
884: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
885: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
886: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
887: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
888: 'Contract Id is: ' || p_contract_id);
889: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
890: 'Contract Type is: ' || p_contract_type);
891: END IF;

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

885: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
886: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
887: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
888: 'Contract Id is: ' || p_contract_id);
889: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
890: 'Contract Type is: ' || p_contract_type);
891: END IF;
892: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

888: 'Contract Id is: ' || p_contract_id);
889: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
890: 'Contract Type is: ' || p_contract_type);
891: END IF;
892: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
894: 'Calling OKC_REP_UTIL_PVT.has_contract_access');
895: END IF;
896: --- Call check_contract_access procedure.

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

889: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
890: 'Contract Type is: ' || p_contract_type);
891: END IF;
892: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
893: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
894: 'Calling OKC_REP_UTIL_PVT.has_contract_access');
895: END IF;
896: --- Call check_contract_access procedure.
897: check_contract_access_external(

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

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

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

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

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

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

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

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

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

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

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

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

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

964:
965: l_api_name := 'has_contract_access';
966: l_has_access := 'N';
967:
968: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
969: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
970: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
971: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
972: 'Contract Id is: ' || p_contract_id);

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

965: l_api_name := 'has_contract_access';
966: l_has_access := 'N';
967:
968: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
969: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
970: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
971: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
972: 'Contract Id is: ' || p_contract_id);
973: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

967:
968: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
969: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
970: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
971: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
972: 'Contract Id is: ' || p_contract_id);
973: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
974: 'Access Function Name is: ' || p_function_name);
975: END IF;

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

969: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
970: 'Entered Function OKC_REP_UTIL_PVT.check_contract_access');
971: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
972: 'Contract Id is: ' || p_contract_id);
973: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
974: 'Access Function Name is: ' || p_function_name);
975: END IF;
976: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
977: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

972: 'Contract Id is: ' || p_contract_id);
973: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
974: 'Access Function Name is: ' || p_function_name);
975: END IF;
976: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
977: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
978: 'Calling OKC_REP_UTIL_PVT.has_contract_access');
979: END IF;
980: --- Call check_contract_access procedure.

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

973: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
974: 'Access Function Name is: ' || p_function_name);
975: END IF;
976: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
977: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
978: 'Calling OKC_REP_UTIL_PVT.has_contract_access');
979: END IF;
980: --- Call check_contract_access procedure.
981: check_contract_access(

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

987: x_msg_data => l_msg_data,
988: x_msg_count => l_msg_count,
989: x_return_status => l_return_status
990: );
991: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
992: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
993: 'OKC_REP_UTIL_PVT.check_contract_access return status is: '
994: || l_return_status);
995: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

988: x_msg_count => l_msg_count,
989: x_return_status => l_return_status
990: );
991: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
992: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
993: 'OKC_REP_UTIL_PVT.check_contract_access return status is: '
994: || l_return_status);
995: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
996: 'OKC_REP_UTIL_PVT.check_contract_access returns has_access as : '

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

991: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
992: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
993: 'OKC_REP_UTIL_PVT.check_contract_access return status is: '
994: || l_return_status);
995: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
996: 'OKC_REP_UTIL_PVT.check_contract_access returns has_access as : '
997: || l_has_access);
998: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
999: 'Leaving Function has_contract_access');

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

994: || l_return_status);
995: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
996: 'OKC_REP_UTIL_PVT.check_contract_access returns has_access as : '
997: || l_has_access);
998: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
999: 'Leaving Function has_contract_access');
1000: END IF;
1001: RETURN l_has_access ;
1002:

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

1001: RETURN l_has_access ;
1002:
1003: EXCEPTION
1004: WHEN OTHERS THEN
1005: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1006: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
1007: 'Leaving Function has_contract_access because of EXCEPTION: '||sqlerrm);
1008: END IF;
1009: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

1002:
1003: EXCEPTION
1004: WHEN OTHERS THEN
1005: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1006: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
1007: 'Leaving Function has_contract_access because of EXCEPTION: '||sqlerrm);
1008: END IF;
1009: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1010: p_msg_name => G_UNEXPECTED_ERROR,

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

1044: BEGIN
1045:
1046: l_api_name := 'change_contract_status';
1047:
1048: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1050: '200: Entered OKC_REP_UTIL_PVT.change_contract_status');
1051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1052: '201: Contract Id is: ' || to_char(p_contract_id));

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

1045:
1046: l_api_name := 'change_contract_status';
1047:
1048: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1050: '200: Entered OKC_REP_UTIL_PVT.change_contract_status');
1051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1052: '201: Contract Id is: ' || to_char(p_contract_id));
1053: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1047:
1048: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1050: '200: Entered OKC_REP_UTIL_PVT.change_contract_status');
1051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1052: '201: Contract Id is: ' || to_char(p_contract_id));
1053: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1054: '202: Contract version is: ' || p_contract_version);
1055: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1050: '200: Entered OKC_REP_UTIL_PVT.change_contract_status');
1051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1052: '201: Contract Id is: ' || to_char(p_contract_id));
1053: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1054: '202: Contract version is: ' || p_contract_version);
1055: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1056: '203: Status code is: ' || p_status_code);
1057: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1052: '201: Contract Id is: ' || to_char(p_contract_id));
1053: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1054: '202: Contract version is: ' || p_contract_version);
1055: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1056: '203: Status code is: ' || p_status_code);
1057: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1058: '204: USer Id is: ' || to_char(p_user_id));
1059: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1053: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1054: '202: Contract version is: ' || p_contract_version);
1055: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1056: '203: Status code is: ' || p_status_code);
1057: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1058: '204: USer Id is: ' || to_char(p_user_id));
1059: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1060: '205: Note is: ' || p_note);
1061: END IF;

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

1055: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1056: '203: Status code is: ' || p_status_code);
1057: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1058: '204: USer Id is: ' || to_char(p_user_id));
1059: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1060: '205: Note is: ' || p_note);
1061: END IF;
1062:
1063: -- Initialize message list if p_init_msg_list is set to TRUE.

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

1067:
1068: x_return_status := FND_API.G_RET_STS_SUCCESS;
1069:
1070:
1071: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1073: g_module || l_api_name || '.begin',
1074: 'Before updating Contract Status');
1075: END IF;

Line 1072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1068: x_return_status := FND_API.G_RET_STS_SUCCESS;
1069:
1070:
1071: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1072: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1073: g_module || l_api_name || '.begin',
1074: 'Before updating Contract Status');
1075: END IF;
1076:

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

1081: contract_last_updated_by = FND_GLOBAL.user_id()
1082: WHERE contract_id = p_contract_id
1083: AND contract_version_num = p_contract_version;
1084:
1085: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1087: g_module || l_api_name,
1088: 'After updating Contract Status');
1089: END IF;

Line 1086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1082: WHERE contract_id = p_contract_id
1083: AND contract_version_num = p_contract_version;
1084:
1085: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1086: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1087: g_module || l_api_name,
1088: 'After updating Contract Status');
1089: END IF;
1090:

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

1091: -- Log this status change into OKC_REP_CON_STATUS_HIST table
1092: IF (p_user_id IS NULL) THEN
1093: l_user_id := FND_GLOBAL.user_id();
1094:
1095: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1096: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1097: g_module || l_api_name || '.begin',
1098: 'Current user id' || l_user_id);
1099: END IF;

Line 1096: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1092: IF (p_user_id IS NULL) THEN
1093: l_user_id := FND_GLOBAL.user_id();
1094:
1095: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1096: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1097: g_module || l_api_name || '.begin',
1098: 'Current user id' || l_user_id);
1099: END IF;
1100:

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

1101: ELSE
1102: l_user_id := p_user_id;
1103: END IF; -- End of p_user_id IS NULL
1104:
1105: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1106: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1107: g_module || l_api_name,
1108: 'Before inserting a row into OKC_REP_CON_STATUS_HIST');
1109: END IF;

Line 1106: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1102: l_user_id := p_user_id;
1103: END IF; -- End of p_user_id IS NULL
1104:
1105: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1106: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1107: g_module || l_api_name,
1108: 'Before inserting a row into OKC_REP_CON_STATUS_HIST');
1109: END IF;
1110:

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

1133: l_user_id,
1134: sysdate,
1135: l_user_id);
1136:
1137: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1138: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1139: g_module || l_api_name,
1140: 'After inserting a row into OKC_REP_CON_STATUS_HIST');
1141: END IF;

Line 1138: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1134: sysdate,
1135: l_user_id);
1136:
1137: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1138: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1139: g_module || l_api_name,
1140: 'After inserting a row into OKC_REP_CON_STATUS_HIST');
1141: END IF;
1142: EXCEPTION

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

1140: 'After inserting a row into OKC_REP_CON_STATUS_HIST');
1141: END IF;
1142: EXCEPTION
1143: WHEN FND_API.G_EXC_ERROR THEN
1144: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1145: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1146: g_module || l_api_name || '.exception',
1147: 'Leaving change_contract_status:FND_API.G_EXC_ERROR Exception');
1148: END IF;

Line 1145: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1141: END IF;
1142: EXCEPTION
1143: WHEN FND_API.G_EXC_ERROR THEN
1144: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1145: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1146: g_module || l_api_name || '.exception',
1147: 'Leaving change_contract_status:FND_API.G_EXC_ERROR Exception');
1148: END IF;
1149: x_return_status := FND_API.G_RET_STS_ERROR;

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

1151: p_count => x_msg_count,
1152: p_data => x_msg_data
1153: );
1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1155: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1156: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1157: g_module || l_api_name || '.exception',
1158: 'Leaving change_contract_status: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1159: END IF;

Line 1156: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1152: p_data => x_msg_data
1153: );
1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1155: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1156: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1157: g_module || l_api_name || '.exception',
1158: 'Leaving change_contract_status: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1159: END IF;
1160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1162: p_count => x_msg_count,
1163: p_data => x_msg_data
1164: );
1165: WHEN OTHERS THEN
1166: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1167: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1168: g_module || l_api_name || '.exception',
1169: 'Leaving change_contract_status because of EXCEPTION: ' || sqlerrm);
1170: END IF;

Line 1167: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1163: p_data => x_msg_data
1164: );
1165: WHEN OTHERS THEN
1166: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1167: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1168: g_module || l_api_name || '.exception',
1169: 'Leaving change_contract_status because of EXCEPTION: ' || sqlerrm);
1170: END IF;
1171: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

1227: BEGIN
1228:
1229: l_api_name := 'add_approval_hist_record';
1230:
1231: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1233: '300: Entered OKC_REP_UTIL_PVT.add_approval_hist_record');
1234: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1235: '301: Contract Id is: ' || to_char(p_contract_id));

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

1228:
1229: l_api_name := 'add_approval_hist_record';
1230:
1231: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1233: '300: Entered OKC_REP_UTIL_PVT.add_approval_hist_record');
1234: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1235: '301: Contract Id is: ' || to_char(p_contract_id));
1236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1230:
1231: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1233: '300: Entered OKC_REP_UTIL_PVT.add_approval_hist_record');
1234: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1235: '301: Contract Id is: ' || to_char(p_contract_id));
1236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1237: '302: Contract version is: ' || p_contract_version);
1238: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1232: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1233: '300: Entered OKC_REP_UTIL_PVT.add_approval_hist_record');
1234: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1235: '301: Contract Id is: ' || to_char(p_contract_id));
1236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1237: '302: Contract version is: ' || p_contract_version);
1238: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1239: '303: Action code is: ' || p_action_code);
1240: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1234: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1235: '301: Contract Id is: ' || to_char(p_contract_id));
1236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1237: '302: Contract version is: ' || p_contract_version);
1238: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1239: '303: Action code is: ' || p_action_code);
1240: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1241: '304: USer Id is: ' || to_char(p_user_id));
1242: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1237: '302: Contract version is: ' || p_contract_version);
1238: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1239: '303: Action code is: ' || p_action_code);
1240: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1241: '304: USer Id is: ' || to_char(p_user_id));
1242: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1243: '305: Note is: ' || p_note);
1244: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1238: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1239: '303: Action code is: ' || p_action_code);
1240: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1241: '304: USer Id is: ' || to_char(p_user_id));
1242: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1243: '305: Note is: ' || p_note);
1244: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1245: '306: Forwarded User Id is: ' || to_char(p_forward_user_id));
1246: END IF;

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

1240: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1241: '304: USer Id is: ' || to_char(p_user_id));
1242: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1243: '305: Note is: ' || p_note);
1244: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1245: '306: Forwarded User Id is: ' || to_char(p_forward_user_id));
1246: END IF;
1247: -- Initialize message list if p_init_msg_list is set to TRUE.
1248: IF FND_API.to_Boolean( p_init_msg_list ) THEN

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

1250: END IF;
1251:
1252: x_return_status := FND_API.G_RET_STS_SUCCESS;
1253:
1254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1256: g_module || l_api_name,
1257: 'Before inserting a row into OKC_REP_CON_APPROVALS');
1258: END IF;

Line 1255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1251:
1252: x_return_status := FND_API.G_RET_STS_SUCCESS;
1253:
1254: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1255: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1256: g_module || l_api_name,
1257: 'Before inserting a row into OKC_REP_CON_APPROVALS');
1258: END IF;
1259:

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

1286: sysdate,
1287: p_user_id,
1288: p_forward_user_id);
1289:
1290: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1291: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1292: g_module || l_api_name,
1293: 'After inserting a row into OKC_REP_CON_APPROVALS');
1294: END IF;

Line 1291: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1287: p_user_id,
1288: p_forward_user_id);
1289:
1290: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1291: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1292: g_module || l_api_name,
1293: 'After inserting a row into OKC_REP_CON_APPROVALS');
1294: END IF;
1295: EXCEPTION

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

1293: 'After inserting a row into OKC_REP_CON_APPROVALS');
1294: END IF;
1295: EXCEPTION
1296: WHEN FND_API.G_EXC_ERROR THEN
1297: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1298: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1299: g_module || l_api_name || '.exception',
1300: 'Leaving add_approval_hist_record:FND_API.G_EXC_ERROR Exception');
1301: END IF;

Line 1298: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1294: END IF;
1295: EXCEPTION
1296: WHEN FND_API.G_EXC_ERROR THEN
1297: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1298: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1299: g_module || l_api_name || '.exception',
1300: 'Leaving add_approval_hist_record:FND_API.G_EXC_ERROR Exception');
1301: END IF;
1302: x_return_status := FND_API.G_RET_STS_ERROR;

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

1304: p_count => x_msg_count,
1305: p_data => x_msg_data
1306: );
1307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1308: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1309: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1310: g_module || l_api_name || '.exception',
1311: 'Leaving add_approval_hist_record: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1312: END IF;

Line 1309: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1305: p_data => x_msg_data
1306: );
1307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1308: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1309: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1310: g_module || l_api_name || '.exception',
1311: 'Leaving add_approval_hist_record: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1312: END IF;
1313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1315: p_count => x_msg_count,
1316: p_data => x_msg_data
1317: );
1318: WHEN OTHERS THEN
1319: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1320: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1321: g_module || l_api_name || '.exception',
1322: 'Leaving add_approval_hist_record because of EXCEPTION: ' || sqlerrm);
1323: END IF;

Line 1320: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1316: p_data => x_msg_data
1317: );
1318: WHEN OTHERS THEN
1319: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1320: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1321: g_module || l_api_name || '.exception',
1322: 'Leaving add_approval_hist_record because of EXCEPTION: ' || sqlerrm);
1323: END IF;
1324: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

1384: BEGIN
1385:
1386: l_api_name := 'add_signature_hist_record';
1387:
1388: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1389: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1390: '300: Entered OKC_REP_UTIL_PVT.add_signature_hist_record');
1391: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1392: '301: Contract Id is: ' || to_char(p_contract_id));

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

1385:
1386: l_api_name := 'add_signature_hist_record';
1387:
1388: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1389: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1390: '300: Entered OKC_REP_UTIL_PVT.add_signature_hist_record');
1391: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1392: '301: Contract Id is: ' || to_char(p_contract_id));
1393: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1387:
1388: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1389: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1390: '300: Entered OKC_REP_UTIL_PVT.add_signature_hist_record');
1391: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1392: '301: Contract Id is: ' || to_char(p_contract_id));
1393: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1394: '302: Contract version is: ' || p_contract_version);
1395: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1389: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1390: '300: Entered OKC_REP_UTIL_PVT.add_signature_hist_record');
1391: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1392: '301: Contract Id is: ' || to_char(p_contract_id));
1393: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1394: '302: Contract version is: ' || p_contract_version);
1395: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1396: '303: Action code is: ' || p_action_code);
1397: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1391: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1392: '301: Contract Id is: ' || to_char(p_contract_id));
1393: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1394: '302: Contract version is: ' || p_contract_version);
1395: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1396: '303: Action code is: ' || p_action_code);
1397: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1398: '304: USer Id is: ' || to_char(p_user_id));
1399: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1393: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1394: '302: Contract version is: ' || p_contract_version);
1395: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1396: '303: Action code is: ' || p_action_code);
1397: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1398: '304: USer Id is: ' || to_char(p_user_id));
1399: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1400: '305: Note is: ' || p_note);
1401: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1395: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1396: '303: Action code is: ' || p_action_code);
1397: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1398: '304: USer Id is: ' || to_char(p_user_id));
1399: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1400: '305: Note is: ' || p_note);
1401: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1402: '306: Forwarded User Id is: ' || to_char(p_forward_user_id));
1403: END IF;

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

1397: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1398: '304: USer Id is: ' || to_char(p_user_id));
1399: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1400: '305: Note is: ' || p_note);
1401: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1402: '306: Forwarded User Id is: ' || to_char(p_forward_user_id));
1403: END IF;
1404: -- Initialize message list if p_init_msg_list is set to TRUE.
1405: IF FND_API.to_Boolean( p_init_msg_list ) THEN

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

1407: END IF;
1408:
1409: x_return_status := FND_API.G_RET_STS_SUCCESS;
1410:
1411: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1412: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1413: g_module || l_api_name,
1414: 'Before inserting a row into OKC_REP_SIGNATURE_DETAILS');
1415: END IF;

Line 1412: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1408:
1409: x_return_status := FND_API.G_RET_STS_SUCCESS;
1410:
1411: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1412: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1413: g_module || l_api_name,
1414: 'Before inserting a row into OKC_REP_SIGNATURE_DETAILS');
1415: END IF;
1416:

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

1453: sysdate,
1454: p_user_id,
1455: p_forward_user_id);
1456:
1457: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1458: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1459: g_module || l_api_name,
1460: 'After inserting a row into OKC_REP_SIGNATURE_DETAILS');
1461: END IF;

Line 1458: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,

1454: p_user_id,
1455: p_forward_user_id);
1456:
1457: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1458: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,
1459: g_module || l_api_name,
1460: 'After inserting a row into OKC_REP_SIGNATURE_DETAILS');
1461: END IF;
1462: EXCEPTION

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

1460: 'After inserting a row into OKC_REP_SIGNATURE_DETAILS');
1461: END IF;
1462: EXCEPTION
1463: WHEN FND_API.G_EXC_ERROR THEN
1464: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1465: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1466: g_module || l_api_name || '.exception',
1467: 'Leaving add_signature_hist_record:FND_API.G_EXC_ERROR Exception');
1468: END IF;

Line 1465: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1461: END IF;
1462: EXCEPTION
1463: WHEN FND_API.G_EXC_ERROR THEN
1464: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1465: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1466: g_module || l_api_name || '.exception',
1467: 'Leaving add_signature_hist_record:FND_API.G_EXC_ERROR Exception');
1468: END IF;
1469: x_return_status := FND_API.G_RET_STS_ERROR;

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

1471: p_count => x_msg_count,
1472: p_data => x_msg_data
1473: );
1474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1475: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1476: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1477: g_module || l_api_name || '.exception',
1478: 'Leaving add_signature_hist_record: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1479: END IF;

Line 1476: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1472: p_data => x_msg_data
1473: );
1474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1475: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1476: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1477: g_module || l_api_name || '.exception',
1478: 'Leaving add_signature_hist_record: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1479: END IF;
1480: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

1482: p_count => x_msg_count,
1483: p_data => x_msg_data
1484: );
1485: WHEN OTHERS THEN
1486: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1487: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1488: g_module || l_api_name || '.exception',
1489: 'Leaving add_signature_hist_record because of EXCEPTION: ' || sqlerrm);
1490: END IF;

Line 1487: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

1483: p_data => x_msg_data
1484: );
1485: WHEN OTHERS THEN
1486: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1487: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1488: g_module || l_api_name || '.exception',
1489: 'Leaving add_signature_hist_record because of EXCEPTION: ' || sqlerrm);
1490: END IF;
1491: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

1660: BEGIN
1661:
1662: l_api_name := 'validate_contract_party';
1663:
1664: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1666: 'Entered OKC_REP_WF_PVT.validate_contract_party');
1667: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1668: 'p_contract_id = ' || p_contract_id);

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

1661:
1662: l_api_name := 'validate_contract_party';
1663:
1664: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1666: 'Entered OKC_REP_WF_PVT.validate_contract_party');
1667: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1668: 'p_contract_id = ' || p_contract_id);
1669: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1663:
1664: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1666: 'Entered OKC_REP_WF_PVT.validate_contract_party');
1667: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1668: 'p_contract_id = ' || p_contract_id);
1669: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1670: 'p_intent = ' || p_intent);
1671: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1665: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1666: 'Entered OKC_REP_WF_PVT.validate_contract_party');
1667: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1668: 'p_contract_id = ' || p_contract_id);
1669: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1670: 'p_intent = ' || p_intent);
1671: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1672: 'p_party_role_code = ' || p_party_role_code);
1673: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1667: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1668: 'p_contract_id = ' || p_contract_id);
1669: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1670: 'p_intent = ' || p_intent);
1671: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1672: 'p_party_role_code = ' || p_party_role_code);
1673: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1674: 'p_party_role_txt = ' || p_party_role_txt);
1675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1669: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1670: 'p_intent = ' || p_intent);
1671: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1672: 'p_party_role_code = ' || p_party_role_code);
1673: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1674: 'p_party_role_txt = ' || p_party_role_txt);
1675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1676: 'p_party_id = ' || p_party_id);
1677: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1671: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1672: 'p_party_role_code = ' || p_party_role_code);
1673: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1674: 'p_party_role_txt = ' || p_party_role_txt);
1675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1676: 'p_party_id = ' || p_party_id);
1677: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1678: 'p_party_name = ' || p_party_name);
1679: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1673: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1674: 'p_party_role_txt = ' || p_party_role_txt);
1675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1676: 'p_party_id = ' || p_party_id);
1677: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1678: 'p_party_name = ' || p_party_name);
1679: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1680: 'p_location_id = ' || p_location_id);
1681: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

1675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1676: 'p_party_id = ' || p_party_id);
1677: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1678: 'p_party_name = ' || p_party_name);
1679: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1680: 'p_location_id = ' || p_location_id);
1681: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1682: 'p_mode = ' || p_mode);
1683: END IF;

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

1677: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1678: 'p_party_name = ' || p_party_name);
1679: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1680: 'p_location_id = ' || p_location_id);
1681: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1682: 'p_mode = ' || p_mode);
1683: END IF;
1684:
1685: -- Standard call to check for call compatibility.

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

1696: x_return_status := FND_API.G_RET_STS_SUCCESS;
1697:
1698: x_valid_party_flag := 'Y';
1699:
1700: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1701: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1702: 'Validating Contract Party for ' || p_mode || ' module');
1703: END IF;
1704:

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

1697:
1698: x_valid_party_flag := 'Y';
1699:
1700: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1701: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1702: 'Validating Contract Party for ' || p_mode || ' module');
1703: END IF;
1704:
1705: IF(p_mode = G_P_MODE_IMPORT) THEN

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

1704:
1705: IF(p_mode = G_P_MODE_IMPORT) THEN
1706:
1707: -- Check existence of the party role
1708: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1709: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1710: 'Checking existence of the party role');
1711: END IF;
1712:

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

1705: IF(p_mode = G_P_MODE_IMPORT) THEN
1706:
1707: -- Check existence of the party role
1708: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1709: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1710: 'Checking existence of the party role');
1711: END IF;
1712:
1713: OPEN party_role_exist_csr;

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

1713: OPEN party_role_exist_csr;
1714: FETCH party_role_exist_csr INTO p_party_role_code;
1715:
1716: IF party_role_exist_csr%NOTFOUND THEN
1717: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1718: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1719: 'Party role not found');
1720: END IF;
1721:

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

1714: FETCH party_role_exist_csr INTO p_party_role_code;
1715:
1716: IF party_role_exist_csr%NOTFOUND THEN
1717: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1718: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1719: 'Party role not found');
1720: END IF;
1721:
1722: CLOSE party_role_exist_csr;

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

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

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

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

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

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

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

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

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

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

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

1743: END IF;
1744:
1745: CLOSE party_role_exist_csr;
1746:
1747: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1748: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1749: 'Party Role found with code ' || p_party_role_code);
1750: END IF;
1751:

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

1744:
1745: CLOSE party_role_exist_csr;
1746:
1747: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1748: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1749: 'Party Role found with code ' || p_party_role_code);
1750: END IF;
1751:
1752:

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

1750: END IF;
1751:
1752:
1753: -- Check validity of the party role and contract intent combination
1754: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1755: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1756: 'Checking validity of the party role and contract intent combination');
1757: END IF;
1758:

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

1751:
1752:
1753: -- Check validity of the party role and contract intent combination
1754: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1755: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1756: 'Checking validity of the party role and contract intent combination');
1757: END IF;
1758:
1759: OPEN party_role_valid_csr;

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

1759: OPEN party_role_valid_csr;
1760: FETCH party_role_valid_csr INTO l_temp;
1761:
1762: IF party_role_valid_csr%NOTFOUND THEN
1763: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1764: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1765: 'Party role and contract intent combination is invalid');
1766: END IF;
1767:

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

1760: FETCH party_role_valid_csr INTO l_temp;
1761:
1762: IF party_role_valid_csr%NOTFOUND THEN
1763: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1764: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1765: 'Party role and contract intent combination is invalid');
1766: END IF;
1767:
1768: CLOSE party_role_valid_csr;

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

1769:
1770: x_valid_party_flag := 'N';
1771: x_error_code := 'INV_ROLE_INTENT';
1772:
1773: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1774: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1775: 'x_valid_party_flag: ' || x_valid_party_flag);
1776: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1777: 'x_error_code: ' || x_error_code);

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

1770: x_valid_party_flag := 'N';
1771: x_error_code := 'INV_ROLE_INTENT';
1772:
1773: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1774: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1775: 'x_valid_party_flag: ' || x_valid_party_flag);
1776: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1777: 'x_error_code: ' || x_error_code);
1778: END IF;

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

1772:
1773: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1774: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1775: 'x_valid_party_flag: ' || x_valid_party_flag);
1776: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1777: 'x_error_code: ' || x_error_code);
1778: END IF;
1779:
1780: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1779:
1780: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1781: p_data => x_msg_data);
1782:
1783: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1785: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1786: END IF;
1787:

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

1780: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1781: p_data => x_msg_data);
1782:
1783: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1785: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1786: END IF;
1787:
1788: return;

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

1789: END IF;
1790:
1791: CLOSE party_role_valid_csr;
1792:
1793: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1794: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1795: 'Party role and contract intent combination is valid');
1796: END IF;
1797:

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

1790:
1791: CLOSE party_role_valid_csr;
1792:
1793: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1794: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1795: 'Party role and contract intent combination is valid');
1796: END IF;
1797:
1798: -- Check existence of the party

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

1795: 'Party role and contract intent combination is valid');
1796: END IF;
1797:
1798: -- Check existence of the party
1799: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1800: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1801: 'Checking existence of the party');
1802: END IF;
1803:

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

1796: END IF;
1797:
1798: -- Check existence of the party
1799: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1800: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1801: 'Checking existence of the party');
1802: END IF;
1803:
1804: IF (p_party_role_code = 'INTERNAL_ORG') THEN

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

1806: OPEN internal_party_exist_csr;
1807: FETCH internal_party_exist_csr INTO p_party_id;
1808:
1809: IF internal_party_exist_csr%NOTFOUND THEN
1810: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1811: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1812: 'Party not found');
1813: END IF;
1814:

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

1807: FETCH internal_party_exist_csr INTO p_party_id;
1808:
1809: IF internal_party_exist_csr%NOTFOUND THEN
1810: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1811: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1812: 'Party not found');
1813: END IF;
1814:
1815: CLOSE internal_party_exist_csr;

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

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

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

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

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

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

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

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

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

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

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

1843: OPEN tca_party_exist_csr;
1844: FETCH tca_party_exist_csr INTO p_party_id;
1845:
1846: IF tca_party_exist_csr%NOTFOUND THEN
1847: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1848: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1849: 'Party not found');
1850: END IF;
1851:

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

1844: FETCH tca_party_exist_csr INTO p_party_id;
1845:
1846: IF tca_party_exist_csr%NOTFOUND THEN
1847: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1848: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1849: 'Party not found');
1850: END IF;
1851:
1852: CLOSE tca_party_exist_csr;

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

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

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

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

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

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

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

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

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

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

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

1884:
1885: x_valid_party_flag := 'N';
1886: x_error_code := 'PARTY_NOT_EXIST';
1887:
1888: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1889: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1890: 'x_valid_party_flag: ' || x_valid_party_flag);
1891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1892: 'x_error_code: ' || x_error_code);

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

1885: x_valid_party_flag := 'N';
1886: x_error_code := 'PARTY_NOT_EXIST';
1887:
1888: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1889: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1890: 'x_valid_party_flag: ' || x_valid_party_flag);
1891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1892: 'x_error_code: ' || x_error_code);
1893: END IF;

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

1887:
1888: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1889: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1890: 'x_valid_party_flag: ' || x_valid_party_flag);
1891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1892: 'x_error_code: ' || x_error_code);
1893: END IF;
1894:
1895: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1894:
1895: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1896: p_data => x_msg_data);
1897:
1898: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1899: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1900: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1901: END IF;
1902:

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

1895: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1896: p_data => x_msg_data);
1897:
1898: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1899: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1900: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1901: END IF;
1902:
1903: return;

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

1906: CLOSE vendor_exist_csr;
1907:
1908: END IF;
1909:
1910: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1911: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1912: 'Party found with id ' || p_party_id);
1913: END IF;
1914:

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

1907:
1908: END IF;
1909:
1910: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1911: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1912: 'Party found with id ' || p_party_id);
1913: END IF;
1914:
1915: END IF; -- End of p_mode = 'IMPORT'

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

1915: END IF; -- End of p_mode = 'IMPORT'
1916:
1917:
1918: -- If p_mode = 'AUTHORING', then check uniqueness of the contract party in the repository table
1919: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1920: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1921: 'Checking uniqueness of the party in contract');
1922: END IF;
1923:

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

1916:
1917:
1918: -- If p_mode = 'AUTHORING', then check uniqueness of the contract party in the repository table
1919: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1920: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1921: 'Checking uniqueness of the party in contract');
1922: END IF;
1923:
1924: IF (p_mode = G_P_MODE_AUTHORING) THEN

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

1932: FETCH rep_party_unique_csr INTO l_temp;
1933:
1934: IF (rep_party_unique_csr%FOUND) THEN
1935:
1936: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1938: 'Party already exist in the contract');
1939: END IF;
1940:

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

1933:
1934: IF (rep_party_unique_csr%FOUND) THEN
1935:
1936: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1937: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1938: 'Party already exist in the contract');
1939: END IF;
1940:
1941: CLOSE rep_party_unique_csr;

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

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

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

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

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

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

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

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

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

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

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

1972: FETCH imp_party_unique_csr INTO p_party_id;
1973:
1974: IF imp_party_unique_csr%FOUND THEN
1975:
1976: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1977: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1978: 'Party already exist in the contract');
1979: END IF;
1980:

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

1973:
1974: IF imp_party_unique_csr%FOUND THEN
1975:
1976: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1977: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1978: 'Party already exist in the contract');
1979: END IF;
1980:
1981: CLOSE imp_party_unique_csr;

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

1982:
1983: x_valid_party_flag := 'N';
1984: x_error_code := 'PARTY_NOT_UNIQUE';
1985:
1986: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1988: 'x_valid_party_flag: ' || x_valid_party_flag);
1989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1990: 'x_error_code: ' || x_error_code);

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

1983: x_valid_party_flag := 'N';
1984: x_error_code := 'PARTY_NOT_UNIQUE';
1985:
1986: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1988: 'x_valid_party_flag: ' || x_valid_party_flag);
1989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1990: 'x_error_code: ' || x_error_code);
1991: END IF;

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

1985:
1986: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1988: 'x_valid_party_flag: ' || x_valid_party_flag);
1989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1990: 'x_error_code: ' || x_error_code);
1991: END IF;
1992:
1993: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

1992:
1993: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1994: p_data => x_msg_data);
1995:
1996: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1997: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1998: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1999: END IF;
2000:

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

1993: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1994: p_data => x_msg_data);
1995:
1996: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1997: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1998: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
1999: END IF;
2000:
2001: return;

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

2004: CLOSE imp_party_unique_csr;
2005:
2006: END IF;
2007:
2008: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2009: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2010: 'Party is unique in the contract');
2011: END IF;
2012:

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

2005:
2006: END IF;
2007:
2008: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2009: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2010: 'Party is unique in the contract');
2011: END IF;
2012:
2013: IF (p_mode = G_P_MODE_AUTHORING) THEN

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

2012:
2013: IF (p_mode = G_P_MODE_AUTHORING) THEN
2014:
2015: -- Check validity of party role and party combination
2016: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2017: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2018: 'Checking validity of party role and party combination');
2019: END IF;
2020:

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

2013: IF (p_mode = G_P_MODE_AUTHORING) THEN
2014:
2015: -- Check validity of party role and party combination
2016: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2017: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2018: 'Checking validity of party role and party combination');
2019: END IF;
2020:
2021: IF (p_party_role_code = G_PARTY_ROLE_INTERNAL) THEN

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

2024: FETCH internal_party_and_role_csr INTO l_temp;
2025:
2026: IF internal_party_and_role_csr%NOTFOUND THEN
2027:
2028: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2029: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2030: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table HR_ALL_ORGANIZATION_UNITS');
2031: END IF;
2032:

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

2025:
2026: IF internal_party_and_role_csr%NOTFOUND THEN
2027:
2028: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2029: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2030: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table HR_ALL_ORGANIZATION_UNITS');
2031: END IF;
2032:
2033: CLOSE internal_party_and_role_csr;

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

2034:
2035: x_valid_party_flag := 'N';
2036: x_error_code := 'INV_ROLE_PARTY';
2037:
2038: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2039: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2040: 'x_valid_party_flag: ' || x_valid_party_flag);
2041: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2042: 'x_error_code: ' || x_error_code);

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

2035: x_valid_party_flag := 'N';
2036: x_error_code := 'INV_ROLE_PARTY';
2037:
2038: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2039: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2040: 'x_valid_party_flag: ' || x_valid_party_flag);
2041: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2042: 'x_error_code: ' || x_error_code);
2043: END IF;

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

2037:
2038: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2039: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2040: 'x_valid_party_flag: ' || x_valid_party_flag);
2041: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2042: 'x_error_code: ' || x_error_code);
2043: END IF;
2044:
2045: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2044:
2045: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2046: p_data => x_msg_data);
2047:
2048: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2050: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2051: END IF;
2052:

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

2045: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2046: p_data => x_msg_data);
2047:
2048: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2050: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2051: END IF;
2052:
2053: return;

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

2062: FETCH tca_party_and_role_csr INTO l_temp;
2063:
2064: IF tca_party_and_role_csr%NOTFOUND THEN
2065:
2066: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2067: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2068: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table HZ_PARTIES');
2069: END IF;
2070:

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

2063:
2064: IF tca_party_and_role_csr%NOTFOUND THEN
2065:
2066: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2067: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2068: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table HZ_PARTIES');
2069: END IF;
2070:
2071: CLOSE tca_party_and_role_csr;

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

2072:
2073: x_valid_party_flag := 'N';
2074: x_error_code := 'INV_ROLE_PARTY';
2075:
2076: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2077: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2078: 'x_valid_party_flag: ' || x_valid_party_flag);
2079: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2080: 'x_error_code: ' || x_error_code);

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

2073: x_valid_party_flag := 'N';
2074: x_error_code := 'INV_ROLE_PARTY';
2075:
2076: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2077: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2078: 'x_valid_party_flag: ' || x_valid_party_flag);
2079: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2080: 'x_error_code: ' || x_error_code);
2081: END IF;

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

2075:
2076: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2077: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2078: 'x_valid_party_flag: ' || x_valid_party_flag);
2079: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2080: 'x_error_code: ' || x_error_code);
2081: END IF;
2082:
2083: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2082:
2083: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2084: p_data => x_msg_data);
2085:
2086: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2087: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2088: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2089: END IF;
2090:

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

2083: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2084: p_data => x_msg_data);
2085:
2086: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2087: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2088: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2089: END IF;
2090:
2091: return;

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

2099: FETCH vendor_and_role_csr INTO l_temp;
2100:
2101: IF vendor_and_role_csr%NOTFOUND THEN
2102:
2103: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2104: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2105: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table PO_VENDORS');
2106: END IF;
2107:

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

2100:
2101: IF vendor_and_role_csr%NOTFOUND THEN
2102:
2103: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2104: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2105: 'Party with id' || p_party_id || ' and name ' || p_party_name || 'not found in table PO_VENDORS');
2106: END IF;
2107:
2108: CLOSE vendor_and_role_csr;

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

2109:
2110: x_valid_party_flag := 'N';
2111: x_error_code := 'INV_ROLE_PARTY';
2112:
2113: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2114: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2115: 'x_valid_party_flag: ' || x_valid_party_flag);
2116: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2117: 'x_error_code: ' || x_error_code);

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

2110: x_valid_party_flag := 'N';
2111: x_error_code := 'INV_ROLE_PARTY';
2112:
2113: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2114: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2115: 'x_valid_party_flag: ' || x_valid_party_flag);
2116: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2117: 'x_error_code: ' || x_error_code);
2118: END IF;

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

2112:
2113: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2114: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2115: 'x_valid_party_flag: ' || x_valid_party_flag);
2116: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2117: 'x_error_code: ' || x_error_code);
2118: END IF;
2119:
2120: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2119:
2120: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2121: p_data => x_msg_data);
2122:
2123: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2124: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2125: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2126: END IF;
2127:

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

2120: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2121: p_data => x_msg_data);
2122:
2123: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2124: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2125: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2126: END IF;
2127:
2128: return;

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

2131: CLOSE vendor_and_role_csr;
2132:
2133: END IF;
2134:
2135: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2136: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2137: 'Party role and party combination is valid');
2138: END IF;
2139:

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

2132:
2133: END IF;
2134:
2135: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2136: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2137: 'Party role and party combination is valid');
2138: END IF;
2139:
2140: -- Check validity of party and location combination

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

2137: 'Party role and party combination is valid');
2138: END IF;
2139:
2140: -- Check validity of party and location combination
2141: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2142: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2143: 'Checking validity of party role and party address combination');
2144: END IF;
2145:

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

2138: END IF;
2139:
2140: -- Check validity of party and location combination
2141: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2142: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2143: 'Checking validity of party role and party address combination');
2144: END IF;
2145:
2146: -- Bug 4247146. Added null check for party location id as the Party

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

2153: FETCH tca_location_valid_csr INTO l_temp;
2154:
2155: IF tca_location_valid_csr%NOTFOUND THEN
2156:
2157: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2158: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2159: 'Party role and party address combination is invalid');
2160: END IF;
2161:

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

2154:
2155: IF tca_location_valid_csr%NOTFOUND THEN
2156:
2157: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2158: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2159: 'Party role and party address combination is invalid');
2160: END IF;
2161:
2162: CLOSE tca_location_valid_csr;

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

2163:
2164: x_valid_party_flag := 'N';
2165: x_error_code := 'INV_ROLE_LOCATION';
2166:
2167: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2169: 'x_valid_party_flag: ' || x_valid_party_flag);
2170: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2171: 'x_error_code: ' || x_error_code);

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

2164: x_valid_party_flag := 'N';
2165: x_error_code := 'INV_ROLE_LOCATION';
2166:
2167: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2169: 'x_valid_party_flag: ' || x_valid_party_flag);
2170: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2171: 'x_error_code: ' || x_error_code);
2172: END IF;

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

2166:
2167: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2169: 'x_valid_party_flag: ' || x_valid_party_flag);
2170: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2171: 'x_error_code: ' || x_error_code);
2172: END IF;
2173:
2174: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2173:
2174: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2175: p_data => x_msg_data);
2176:
2177: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2179: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2180: END IF;
2181:

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

2174: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2175: p_data => x_msg_data);
2176:
2177: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2179: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2180: END IF;
2181:
2182: return;

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

2191: FETCH vendor_location_valid_csr INTO l_temp;
2192:
2193: IF vendor_location_valid_csr%NOTFOUND THEN
2194:
2195: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2196: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2197: 'Party role and party address combination is invalid');
2198: END IF;
2199:

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

2192:
2193: IF vendor_location_valid_csr%NOTFOUND THEN
2194:
2195: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2196: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2197: 'Party role and party address combination is invalid');
2198: END IF;
2199:
2200: CLOSE vendor_location_valid_csr;

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

2201:
2202: x_valid_party_flag := 'N';
2203: x_error_code := 'INV_ROLE_LOCATION';
2204:
2205: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2207: 'x_valid_party_flag: ' || x_valid_party_flag);
2208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2209: 'x_error_code: ' || x_error_code);

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

2202: x_valid_party_flag := 'N';
2203: x_error_code := 'INV_ROLE_LOCATION';
2204:
2205: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2207: 'x_valid_party_flag: ' || x_valid_party_flag);
2208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2209: 'x_error_code: ' || x_error_code);
2210: END IF;

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

2204:
2205: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2207: 'x_valid_party_flag: ' || x_valid_party_flag);
2208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2209: 'x_error_code: ' || x_error_code);
2210: END IF;
2211:
2212: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2211:
2212: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2213: p_data => x_msg_data);
2214:
2215: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2216: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2217: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2218: END IF;
2219:

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

2212: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2213: p_data => x_msg_data);
2214:
2215: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2216: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2217: 'Leaving OKC_REP_WF_PVT.validate_contract_party');
2218: END IF;
2219:
2220: return;

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

2223: CLOSE vendor_location_valid_csr;
2224:
2225: END IF;
2226:
2227: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2228: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2229: 'Party role and party address combination is valid');
2230: END IF;
2231:

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

2224:
2225: END IF;
2226:
2227: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2228: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2229: 'Party role and party address combination is valid');
2230: END IF;
2231:
2232: END IF; -- End of p_mode = 'AUTHORING'

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

2273: IF (vendor_location_valid_csr%ISOPEN) THEN
2274: CLOSE vendor_location_valid_csr ;
2275: END IF;
2276:
2277: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2278: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2279: 'Leaving validate_contract_party:FND_API.G_EXC_ERROR Exception');
2280: END IF;
2281:

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

2274: CLOSE vendor_location_valid_csr ;
2275: END IF;
2276:
2277: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2278: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2279: 'Leaving validate_contract_party:FND_API.G_EXC_ERROR Exception');
2280: END IF;
2281:
2282: x_return_status := FND_API.G_RET_STS_ERROR;

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

2322: IF (vendor_location_valid_csr%ISOPEN) THEN
2323: CLOSE vendor_location_valid_csr ;
2324: END IF;
2325:
2326: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2327: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2328: 'Leaving validate_contract_party:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2329: END IF;
2330:

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

2323: CLOSE vendor_location_valid_csr ;
2324: END IF;
2325:
2326: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2327: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2328: 'Leaving validate_contract_party:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2329: END IF;
2330:
2331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

2371: IF (vendor_location_valid_csr%ISOPEN) THEN
2372: CLOSE vendor_location_valid_csr ;
2373: END IF;
2374:
2375: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2376: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2377: 'Leaving validate_contract_party because of EXCEPTION: ' || sqlerrm);
2378: END IF;
2379:

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

2372: CLOSE vendor_location_valid_csr ;
2373: END IF;
2374:
2375: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2376: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2377: 'Leaving validate_contract_party because of EXCEPTION: ' || sqlerrm);
2378: END IF;
2379:
2380: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

2484: BEGIN
2485:
2486: l_api_name := 'validate_party_contact';
2487:
2488: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2489: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2490: 'Entered OKC_REP_WF_PVT.validate_party_contact');
2491: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2492: 'p_contract_id = ' || p_contract_id);

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

2485:
2486: l_api_name := 'validate_party_contact';
2487:
2488: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2489: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2490: 'Entered OKC_REP_WF_PVT.validate_party_contact');
2491: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2492: 'p_contract_id = ' || p_contract_id);
2493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2487:
2488: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2489: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2490: 'Entered OKC_REP_WF_PVT.validate_party_contact');
2491: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2492: 'p_contract_id = ' || p_contract_id);
2493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2494: 'p_party_role_code = ' || p_party_role_code);
2495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2489: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2490: 'Entered OKC_REP_WF_PVT.validate_party_contact');
2491: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2492: 'p_contract_id = ' || p_contract_id);
2493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2494: 'p_party_role_code = ' || p_party_role_code);
2495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2496: 'p_party_id = ' || p_party_id);
2497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2491: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2492: 'p_contract_id = ' || p_contract_id);
2493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2494: 'p_party_role_code = ' || p_party_role_code);
2495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2496: 'p_party_id = ' || p_party_id);
2497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2498: 'p_contact_id = ' || p_contact_id);
2499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2494: 'p_party_role_code = ' || p_party_role_code);
2495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2496: 'p_party_id = ' || p_party_id);
2497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2498: 'p_contact_id = ' || p_contact_id);
2499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2500: 'p_contact_name = ' || p_contact_name);
2501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2495: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2496: 'p_party_id = ' || p_party_id);
2497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2498: 'p_contact_id = ' || p_contact_id);
2499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2500: 'p_contact_name = ' || p_contact_name);
2501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2502: 'p_contact_role_id = ' || p_contact_role_id);
2503: END IF;

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

2497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2498: 'p_contact_id = ' || p_contact_id);
2499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2500: 'p_contact_name = ' || p_contact_name);
2501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2502: 'p_contact_role_id = ' || p_contact_role_id);
2503: END IF;
2504:
2505: -- Standard call to check for call compatibility.

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

2517:
2518: x_valid_contact_flag := 'Y';
2519:
2520: -- Check uniqueness of the party contact
2521: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2522: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2523: 'Checking uniqueness of the party contact');
2524: END IF;
2525:

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

2518: x_valid_contact_flag := 'Y';
2519:
2520: -- Check uniqueness of the party contact
2521: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2522: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2523: 'Checking uniqueness of the party contact');
2524: END IF;
2525:
2526: OPEN contact_unique_csr;

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

2527: FETCH contact_unique_csr INTO l_temp;
2528:
2529: IF (contact_unique_csr%FOUND) THEN
2530:
2531: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2532: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2533: 'Contact already exist in the party');
2534: END IF;
2535:

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

2528:
2529: IF (contact_unique_csr%FOUND) THEN
2530:
2531: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2532: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2533: 'Contact already exist in the party');
2534: END IF;
2535:
2536: CLOSE contact_unique_csr;

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

2537:
2538: x_valid_contact_flag := 'N';
2539: x_error_code := 'CONTACT_NOT_UNIQUE';
2540:
2541: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2542: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2543: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2544: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2545: 'x_error_code: ' || x_error_code);

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

2538: x_valid_contact_flag := 'N';
2539: x_error_code := 'CONTACT_NOT_UNIQUE';
2540:
2541: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2542: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2543: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2544: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2545: 'x_error_code: ' || x_error_code);
2546: END IF;

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

2540:
2541: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2542: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2543: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2544: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2545: 'x_error_code: ' || x_error_code);
2546: END IF;
2547:
2548: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2547:
2548: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2549: p_data => x_msg_data);
2550:
2551: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2552: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2553: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2554: END IF;
2555:

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

2548: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2549: p_data => x_msg_data);
2550:
2551: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2552: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2553: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2554: END IF;
2555:
2556: return;

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

2561:
2562:
2563:
2564: -- Check validity of party and contact combination
2565: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2567: 'Checking validity of party and contact combination');
2568: END IF;
2569:

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

2562:
2563:
2564: -- Check validity of party and contact combination
2565: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2567: 'Checking validity of party and contact combination');
2568: END IF;
2569:
2570: IF (p_party_role_code = G_PARTY_ROLE_INTERNAL) THEN

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

2573: FETCH internal_party_contact_csr INTO l_temp;
2574:
2575: IF (internal_party_contact_csr%NOTFOUND) THEN
2576:
2577: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2578: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2579: 'Combination of party and contact is invalid');
2580: END IF;
2581:

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

2574:
2575: IF (internal_party_contact_csr%NOTFOUND) THEN
2576:
2577: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2578: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2579: 'Combination of party and contact is invalid');
2580: END IF;
2581:
2582: CLOSE internal_party_contact_csr;

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

2583:
2584: x_valid_contact_flag := 'N';
2585: x_error_code := 'CONTACT_NOT_EXIST';
2586:
2587: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2588: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2589: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2590: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2591: 'x_error_code: ' || x_error_code);

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

2584: x_valid_contact_flag := 'N';
2585: x_error_code := 'CONTACT_NOT_EXIST';
2586:
2587: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2588: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2589: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2590: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2591: 'x_error_code: ' || x_error_code);
2592: END IF;

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

2586:
2587: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2588: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2589: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2590: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2591: 'x_error_code: ' || x_error_code);
2592: END IF;
2593:
2594: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2593:
2594: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2595: p_data => x_msg_data);
2596:
2597: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2598: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2599: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2600: END IF;
2601:

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

2594: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2595: p_data => x_msg_data);
2596:
2597: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2598: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2599: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2600: END IF;
2601:
2602: return;

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

2612: FETCH tca_party_contact_csr INTO l_temp;
2613:
2614: IF (tca_party_contact_csr%NOTFOUND) THEN
2615:
2616: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2617: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2618: 'Combination of party and contact is invalid');
2619: END IF;
2620:

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

2613:
2614: IF (tca_party_contact_csr%NOTFOUND) THEN
2615:
2616: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2617: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2618: 'Combination of party and contact is invalid');
2619: END IF;
2620:
2621: CLOSE tca_party_contact_csr;

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

2622:
2623: x_valid_contact_flag := 'N';
2624: x_error_code := 'CONTACT_NOT_EXIST';
2625:
2626: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2627: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2628: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2629: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2630: 'x_error_code: ' || x_error_code);

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

2623: x_valid_contact_flag := 'N';
2624: x_error_code := 'CONTACT_NOT_EXIST';
2625:
2626: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2627: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2628: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2629: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2630: 'x_error_code: ' || x_error_code);
2631: END IF;

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

2625:
2626: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2627: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2628: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2629: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2630: 'x_error_code: ' || x_error_code);
2631: END IF;
2632:
2633: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2632:
2633: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2634: p_data => x_msg_data);
2635:
2636: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2637: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2638: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2639: END IF;
2640:

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

2633: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2634: p_data => x_msg_data);
2635:
2636: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2637: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2638: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2639: END IF;
2640:
2641: return;

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

2650: FETCH vendor_party_contact_csr INTO l_temp;
2651:
2652: IF (vendor_party_contact_csr%NOTFOUND) THEN
2653:
2654: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2655: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2656: 'Combination of party and contact is invalid');
2657: END IF;
2658:

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

2651:
2652: IF (vendor_party_contact_csr%NOTFOUND) THEN
2653:
2654: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2655: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2656: 'Combination of party and contact is invalid');
2657: END IF;
2658:
2659: CLOSE vendor_party_contact_csr;

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

2660:
2661: x_valid_contact_flag := 'N';
2662: x_error_code := 'CONTACT_NOT_EXIST';
2663:
2664: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2665: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2666: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2667: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2668: 'x_error_code: ' || x_error_code);

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

2661: x_valid_contact_flag := 'N';
2662: x_error_code := 'CONTACT_NOT_EXIST';
2663:
2664: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2665: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2666: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2667: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2668: 'x_error_code: ' || x_error_code);
2669: END IF;

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

2663:
2664: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2665: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2666: 'x_valid_contact_flag: ' || x_valid_contact_flag);
2667: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2668: 'x_error_code: ' || x_error_code);
2669: END IF;
2670:
2671: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,

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

2670:
2671: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2672: p_data => x_msg_data);
2673:
2674: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2676: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2677: END IF;
2678:

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

2671: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2672: p_data => x_msg_data);
2673:
2674: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2676: 'Leaving OKC_REP_WF_PVT.validate_party_contact');
2677: END IF;
2678:
2679: return;

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

2683: CLOSE vendor_party_contact_csr;
2684:
2685: END IF;
2686:
2687: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2688: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2689: 'Party and contact combination is valid');
2690: END IF;
2691:

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

2684:
2685: END IF;
2686:
2687: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2688: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2689: 'Party and contact combination is valid');
2690: END IF;
2691:
2692:

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

2707: IF (vendor_party_contact_csr%ISOPEN) THEN
2708: CLOSE vendor_party_contact_csr ;
2709: END IF;
2710:
2711: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2712: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2713: 'Leaving validate_party_contact:FND_API.G_EXC_ERROR Exception');
2714: END IF;
2715:

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

2708: CLOSE vendor_party_contact_csr ;
2709: END IF;
2710:
2711: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2712: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2713: 'Leaving validate_party_contact:FND_API.G_EXC_ERROR Exception');
2714: END IF;
2715:
2716: x_return_status := FND_API.G_RET_STS_ERROR;

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

2732: IF (vendor_party_contact_csr%ISOPEN) THEN
2733: CLOSE vendor_party_contact_csr ;
2734: END IF;
2735:
2736: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2737: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2738: 'Leaving validate_party_contact:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2739: END IF;
2740:

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

2733: CLOSE vendor_party_contact_csr ;
2734: END IF;
2735:
2736: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2737: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2738: 'Leaving validate_party_contact:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2739: END IF;
2740:
2741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

2757: IF (vendor_party_contact_csr%ISOPEN) THEN
2758: CLOSE vendor_party_contact_csr ;
2759: END IF;
2760:
2761: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2762: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2763: 'Leaving validate_party_contact because of EXCEPTION: ' || sqlerrm);
2764: END IF;
2765:

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

2758: CLOSE vendor_party_contact_csr ;
2759: END IF;
2760:
2761: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2762: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2763: 'Leaving validate_party_contact because of EXCEPTION: ' || sqlerrm);
2764: END IF;
2765:
2766: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

2831: BEGIN
2832:
2833: l_api_name := 'populate_import_errors';
2834:
2835: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2836: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2837: 'Entered OKC_REP_UTIL_PVT.populate_import_errors');
2838: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2839: 'p_contract_id = ' || p_contract_id);

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

2832:
2833: l_api_name := 'populate_import_errors';
2834:
2835: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2836: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2837: 'Entered OKC_REP_UTIL_PVT.populate_import_errors');
2838: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2839: 'p_contract_id = ' || p_contract_id);
2840: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2834:
2835: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2836: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2837: 'Entered OKC_REP_UTIL_PVT.populate_import_errors');
2838: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2839: 'p_contract_id = ' || p_contract_id);
2840: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2841: 'p_error_obj_type = ' || p_error_obj_type);
2842: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2836: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2837: 'Entered OKC_REP_UTIL_PVT.populate_import_errors');
2838: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2839: 'p_contract_id = ' || p_contract_id);
2840: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2841: 'p_error_obj_type = ' || p_error_obj_type);
2842: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2843: 'p_error_obj_id = ' || p_error_obj_id);
2844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2838: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2839: 'p_contract_id = ' || p_contract_id);
2840: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2841: 'p_error_obj_type = ' || p_error_obj_type);
2842: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2843: 'p_error_obj_id = ' || p_error_obj_id);
2844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2845: 'p_error_msg_txt = ' || p_error_msg_txt);
2846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2840: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2841: 'p_error_obj_type = ' || p_error_obj_type);
2842: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2843: 'p_error_obj_id = ' || p_error_obj_id);
2844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2845: 'p_error_msg_txt = ' || p_error_msg_txt);
2846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2847: 'p_program_id = ' || p_program_id);
2848: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2842: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2843: 'p_error_obj_id = ' || p_error_obj_id);
2844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2845: 'p_error_msg_txt = ' || p_error_msg_txt);
2846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2847: 'p_program_id = ' || p_program_id);
2848: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2849: 'p_program_login_id = ' || p_program_login_id);
2850: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2845: 'p_error_msg_txt = ' || p_error_msg_txt);
2846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2847: 'p_program_id = ' || p_program_id);
2848: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2849: 'p_program_login_id = ' || p_program_login_id);
2850: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2851: 'p_program_app_id = ' || p_program_app_id);
2852: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

2846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2847: 'p_program_id = ' || p_program_id);
2848: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2849: 'p_program_login_id = ' || p_program_login_id);
2850: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2851: 'p_program_app_id = ' || p_program_app_id);
2852: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2853: 'p_run_id = ' || p_run_id);
2854:

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

2848: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2849: 'p_program_login_id = ' || p_program_login_id);
2850: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2851: 'p_program_app_id = ' || p_program_app_id);
2852: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2853: 'p_run_id = ' || p_run_id);
2854:
2855:
2856: END IF;

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

2873: OPEN ERROR_ID_CSR;
2874: FETCH ERROR_ID_CSR INTO l_imp_error_id;
2875: CLOSE ERROR_ID_CSR;
2876:
2877: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2878: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2879: 'l_imp_error_id: '||l_imp_error_id);
2880: END IF;
2881:

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

2874: FETCH ERROR_ID_CSR INTO l_imp_error_id;
2875: CLOSE ERROR_ID_CSR;
2876:
2877: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2878: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2879: 'l_imp_error_id: '||l_imp_error_id);
2880: END IF;
2881:
2882: INSERT INTO OKC_REP_IMP_ERRORS_T(

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

2904: null,
2905: p_run_id
2906: );
2907:
2908: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2909: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2910: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
2911: END IF;
2912:

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

2905: p_run_id
2906: );
2907:
2908: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2909: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2910: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
2911: END IF;
2912:
2913: EXCEPTION

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

2920:
2921: IF ERROR_ID_CSR%ISOPEN THEN
2922: CLOSE ERROR_ID_CSR;
2923: END IF;
2924: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2925: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2926: 'Leaving populate_import_errors:FND_API.G_EXC_ERROR Exception');
2927: END IF;
2928:

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

2921: IF ERROR_ID_CSR%ISOPEN THEN
2922: CLOSE ERROR_ID_CSR;
2923: END IF;
2924: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2925: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2926: 'Leaving populate_import_errors:FND_API.G_EXC_ERROR Exception');
2927: END IF;
2928:
2929: x_return_status := FND_API.G_RET_STS_ERROR;

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

2940: IF ERROR_ID_CSR%ISOPEN THEN
2941: CLOSE ERROR_ID_CSR;
2942: END IF;
2943:
2944: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2945: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2946: 'Leaving populate_import_errors:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2947: END IF;
2948:

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

2941: CLOSE ERROR_ID_CSR;
2942: END IF;
2943:
2944: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2945: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2946: 'Leaving populate_import_errors:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2947: END IF;
2948:
2949: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

2960: IF ERROR_ID_CSR%ISOPEN THEN
2961: CLOSE ERROR_ID_CSR;
2962: END IF;
2963:
2964: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2965: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2966: 'Leaving populate_import_errors because of EXCEPTION: ' || sqlerrm);
2967: END IF;
2968:

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

2961: CLOSE ERROR_ID_CSR;
2962: END IF;
2963:
2964: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2965: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
2966: 'Leaving populate_import_errors because of EXCEPTION: ' || sqlerrm);
2967: END IF;
2968:
2969: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

3046: BEGIN
3047:
3048: l_api_name := 'validate_import_documents';
3049:
3050: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3052: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3053: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3054: 'p_run_id = ' || p_run_id);

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

3047:
3048: l_api_name := 'validate_import_documents';
3049:
3050: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3052: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3053: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3054: 'p_run_id = ' || p_run_id);
3055:

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

3049:
3050: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3052: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3053: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3054: 'p_run_id = ' || p_run_id);
3055:
3056: END IF;
3057:

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

3079: l_error_msg := NULL;
3080:
3081: --If l_valid_flag is already set to 'N', we do not perform any more checks
3082: --File Name should exist
3083: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3084: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3085: 'Checking if user enters file name');
3086: END IF;
3087: IF l_import_documents_rec.FILE_NAME IS NOT NULL THEN

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

3080:
3081: --If l_valid_flag is already set to 'N', we do not perform any more checks
3082: --File Name should exist
3083: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3084: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3085: 'Checking if user enters file name');
3086: END IF;
3087: IF l_import_documents_rec.FILE_NAME IS NOT NULL THEN
3088: l_import_documents_rec.FILE_NAME := LTRIM(l_import_documents_rec.FILE_NAME);

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

3094: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_DOC_NAME');
3095: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3096: VALUE => l_import_documents_rec.document_index);
3097: l_error_msg := fnd_message.get;
3098: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3100: 'Document Name is missing');
3101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3102: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

3095: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3096: VALUE => l_import_documents_rec.document_index);
3097: l_error_msg := fnd_message.get;
3098: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3100: 'Document Name is missing');
3101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3102: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3103: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3097: l_error_msg := fnd_message.get;
3098: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3100: 'Document Name is missing');
3101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3102: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3103: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3104: 'Document ID: '||l_import_documents_rec.imp_document_id);
3105: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3099: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3100: 'Document Name is missing');
3101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3102: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3103: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3104: 'Document ID: '||l_import_documents_rec.imp_document_id);
3105: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3106: 'l_error_msg: '||l_error_msg);
3107: END IF;

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

3101: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3102: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3103: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3104: 'Document ID: '||l_import_documents_rec.imp_document_id);
3105: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3106: 'l_error_msg: '||l_error_msg);
3107: END IF;
3108:
3109:

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

3110:
3111: END IF;
3112:
3113: --If l_valid_flag is already set to 'N', we do not perform any more checks
3114: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3115: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3116: 'Checking if file name is too long');
3117: END IF;
3118: --File Name should be <= 256

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

3111: END IF;
3112:
3113: --If l_valid_flag is already set to 'N', we do not perform any more checks
3114: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3115: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3116: 'Checking if file name is too long');
3117: END IF;
3118: --File Name should be <= 256
3119: IF (l_valid_flag = 'Y' AND LENGTH(l_import_documents_rec.file_name) > l_file_name_length) THEN

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

3122: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_LONG_DOC_NAME');
3123: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3124: VALUE => l_import_documents_rec.document_index);
3125: l_error_msg := fnd_message.get;
3126: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3127: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3128: 'Document Name is too long');
3129: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3130: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

3123: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3124: VALUE => l_import_documents_rec.document_index);
3125: l_error_msg := fnd_message.get;
3126: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3127: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3128: 'Document Name is too long');
3129: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3130: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3131: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3125: l_error_msg := fnd_message.get;
3126: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3127: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3128: 'Document Name is too long');
3129: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3130: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3131: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3132: 'Document ID: '||l_import_documents_rec.imp_document_id);
3133: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3127: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3128: 'Document Name is too long');
3129: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3130: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3131: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3132: 'Document ID: '||l_import_documents_rec.imp_document_id);
3133: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3134: 'l_error_msg: '||l_error_msg);
3135: END IF;

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

3129: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3130: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3131: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3132: 'Document ID: '||l_import_documents_rec.imp_document_id);
3133: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3134: 'l_error_msg: '||l_error_msg);
3135: END IF;
3136: END IF;
3137:

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

3135: END IF;
3136: END IF;
3137:
3138: --If l_valid_flag is already set to 'N', we do not perform any more checks
3139: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3140: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3141: 'Checking if file description is too long');
3142: END IF;
3143: --File Name should be <= 256

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

3136: END IF;
3137:
3138: --If l_valid_flag is already set to 'N', we do not perform any more checks
3139: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3140: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3141: 'Checking if file description is too long');
3142: END IF;
3143: --File Name should be <= 256
3144: 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 3151: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3147: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_LONG_DOC_DESC');
3148: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3149: VALUE => l_import_documents_rec.document_index);
3150: l_error_msg := fnd_message.get;
3151: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3152: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3153: 'Document Description is too long');
3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3155: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

3148: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3149: VALUE => l_import_documents_rec.document_index);
3150: l_error_msg := fnd_message.get;
3151: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3152: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3153: 'Document Description is too long');
3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3155: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3150: l_error_msg := fnd_message.get;
3151: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3152: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3153: 'Document Description is too long');
3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3155: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3157: 'Document ID: '||l_import_documents_rec.imp_document_id);
3158: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3152: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3153: 'Document Description is too long');
3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3155: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3157: 'Document ID: '||l_import_documents_rec.imp_document_id);
3158: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3159: 'l_error_msg: '||l_error_msg);
3160: END IF;

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

3154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3155: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3156: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3157: 'Document ID: '||l_import_documents_rec.imp_document_id);
3158: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3159: 'l_error_msg: '||l_error_msg);
3160: END IF;
3161: END IF;
3162:

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

3161: END IF;
3162:
3163:
3164: --If l_valid_flag is already set to 'N', we do not perform any more checks
3165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3167: 'Checking if user enters category name');
3168: END IF;
3169: --Category Name Text should exist

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

3162:
3163:
3164: --If l_valid_flag is already set to 'N', we do not perform any more checks
3165: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3167: 'Checking if user enters category name');
3168: END IF;
3169: --Category Name Text should exist
3170: IF l_import_documents_rec.category_name_txt IS NOT NULL THEN

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

3178: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_DOC_CATEGORY');
3179: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3180: VALUE => l_import_documents_rec.document_index);
3181: l_error_msg := fnd_message.get;
3182: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3183: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3184: 'Document Category is missing');
3185: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3186: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

3179: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3180: VALUE => l_import_documents_rec.document_index);
3181: l_error_msg := fnd_message.get;
3182: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3183: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3184: 'Document Category is missing');
3185: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3186: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3181: l_error_msg := fnd_message.get;
3182: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3183: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3184: 'Document Category is missing');
3185: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3186: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3188: 'Document ID: '||l_import_documents_rec.imp_document_id);
3189: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3183: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3184: 'Document Category is missing');
3185: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3186: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3188: 'Document ID: '||l_import_documents_rec.imp_document_id);
3189: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3190: 'l_error_msg: '||l_error_msg);
3191: END IF;

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

3185: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3186: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3188: 'Document ID: '||l_import_documents_rec.imp_document_id);
3189: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3190: 'l_error_msg: '||l_error_msg);
3191: END IF;
3192: END IF;
3193:

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

3192: END IF;
3193:
3194: --If l_valid_flag is already set to 'N', we do not perform any more checks
3195: IF l_valid_flag = 'Y' THEN
3196: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3197: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3198: 'Checking if category name is valid');
3199: END IF;
3200:

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

3193:
3194: --If l_valid_flag is already set to 'N', we do not perform any more checks
3195: IF l_valid_flag = 'Y' THEN
3196: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3197: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3198: 'Checking if category name is valid');
3199: END IF;
3200:
3201: OPEN document_category_csr(l_import_documents_rec.category_name_txt);

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

3208: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_INV_DOC_CATEGORY');
3209: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3210: VALUE => l_import_documents_rec.document_index);
3211: l_error_msg := fnd_message.get;
3212: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3213: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3214: 'Category ID not found with given category name: '||l_import_documents_rec.category_name_txt);
3215: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3216: 'Contract ID: '||l_import_documents_rec.imp_contract_id);

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

3209: fnd_message.set_token(TOKEN => 'DOC_INDEX',
3210: VALUE => l_import_documents_rec.document_index);
3211: l_error_msg := fnd_message.get;
3212: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3213: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3214: 'Category ID not found with given category name: '||l_import_documents_rec.category_name_txt);
3215: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3216: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3217: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3211: l_error_msg := fnd_message.get;
3212: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3213: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3214: 'Category ID not found with given category name: '||l_import_documents_rec.category_name_txt);
3215: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3216: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3217: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3218: 'Document ID: '||l_import_documents_rec.imp_document_id);
3219: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3213: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3214: 'Category ID not found with given category name: '||l_import_documents_rec.category_name_txt);
3215: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3216: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3217: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3218: 'Document ID: '||l_import_documents_rec.imp_document_id);
3219: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3220: 'l_error_msg: '||l_error_msg);
3221: END IF;

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

3215: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3216: 'Contract ID: '||l_import_documents_rec.imp_contract_id);
3217: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3218: 'Document ID: '||l_import_documents_rec.imp_document_id);
3219: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3220: 'l_error_msg: '||l_error_msg);
3221: END IF;
3222: END IF;
3223:

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

3224: CLOSE document_category_csr;
3225: END IF;
3226:
3227: --Populate the valid_flag and category_code columns in OKC_REP_IMP_DOCUMENTS_T
3228: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3229: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3230: 'Updating OKC_REP_IMP_DOCUMENTS_T');
3231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3232: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);

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

3225: END IF;
3226:
3227: --Populate the valid_flag and category_code columns in OKC_REP_IMP_DOCUMENTS_T
3228: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3229: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3230: 'Updating OKC_REP_IMP_DOCUMENTS_T');
3231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3232: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);
3233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3227: --Populate the valid_flag and category_code columns in OKC_REP_IMP_DOCUMENTS_T
3228: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3229: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3230: 'Updating OKC_REP_IMP_DOCUMENTS_T');
3231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3232: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);
3233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3234: 'l_category_code: '||l_category_code);
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: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3230: 'Updating OKC_REP_IMP_DOCUMENTS_T');
3231: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3232: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);
3233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3234: 'l_category_code: '||l_category_code);
3235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3236: 'l_valid_flag: '||l_valid_flag);
3237: END IF;

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: 'DOCUMENT ID: '||l_import_documents_rec.imp_document_id);
3233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3234: 'l_category_code: '||l_category_code);
3235: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3236: 'l_valid_flag: '||l_valid_flag);
3237: END IF;
3238:
3239: --Populate the error message table

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

3273: --bug fix for 4209521
3274: --need to commit or the Java layer will not pick up the changes
3275: COMMIT;
3276:
3277: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3278: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3279: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
3280: END IF;
3281:

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

3274: --need to commit or the Java layer will not pick up the changes
3275: COMMIT;
3276:
3277: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3278: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3279: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
3280: END IF;
3281:
3282: EXCEPTION

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

3287:
3288: IF document_category_csr%ISOPEN THEN
3289: CLOSE document_category_csr;
3290: END IF;
3291: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3292: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3293: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3294: END IF;
3295:

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

3288: IF document_category_csr%ISOPEN THEN
3289: CLOSE document_category_csr;
3290: END IF;
3291: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3292: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3293: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3294: END IF;
3295:
3296: x_return_status := FND_API.G_RET_STS_ERROR;

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

3304:
3305: IF document_category_csr%ISOPEN THEN
3306: CLOSE document_category_csr;
3307: END IF;
3308: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3309: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3310: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3311: END IF;
3312:

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

3305: IF document_category_csr%ISOPEN THEN
3306: CLOSE document_category_csr;
3307: END IF;
3308: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3309: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3310: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3311: END IF;
3312:
3313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

3321:
3322: IF document_category_csr%ISOPEN THEN
3323: CLOSE document_category_csr;
3324: END IF;
3325: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3326: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3327: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
3328: END IF;
3329:

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

3322: IF document_category_csr%ISOPEN THEN
3323: CLOSE document_category_csr;
3324: END IF;
3325: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3326: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3327: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
3328: END IF;
3329:
3330: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

3417: BEGIN
3418:
3419: l_api_name := 'validate_import_parties';
3420:
3421: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3422: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3423: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3424: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3425: 'p_run_id = ' || p_run_id);

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

3418:
3419: l_api_name := 'validate_import_parties';
3420:
3421: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3422: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3423: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3424: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3425: 'p_run_id = ' || p_run_id);
3426:

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

3420:
3421: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3422: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3423: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
3424: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3425: 'p_run_id = ' || p_run_id);
3426:
3427: END IF;
3428:

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

3450: l_error_msg := NULL;
3451:
3452: --If l_valid_flag is already set to 'N', we do not perform any more checks
3453: --Party Name should exist
3454: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3455: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3456: 'Checking if user enters party name');
3457: END IF;
3458: IF l_import_parties_rec.party_name_txt IS NOT NULL THEN

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

3451:
3452: --If l_valid_flag is already set to 'N', we do not perform any more checks
3453: --Party Name should exist
3454: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3455: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3456: 'Checking if user enters party name');
3457: END IF;
3458: IF l_import_parties_rec.party_name_txt IS NOT NULL THEN
3459: l_import_parties_rec.party_name_txt := LTRIM(l_import_parties_rec.party_name_txt);

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

3465: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_PARTY_NAME');
3466: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3467: VALUE => l_import_parties_rec.party_index);
3468: l_error_msg := fnd_message.get;
3469: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3470: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3471: 'Party Name is missing');
3472: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3473: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3466: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3467: VALUE => l_import_parties_rec.party_index);
3468: l_error_msg := fnd_message.get;
3469: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3470: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3471: 'Party Name is missing');
3472: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3473: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3474: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3468: l_error_msg := fnd_message.get;
3469: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3470: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3471: 'Party Name is missing');
3472: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3473: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3474: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3475: 'Party ID: '||l_import_parties_rec.imp_party_id);
3476: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3470: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3471: 'Party Name is missing');
3472: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3473: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3474: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3475: 'Party ID: '||l_import_parties_rec.imp_party_id);
3476: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3477: 'l_error_msg: '||l_error_msg);
3478: END IF;

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

3472: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3473: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3474: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3475: 'Party ID: '||l_import_parties_rec.imp_party_id);
3476: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3477: 'l_error_msg: '||l_error_msg);
3478: END IF;
3479: END IF;
3480:

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

3479: END IF;
3480:
3481: --If l_valid_flag is already set to 'N', we do not perform any more checks
3482: --Party Role should exist
3483: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3484: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3485: 'Checking if user enters party role');
3486: END IF;
3487: IF l_import_parties_rec.party_role_txt IS NOT NULL THEN

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

3480:
3481: --If l_valid_flag is already set to 'N', we do not perform any more checks
3482: --Party Role should exist
3483: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3484: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3485: 'Checking if user enters party role');
3486: END IF;
3487: IF l_import_parties_rec.party_role_txt IS NOT NULL THEN
3488: l_import_parties_rec.party_role_txt := LTRIM(l_import_parties_rec.party_role_txt);

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

3494: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_PARTY_ROLE');
3495: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3496: VALUE => l_import_parties_rec.party_index);
3497: l_error_msg := fnd_message.get;
3498: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3499: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3500: 'Party Role is missing');
3501: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3502: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3495: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3496: VALUE => l_import_parties_rec.party_index);
3497: l_error_msg := fnd_message.get;
3498: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3499: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3500: 'Party Role is missing');
3501: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3502: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3503: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3497: l_error_msg := fnd_message.get;
3498: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3499: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3500: 'Party Role is missing');
3501: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3502: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3503: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3504: 'Party ID: '||l_import_parties_rec.imp_party_id);
3505: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3499: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3500: 'Party Role is missing');
3501: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3502: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3503: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3504: 'Party ID: '||l_import_parties_rec.imp_party_id);
3505: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3506: 'l_error_msg: '||l_error_msg);
3507: END IF;

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

3501: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3502: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3503: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3504: 'Party ID: '||l_import_parties_rec.imp_party_id);
3505: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3506: 'l_error_msg: '||l_error_msg);
3507: END IF;
3508:
3509: END IF;

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

3515: IF l_contract_status = 'SIGNED' THEN
3516:
3517: --If l_valid_flag is already set to 'N', we do not perform any more checks
3518: --Party Signed By should exist
3519: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3520: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3521: 'Checking if user enters party signed by');
3522: END IF;
3523: IF l_import_parties_rec.signed_by_txt IS NOT NULL THEN

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

3516:
3517: --If l_valid_flag is already set to 'N', we do not perform any more checks
3518: --Party Signed By should exist
3519: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3520: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3521: 'Checking if user enters party signed by');
3522: END IF;
3523: IF l_import_parties_rec.signed_by_txt IS NOT NULL THEN
3524: l_import_parties_rec.signed_by_txt := LTRIM(l_import_parties_rec.signed_by_txt);

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

3530: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_SIGNED_BY');
3531: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3532: VALUE => l_import_parties_rec.party_index);
3533: l_error_msg := fnd_message.get;
3534: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3535: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3536: 'Party Signed By is missing');
3537: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3538: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3531: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3532: VALUE => l_import_parties_rec.party_index);
3533: l_error_msg := fnd_message.get;
3534: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3535: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3536: 'Party Signed By is missing');
3537: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3538: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3533: l_error_msg := fnd_message.get;
3534: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3535: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3536: 'Party Signed By is missing');
3537: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3538: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3540: 'Party ID: '||l_import_parties_rec.imp_party_id);
3541: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3535: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3536: 'Party Signed By is missing');
3537: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3538: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3540: 'Party ID: '||l_import_parties_rec.imp_party_id);
3541: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3542: 'l_error_msg: '||l_error_msg);
3543: END IF;

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

3537: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3538: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3540: 'Party ID: '||l_import_parties_rec.imp_party_id);
3541: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3542: 'l_error_msg: '||l_error_msg);
3543: END IF;
3544:
3545: END IF;

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

3545: END IF;
3546:
3547: --If l_valid_flag is already set to 'N', we do not perform any more checks
3548: --Party Signed By should be <150
3549: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3550: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3551: 'Checking if party signed by is too long');
3552: END IF;
3553: IF (l_valid_flag = 'Y' AND l_import_parties_rec.signed_by_txt IS NOT NULL

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

3546:
3547: --If l_valid_flag is already set to 'N', we do not perform any more checks
3548: --Party Signed By should be <150
3549: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3550: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3551: 'Checking if party signed by is too long');
3552: END IF;
3553: IF (l_valid_flag = 'Y' AND l_import_parties_rec.signed_by_txt IS NOT NULL
3554: AND LENGTH(l_import_parties_rec.signed_by_txt) > l_signed_by_length) THEN

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

3557: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_LONG_SIGNED_BY');
3558: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3559: VALUE => l_import_parties_rec.party_index);
3560: l_error_msg := fnd_message.get;
3561: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3562: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3563: 'Party Signed By is too long');
3564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3565: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3558: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3559: VALUE => l_import_parties_rec.party_index);
3560: l_error_msg := fnd_message.get;
3561: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3562: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3563: 'Party Signed By is too long');
3564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3565: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3560: l_error_msg := fnd_message.get;
3561: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3562: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3563: 'Party Signed By is too long');
3564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3565: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3567: 'Party ID: '||l_import_parties_rec.imp_party_id);
3568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3562: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3563: 'Party Signed By is too long');
3564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3565: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3567: 'Party ID: '||l_import_parties_rec.imp_party_id);
3568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3569: 'l_error_msg: '||l_error_msg);
3570: END IF;

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

3564: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3565: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3566: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3567: 'Party ID: '||l_import_parties_rec.imp_party_id);
3568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3569: 'l_error_msg: '||l_error_msg);
3570: END IF;
3571:
3572: END IF;

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

3572: END IF;
3573:
3574: --If l_valid_flag is already set to 'N', we do not perform any more checks
3575: --Party Signed Date should exist
3576: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3577: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3578: 'Checking if user enters party signed date');
3579: END IF;
3580: IF l_import_parties_rec.signed_date IS NOT NULL THEN

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

3573:
3574: --If l_valid_flag is already set to 'N', we do not perform any more checks
3575: --Party Signed Date should exist
3576: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3577: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3578: 'Checking if user enters party signed date');
3579: END IF;
3580: IF l_import_parties_rec.signed_date IS NOT NULL THEN
3581: l_import_parties_rec.signed_date := LTRIM(l_import_parties_rec.signed_date);

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

3587: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_SIGNED_DATE');
3588: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3589: VALUE => l_import_parties_rec.party_index);
3590: l_error_msg := fnd_message.get;
3591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3593: 'Party Signed Date is missing');
3594: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3595: 'Contract ID: '||l_import_parties_rec.imp_contract_id);

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

3588: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3589: VALUE => l_import_parties_rec.party_index);
3590: l_error_msg := fnd_message.get;
3591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3593: 'Party Signed Date is missing');
3594: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3595: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3596: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3590: l_error_msg := fnd_message.get;
3591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3593: 'Party Signed Date is missing');
3594: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3595: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3596: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3597: 'Party ID: '||l_import_parties_rec.imp_party_id);
3598: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3593: 'Party Signed Date is missing');
3594: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3595: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3596: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3597: 'Party ID: '||l_import_parties_rec.imp_party_id);
3598: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3599: 'l_error_msg: '||l_error_msg);
3600: END IF;

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

3594: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3595: 'Contract ID: '||l_import_parties_rec.imp_contract_id);
3596: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3597: 'Party ID: '||l_import_parties_rec.imp_party_id);
3598: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3599: 'l_error_msg: '||l_error_msg);
3600: END IF;
3601:
3602: END IF;

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

3602: END IF;
3603:
3604: --If l_valid_flag is already set to 'N', we do not perform any more checks
3605: --Party Signed Date should be the right format
3606: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3607: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3608: 'Checking if party signed date is in the correct format');
3609: END IF;
3610: IF (l_valid_flag = 'Y' AND l_import_parties_rec.signed_date IS NOT NULL) THEN

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

3603:
3604: --If l_valid_flag is already set to 'N', we do not perform any more checks
3605: --Party Signed Date should be the right format
3606: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3607: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3608: 'Checking if party signed date is in the correct format');
3609: END IF;
3610: IF (l_valid_flag = 'Y' AND l_import_parties_rec.signed_date IS NOT NULL) THEN
3611: BEGIN

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

3617: fnd_message.set_token(TOKEN => 'PARTY_INDEX',
3618: VALUE => l_import_parties_rec.party_index);
3619: l_error_msg := fnd_message.get;
3620:
3621: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3622: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3623: 'Party Signed Date is not valid');
3624: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3625: 'Party ID: '||l_import_parties_rec.imp_contract_id);

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

3618: VALUE => l_import_parties_rec.party_index);
3619: l_error_msg := fnd_message.get;
3620:
3621: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3622: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3623: 'Party Signed Date is not valid');
3624: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3625: 'Party ID: '||l_import_parties_rec.imp_contract_id);
3626: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

3620:
3621: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3622: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3623: 'Party Signed Date is not valid');
3624: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3625: 'Party ID: '||l_import_parties_rec.imp_contract_id);
3626: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3627: 'l_error_msg: '||l_error_msg);
3628: END IF;

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

3622: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3623: 'Party Signed Date is not valid');
3624: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3625: 'Party ID: '||l_import_parties_rec.imp_contract_id);
3626: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
3627: 'l_error_msg: '||l_error_msg);
3628: END IF;
3629: END;
3630: END IF;

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

3637: IF (l_valid_flag = 'Y') THEN
3638: OPEN CONTRACT_INTENT_CSR (l_import_parties_rec.imp_contract_id);
3639: FETCH CONTRACT_INTENT_CSR INTO l_contract_intent;
3640:
3641: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3642: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3643: 'l_contract_intent: '||l_contract_intent);
3644: END IF;
3645:

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

3638: OPEN CONTRACT_INTENT_CSR (l_import_parties_rec.imp_contract_id);
3639: FETCH CONTRACT_INTENT_CSR INTO l_contract_intent;
3640:
3641: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3642: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3643: 'l_contract_intent: '||l_contract_intent);
3644: END IF;
3645:
3646: IF (l_contract_intent IS NOT NULL ) THEN

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

3659: x_return_status => x_return_status,
3660: x_msg_count => x_msg_count,
3661: x_msg_data => x_msg_data);
3662:
3663: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3664: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3665: 'After calling validate_contract_party, l_valid_flag: '||l_valid_flag);
3666: END IF;
3667:

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

3660: x_msg_count => x_msg_count,
3661: x_msg_data => x_msg_data);
3662:
3663: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3664: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3665: 'After calling validate_contract_party, l_valid_flag: '||l_valid_flag);
3666: END IF;
3667:
3668: IF(l_valid_flag = 'N') THEN

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

3710: END IF;
3711:
3712: END IF;
3713: /* ELSE
3714: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3715: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3716: 'Contract type is invalid in csv file');
3717: END IF;
3718: --contract intent does not exist

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

3711:
3712: END IF;
3713: /* ELSE
3714: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3715: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3716: 'Contract type is invalid in csv file');
3717: END IF;
3718: --contract intent does not exist
3719: --this means that contract_type_txt is invalid

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

3785:
3786: END LOOP;
3787: CLOSE IMPORT_PARTIES_CSR;
3788:
3789: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3790: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3791: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
3792: END IF;
3793:

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

3786: END LOOP;
3787: CLOSE IMPORT_PARTIES_CSR;
3788:
3789: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3790: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
3791: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
3792: END IF;
3793:
3794: EXCEPTION

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

3802: IF IMPORT_PARTIES_CSR%ISOPEN THEN
3803: CLOSE IMPORT_PARTIES_CSR;
3804: END IF;
3805:
3806: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3807: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3808: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3809: END IF;
3810:

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

3803: CLOSE IMPORT_PARTIES_CSR;
3804: END IF;
3805:
3806: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3807: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3808: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3809: END IF;
3810:
3811: x_return_status := FND_API.G_RET_STS_ERROR;

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

3821: IF IMPORT_PARTIES_CSR%ISOPEN THEN
3822: CLOSE IMPORT_PARTIES_CSR;
3823: END IF;
3824:
3825: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3826: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3827: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3828: END IF;
3829:

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

3822: CLOSE IMPORT_PARTIES_CSR;
3823: END IF;
3824:
3825: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3826: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3827: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3828: END IF;
3829:
3830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

3840: IF IMPORT_PARTIES_CSR%ISOPEN THEN
3841: CLOSE IMPORT_PARTIES_CSR;
3842: END IF;
3843:
3844: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3845: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3846: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
3847: END IF;
3848:

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

3841: CLOSE IMPORT_PARTIES_CSR;
3842: END IF;
3843:
3844: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3845: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
3846: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
3847: END IF;
3848:
3849: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

4146: BEGIN
4147:
4148: l_api_name := 'validate_import_contracts';
4149:
4150: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4152: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
4153: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4154: 'p_run_id = ' || p_run_id);

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

4147:
4148: l_api_name := 'validate_import_contracts';
4149:
4150: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4152: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
4153: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4154: 'p_run_id = ' || p_run_id);
4155:

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

4149:
4150: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4151: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4152: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
4153: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
4154: 'p_run_id = ' || p_run_id);
4155:
4156: END IF;
4157:

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

4190:
4191:
4192: --If l_valid_flag is already set to 'N', we do not perform any more checks
4193: --Contract Name is required
4194: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4195: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4196: 'Checking if user enters contract name');
4197: END IF;
4198: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_name IS NULL) THEN

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

4191:
4192: --If l_valid_flag is already set to 'N', we do not perform any more checks
4193: --Contract Name is required
4194: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4195: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4196: 'Checking if user enters contract name');
4197: END IF;
4198: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_name IS NULL) THEN
4199: l_valid_flag := 'N';

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

4197: END IF;
4198: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_name IS NULL) THEN
4199: l_valid_flag := 'N';
4200: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NAME');
4201: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4202: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4203: 'Contract Name is missing');
4204: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4205: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4198: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_name IS NULL) THEN
4199: l_valid_flag := 'N';
4200: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NAME');
4201: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4202: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4203: 'Contract Name is missing');
4204: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4205: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4200: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NAME');
4201: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4202: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4203: 'Contract Name is missing');
4204: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4205: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4207: 'l_error_msg: '||l_error_msg);
4208: END IF;

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

4202: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4203: 'Contract Name is missing');
4204: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4205: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4206: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4207: 'l_error_msg: '||l_error_msg);
4208: END IF;
4209: END IF;
4210:

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

4209: END IF;
4210:
4211: --If l_valid_flag is already set to 'N', we do not perform any more checks
4212: --Contract Name should be <450
4213: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4214: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4215: 'Checking if contract name is too long');
4216: END IF;
4217: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.contract_name)>l_contract_name_length) THEN

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

4210:
4211: --If l_valid_flag is already set to 'N', we do not perform any more checks
4212: --Contract Name should be <450
4213: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4214: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4215: 'Checking if contract name is too long');
4216: END IF;
4217: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.contract_name)>l_contract_name_length) THEN
4218: l_valid_flag := 'N';

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

4216: END IF;
4217: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.contract_name)>l_contract_name_length) THEN
4218: l_valid_flag := 'N';
4219: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NAME');
4220: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4221: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4222: 'Contract Name is too long');
4223: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4224: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4217: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.contract_name)>l_contract_name_length) THEN
4218: l_valid_flag := 'N';
4219: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NAME');
4220: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4221: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4222: 'Contract Name is too long');
4223: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4224: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4225: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4219: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NAME');
4220: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4221: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4222: 'Contract Name is too long');
4223: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4224: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4225: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4226: 'l_error_msg: '||l_error_msg);
4227: END IF;

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

4221: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4222: 'Contract Name is too long');
4223: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4224: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4225: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4226: 'l_error_msg: '||l_error_msg);
4227: END IF;
4228: END IF;
4229:

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

4228: END IF;
4229:
4230: -- If l_valid_flag is already set to 'N', we do not perform any more checks
4231: -- Validating to report error if a BUY contract is imported in Sales Workbench
4232: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4234: 'Checking if BUY intent contract is being imported in Sales Workbench');
4235: END IF;
4236: IF (l_valid_flag = 'Y') THEN

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

4229:
4230: -- If l_valid_flag is already set to 'N', we do not perform any more checks
4231: -- Validating to report error if a BUY contract is imported in Sales Workbench
4232: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4233: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4234: 'Checking if BUY intent contract is being imported in Sales Workbench');
4235: END IF;
4236: IF (l_valid_flag = 'Y') THEN
4237: OPEN CONTRACT_INTENT_CSR (l_import_contracts_rec.imp_contract_id);

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

4235: END IF;
4236: IF (l_valid_flag = 'Y') THEN
4237: OPEN CONTRACT_INTENT_CSR (l_import_contracts_rec.imp_contract_id);
4238: FETCH CONTRACT_INTENT_CSR INTO l_contract_intent;
4239: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4240: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4241: 'l_contract_intent: '||l_contract_intent);
4242: END IF;
4243: IF ((is_sales_workbench() = 'Y') AND (l_contract_intent = G_INTENT_BUY)) THEN

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

4236: IF (l_valid_flag = 'Y') THEN
4237: OPEN CONTRACT_INTENT_CSR (l_import_contracts_rec.imp_contract_id);
4238: FETCH CONTRACT_INTENT_CSR INTO l_contract_intent;
4239: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4240: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4241: 'l_contract_intent: '||l_contract_intent);
4242: END IF;
4243: IF ((is_sales_workbench() = 'Y') AND (l_contract_intent = G_INTENT_BUY)) THEN
4244: l_valid_flag := 'N';

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

4242: END IF;
4243: IF ((is_sales_workbench() = 'Y') AND (l_contract_intent = G_INTENT_BUY)) THEN
4244: l_valid_flag := 'N';
4245: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_SWB_INV_INTENT');
4246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4247: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4248: 'Buy Intent Contract can not be imported in Sales Workbench ');
4249: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4250: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4243: IF ((is_sales_workbench() = 'Y') AND (l_contract_intent = G_INTENT_BUY)) THEN
4244: l_valid_flag := 'N';
4245: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_SWB_INV_INTENT');
4246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4247: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4248: 'Buy Intent Contract can not be imported in Sales Workbench ');
4249: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4250: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4251: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4245: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_SWB_INV_INTENT');
4246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4247: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4248: 'Buy Intent Contract can not be imported in Sales Workbench ');
4249: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4250: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4251: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4252: 'l_error_msg: '||l_error_msg);
4253: END IF;

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

4247: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4248: 'Buy Intent Contract can not be imported in Sales Workbench ');
4249: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4250: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4251: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4252: 'l_error_msg: '||l_error_msg);
4253: END IF;
4254: END IF;
4255: CLOSE CONTRACT_INTENT_CSR;

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

4255: CLOSE CONTRACT_INTENT_CSR;
4256: END IF;
4257: --If l_valid_flag is already set to 'N', we do not perform any more checks
4258: --Original System Reference Code should be <30
4259: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4260: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4261: 'Checking if Original System Reference Code is too long');
4262: END IF;
4263: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_code)>l_orig_system_code_length) THEN

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

4256: END IF;
4257: --If l_valid_flag is already set to 'N', we do not perform any more checks
4258: --Original System Reference Code should be <30
4259: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4260: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4261: 'Checking if Original System Reference Code is too long');
4262: END IF;
4263: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_code)>l_orig_system_code_length) THEN
4264: l_valid_flag := 'N';

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

4262: END IF;
4263: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_code)>l_orig_system_code_length) THEN
4264: l_valid_flag := 'N';
4265: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_CODE');
4266: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4267: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4268: 'Original System Reference Code is too long');
4269: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4270: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4263: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_code)>l_orig_system_code_length) THEN
4264: l_valid_flag := 'N';
4265: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_CODE');
4266: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4267: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4268: 'Original System Reference Code is too long');
4269: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4270: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4271: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4265: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_CODE');
4266: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4267: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4268: 'Original System Reference Code is too long');
4269: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4270: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4271: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4272: 'l_error_msg: '||l_error_msg);
4273: END IF;

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

4267: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4268: 'Original System Reference Code is too long');
4269: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4270: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4271: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4272: 'l_error_msg: '||l_error_msg);
4273: END IF;
4274: END IF;
4275:

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

4274: END IF;
4275:
4276: --If l_valid_flag is already set to 'N', we do not perform any more checks
4277: --Original System ID1 should be <100
4278: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4279: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4280: 'Checking if Original System ID1 is too long');
4281: END IF;
4282: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id1)>l_orig_system_id1_length) THEN

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

4275:
4276: --If l_valid_flag is already set to 'N', we do not perform any more checks
4277: --Original System ID1 should be <100
4278: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4279: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4280: 'Checking if Original System ID1 is too long');
4281: END IF;
4282: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id1)>l_orig_system_id1_length) THEN
4283: l_valid_flag := 'N';

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

4281: END IF;
4282: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id1)>l_orig_system_id1_length) THEN
4283: l_valid_flag := 'N';
4284: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID1');
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: 'Original System ID1 is too long');
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 LENGTH(l_import_contracts_rec.orig_system_reference_id1)>l_orig_system_id1_length) THEN
4283: l_valid_flag := 'N';
4284: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID1');
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: 'Original System ID1 is too long');
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_LONG_ORIG_ID1');
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: 'Original System ID1 is too long');
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: 'Original System ID1 is too long');
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 4297: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

4293: END IF;
4294:
4295: --If l_valid_flag is already set to 'N', we do not perform any more checks
4296: --Original System ID2 should be <100
4297: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4298: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4299: 'Checking if Original System ID2 is too long');
4300: END IF;
4301: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id2)>l_orig_system_id2_length) THEN

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

4294:
4295: --If l_valid_flag is already set to 'N', we do not perform any more checks
4296: --Original System ID2 should be <100
4297: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4298: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4299: 'Checking if Original System ID2 is too long');
4300: END IF;
4301: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id2)>l_orig_system_id2_length) THEN
4302: l_valid_flag := 'N';

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

4300: END IF;
4301: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id2)>l_orig_system_id2_length) THEN
4302: l_valid_flag := 'N';
4303: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID2');
4304: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4305: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4306: 'Original System ID2 is too long');
4307: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4308: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4301: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.orig_system_reference_id2)>l_orig_system_id2_length) THEN
4302: l_valid_flag := 'N';
4303: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID2');
4304: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4305: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4306: 'Original System ID2 is too long');
4307: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4308: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4309: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4303: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_ORIG_ID2');
4304: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4305: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4306: 'Original System ID2 is too long');
4307: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4308: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4309: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4310: 'l_error_msg: '||l_error_msg);
4311: END IF;

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

4305: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4306: 'Original System ID2 is too long');
4307: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4308: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4309: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4310: 'l_error_msg: '||l_error_msg);
4311: END IF;
4312: END IF;
4313:

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

4312: END IF;
4313:
4314: --If l_valid_flag is already set to 'N', we do not perform any more checks
4315: --Contract Status is required
4316: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4317: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4318: 'Checking if user enters contract status');
4319: END IF;
4320: IF l_import_contracts_rec.contract_status_txt IS NOT NULL THEN

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

4313:
4314: --If l_valid_flag is already set to 'N', we do not perform any more checks
4315: --Contract Status is required
4316: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4317: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4318: 'Checking if user enters contract status');
4319: END IF;
4320: IF l_import_contracts_rec.contract_status_txt IS NOT NULL THEN
4321: l_import_contracts_rec.contract_status_txt := LTRIM(l_import_contracts_rec.contract_status_txt);

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

4324:
4325: 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
4326: l_valid_flag := 'N';
4327: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_STATUS');
4328: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4329: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4330: 'Contract Status is missing');
4331: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4332: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4325: 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
4326: l_valid_flag := 'N';
4327: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_STATUS');
4328: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4329: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4330: 'Contract Status is missing');
4331: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4332: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4333: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4327: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_STATUS');
4328: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4329: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4330: 'Contract Status is missing');
4331: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4332: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4333: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4334: 'l_error_msg: '||l_error_msg);
4335: END IF;

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

4329: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4330: 'Contract Status is missing');
4331: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4332: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4333: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4334: 'l_error_msg: '||l_error_msg);
4335: END IF;
4336: END IF;
4337:

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

4336: END IF;
4337:
4338: --If l_valid_flag is already set to 'N', we do not perform any more checks
4339: --Contract Status can only be 'SIGNED'
4340: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4341: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4342: 'Checking if status is valid');
4343: END IF;
4344: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_status_txt IS NOT NULL) THEN

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

4337:
4338: --If l_valid_flag is already set to 'N', we do not perform any more checks
4339: --Contract Status can only be 'SIGNED'
4340: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4341: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4342: 'Checking if status is valid');
4343: END IF;
4344: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_status_txt IS NOT NULL) THEN
4345: IF ( p_call_source = 'CP_EXCEL') THEN

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

4348: IF CONTRACT_STATUS_CSR%NOTFOUND THEN
4349: l_valid_flag := 'N';
4350: l_status_code := NULL;
4351: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_STATUS');
4352: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4353: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4354: 'Contract Status is invalid');
4355: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4356: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4349: l_valid_flag := 'N';
4350: l_status_code := NULL;
4351: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_STATUS');
4352: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4353: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4354: 'Contract Status is invalid');
4355: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4356: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4357: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4351: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_STATUS');
4352: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4353: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4354: 'Contract Status is invalid');
4355: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4356: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4357: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4358: 'l_error_msg: '||l_error_msg);
4359: END IF;

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

4353: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4354: 'Contract Status is invalid');
4355: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4356: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4357: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4358: 'l_error_msg: '||l_error_msg);
4359: END IF;
4360: END IF;
4361: CLOSE CONTRACT_STATUS_CSR;

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

4366: IF CONTRACT_STATUS_CSR_SQL%NOTFOUND THEN
4367: l_valid_flag := 'N';
4368: l_status_code := NULL;
4369: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_STATUS');
4370: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4371: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4372: 'Contract Status is invalid');
4373: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4374: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4367: l_valid_flag := 'N';
4368: l_status_code := NULL;
4369: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_STATUS');
4370: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4371: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4372: 'Contract Status is invalid');
4373: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4374: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4375: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4369: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_STATUS');
4370: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4371: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4372: 'Contract Status is invalid');
4373: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4374: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4375: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4376: 'l_error_msg: '||l_error_msg);
4377: END IF;

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

4371: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4372: 'Contract Status is invalid');
4373: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4374: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4375: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4376: 'l_error_msg: '||l_error_msg);
4377: END IF;
4378: END IF;
4379: CLOSE CONTRACT_STATUS_CSR_SQL;

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

4382: END IF;
4383:
4384: --If l_valid_flag is already set to 'N', we do not perform any more checks
4385: --Contract Type is required
4386: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4387: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4388: 'Checking if user enters contract type');
4389: END IF;
4390: IF l_import_contracts_rec.contract_type_txt IS NOT NULL THEN

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

4383:
4384: --If l_valid_flag is already set to 'N', we do not perform any more checks
4385: --Contract Type is required
4386: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4387: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4388: 'Checking if user enters contract type');
4389: END IF;
4390: IF l_import_contracts_rec.contract_type_txt IS NOT NULL THEN
4391: l_import_contracts_rec.contract_type_txt := LTRIM(l_import_contracts_rec.contract_type_txt);

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

4393: END IF;
4394: 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
4395: l_valid_flag := 'N';
4396: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CON_TYPE');
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: 'Contract Type is missing');
4400: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4401: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4394: 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
4395: l_valid_flag := 'N';
4396: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CON_TYPE');
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: 'Contract Type is missing');
4400: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4401: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4402: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4396: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CON_TYPE');
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: 'Contract Type is missing');
4400: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4401: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4402: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4403: 'l_error_msg: '||l_error_msg);
4404: END IF;

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

4398: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4399: 'Contract Type is missing');
4400: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4401: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4402: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4403: 'l_error_msg: '||l_error_msg);
4404: END IF;
4405: END IF;
4406:

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

4405: END IF;
4406:
4407: --If l_valid_flag is already set to 'N', we do not perform any more checks
4408: --Contract Type should resolve to valid contract type code
4409: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4410: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4411: 'Checking if contract type is valid');
4412: END IF;
4413: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_type_txt IS NOT NULL) THEN

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

4406:
4407: --If l_valid_flag is already set to 'N', we do not perform any more checks
4408: --Contract Type should resolve to valid contract type code
4409: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4410: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4411: 'Checking if contract type is valid');
4412: END IF;
4413: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_type_txt IS NOT NULL) THEN
4414: OPEN CONTRACT_TYPE_CSR(l_import_contracts_rec.contract_type_txt);

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

4415: FETCH CONTRACT_TYPE_CSR INTO l_contract_type;
4416: IF CONTRACT_TYPE_CSR%NOTFOUND THEN
4417: l_valid_flag := 'N';
4418: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CON_TYPE');
4419: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4420: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4421: 'Contract Type is invalid');
4422: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4423: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4416: IF CONTRACT_TYPE_CSR%NOTFOUND THEN
4417: l_valid_flag := 'N';
4418: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CON_TYPE');
4419: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4420: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4421: 'Contract Type is invalid');
4422: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4423: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4424: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4418: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CON_TYPE');
4419: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4420: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4421: 'Contract Type is invalid');
4422: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4423: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4424: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4425: 'l_error_msg: '||l_error_msg);
4426: END IF;

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

4420: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4421: 'Contract Type is invalid');
4422: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4423: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4424: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4425: 'l_error_msg: '||l_error_msg);
4426: END IF;
4427: END IF;
4428: CLOSE CONTRACT_TYPE_CSR;

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

4429: END IF;
4430:
4431: --If l_valid_flag is already set to 'N', we do not perform any more checks
4432: --Contract Effective Date is required
4433: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4434: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4435: 'Checking if user enters contract effective date');
4436: END IF;
4437: IF l_import_contracts_rec.contract_effective_date IS NOT NULL THEN

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

4430:
4431: --If l_valid_flag is already set to 'N', we do not perform any more checks
4432: --Contract Effective Date is required
4433: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4434: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4435: 'Checking if user enters contract effective date');
4436: END IF;
4437: IF l_import_contracts_rec.contract_effective_date IS NOT NULL THEN
4438: l_import_contracts_rec.contract_effective_date := LTRIM(l_import_contracts_rec.contract_effective_date);

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

4441:
4442: 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
4443: l_valid_flag := 'N';
4444: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_EFF_DATE');
4445: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4446: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4447: 'Contract Effective Date is missing');
4448: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4449: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4442: 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
4443: l_valid_flag := 'N';
4444: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_EFF_DATE');
4445: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4446: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4447: 'Contract Effective Date is missing');
4448: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4449: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4450: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4444: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_EFF_DATE');
4445: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4446: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4447: 'Contract Effective Date is missing');
4448: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4449: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4450: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4451: 'l_error_msg: '||l_error_msg);
4452: END IF;

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

4446: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4447: 'Contract Effective Date is missing');
4448: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4449: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4450: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4451: 'l_error_msg: '||l_error_msg);
4452: END IF;
4453: END IF;
4454:

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

4453: END IF;
4454:
4455: --If l_valid_flag is already set to 'N', we do not perform any more checks
4456: --Contract Effective Date should be in the format specified by user language preference
4457: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4458: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4459: 'Checking if contract effective date is in the correct format');
4460: END IF;
4461: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_effective_date IS NOT NULL) THEN

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

4454:
4455: --If l_valid_flag is already set to 'N', we do not perform any more checks
4456: --Contract Effective Date should be in the format specified by user language preference
4457: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4458: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4459: 'Checking if contract effective date is in the correct format');
4460: END IF;
4461: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_effective_date IS NOT NULL) THEN
4462: BEGIN

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

4464: EXCEPTION
4465: WHEN OTHERS THEN
4466: l_valid_flag := 'N';
4467: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EFF_DATE');
4468: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4469: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4470: 'Contract Effective Date is not valid');
4471: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4472: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4465: WHEN OTHERS THEN
4466: l_valid_flag := 'N';
4467: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EFF_DATE');
4468: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4469: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4470: 'Contract Effective Date is not valid');
4471: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4472: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4473: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4467: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EFF_DATE');
4468: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4469: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4470: 'Contract Effective Date is not valid');
4471: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4472: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4473: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4474: 'l_error_msg: '||l_error_msg);
4475: END IF;

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

4469: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4470: 'Contract Effective Date is not valid');
4471: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4472: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4473: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4474: 'l_error_msg: '||l_error_msg);
4475: END IF;
4476: END;
4477: END IF;

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

4477: END IF;
4478:
4479: --If l_valid_flag is already set to 'N', we do not perform any more checks
4480: --Contract Expiration Date should be in the format specified by user language preference
4481: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4482: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4483: 'Checking if contract expriation date is in the correct format');
4484: END IF;
4485: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_expiration_date IS NOT NULL) THEN

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

4478:
4479: --If l_valid_flag is already set to 'N', we do not perform any more checks
4480: --Contract Expiration Date should be in the format specified by user language preference
4481: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4482: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4483: 'Checking if contract expriation date is in the correct format');
4484: END IF;
4485: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_expiration_date IS NOT NULL) THEN
4486: BEGIN

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

4488: EXCEPTION
4489: WHEN OTHERS THEN
4490: l_valid_flag := 'N';
4491: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
4492: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4493: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4494: 'Contract Expiration Date is not valid');
4495: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4496: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4489: WHEN OTHERS THEN
4490: l_valid_flag := 'N';
4491: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
4492: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4493: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4494: 'Contract Expiration Date is not valid');
4495: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4496: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4497: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4491: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
4492: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4493: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4494: 'Contract Expiration Date is not valid');
4495: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4496: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4497: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4498: 'l_error_msg: '||l_error_msg);
4499: END IF;

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

4493: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4494: 'Contract Expiration Date is not valid');
4495: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4496: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4497: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4498: 'l_error_msg: '||l_error_msg);
4499: END IF;
4500: END;
4501: END IF;

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

4501: END IF;
4502:
4503: --If l_valid_flag is already set to 'N', we do not perform any more checks
4504: --Contract Expiration Date should be after Contract Effective Date
4505: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4506: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4507: 'Checking if contract expriation date is in the correct format');
4508: END IF;
4509: IF (l_valid_flag = 'Y'

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

4502:
4503: --If l_valid_flag is already set to 'N', we do not perform any more checks
4504: --Contract Expiration Date should be after Contract Effective Date
4505: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4506: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4507: 'Checking if contract expriation date is in the correct format');
4508: END IF;
4509: IF (l_valid_flag = 'Y'
4510: AND l_import_contracts_rec.contract_effective_date IS NOT NULL

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

4521:
4522: --l_error_msg := fnd_message.get_string(G_APP_NAME,l_resolved_msg_name,p_token1=>'HDR_TOKEN',p_token1_value => l_resolved_token);
4523:
4524: l_error_msg := OKC_TERMS_UTIL_PVT.Get_Message(G_APP_NAME,l_resolved_msg_name,p_token1=>'HDR_TOKEN',p_token1_value => l_resolved_token);
4525: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4526: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4527: 'Contract Expiration Date is before Contract Effective Date');
4528: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4529: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4522: --l_error_msg := fnd_message.get_string(G_APP_NAME,l_resolved_msg_name,p_token1=>'HDR_TOKEN',p_token1_value => l_resolved_token);
4523:
4524: l_error_msg := OKC_TERMS_UTIL_PVT.Get_Message(G_APP_NAME,l_resolved_msg_name,p_token1=>'HDR_TOKEN',p_token1_value => l_resolved_token);
4525: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4526: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4527: 'Contract Expiration Date is before Contract Effective Date');
4528: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4529: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4530: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4524: l_error_msg := OKC_TERMS_UTIL_PVT.Get_Message(G_APP_NAME,l_resolved_msg_name,p_token1=>'HDR_TOKEN',p_token1_value => l_resolved_token);
4525: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4526: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4527: 'Contract Expiration Date is before Contract Effective Date');
4528: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4529: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4530: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4531: 'l_error_msg: '||l_error_msg);
4532: END IF;

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

4526: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4527: 'Contract Expiration Date is before Contract Effective Date');
4528: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4529: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4530: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4531: 'l_error_msg: '||l_error_msg);
4532: END IF;
4533: END IF;
4534: END IF;

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

4534: END IF;
4535:
4536: --If l_valid_flag is already set to 'N', we do not perform any more checks
4537: --Organization Name is required
4538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4540: 'Checking if user enters organization name');
4541: END IF;
4542: IF l_import_contracts_rec.org_name IS NOT NULL THEN

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

4535:
4536: --If l_valid_flag is already set to 'N', we do not perform any more checks
4537: --Organization Name is required
4538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4540: 'Checking if user enters organization name');
4541: END IF;
4542: IF l_import_contracts_rec.org_name IS NOT NULL THEN
4543: l_import_contracts_rec.org_name := LTRIM(l_import_contracts_rec.org_name);

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

4545: END IF;
4546: IF (l_valid_flag = 'Y' AND (l_import_contracts_rec.org_name IS NULL OR LENGTH(l_import_contracts_rec.org_name)=0)) THEN
4547: l_valid_flag := 'N';
4548: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_ORG');
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: 'Operating Unit is missing');
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_valid_flag = 'Y' AND (l_import_contracts_rec.org_name IS NULL OR LENGTH(l_import_contracts_rec.org_name)=0)) THEN
4547: l_valid_flag := 'N';
4548: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_ORG');
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: 'Operating Unit is missing');
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_MISS_ORG');
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: 'Operating Unit is missing');
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: 'Operating Unit is missing');
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:

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

4557: END IF;
4558:
4559: --If l_valid_flag is already set to 'N', we do not perform any more checks
4560: --Organization Name should resolve to a valid Org ID
4561: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4562: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4563: 'Checking if organization name is valid');
4564: END IF;
4565: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.org_name IS NOT NULL) THEN

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

4558:
4559: --If l_valid_flag is already set to 'N', we do not perform any more checks
4560: --Organization Name should resolve to a valid Org ID
4561: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4562: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4563: 'Checking if organization name is valid');
4564: END IF;
4565: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.org_name IS NOT NULL) THEN
4566: OPEN ORG_NAME_CSR(l_import_contracts_rec.org_name);

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

4567: FETCH ORG_NAME_CSR INTO l_org_id;
4568: IF ORG_NAME_CSR%NOTFOUND THEN
4569: l_valid_flag := 'N';
4570: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_ORG');
4571: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4573: 'Operating Unit is invalid');
4574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4575: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4568: IF ORG_NAME_CSR%NOTFOUND THEN
4569: l_valid_flag := 'N';
4570: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_ORG');
4571: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4573: 'Operating Unit is invalid');
4574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4575: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4576: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4570: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_ORG');
4571: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4573: 'Operating Unit is invalid');
4574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4575: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4576: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4577: 'l_error_msg: '||l_error_msg);
4578: END IF;

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

4572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4573: 'Operating Unit is invalid');
4574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4575: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4576: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4577: 'l_error_msg: '||l_error_msg);
4578: END IF;
4579: END IF;
4580: CLOSE ORG_NAME_CSR;

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

4582:
4583:
4584: --If l_valid_flag is already set to 'N', we do not perform any more checks
4585: --Contract Number is required, if autonumbering is turned off
4586: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4587: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4588: 'Checking if user enters contract number');
4589: END IF;
4590:

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

4583:
4584: --If l_valid_flag is already set to 'N', we do not perform any more checks
4585: --Contract Number is required, if autonumbering is turned off
4586: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4587: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4588: 'Checking if user enters contract number');
4589: END IF;
4590:
4591:

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

4592: --Checking profile option value
4593: FND_PROFILE.GET(NAME => l_auto_number_option, VAL => l_auto_num_profile);
4594:
4595:
4596: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4597: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4598: 'Profile OKC_REP_AUTO_CON_NUMBER value is: '||l_auto_number_yn);
4599: END IF;
4600:

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

4593: FND_PROFILE.GET(NAME => l_auto_number_option, VAL => l_auto_num_profile);
4594:
4595:
4596: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4597: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4598: 'Profile OKC_REP_AUTO_CON_NUMBER value is: '||l_auto_number_yn);
4599: END IF;
4600:
4601:

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

4603: OPEN doc_type_auto_num(l_contract_type) ;
4604: FETCH doc_type_auto_num INTO l_auto_num_doc;
4605: CLOSE doc_type_auto_num ;
4606:
4607: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4608: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4609: 'Auto numbering at document level : '||l_auto_num_doc );
4610: END IF;
4611:

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

4604: FETCH doc_type_auto_num INTO l_auto_num_doc;
4605: CLOSE doc_type_auto_num ;
4606:
4607: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4608: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4609: 'Auto numbering at document level : '||l_auto_num_doc );
4610: END IF;
4611:
4612: /* Check the autonumbering setup at document level */

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

4623:
4624:
4625: --If l_valid_flag is already set to 'N', we do not perform any more checks
4626: --Contract Number is required, if autonumbering is turned off
4627: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4628: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4629: 'Checking if user enters contract number');
4630: END IF;
4631:

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

4624:
4625: --If l_valid_flag is already set to 'N', we do not perform any more checks
4626: --Contract Number is required, if autonumbering is turned off
4627: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4628: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4629: 'Checking if user enters contract number');
4630: END IF;
4631:
4632:

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

4637: --otherwise system should error out
4638: IF(l_import_contracts_rec.contract_number IS NOT NULL) THEN
4639: l_valid_flag := 'N';
4640: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONNULL_NUMBER');
4641: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4642: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4643: 'Auto number is turned on, but contract number is not null');
4644: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4645: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4638: IF(l_import_contracts_rec.contract_number IS NOT NULL) THEN
4639: l_valid_flag := 'N';
4640: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONNULL_NUMBER');
4641: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4642: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4643: 'Auto number is turned on, but contract number is not null');
4644: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4645: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4646: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4640: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONNULL_NUMBER');
4641: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4642: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4643: 'Auto number is turned on, but contract number is not null');
4644: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4645: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4646: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4647: 'l_error_msg: '||l_error_msg);
4648: END IF;

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

4642: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4643: 'Auto number is turned on, but contract number is not null');
4644: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4645: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4646: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4647: 'l_error_msg: '||l_error_msg);
4648: END IF;
4649:
4650: ELSE

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

4699: --skuchima call contract number hook
4700: l_con_num_hook:=okc_rep_num_hook.get_rep_contract_number(l_contract_type,l_org_id);
4701: l_contract_number := l_con_num_hook;
4702:
4703: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4704: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4705: 'after call to okc_rep_num_hook.get_rep_contract_number '||l_con_num_hook);
4706: END IF;
4707:

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

4700: l_con_num_hook:=okc_rep_num_hook.get_rep_contract_number(l_contract_type,l_org_id);
4701: l_contract_number := l_con_num_hook;
4702:
4703: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4704: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4705: 'after call to okc_rep_num_hook.get_rep_contract_number '||l_con_num_hook);
4706: END IF;
4707:
4708: IF (l_con_num_hook IS NULL) THEN

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

4707:
4708: IF (l_con_num_hook IS NULL) THEN
4709: l_valid_flag := 'N';
4710: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NUMBER');
4711: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4712: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4713: 'Auto number is turned off, but contract number is missing');
4714: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4715: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4708: IF (l_con_num_hook IS NULL) THEN
4709: l_valid_flag := 'N';
4710: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NUMBER');
4711: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4712: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4713: 'Auto number is turned off, but contract number is missing');
4714: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4715: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4716: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4710: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_NUMBER');
4711: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4712: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4713: 'Auto number is turned off, but contract number is missing');
4714: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4715: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4716: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4717: 'l_error_msg: '||l_error_msg);
4718: END IF;

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

4712: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4713: 'Auto number is turned off, but contract number is missing');
4714: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4715: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4716: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4717: 'l_error_msg: '||l_error_msg);
4718: END IF;
4719:
4720: END IF;

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

4724: --we need to check for length
4725: IF(LENGTH(l_import_contracts_rec.contract_number) > l_contract_number_length) THEN
4726: l_valid_flag := 'N';
4727: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NUMBER');
4728: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4729: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4730: 'Conract number is too long');
4731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4732: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4725: IF(LENGTH(l_import_contracts_rec.contract_number) > l_contract_number_length) THEN
4726: l_valid_flag := 'N';
4727: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NUMBER');
4728: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4729: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4730: 'Conract number is too long');
4731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4732: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4733: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4727: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_NUMBER');
4728: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4729: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4730: 'Conract number is too long');
4731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4732: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4733: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4734: 'l_error_msg: '||l_error_msg);
4735: END IF;

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

4729: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4730: 'Conract number is too long');
4731: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4732: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4733: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4734: 'l_error_msg: '||l_error_msg);
4735: END IF;
4736:
4737: END IF;

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

4748: FETCH CONTRACT_NUMBER_UNIQUE_CSR INTO l_unique_contract_number;
4749: IF CONTRACT_NUMBER_UNIQUE_CSR%FOUND THEN
4750: l_valid_flag := 'N';
4751: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONUNIQUE_NUMBER');
4752: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4753: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4754: 'Conract number is not unique for the contract_type '|| l_import_contracts_rec.contract_type_txt || ' and org_name '||l_import_contracts_rec.org_name);
4755: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4756: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4749: IF CONTRACT_NUMBER_UNIQUE_CSR%FOUND THEN
4750: l_valid_flag := 'N';
4751: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONUNIQUE_NUMBER');
4752: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4753: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4754: 'Conract number is not unique for the contract_type '|| l_import_contracts_rec.contract_type_txt || ' and org_name '||l_import_contracts_rec.org_name);
4755: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4756: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4757: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4751: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_NONUNIQUE_NUMBER');
4752: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4753: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4754: 'Conract number is not unique for the contract_type '|| l_import_contracts_rec.contract_type_txt || ' and org_name '||l_import_contracts_rec.org_name);
4755: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4756: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4757: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4758: 'l_error_msg: '||l_error_msg);
4759: END IF;

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

4753: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4754: 'Conract number is not unique for the contract_type '|| l_import_contracts_rec.contract_type_txt || ' and org_name '||l_import_contracts_rec.org_name);
4755: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4756: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4757: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4758: 'l_error_msg: '||l_error_msg);
4759: END IF;
4760: END IF;
4761: CLOSE CONTRACT_NUMBER_UNIQUE_CSR;

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

4763:
4764:
4765: --If l_valid_flag is already set to 'N', we do not perform any more checks
4766: --Organization Name is required
4767: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4768: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4769: 'Checking if user enters owner user name');
4770: END IF;
4771: IF l_import_contracts_rec.owner_user_name IS NOT NULL THEN

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

4764:
4765: --If l_valid_flag is already set to 'N', we do not perform any more checks
4766: --Organization Name is required
4767: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4768: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4769: 'Checking if user enters owner user name');
4770: END IF;
4771: IF l_import_contracts_rec.owner_user_name IS NOT NULL THEN
4772: l_import_contracts_rec.owner_user_name := LTRIM(l_import_contracts_rec.owner_user_name);

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

4774: END IF;
4775: 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
4776: l_valid_flag := 'N';
4777: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_OWNER');
4778: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4779: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4780: 'Owner User Name is missing');
4781: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4782: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4775: 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
4776: l_valid_flag := 'N';
4777: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_OWNER');
4778: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4779: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4780: 'Owner User Name is missing');
4781: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4782: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4783: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4777: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_OWNER');
4778: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4779: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4780: 'Owner User Name is missing');
4781: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4782: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4783: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4784: 'l_error_msg: '||l_error_msg);
4785: END IF;

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

4779: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4780: 'Owner User Name is missing');
4781: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4782: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4783: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4784: 'l_error_msg: '||l_error_msg);
4785: END IF;
4786: END IF;
4787:

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

4787:
4788: --If l_valid_flag is already set to 'N', we do not perform any more checks
4789: --Owner User Name should resolve to a valid FND User ID
4790: --Also, the owner needs to be an employee
4791: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4792: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4793: 'Checking if owner user name is valid');
4794: END IF;
4795: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.owner_user_name IS NOT NULL) THEN

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

4788: --If l_valid_flag is already set to 'N', we do not perform any more checks
4789: --Owner User Name should resolve to a valid FND User ID
4790: --Also, the owner needs to be an employee
4791: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4792: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4793: 'Checking if owner user name is valid');
4794: END IF;
4795: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.owner_user_name IS NOT NULL) THEN
4796: OPEN OWNER_NAME_CSR(l_import_contracts_rec.owner_user_name);

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

4797: FETCH OWNER_NAME_CSR INTO l_owner_user_id;
4798: IF OWNER_NAME_CSR%NOTFOUND THEN
4799: l_valid_flag := 'N';
4800: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_OWNER');
4801: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4802: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4803: 'Owner User Name is invalid');
4804: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4805: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4798: IF OWNER_NAME_CSR%NOTFOUND THEN
4799: l_valid_flag := 'N';
4800: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_OWNER');
4801: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4802: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4803: 'Owner User Name is invalid');
4804: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4805: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4806: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4800: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_OWNER');
4801: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4802: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4803: 'Owner User Name is invalid');
4804: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4805: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4806: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4807: 'l_error_msg: '||l_error_msg);
4808: END IF;

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

4802: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4803: 'Owner User Name is invalid');
4804: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4805: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4806: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4807: 'l_error_msg: '||l_error_msg);
4808: END IF;
4809: END IF;
4810: CLOSE OWNER_NAME_CSR;

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

4811: END IF;
4812:
4813: --If l_valid_flag is already set to 'N', we do not perform any more checks
4814: --Currency Code is required if Amount is entered
4815: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4816: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4817: 'Checking if user enters currency when amount is entered');
4818: END IF;
4819: IF l_import_contracts_rec.currency_code IS NOT NULL THEN

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

4812:
4813: --If l_valid_flag is already set to 'N', we do not perform any more checks
4814: --Currency Code is required if Amount is entered
4815: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4816: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4817: 'Checking if user enters currency when amount is entered');
4818: END IF;
4819: IF l_import_contracts_rec.currency_code IS NOT NULL THEN
4820: l_import_contracts_rec.currency_code := LTRIM(l_import_contracts_rec.currency_code);

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

4824: AND l_import_contracts_rec.contract_amount IS NOT NULL
4825: AND (l_import_contracts_rec.currency_code IS NULL OR LENGTH(l_import_contracts_rec.currency_code)=0)) THEN
4826: l_valid_flag := 'N';
4827: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CURRENCY');
4828: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4829: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4830: 'Owner User Name is missing');
4831: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4832: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4825: AND (l_import_contracts_rec.currency_code IS NULL OR LENGTH(l_import_contracts_rec.currency_code)=0)) THEN
4826: l_valid_flag := 'N';
4827: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CURRENCY');
4828: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4829: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4830: 'Owner User Name is missing');
4831: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4832: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4833: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4827: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_MISS_CURRENCY');
4828: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4829: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4830: 'Owner User Name is missing');
4831: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4832: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4833: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4834: 'l_error_msg: '||l_error_msg);
4835: END IF;

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

4829: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4830: 'Owner User Name is missing');
4831: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4832: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4833: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4834: 'l_error_msg: '||l_error_msg);
4835: END IF;
4836: END IF;
4837:

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

4836: END IF;
4837:
4838: --If l_valid_flag is already set to 'N', we do not perform any more checks
4839: --Currency should exist in FND_CURRENCIES table
4840: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4841: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4842: 'Checking if currency is valid');
4843: END IF;
4844: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.currency_code IS NOT NULL) THEN

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

4837:
4838: --If l_valid_flag is already set to 'N', we do not perform any more checks
4839: --Currency should exist in FND_CURRENCIES table
4840: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4841: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4842: 'Checking if currency is valid');
4843: END IF;
4844: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.currency_code IS NOT NULL) THEN
4845: OPEN CURRENCY_CSR(l_import_contracts_rec.currency_code);

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

4846: FETCH CURRENCY_CSR INTO l_currency_code;
4847: IF CURRENCY_CSR%NOTFOUND THEN
4848: l_valid_flag := 'N';
4849: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CURRENCY');
4850: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4851: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4852: 'Currency is invalid');
4853: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4854: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4847: IF CURRENCY_CSR%NOTFOUND THEN
4848: l_valid_flag := 'N';
4849: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CURRENCY');
4850: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4851: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4852: 'Currency is invalid');
4853: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4854: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4849: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_CURRENCY');
4850: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4851: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4852: 'Currency is invalid');
4853: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4854: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4856: 'l_error_msg: '||l_error_msg);
4857: END IF;

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

4851: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4852: 'Currency is invalid');
4853: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4854: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4855: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4856: 'l_error_msg: '||l_error_msg);
4857: END IF;
4858: END IF;
4859: CLOSE CURRENCY_CSR;

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

4860: END IF;
4861:
4862: --If l_valid_flag is already set to 'N', we do not perform any more checks
4863: --Amout should be in the format specified by user language preference
4864: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4865: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4866: 'Checking if amount is in the correct format');
4867: END IF;
4868: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_amount IS NOT NULL) THEN

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

4861:
4862: --If l_valid_flag is already set to 'N', we do not perform any more checks
4863: --Amout should be in the format specified by user language preference
4864: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4865: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4866: 'Checking if amount is in the correct format');
4867: END IF;
4868: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.contract_amount IS NOT NULL) THEN
4869: BEGIN

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

4877: EXCEPTION
4878: WHEN OTHERS THEN
4879: l_valid_flag := 'N';
4880: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AMOUNT');
4881: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4882: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4883: 'Amount is not valid');
4884: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4885: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4878: WHEN OTHERS THEN
4879: l_valid_flag := 'N';
4880: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AMOUNT');
4881: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4882: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4883: 'Amount is not valid');
4884: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4885: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4886: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4880: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AMOUNT');
4881: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4882: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4883: 'Amount is not valid');
4884: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4885: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4886: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4887: 'l_error_msg: '||l_error_msg);
4888: END IF;

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

4882: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4883: 'Amount is not valid');
4884: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4885: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4886: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4887: 'l_error_msg: '||l_error_msg);
4888: END IF;
4889: END;
4890:

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

4892: END IF;
4893:
4894: --If l_valid_flag is already set to 'N', we do not perform any more checks
4895: --Authoring Party should resolve to valid authoring_party_code
4896: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4897: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4898: 'Checking if authoring party is valid');
4899: END IF;
4900: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.authoring_party_txt IS NOT NULL) THEN

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

4893:
4894: --If l_valid_flag is already set to 'N', we do not perform any more checks
4895: --Authoring Party should resolve to valid authoring_party_code
4896: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4897: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4898: 'Checking if authoring party is valid');
4899: END IF;
4900: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.authoring_party_txt IS NOT NULL) THEN
4901: OPEN AUTHORING_PARTY_CSR(l_import_contracts_rec.authoring_party_txt);

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

4902: FETCH AUTHORING_PARTY_CSR INTO l_authoring_party_code;
4903: IF AUTHORING_PARTY_CSR%NOTFOUND THEN
4904: l_valid_flag := 'N';
4905: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AUTH_PARTY');
4906: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4908: 'Authoring Party is invalid');
4909: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4910: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4903: IF AUTHORING_PARTY_CSR%NOTFOUND THEN
4904: l_valid_flag := 'N';
4905: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AUTH_PARTY');
4906: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4908: 'Authoring Party is invalid');
4909: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4910: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4911: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4905: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_AUTH_PARTY');
4906: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4908: 'Authoring Party is invalid');
4909: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4910: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4911: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4912: 'l_error_msg: '||l_error_msg);
4913: END IF;

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

4907: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4908: 'Authoring Party is invalid');
4909: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4910: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4911: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4912: 'l_error_msg: '||l_error_msg);
4913: END IF;
4914: END IF;
4915: CLOSE AUTHORING_PARTY_CSR;

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

4916: END IF;
4917:
4918: --If l_valid_flag is already set to 'N', we do not perform any more checks
4919: --Physical Location should be <2000
4920: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4921: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4922: 'Checking if Physical Location is too long');
4923: END IF;
4924: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.physical_location)>l_location_length) THEN

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

4917:
4918: --If l_valid_flag is already set to 'N', we do not perform any more checks
4919: --Physical Location should be <2000
4920: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4921: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4922: 'Checking if Physical Location is too long');
4923: END IF;
4924: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.physical_location)>l_location_length) THEN
4925: l_valid_flag := 'N';

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

4923: END IF;
4924: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.physical_location)>l_location_length) THEN
4925: l_valid_flag := 'N';
4926: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_LOCATION');
4927: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4928: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4929: 'Physical Location is too long');
4930: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4931: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4924: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.physical_location)>l_location_length) THEN
4925: l_valid_flag := 'N';
4926: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_LOCATION');
4927: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4928: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4929: 'Physical Location is too long');
4930: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4931: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4932: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4926: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_LOCATION');
4927: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4928: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4929: 'Physical Location is too long');
4930: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4931: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4932: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4933: 'l_error_msg: '||l_error_msg);
4934: END IF;

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

4928: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4929: 'Physical Location is too long');
4930: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4931: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4932: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4933: 'l_error_msg: '||l_error_msg);
4934: END IF;
4935: END IF;
4936:

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

4935: END IF;
4936:
4937: --If l_valid_flag is already set to 'N', we do not perform any more checks
4938: --Keywords should be <2000
4939: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4940: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4941: 'Checking if keywords is too long');
4942: END IF;
4943: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.keywords)>l_keywords_length) THEN

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

4936:
4937: --If l_valid_flag is already set to 'N', we do not perform any more checks
4938: --Keywords should be <2000
4939: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4940: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4941: 'Checking if keywords is too long');
4942: END IF;
4943: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.keywords)>l_keywords_length) THEN
4944: l_valid_flag := 'N';

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

4942: END IF;
4943: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.keywords)>l_keywords_length) THEN
4944: l_valid_flag := 'N';
4945: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_KEYWORDS');
4946: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4947: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4948: 'Keywords is too long');
4949: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4950: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4943: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.keywords)>l_keywords_length) THEN
4944: l_valid_flag := 'N';
4945: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_KEYWORDS');
4946: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4947: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4948: 'Keywords is too long');
4949: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4950: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4951: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4945: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_KEYWORDS');
4946: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4947: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4948: 'Keywords is too long');
4949: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4950: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4951: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4952: 'l_error_msg: '||l_error_msg);
4953: END IF;

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

4947: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4948: 'Keywords is too long');
4949: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4950: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4951: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4952: 'l_error_msg: '||l_error_msg);
4953: END IF;
4954: END IF;
4955:

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

4954: END IF;
4955:
4956: --If l_valid_flag is already set to 'N', we do not perform any more checks
4957: --Description should be <2000
4958: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4959: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4960: 'Checking if description is too long');
4961: END IF;
4962: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.description)>l_description_length) THEN

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

4955:
4956: --If l_valid_flag is already set to 'N', we do not perform any more checks
4957: --Description should be <2000
4958: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4959: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4960: 'Checking if description is too long');
4961: END IF;
4962: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.description)>l_description_length) THEN
4963: l_valid_flag := 'N';

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

4961: END IF;
4962: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.description)>l_description_length) THEN
4963: l_valid_flag := 'N';
4964: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_DESC');
4965: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4966: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4967: 'Description is too long');
4968: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4969: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4962: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.description)>l_description_length) THEN
4963: l_valid_flag := 'N';
4964: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_DESC');
4965: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4966: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4967: 'Description is too long');
4968: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4969: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4970: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4964: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_DESC');
4965: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4966: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4967: 'Description is too long');
4968: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4969: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4970: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4971: 'l_error_msg: '||l_error_msg);
4972: END IF;

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

4966: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4967: 'Description is too long');
4968: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4969: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4970: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4971: 'l_error_msg: '||l_error_msg);
4972: END IF;
4973: END IF;
4974:

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

4973: END IF;
4974:
4975: --If l_valid_flag is already set to 'N', we do not perform any more checks
4976: --Version Comments should be <2000
4977: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4979: 'Checking if version comments is too long');
4980: END IF;
4981: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.version_comments)>l_version_comments_length) THEN

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

4974:
4975: --If l_valid_flag is already set to 'N', we do not perform any more checks
4976: --Version Comments should be <2000
4977: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4978: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4979: 'Checking if version comments is too long');
4980: END IF;
4981: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.version_comments)>l_version_comments_length) THEN
4982: l_valid_flag := 'N';

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

4980: END IF;
4981: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.version_comments)>l_version_comments_length) THEN
4982: l_valid_flag := 'N';
4983: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
4984: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4985: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4986: 'Version Comments is too long');
4987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4988: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

4981: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.version_comments)>l_version_comments_length) THEN
4982: l_valid_flag := 'N';
4983: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
4984: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4985: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4986: 'Version Comments is too long');
4987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4988: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

4983: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
4984: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4985: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4986: 'Version Comments is too long');
4987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4988: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4990: 'l_error_msg: '||l_error_msg);
4991: END IF;

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

4985: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4986: 'Version Comments is too long');
4987: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4988: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
4989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
4990: 'l_error_msg: '||l_error_msg);
4991: END IF;
4992: END IF;
4993:

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

4994: --If l_valid_flag is already set to 'N', we do not perform any more checks
4995: --Validate Contract Parties
4996: --1. There should exactly one internal party
4997: --2. There should be at least one external party
4998: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4999: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5000: 'Validating contract parties');
5001: END IF;
5002: IF (l_valid_flag = 'Y') THEN

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

4995: --Validate Contract Parties
4996: --1. There should exactly one internal party
4997: --2. There should be at least one external party
4998: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4999: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5000: 'Validating contract parties');
5001: END IF;
5002: IF (l_valid_flag = 'Y') THEN
5003: OPEN CONTRACT_PARTIES_CSR(l_import_contracts_rec.imp_contract_id);

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

5017:
5018: IF l_int_parties_count <> 1 THEN
5019: l_valid_flag := 'N';
5020: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTIES');
5021: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5022: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5023: 'There are not exactly one internal party');
5024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5025: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5018: IF l_int_parties_count <> 1 THEN
5019: l_valid_flag := 'N';
5020: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTIES');
5021: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5022: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5023: 'There are not exactly one internal party');
5024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5025: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5026: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5020: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTIES');
5021: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5022: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5023: 'There are not exactly one internal party');
5024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5025: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5026: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5027: 'l_error_msg: '||l_error_msg);
5028: END IF;

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

5022: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5023: 'There are not exactly one internal party');
5024: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5025: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5026: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5027: 'l_error_msg: '||l_error_msg);
5028: END IF;
5029: ELSE
5030: --fix bug 4160416, need to validate internal party name with the org name in the header

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

5030: --fix bug 4160416, need to validate internal party name with the org name in the header
5031: IF l_import_contracts_rec.org_name <> l_int_party_name THEN
5032: l_valid_flag := 'N';
5033: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTY_NAME');
5034: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5035: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5036: 'Internal party name and org name are not matching');
5037: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5038: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5031: IF l_import_contracts_rec.org_name <> l_int_party_name THEN
5032: l_valid_flag := 'N';
5033: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTY_NAME');
5034: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5035: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5036: 'Internal party name and org name are not matching');
5037: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5038: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5039: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5033: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_INT_PARTY_NAME');
5034: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5035: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5036: 'Internal party name and org name are not matching');
5037: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5038: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5039: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5040: 'l_error_msg: '||l_error_msg);
5041: END IF;

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

5035: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5036: 'Internal party name and org name are not matching');
5037: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5038: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5039: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5040: 'l_error_msg: '||l_error_msg);
5041: END IF;
5042: END IF;
5043: END IF;

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

5046: /*
5047: IF l_ext_parties_count <1 THEN
5048: l_valid_flag := 'N';
5049: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXT_PARTIES');
5050: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5052: 'There are less than one external party');
5053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5054: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5047: IF l_ext_parties_count <1 THEN
5048: l_valid_flag := 'N';
5049: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXT_PARTIES');
5050: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5052: 'There are less than one external party');
5053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5054: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5055: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5049: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXT_PARTIES');
5050: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5052: 'There are less than one external party');
5053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5054: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5055: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5056: 'l_error_msg: '||l_error_msg);
5057: END IF;

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

5051: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5052: 'There are less than one external party');
5053: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5054: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5055: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5056: 'l_error_msg: '||l_error_msg);
5057: END IF;
5058: END IF; */
5059: END IF;

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

5061: --kkolukul
5062: --new validation for create Contract API's
5063: --If l_valid_flag is already set to 'N', we do not perform any more checks
5064: --termination Comments should be <2000
5065: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5066: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5067: 'Checking if version comments is too long');
5068: END IF;
5069: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.termination_comments)>l_termin_comments_length) THEN

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

5062: --new validation for create Contract API's
5063: --If l_valid_flag is already set to 'N', we do not perform any more checks
5064: --termination Comments should be <2000
5065: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5066: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5067: 'Checking if version comments is too long');
5068: END IF;
5069: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.termination_comments)>l_termin_comments_length) THEN
5070: l_valid_flag := 'N';

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

5068: END IF;
5069: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.termination_comments)>l_termin_comments_length) THEN
5070: l_valid_flag := 'N';
5071: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5072: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5073: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5074: 'Termination comments is too long');
5075: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5076: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5069: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.termination_comments)>l_termin_comments_length) THEN
5070: l_valid_flag := 'N';
5071: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5072: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5073: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5074: 'Termination comments is too long');
5075: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5076: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5077: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5071: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5072: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5073: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5074: 'Termination comments is too long');
5075: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5076: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5077: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5078: 'l_error_msg: '||l_error_msg);
5079: END IF;

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

5073: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5074: 'Termination comments is too long');
5075: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5076: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5077: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5078: 'l_error_msg: '||l_error_msg);
5079: END IF;
5080: END IF;
5081:

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

5080: END IF;
5081:
5082: --If l_valid_flag is already set to 'N', we do not perform any more checks
5083: --cancellation Comments should be <2000
5084: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5085: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5086: 'Checking if version comments is too long');
5087: END IF;
5088:

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

5081:
5082: --If l_valid_flag is already set to 'N', we do not perform any more checks
5083: --cancellation Comments should be <2000
5084: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5085: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5086: 'Checking if version comments is too long');
5087: END IF;
5088:
5089:

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

5089:
5090: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.cancellation_comments)>l_cancel_comments_length) THEN
5091: l_valid_flag := 'N';
5092: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5093: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5094: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5095: 'cancellation comments is too long');
5096: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5097: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5090: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.cancellation_comments)>l_cancel_comments_length) THEN
5091: l_valid_flag := 'N';
5092: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5093: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5094: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5095: 'cancellation comments is too long');
5096: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5097: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5098: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5092: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5093: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5094: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5095: 'cancellation comments is too long');
5096: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5097: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5098: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5099: 'l_error_msg: '||l_error_msg);
5100: END IF;

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

5094: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5095: 'cancellation comments is too long');
5096: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5097: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5098: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5099: 'l_error_msg: '||l_error_msg);
5100: END IF;
5101: END IF;
5102:

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

5101: END IF;
5102:
5103: --If l_valid_flag is already set to 'N', we do not perform any more checks
5104: --Cancellation Date should be in the format specified by user language preference
5105: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5106: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5107: 'Checking if Cancellation expriation date is in the correct format');
5108: END IF;
5109: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.cancellation_date IS NOT NULL) THEN

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

5102:
5103: --If l_valid_flag is already set to 'N', we do not perform any more checks
5104: --Cancellation Date should be in the format specified by user language preference
5105: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5106: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5107: 'Checking if Cancellation expriation date is in the correct format');
5108: END IF;
5109: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.cancellation_date IS NOT NULL) THEN
5110: BEGIN

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

5112: EXCEPTION
5113: WHEN OTHERS THEN
5114: l_valid_flag := 'N';
5115: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
5116: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5117: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5118: 'Contract Expiration Date is not valid');
5119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5120: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5113: WHEN OTHERS THEN
5114: l_valid_flag := 'N';
5115: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
5116: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5117: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5118: 'Contract Expiration Date is not valid');
5119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5120: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5121: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5115: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
5116: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5117: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5118: 'Contract Expiration Date is not valid');
5119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5120: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5121: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5122: 'l_error_msg: '||l_error_msg);
5123: END IF;

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

5117: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5118: 'Contract Expiration Date is not valid');
5119: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5120: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5121: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5122: 'l_error_msg: '||l_error_msg);
5123: END IF;
5124: END;
5125: END IF;

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

5125: END IF;
5126:
5127: --If l_valid_flag is already set to 'N', we do not perform any more checks
5128: --Termination Date should be in the format specified by user language preference
5129: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5131: 'Checking if Termination expriation date is in the correct format');
5132: END IF;
5133: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.termination_date IS NOT NULL) THEN

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

5126:
5127: --If l_valid_flag is already set to 'N', we do not perform any more checks
5128: --Termination Date should be in the format specified by user language preference
5129: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5131: 'Checking if Termination expriation date is in the correct format');
5132: END IF;
5133: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.termination_date IS NOT NULL) THEN
5134: BEGIN

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

5136: EXCEPTION
5137: WHEN OTHERS THEN
5138: l_valid_flag := 'N';
5139: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
5140: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5141: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5142: 'Contract Expiration Date is not valid');
5143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5144: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5137: WHEN OTHERS THEN
5138: l_valid_flag := 'N';
5139: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
5140: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5141: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5142: 'Contract Expiration Date is not valid');
5143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5144: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5145: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5139: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_EXP_DATE');
5140: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5141: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5142: 'Contract Expiration Date is not valid');
5143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5144: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5145: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5146: 'l_error_msg: '||l_error_msg);
5147: END IF;

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

5141: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5142: 'Contract Expiration Date is not valid');
5143: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5144: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5145: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5146: 'l_error_msg: '||l_error_msg);
5147: END IF;
5148: END;
5149: END IF;

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

5149: END IF;
5150:
5151: --If l_valid_flag is already set to 'N', we do not perform any more checks
5152: --Overall Risk should resolve to valid overall_risk_code
5153: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5155: 'Checking if authoring party is valid');
5156: END IF;
5157: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.overall_risk_txt IS NOT NULL) THEN

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

5150:
5151: --If l_valid_flag is already set to 'N', we do not perform any more checks
5152: --Overall Risk should resolve to valid overall_risk_code
5153: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5154: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5155: 'Checking if authoring party is valid');
5156: END IF;
5157: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.overall_risk_txt IS NOT NULL) THEN
5158: OPEN OVERALL_RISK_CSR(l_import_contracts_rec.overall_risk_txt);

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

5159: FETCH OVERALL_RISK_CSR INTO l_overall_risk_code;
5160: IF OVERALL_RISK_CSR%NOTFOUND THEN
5161: l_valid_flag := 'N';
5162: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_RISK_CODE');
5163: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5164: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5165: 'Overall Risk is invalid');
5166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5167: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5160: IF OVERALL_RISK_CSR%NOTFOUND THEN
5161: l_valid_flag := 'N';
5162: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_RISK_CODE');
5163: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5164: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5165: 'Overall Risk is invalid');
5166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5167: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5162: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_RISK_CODE');
5163: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5164: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5165: 'Overall Risk is invalid');
5166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5167: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5169: 'l_error_msg: '||l_error_msg);
5170: END IF;

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

5164: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5165: 'Overall Risk is invalid');
5166: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5167: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5168: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5169: 'l_error_msg: '||l_error_msg);
5170: END IF;
5171: END IF;
5172: CLOSE OVERALL_RISK_CSR;

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

5173: END IF;
5174:
5175: --If l_valid_flag is already set to 'N', we do not perform any more checks
5176: --Attribute Category should be <90
5177: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5178: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5179: 'Checking if Attribute Category is too long');
5180: END IF;
5181: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.attribute_category) > l_attr_category_length) THEN

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

5174:
5175: --If l_valid_flag is already set to 'N', we do not perform any more checks
5176: --Attribute Category should be <90
5177: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5178: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5179: 'Checking if Attribute Category is too long');
5180: END IF;
5181: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.attribute_category) > l_attr_category_length) THEN
5182: l_valid_flag := 'N';

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

5180: END IF;
5181: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.attribute_category) > l_attr_category_length) THEN
5182: l_valid_flag := 'N';
5183: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5184: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5185: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5186: 'cancellation comments is too long');
5187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5188: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5181: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.attribute_category) > l_attr_category_length) THEN
5182: l_valid_flag := 'N';
5183: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5184: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5185: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5186: 'cancellation comments is too long');
5187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5188: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5189: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5183: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5184: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5185: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5186: 'cancellation comments is too long');
5187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5188: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5189: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5190: 'l_error_msg: '||l_error_msg);
5191: END IF;

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

5185: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5186: 'cancellation comments is too long');
5187: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5188: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5189: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5190: 'l_error_msg: '||l_error_msg);
5191: END IF;
5192: END IF;
5193:

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

5192: END IF;
5193:
5194: --If l_valid_flag is already set to 'N', we do not perform any more checks
5195: --Attributes should be <450
5196: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5197: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5198: 'Checking if Attribute 1..15 is too long');
5199: END IF;
5200:

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

5193:
5194: --If l_valid_flag is already set to 'N', we do not perform any more checks
5195: --Attributes should be <450
5196: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5197: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5198: 'Checking if Attribute 1..15 is too long');
5199: END IF;
5200:
5201: /* FOR i IN 1..15 LOOP

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

5202: --Need to check if this syntax works.
5203: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.attribute||i) > l_attribute_length) THEN
5204: l_valid_flag := 'N';
5205: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5206: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5207: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5208: 'Attribute'||i||' is too long');
5209: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5210: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5203: IF (l_valid_flag = 'Y' AND LENGTH(l_import_contracts_rec.attribute||i) > l_attribute_length) THEN
5204: l_valid_flag := 'N';
5205: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5206: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5207: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5208: 'Attribute'||i||' is too long');
5209: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5210: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5211: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5205: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_LONG_COMMENTS');
5206: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5207: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5208: 'Attribute'||i||' is too long');
5209: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5210: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5211: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5212: 'l_error_msg: '||l_error_msg);
5213: END IF;

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

5207: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5208: 'Attribute'||i||' is too long');
5209: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5210: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5211: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5212: 'l_error_msg: '||l_error_msg);
5213: END IF;
5214: END IF;
5215: END LOOP; */

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

5215: END LOOP; */
5216:
5217: --If l_valid_flag is already set to 'N', we do not perform any more checks
5218: --notify_contact_role_txt should resolve to valid contact role id
5219: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5220: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5221: 'Checking if notify role is valid');
5222: END IF;
5223: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.notify_contact_role_txt IS NOT NULL) THEN

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

5216:
5217: --If l_valid_flag is already set to 'N', we do not perform any more checks
5218: --notify_contact_role_txt should resolve to valid contact role id
5219: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5220: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5221: 'Checking if notify role is valid');
5222: END IF;
5223: IF (l_valid_flag = 'Y' AND l_import_contracts_rec.notify_contact_role_txt IS NOT NULL) THEN
5224: OPEN notify_role_csr(l_import_contracts_rec.notify_contact_role_txt);

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

5225: FETCH notify_role_csr INTO l_notify_contact_role_id;
5226: IF notify_role_csr%NOTFOUND THEN
5227: l_valid_flag := 'N';
5228: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_NOTIFY_ROLE');
5229: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5230: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5231: 'Overall Risk is invalid');
5232: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5233: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5226: IF notify_role_csr%NOTFOUND THEN
5227: l_valid_flag := 'N';
5228: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_NOTIFY_ROLE');
5229: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5230: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5231: 'Overall Risk is invalid');
5232: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5233: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5234: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5228: l_error_msg := fnd_message.get_string(G_APP_NAME,'OKC_REP_IMP_INV_NOTIFY_ROLE');
5229: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5230: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5231: 'Overall Risk is invalid');
5232: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5233: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5234: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5235: 'l_error_msg: '||l_error_msg);
5236: END IF;

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

5230: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5231: 'Overall Risk is invalid');
5232: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5233: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5234: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5235: 'l_error_msg: '||l_error_msg);
5236: END IF;
5237: END IF;
5238: CLOSE notify_role_csr;

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

5249: EXIT WHEN VALID_PARTIES_CSR%NOTFOUND;
5250:
5251: IF l_valid_parties_rec.valid_flag = 'N' THEN
5252: l_valid_flag := 'N';
5253: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5254: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5255: 'One of the contract parties is invalid');
5256: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5257: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5250:
5251: IF l_valid_parties_rec.valid_flag = 'N' THEN
5252: l_valid_flag := 'N';
5253: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5254: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5255: 'One of the contract parties is invalid');
5256: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5257: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5258: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5252: l_valid_flag := 'N';
5253: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5254: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5255: 'One of the contract parties is invalid');
5256: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5257: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5258: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5259: 'Party ID: '||l_valid_parties_rec.imp_party_id);
5260: END IF;

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

5254: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5255: 'One of the contract parties is invalid');
5256: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5257: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5258: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5259: 'Party ID: '||l_valid_parties_rec.imp_party_id);
5260: END IF;
5261: END IF;
5262: END LOOP;

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

5271: EXIT WHEN VALID_DOCUMENTS_CSR%NOTFOUND;
5272:
5273: IF l_valid_documents_rec.valid_flag = 'N' THEN
5274: l_valid_flag := 'N';
5275: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5276: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5277: 'One of the contract documents is invalid');
5278: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5279: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);

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

5272:
5273: IF l_valid_documents_rec.valid_flag = 'N' THEN
5274: l_valid_flag := 'N';
5275: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5276: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5277: 'One of the contract documents is invalid');
5278: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5279: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5280: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

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

5274: l_valid_flag := 'N';
5275: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5276: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5277: 'One of the contract documents is invalid');
5278: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5279: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5280: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5281: 'Document ID: '||l_valid_documents_rec.imp_document_id);
5282: END IF;

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

5276: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5277: 'One of the contract documents is invalid');
5278: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5279: 'Contract ID: '||l_import_contracts_rec.imp_contract_id);
5280: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
5281: 'Document ID: '||l_valid_documents_rec.imp_document_id);
5282: END IF;
5283: END IF;
5284: END LOOP;

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

5324:
5325:
5326: END IF;
5327:
5328: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5329: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5330: 'l_contract_id: '||l_contract_id);
5331: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5332: 'l_contract_number: '||l_contract_number);

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

5325:
5326: END IF;
5327:
5328: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5329: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5330: 'l_contract_id: '||l_contract_id);
5331: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5332: 'l_contract_number: '||l_contract_number);
5333: END IF;

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

5327:
5328: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5329: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5330: 'l_contract_id: '||l_contract_id);
5331: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5332: 'l_contract_number: '||l_contract_number);
5333: END IF;
5334:
5335: IF (l_valid_flag = 'Y') THEN

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

5372: END LOOP;
5373:
5374: CLOSE IMPORT_CONTRACTS_CSR;
5375:
5376: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5378: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
5379: END IF;
5380:

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

5373:
5374: CLOSE IMPORT_CONTRACTS_CSR;
5375:
5376: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5378: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
5379: END IF;
5380:
5381:

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

5434: IF VALID_DOCUMENTS_CSR%ISOPEN THEN
5435: CLOSE VALID_DOCUMENTS_CSR;
5436: END IF;
5437:
5438: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5439: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5440: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
5441: END IF;
5442:

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

5435: CLOSE VALID_DOCUMENTS_CSR;
5436: END IF;
5437:
5438: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5439: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5440: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
5441: END IF;
5442:
5443: x_return_status := FND_API.G_RET_STS_ERROR;

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

5496: IF VALID_DOCUMENTS_CSR%ISOPEN THEN
5497: CLOSE VALID_DOCUMENTS_CSR;
5498: END IF;
5499:
5500: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5501: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5502: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5503: END IF;
5504:

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

5497: CLOSE VALID_DOCUMENTS_CSR;
5498: END IF;
5499:
5500: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5501: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5502: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5503: END IF;
5504:
5505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

5560: CLOSE VALID_DOCUMENTS_CSR;
5561: END IF;
5562:
5563:
5564: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5565: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5566: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
5567: END IF;
5568:

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

5561: END IF;
5562:
5563:
5564: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5565: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
5566: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
5567: END IF;
5568:
5569: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

5671:
5672: -- Initialize API return status to success
5673: x_return_status := FND_API.G_RET_STS_SUCCESS;
5674:
5675: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5676: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5677: 'Inserting contracts into production table...');
5678: END IF;
5679:

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

5672: -- Initialize API return status to success
5673: x_return_status := FND_API.G_RET_STS_SUCCESS;
5674:
5675: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5676: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
5677: 'Inserting contracts into production table...');
5678: END IF;
5679:
5680: l_min_contract_id := 0;

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

6236: l_api_name CONSTANT VARCHAR2(30):='validate_contracts';
6237: l_api_version CONSTANT NUMBER := 1.0;
6238:
6239: BEGIN
6240: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6241: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6242: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
6243: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6244: 'p_run_id = ' || p_run_id);

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

6237: l_api_version CONSTANT NUMBER := 1.0;
6238:
6239: BEGIN
6240: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6241: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6242: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
6243: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6244: 'p_run_id = ' || p_run_id);
6245:

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

6239: BEGIN
6240: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6241: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6242: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
6243: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6244: 'p_run_id = ' || p_run_id);
6245:
6246: END IF;
6247:

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

6258: -- Initialize API return status to success
6259: x_return_status := FND_API.G_RET_STS_SUCCESS;
6260:
6261: --We need to validate documents and parties before we validate contract headers
6262: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6263: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6264: 'Validating Contract Documents...');
6265: END IF;
6266:

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

6259: x_return_status := FND_API.G_RET_STS_SUCCESS;
6260:
6261: --We need to validate documents and parties before we validate contract headers
6262: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6263: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6264: 'Validating Contract Documents...');
6265: END IF;
6266:
6267: validate_import_documents(p_api_version => 1.0,

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

6270: x_return_status => x_return_status,
6271: x_msg_count => x_msg_count,
6272: x_msg_data => x_msg_data);
6273:
6274: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6275: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6276: 'Validating Contract Parties...');
6277: END IF;
6278:

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

6271: x_msg_count => x_msg_count,
6272: x_msg_data => x_msg_data);
6273:
6274: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6275: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6276: 'Validating Contract Parties...');
6277: END IF;
6278:
6279: validate_import_parties(p_api_version => 1.0,

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

6283: x_msg_count => x_msg_count,
6284: x_msg_data => x_msg_data);
6285:
6286: --kkolukul:
6287: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6288: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6289: 'Validating Party Contacts...');
6290: END IF;
6291:

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

6284: x_msg_data => x_msg_data);
6285:
6286: --kkolukul:
6287: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6288: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6289: 'Validating Party Contacts...');
6290: END IF;
6291:
6292: validate_import_contacts(p_api_version => 1.0,

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

6295: x_return_status => x_return_status,
6296: x_msg_count => x_msg_count,
6297: x_msg_data => x_msg_data);
6298:
6299: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6300: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6301: 'Validating Contract risks...');
6302: END IF;
6303:

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

6296: x_msg_count => x_msg_count,
6297: x_msg_data => x_msg_data);
6298:
6299: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6300: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6301: 'Validating Contract risks...');
6302: END IF;
6303:
6304: validate_import_risks(p_api_version => 1.0,

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

6307: x_return_status => x_return_status,
6308: x_msg_count => x_msg_count,
6309: x_msg_data => x_msg_data);
6310:
6311: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6312: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6313: 'Validating Contract Headers...');
6314: END IF;
6315:

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

6308: x_msg_count => x_msg_count,
6309: x_msg_data => x_msg_data);
6310:
6311: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6312: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6313: 'Validating Contract Headers...');
6314: END IF;
6315:
6316: validate_import_contracts(p_api_version => 1.0,

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

6320: x_return_status => x_return_status,
6321: x_msg_count => x_msg_count,
6322: x_msg_data => x_msg_data);
6323:
6324: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6325: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6326: 'Finished validating Contracts. Now we will insert valid headers and parties into production tables.');
6327: END IF;
6328: IF p_validate_only = 'N' THEN

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

6321: x_msg_count => x_msg_count,
6322: x_msg_data => x_msg_data);
6323:
6324: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6325: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6326: 'Finished validating Contracts. Now we will insert valid headers and parties into production tables.');
6327: END IF;
6328: IF p_validate_only = 'N' THEN
6329:

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

6339: END IF;
6340:
6341: EXCEPTION
6342: WHEN FND_API.G_EXC_ERROR THEN
6343: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6344: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6345: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
6346: END IF;
6347:

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

6340:
6341: EXCEPTION
6342: WHEN FND_API.G_EXC_ERROR THEN
6343: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6344: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6345: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
6346: END IF;
6347:
6348: x_return_status := FND_API.G_RET_STS_ERROR;

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

6350: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6351: p_data => x_msg_data);
6352:
6353: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6354: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6355: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6356: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6357: END IF;
6358:

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

6351: p_data => x_msg_data);
6352:
6353: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6354: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6355: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6356: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6357: END IF;
6358:
6359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

6361: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6362: p_data => x_msg_data);
6363:
6364: WHEN OTHERS THEN
6365: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6366: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6367: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
6368: END IF;
6369:

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

6362: p_data => x_msg_data);
6363:
6364: WHEN OTHERS THEN
6365: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6366: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6367: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
6368: END IF;
6369:
6370: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

6439: BEGIN
6440:
6441: l_api_name := 'delete_import_contract';
6442:
6443: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6444: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6445: 'Entered OKC_REP_UTIL_PVT.delete_import_contract');
6446: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6447: 'p_contract_id = ' || p_contract_id);

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

6440:
6441: l_api_name := 'delete_import_contract';
6442:
6443: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6444: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6445: 'Entered OKC_REP_UTIL_PVT.delete_import_contract');
6446: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6447: 'p_contract_id = ' || p_contract_id);
6448: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6442:
6443: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6444: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6445: 'Entered OKC_REP_UTIL_PVT.delete_import_contract');
6446: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6447: 'p_contract_id = ' || p_contract_id);
6448: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6449: 'p_imp_document_id = ' || p_imp_document_id);
6450: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6444: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6445: 'Entered OKC_REP_UTIL_PVT.delete_import_contract');
6446: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6447: 'p_contract_id = ' || p_contract_id);
6448: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6449: 'p_imp_document_id = ' || p_imp_document_id);
6450: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6451: 'p_error_msg_txt = ' || p_error_msg_txt);
6452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6446: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6447: 'p_contract_id = ' || p_contract_id);
6448: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6449: 'p_imp_document_id = ' || p_imp_document_id);
6450: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6451: 'p_error_msg_txt = ' || p_error_msg_txt);
6452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6453: 'p_program_id = ' || p_program_id);
6454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6448: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6449: 'p_imp_document_id = ' || p_imp_document_id);
6450: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6451: 'p_error_msg_txt = ' || p_error_msg_txt);
6452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6453: 'p_program_id = ' || p_program_id);
6454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6455: 'p_program_login_id = ' || p_program_login_id);
6456: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6450: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6451: 'p_error_msg_txt = ' || p_error_msg_txt);
6452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6453: 'p_program_id = ' || p_program_id);
6454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6455: 'p_program_login_id = ' || p_program_login_id);
6456: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6457: 'p_program_app_id = ' || p_program_app_id);
6458: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

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

6452: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6453: 'p_program_id = ' || p_program_id);
6454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6455: 'p_program_login_id = ' || p_program_login_id);
6456: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6457: 'p_program_app_id = ' || p_program_app_id);
6458: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6459: 'p_run_id = ' || p_run_id);
6460:

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

6454: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6455: 'p_program_login_id = ' || p_program_login_id);
6456: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6457: 'p_program_app_id = ' || p_program_app_id);
6458: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6459: 'p_run_id = ' || p_run_id);
6460:
6461:
6462: END IF;

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

6484: x_msg_count => x_msg_count,
6485: x_return_status => x_return_status);
6486:
6487:
6488: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6489: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
6490: 'Called okc_rep_contract_process_pvt.delete_contract');
6491: END IF;
6492:

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

6485: x_return_status => x_return_status);
6486:
6487:
6488: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6489: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
6490: 'Called okc_rep_contract_process_pvt.delete_contract');
6491: END IF;
6492:
6493: -- Update valid_flag

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

6494: UPDATE OKC_REP_IMP_CONTRACTS_T
6495: SET valid_flag = 'N'
6496: WHERE CONTRACT_ID = p_contract_id;
6497:
6498: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6499: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
6500: 'Updated valid_flag to N');
6501: END IF;
6502:

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

6495: SET valid_flag = 'N'
6496: WHERE CONTRACT_ID = p_contract_id;
6497:
6498: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6499: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
6500: 'Updated valid_flag to N');
6501: END IF;
6502:
6503: -- Insert error message

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

6514: x_return_status => x_return_status,
6515: x_msg_count => x_msg_count,
6516: x_msg_data => x_msg_data);
6517:
6518: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6519: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
6520: 'Inserted error into okc_rep_imp_errors_t');
6521: END IF;
6522:

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

6515: x_msg_count => x_msg_count,
6516: x_msg_data => x_msg_data);
6517:
6518: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6519: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
6520: 'Inserted error into okc_rep_imp_errors_t');
6521: END IF;
6522:
6523:

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

6522:
6523:
6524: IF(p_commit = FND_API.G_TRUE) THEN
6525: COMMIT;
6526: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
6528: 'Committed transaction');
6529: END IF;
6530:

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

6523:
6524: IF(p_commit = FND_API.G_TRUE) THEN
6525: COMMIT;
6526: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT,G_MODULE||l_api_name,
6528: 'Committed transaction');
6529: END IF;
6530:
6531: END IF;

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

6530:
6531: END IF;
6532:
6533:
6534: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6535: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6536: 'Leaving OKC_REP_UTIL_PVT.delete_import_contract');
6537: END IF;
6538:

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

6531: END IF;
6532:
6533:
6534: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6535: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6536: 'Leaving OKC_REP_UTIL_PVT.delete_import_contract');
6537: END IF;
6538:
6539: EXCEPTION

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

6538:
6539: EXCEPTION
6540:
6541: WHEN FND_API.G_EXC_ERROR THEN
6542: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6543: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6544: 'Leaving delete_import_contract:FND_API.G_EXC_ERROR Exception');
6545: END IF;
6546:

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

6539: EXCEPTION
6540:
6541: WHEN FND_API.G_EXC_ERROR THEN
6542: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6543: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6544: 'Leaving delete_import_contract:FND_API.G_EXC_ERROR Exception');
6545: END IF;
6546:
6547: x_return_status := FND_API.G_RET_STS_ERROR;

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

6549: p_data => x_msg_data);
6550:
6551: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6552:
6553: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6554: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6555: 'Leaving delete_import_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6556: END IF;
6557:

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

6550:
6551: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6552:
6553: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6554: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6555: 'Leaving delete_import_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6556: END IF;
6557:
6558: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

6560: p_data => x_msg_data);
6561:
6562: WHEN OTHERS THEN
6563:
6564: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6565: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6566: 'Leaving delete_import_contract because of EXCEPTION: ' || sqlerrm);
6567: END IF;
6568:

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

6561:
6562: WHEN OTHERS THEN
6563:
6564: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6565: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
6566: 'Leaving delete_import_contract because of EXCEPTION: ' || sqlerrm);
6567: END IF;
6568:
6569: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

6605: BEGIN
6606:
6607: l_api_name := 'add_quotes';
6608:
6609: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6610: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6611: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6612: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6613: 'p_string is: ' || p_string);

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

6606:
6607: l_api_name := 'add_quotes';
6608:
6609: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6610: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6611: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6612: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6613: 'p_string is: ' || p_string);
6614: END IF;

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

6608:
6609: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6610: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6611: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6612: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6613: 'p_string is: ' || p_string);
6614: END IF;
6615:
6616: l_string := NULL;

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

6628: ELSE
6629: l_string := p_string;
6630: END IF;
6631:
6632: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6633: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6634: 'Leaving Function OKC_REP_UTIL_PVT.'||l_api_name);
6635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6636: 'l_string is: ' || l_string);

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

6629: l_string := p_string;
6630: END IF;
6631:
6632: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6633: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6634: 'Leaving Function OKC_REP_UTIL_PVT.'||l_api_name);
6635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6636: 'l_string is: ' || l_string);
6637: END IF;

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

6631:
6632: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6633: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6634: 'Leaving Function OKC_REP_UTIL_PVT.'||l_api_name);
6635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6636: 'l_string is: ' || l_string);
6637: END IF;
6638:
6639: return l_string;

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

6639: return l_string;
6640:
6641: EXCEPTION
6642: WHEN OTHERS THEN
6643: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6644: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6645: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6646: END IF;
6647: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

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

6640:
6641: EXCEPTION
6642: WHEN OTHERS THEN
6643: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6644: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6645: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6646: END IF;
6647: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6648: p_msg_name => G_UNEXPECTED_ERROR,

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

6752: BEGIN
6753:
6754: l_api_name := 'get_csv_error_string';
6755:
6756: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6757: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6758: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6760: 'p_imp_contract_id is: ' || p_imp_contract_id);

Line 6757: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

6753:
6754: l_api_name := 'get_csv_error_string';
6755:
6756: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6757: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6758: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6760: 'p_imp_contract_id is: ' || p_imp_contract_id);
6761: END IF;

Line 6759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

6755:
6756: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6757: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6758: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6759: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6760: 'p_imp_contract_id is: ' || p_imp_contract_id);
6761: END IF;
6762:
6763: --initialize l_csv_error_string

Line 6769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

6765:
6766: OPEN IMP_CONTRACT_CSR;
6767: FETCH IMP_CONTRACT_CSR INTO l_imp_contract_rec;
6768: IF IMP_CONTRACT_CSR%NOTFOUND THEN
6769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6770: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6771: 'p_imp_contract_id does not exist in okc_rep_imp_contracts_t: '||p_imp_contract_id);
6772: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6773: 'returning null');

Line 6770: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

6766: OPEN IMP_CONTRACT_CSR;
6767: FETCH IMP_CONTRACT_CSR INTO l_imp_contract_rec;
6768: IF IMP_CONTRACT_CSR%NOTFOUND THEN
6769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6770: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6771: 'p_imp_contract_id does not exist in okc_rep_imp_contracts_t: '||p_imp_contract_id);
6772: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6773: 'returning null');
6774: END IF;

Line 6772: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

6768: IF IMP_CONTRACT_CSR%NOTFOUND THEN
6769: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6770: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6771: 'p_imp_contract_id does not exist in okc_rep_imp_contracts_t: '||p_imp_contract_id);
6772: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6773: 'returning null');
6774: END IF;
6775: RETURN l_csv_error_string;
6776: END IF;

Line 6874: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

6870:
6871: l_csv_error_string := l_csv_error_string || FND_GLOBAL.Newline;
6872:
6873:
6874: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6875: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6876: 'Leaving Function '||l_api_name);
6877: END IF;
6878: RETURN l_csv_error_string;

Line 6875: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

6871: l_csv_error_string := l_csv_error_string || FND_GLOBAL.Newline;
6872:
6873:
6874: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6875: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6876: 'Leaving Function '||l_api_name);
6877: END IF;
6878: RETURN l_csv_error_string;
6879:

Line 6897: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

6893: IF (IMP_ERRORS_CSR%ISOPEN) THEN
6894: CLOSE IMP_ERRORS_CSR ;
6895: END IF;
6896:
6897: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6898: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6899: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6900: END IF;
6901: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 6898: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

6894: CLOSE IMP_ERRORS_CSR ;
6895: END IF;
6896:
6897: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6898: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6899: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6900: END IF;
6901: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6902: p_msg_name => G_UNEXPECTED_ERROR,

Line 6945: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

6941: BEGIN
6942:
6943: l_api_name := 'get_csv_header_string';
6944:
6945: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6946: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6947: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6948: END IF;
6949:

Line 6946: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

6942:
6943: l_api_name := 'get_csv_header_string';
6944:
6945: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6946: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6947: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6948: END IF;
6949:
6950: l_csv_header_string := NULL;

Line 6964: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

6960: --we need to remove the last ','
6961: l_csv_header_string := substr(l_csv_header_string,1, length(l_csv_header_string)-1);
6962: END IF;
6963:
6964: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6965: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6966: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6967: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6968: 'l_csv_header_string is: ' || l_csv_header_string);

Line 6965: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

6961: l_csv_header_string := substr(l_csv_header_string,1, length(l_csv_header_string)-1);
6962: END IF;
6963:
6964: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6965: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6966: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6967: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6968: 'l_csv_header_string is: ' || l_csv_header_string);
6969: END IF;

Line 6967: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

6963:
6964: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6965: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6966: 'Entered Function OKC_REP_UTIL_PVT.'||l_api_name);
6967: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
6968: 'l_csv_header_string is: ' || l_csv_header_string);
6969: END IF;
6970:
6971: RETURN l_csv_header_string;

Line 6980: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

6976: IF (CSV_HEADER_CSR%ISOPEN) THEN
6977: CLOSE CSV_HEADER_CSR ;
6978: END IF;
6979:
6980: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6981: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6982: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6983: END IF;
6984: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 6981: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

6977: CLOSE CSV_HEADER_CSR ;
6978: END IF;
6979:
6980: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6981: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
6982: 'Leaving Function '||l_api_name||' because of EXCEPTION: '||sqlerrm);
6983: END IF;
6984: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
6985: p_msg_name => G_UNEXPECTED_ERROR,

Line 7046: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7042: BEGIN
7043:
7044: l_api_name := 'get_vendor_userlist';
7045:
7046: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7047: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7048: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
7049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7050: 'p_document_id is: ' || to_char(p_document_id));

Line 7047: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7043:
7044: l_api_name := 'get_vendor_userlist';
7045:
7046: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7047: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7048: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
7049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7050: 'p_document_id is: ' || to_char(p_document_id));
7051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7045:
7046: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7047: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7048: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
7049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7050: 'p_document_id is: ' || to_char(p_document_id));
7051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7052: 'p_external_party_id is: ' || to_char(p_external_party_id));
7053: END IF;

Line 7051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7047: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7048: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
7049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7050: 'p_document_id is: ' || to_char(p_document_id));
7051: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7052: 'p_external_party_id is: ' || to_char(p_external_party_id));
7053: END IF;
7054:
7055: -- Standard call to check for call compatibility.

Line 7090: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7086:
7087: -- Standard call to get message count and if count is 1, get message info.
7088: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7089:
7090: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7091: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7092: 'Leaving OKC_REP_UTIL_PVT.get_vendor_userlist');
7093: END IF;
7094:

Line 7091: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7087: -- Standard call to get message count and if count is 1, get message info.
7088: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7089:
7090: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7091: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7092: 'Leaving OKC_REP_UTIL_PVT.get_vendor_userlist');
7093: END IF;
7094:
7095:

Line 7098: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7094:
7095:
7096: EXCEPTION
7097: WHEN FND_API.G_EXC_ERROR THEN
7098: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7099: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7100: g_module || l_api_name,
7101: 'Leaving get_vendor_userlist:FND_API.G_EXC_ERROR Exception');
7102: END IF;

Line 7099: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7095:
7096: EXCEPTION
7097: WHEN FND_API.G_EXC_ERROR THEN
7098: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7099: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7100: g_module || l_api_name,
7101: 'Leaving get_vendor_userlist:FND_API.G_EXC_ERROR Exception');
7102: END IF;
7103: --close cursor

Line 7117: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7113: p_data => x_msg_data
7114: );
7115:
7116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7117: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7118: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7119: g_module || l_api_name,
7120: 'Leaving get_vendor_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7121: END IF;

Line 7118: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7114: );
7115:
7116: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7117: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7118: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7119: g_module || l_api_name,
7120: 'Leaving get_vendor_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7121: END IF;
7122: --close cursor

Line 7136: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7132: p_data => x_msg_data
7133: );
7134:
7135: WHEN OTHERS THEN
7136: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7137: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7138: g_module || l_api_name,
7139: 'Leaving get_vendor_userlist because of EXCEPTION: ' || sqlerrm);
7140: END IF;

Line 7137: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7133: );
7134:
7135: WHEN OTHERS THEN
7136: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7137: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7138: g_module || l_api_name,
7139: 'Leaving get_vendor_userlist because of EXCEPTION: ' || sqlerrm);
7140: END IF;
7141: --close cursor

Line 7214: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7210: AND cp.contact_point_type = 'EMAIL';
7211: BEGIN
7212: l_api_name := 'get_customer_userlist';
7213:
7214: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7215: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7216: 'Entered OKC_REP_UTIL_PVT.get_customer_userlist');
7217: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7218: 'p_document_id is: ' || to_char(p_document_id));

Line 7215: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7211: BEGIN
7212: l_api_name := 'get_customer_userlist';
7213:
7214: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7215: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7216: 'Entered OKC_REP_UTIL_PVT.get_customer_userlist');
7217: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7218: 'p_document_id is: ' || to_char(p_document_id));
7219: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7217: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7213:
7214: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7215: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7216: 'Entered OKC_REP_UTIL_PVT.get_customer_userlist');
7217: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7218: 'p_document_id is: ' || to_char(p_document_id));
7219: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7220: 'p_external_party_id is: ' || to_char(p_external_party_id));
7221: END IF;

Line 7219: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7215: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7216: 'Entered OKC_REP_UTIL_PVT.get_customer_userlist');
7217: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7218: 'p_document_id is: ' || to_char(p_document_id));
7219: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7220: 'p_external_party_id is: ' || to_char(p_external_party_id));
7221: END IF;
7222:
7223: -- Standard call to check for call compatibility.

Line 7257: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7253:
7254: -- Standard call to get message count and if count is 1, get message info.
7255: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7256:
7257: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7258: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7259: 'Leaving OKC_REP_UTIL_PVT.get_customer_userlist');
7260: END IF;
7261:

Line 7258: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7254: -- Standard call to get message count and if count is 1, get message info.
7255: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7256:
7257: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7258: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7259: 'Leaving OKC_REP_UTIL_PVT.get_customer_userlist');
7260: END IF;
7261:
7262:

Line 7265: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7261:
7262:
7263: EXCEPTION
7264: WHEN FND_API.G_EXC_ERROR THEN
7265: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7266: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7267: g_module || l_api_name,
7268: 'Leaving get_customer_userlist:FND_API.G_EXC_ERROR Exception');
7269: END IF;

Line 7266: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7262:
7263: EXCEPTION
7264: WHEN FND_API.G_EXC_ERROR THEN
7265: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7266: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7267: g_module || l_api_name,
7268: 'Leaving get_customer_userlist:FND_API.G_EXC_ERROR Exception');
7269: END IF;
7270: IF (tca_contact_csr%ISOPEN) THEN

Line 7283: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7279: p_data => x_msg_data
7280: );
7281:
7282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7283: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7284: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7285: g_module || l_api_name,
7286: 'Leaving get_customer_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7287: END IF;

Line 7284: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7280: );
7281:
7282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7283: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7284: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7285: g_module || l_api_name,
7286: 'Leaving get_customer_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7287: END IF;
7288: IF (tca_contact_csr%ISOPEN) THEN

Line 7301: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7297: p_data => x_msg_data
7298: );
7299:
7300: WHEN OTHERS THEN
7301: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7302: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7303: g_module || l_api_name,
7304: 'Leaving get_customer_userlist because of EXCEPTION: ' || sqlerrm);
7305: END IF;

Line 7302: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7298: );
7299:
7300: WHEN OTHERS THEN
7301: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7302: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7303: g_module || l_api_name,
7304: 'Leaving get_customer_userlist because of EXCEPTION: ' || sqlerrm);
7305: END IF;
7306: IF (tca_contact_csr%ISOPEN) THEN

Line 7368: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7364: BEGIN
7365:
7366: l_api_name := 'get_external_userlist';
7367:
7368: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7369: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7370: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
7371: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7372: 'p_document_id is: ' || to_char(p_document_id));

Line 7369: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7365:
7366: l_api_name := 'get_external_userlist';
7367:
7368: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7369: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7370: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
7371: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7372: 'p_document_id is: ' || to_char(p_document_id));
7373: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7371: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7367:
7368: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7369: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7370: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
7371: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7372: 'p_document_id is: ' || to_char(p_document_id));
7373: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7374: 'p_document_type is: ' || to_char(p_document_type));
7375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7373: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7369: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7370: 'Entered OKC_REP_UTIL_PVT.get_external_userlist');
7371: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7372: 'p_document_id is: ' || to_char(p_document_id));
7373: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7374: 'p_document_type is: ' || to_char(p_document_type));
7375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7376: 'p_external_party_id is: ' || to_char(p_external_party_id));
7377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7371: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7372: 'p_document_id is: ' || to_char(p_document_id));
7373: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7374: 'p_document_type is: ' || to_char(p_document_type));
7375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7376: 'p_external_party_id is: ' || to_char(p_external_party_id));
7377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7378: 'p_external_party_role is: ' || to_char(p_external_party_role));
7379: END IF;

Line 7377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7373: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7374: 'p_document_type is: ' || to_char(p_document_type));
7375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7376: 'p_external_party_id is: ' || to_char(p_external_party_id));
7377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7378: 'p_external_party_role is: ' || to_char(p_external_party_role));
7379: END IF;
7380:
7381: -- Standard call to check for call compatibility.

Line 7419: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7415:
7416: -- Standard call to get message count and if count is 1, get message info.
7417: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7418:
7419: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7420: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7421: 'Leaving OKC_REP_UTIL_PVT.get_external_userlist');
7422: END IF;
7423:

Line 7420: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7416: -- Standard call to get message count and if count is 1, get message info.
7417: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7418:
7419: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7420: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7421: 'Leaving OKC_REP_UTIL_PVT.get_external_userlist');
7422: END IF;
7423:
7424:

Line 7427: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7423:
7424:
7425: EXCEPTION
7426: WHEN FND_API.G_EXC_ERROR THEN
7427: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7428: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7429: g_module || l_api_name,
7430: 'Leaving get_external_userlist:FND_API.G_EXC_ERROR Exception');
7431: END IF;

Line 7428: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7424:
7425: EXCEPTION
7426: WHEN FND_API.G_EXC_ERROR THEN
7427: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7428: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7429: g_module || l_api_name,
7430: 'Leaving get_external_userlist:FND_API.G_EXC_ERROR Exception');
7431: END IF;
7432: x_return_status := FND_API.G_RET_STS_ERROR;

Line 7439: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7435: p_data => x_msg_data
7436: );
7437:
7438: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7439: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7440: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7441: g_module || l_api_name,
7442: 'Leaving get_external_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7443: END IF;

Line 7440: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7436: );
7437:
7438: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7439: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7440: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7441: g_module || l_api_name,
7442: 'Leaving get_external_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7443: END IF;
7444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 7451: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7447: p_data => x_msg_data
7448: );
7449:
7450: WHEN OTHERS THEN
7451: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7452: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7453: g_module || l_api_name,
7454: 'Leaving get_external_userlist because of EXCEPTION: ' || sqlerrm);
7455: END IF;

Line 7452: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,

7448: );
7449:
7450: WHEN OTHERS THEN
7451: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7452: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
7453: g_module || l_api_name,
7454: 'Leaving get_external_userlist because of EXCEPTION: ' || sqlerrm);
7455: END IF;
7456: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 7520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7516:
7517:
7518: BEGIN
7519:
7520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7522: 'Entered OKC_REP_WF_PVT.ok_to_commit');
7523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7524: 'p_doc_id = ' || p_doc_id);

Line 7521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7517:
7518: BEGIN
7519:
7520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7522: 'Entered OKC_REP_WF_PVT.ok_to_commit');
7523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7524: 'p_doc_id = ' || p_doc_id);
7525: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7519:
7520: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7522: 'Entered OKC_REP_WF_PVT.ok_to_commit');
7523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7524: 'p_doc_id = ' || p_doc_id);
7525: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7526: 'p_validation_string = ' || p_validation_string);
7527: END IF;

Line 7525: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7521: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7522: 'Entered OKC_REP_WF_PVT.ok_to_commit');
7523: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7524: 'p_doc_id = ' || p_doc_id);
7525: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7526: 'p_validation_string = ' || p_validation_string);
7527: END IF;
7528:
7529: l_api_version := 1.0;

Line 7553: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7549: IF (p_validation_string is NULL) THEN
7550: OPEN l_contract_exist_csr;
7551: FETCH l_contract_exist_csr INTO l_temp;
7552: IF (l_contract_exist_csr%NOTFOUND) THEN
7553: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7555: 'Contract not found');
7556: END IF;
7557: l_ok_to_commit := FND_API.G_FALSE;

Line 7554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

7550: OPEN l_contract_exist_csr;
7551: FETCH l_contract_exist_csr INTO l_temp;
7552: IF (l_contract_exist_csr%NOTFOUND) THEN
7553: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7554: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7555: 'Contract not found');
7556: END IF;
7557: l_ok_to_commit := FND_API.G_FALSE;
7558: CLOSE l_contract_exist_csr;

Line 7573: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7569: ELSE
7570: OPEN l_contract_updatable_csr;
7571: FETCH l_contract_updatable_csr INTO l_temp;
7572: IF (l_contract_updatable_csr%NOTFOUND) THEN
7573: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7575: 'Contract not found');
7576: END IF;
7577: l_ok_to_commit := FND_API.G_FALSE;

Line 7574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

7570: OPEN l_contract_updatable_csr;
7571: FETCH l_contract_updatable_csr INTO l_temp;
7572: IF (l_contract_updatable_csr%NOTFOUND) THEN
7573: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7575: 'Contract not found');
7576: END IF;
7577: l_ok_to_commit := FND_API.G_FALSE;
7578: CLOSE l_contract_updatable_csr;

Line 7592: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7588: END IF; -- (l_contract_updatable_csr%NOTFOUND)
7589: END IF; -- (p_validation_string is NULL)
7590: -- Standard call to get message count and if count is 1, get message info.
7591: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7592: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7593: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7594: '110: Leaving OKC_REP_UTIL_PVT.ok_to_commit');
7595: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7596: '111: Output is: ' || l_ok_to_commit);

Line 7593: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

7589: END IF; -- (p_validation_string is NULL)
7590: -- Standard call to get message count and if count is 1, get message info.
7591: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7592: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7593: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7594: '110: Leaving OKC_REP_UTIL_PVT.ok_to_commit');
7595: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7596: '111: Output is: ' || l_ok_to_commit);
7597: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7595: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7591: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7592: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7593: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7594: '110: Leaving OKC_REP_UTIL_PVT.ok_to_commit');
7595: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7596: '111: Output is: ' || l_ok_to_commit);
7597: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7598: '112: x_return_status is: ' || x_return_status);
7599: END IF;

Line 7597: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7593: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7594: '110: Leaving OKC_REP_UTIL_PVT.ok_to_commit');
7595: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7596: '111: Output is: ' || l_ok_to_commit);
7597: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7598: '112: x_return_status is: ' || x_return_status);
7599: END IF;
7600: return l_ok_to_commit;
7601: EXCEPTION

Line 7604: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7600: return l_ok_to_commit;
7601: EXCEPTION
7602:
7603: WHEN OTHERS THEN
7604: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7605: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7606: 'Leaving Function ok_to_commit because of EXCEPTION: '||sqlerrm);
7607: END IF;
7608:

Line 7605: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

7601: EXCEPTION
7602:
7603: WHEN OTHERS THEN
7604: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7605: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7606: 'Leaving Function ok_to_commit because of EXCEPTION: '||sqlerrm);
7607: END IF;
7608:
7609: IF (l_contract_exist_csr%ISOPEN) THEN

Line 7652: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7648: l_api_name := 'purge_recent_contracts';
7649:
7650: retcode := G_RETURN_CODE_ERROR;
7651:
7652: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7653: FND_LOG.STRING(
7654: FND_LOG.LEVEL_PROCEDURE,
7655: G_MODULE||l_api_name,
7656: 'Entering OKC_REP_UTIL_PVT.purge_recent_contracts');

Line 7653: FND_LOG.STRING(

7649:
7650: retcode := G_RETURN_CODE_ERROR;
7651:
7652: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7653: FND_LOG.STRING(
7654: FND_LOG.LEVEL_PROCEDURE,
7655: G_MODULE||l_api_name,
7656: 'Entering OKC_REP_UTIL_PVT.purge_recent_contracts');
7657: END IF;

Line 7654: FND_LOG.LEVEL_PROCEDURE,

7650: retcode := G_RETURN_CODE_ERROR;
7651:
7652: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7653: FND_LOG.STRING(
7654: FND_LOG.LEVEL_PROCEDURE,
7655: G_MODULE||l_api_name,
7656: 'Entering OKC_REP_UTIL_PVT.purge_recent_contracts');
7657: END IF;
7658:

Line 7662: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7658:
7659: DELETE FROM okc_rep_recent_contracts c
7660: WHERE c.last_visited_date < SYSDATE - p_num_days;
7661:
7662: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7663: FND_LOG.STRING(
7664: FND_LOG.LEVEL_PROCEDURE,
7665: G_MODULE||l_api_name,
7666: 'Leaving OKC_REP_UTIL_PVT.purge_recent_contracts');

Line 7663: FND_LOG.STRING(

7659: DELETE FROM okc_rep_recent_contracts c
7660: WHERE c.last_visited_date < SYSDATE - p_num_days;
7661:
7662: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7663: FND_LOG.STRING(
7664: FND_LOG.LEVEL_PROCEDURE,
7665: G_MODULE||l_api_name,
7666: 'Leaving OKC_REP_UTIL_PVT.purge_recent_contracts');
7667: END IF;

Line 7664: FND_LOG.LEVEL_PROCEDURE,

7660: WHERE c.last_visited_date < SYSDATE - p_num_days;
7661:
7662: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7663: FND_LOG.STRING(
7664: FND_LOG.LEVEL_PROCEDURE,
7665: G_MODULE||l_api_name,
7666: 'Leaving OKC_REP_UTIL_PVT.purge_recent_contracts');
7667: END IF;
7668:

Line 7673: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7669: retcode := G_RETURN_CODE_SUCCESS;
7670:
7671: EXCEPTION
7672: WHEN OTHERS THEN
7673: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7674: fnd_log.string(
7675: FND_LOG.LEVEL_EXCEPTION,
7676: G_MODULE || l_api_name,
7677: 'Leaving purge_recent_contracts because of EXCEPTION: ' || SQLERRM);

Line 7674: fnd_log.string(

7670:
7671: EXCEPTION
7672: WHEN OTHERS THEN
7673: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7674: fnd_log.string(
7675: FND_LOG.LEVEL_EXCEPTION,
7676: G_MODULE || l_api_name,
7677: 'Leaving purge_recent_contracts because of EXCEPTION: ' || SQLERRM);
7678: errbuf := substr(SQLERRM, 1, 200);

Line 7675: FND_LOG.LEVEL_EXCEPTION,

7671: EXCEPTION
7672: WHEN OTHERS THEN
7673: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7674: fnd_log.string(
7675: FND_LOG.LEVEL_EXCEPTION,
7676: G_MODULE || l_api_name,
7677: 'Leaving purge_recent_contracts because of EXCEPTION: ' || SQLERRM);
7678: errbuf := substr(SQLERRM, 1, 200);
7679: END IF;

Line 7702: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7698:
7699: l_api_name := 'can_update';
7700: l_can_update := 'N';
7701:
7702: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7703: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7704: 'Entered Function OKC_REP_UTIL_PVT.can_update');
7705: END IF;
7706:

Line 7703: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7699: l_api_name := 'can_update';
7700: l_can_update := 'N';
7701:
7702: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7703: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7704: 'Entered Function OKC_REP_UTIL_PVT.can_update');
7705: END IF;
7706:
7707: IF FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y') OR FND_FUNCTION.TEST(G_FUNC_OKC_REP_USER_FUNC,'Y') THEN

Line 7711: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7707: IF FND_FUNCTION.TEST(G_FUNC_OKC_REP_ADMINISTRATOR,'Y') OR FND_FUNCTION.TEST(G_FUNC_OKC_REP_USER_FUNC,'Y') THEN
7708: l_can_update := 'Y';
7709: END IF;
7710:
7711: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7712: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7713: 'OKC_REP_UTIL_PVT.check_contract_access returns l_can_update as : '
7714: || l_can_update);
7715: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 7712: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

7708: l_can_update := 'Y';
7709: END IF;
7710:
7711: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7712: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7713: 'OKC_REP_UTIL_PVT.check_contract_access returns l_can_update as : '
7714: || l_can_update);
7715: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7716: 'Leaving Function l_can_update');

Line 7715: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

7711: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7712: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7713: 'OKC_REP_UTIL_PVT.check_contract_access returns l_can_update as : '
7714: || l_can_update);
7715: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7716: 'Leaving Function l_can_update');
7717: END IF;
7718: RETURN l_can_update;
7719:

Line 7722: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7718: RETURN l_can_update;
7719:
7720: EXCEPTION
7721: WHEN OTHERS THEN
7722: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7723: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7724: 'Leaving Function can_update because of EXCEPTION: '||sqlerrm);
7725: END IF;
7726: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 7723: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

7719:
7720: EXCEPTION
7721: WHEN OTHERS THEN
7722: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7723: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7724: 'Leaving Function can_update because of EXCEPTION: '||sqlerrm);
7725: END IF;
7726: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
7727: p_msg_name => G_UNEXPECTED_ERROR,

Line 7756: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7752:
7753: l_api_name := 'is_sales_workbench';
7754: l_is_sales_workbench := 'N';
7755:
7756: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7757: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7758: 'Entered Function OKC_REP_UTIL_PVT.is_sales_workbench');
7759: END IF;
7760:

Line 7757: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7753: l_api_name := 'is_sales_workbench';
7754: l_is_sales_workbench := 'N';
7755:
7756: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7757: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7758: 'Entered Function OKC_REP_UTIL_PVT.is_sales_workbench');
7759: END IF;
7760:
7761: IF FND_FUNCTION.TEST(G_FUNC_OKC_REP_SALES_WB_USER,'Y') THEN

Line 7765: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7761: IF FND_FUNCTION.TEST(G_FUNC_OKC_REP_SALES_WB_USER,'Y') THEN
7762: l_is_sales_workbench := 'Y';
7763: END IF;
7764:
7765: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7766: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7767: 'OKC_REP_UTIL_PVT.is_sales_workbench returns l_is_sales_workbench as : '
7768: || l_is_sales_workbench);
7769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 7766: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

7762: l_is_sales_workbench := 'Y';
7763: END IF;
7764:
7765: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7766: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7767: 'OKC_REP_UTIL_PVT.is_sales_workbench returns l_is_sales_workbench as : '
7768: || l_is_sales_workbench);
7769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7770: 'Leaving Function is_sales_workbench');

Line 7769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

7765: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7766: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7767: 'OKC_REP_UTIL_PVT.is_sales_workbench returns l_is_sales_workbench as : '
7768: || l_is_sales_workbench);
7769: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7770: 'Leaving Function is_sales_workbench');
7771: END IF;
7772:
7773: RETURN l_is_sales_workbench;

Line 7777: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7773: RETURN l_is_sales_workbench;
7774:
7775: EXCEPTION
7776: WHEN OTHERS THEN
7777: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7778: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7779: 'Leaving Function is_sales_workbench because of EXCEPTION: '||sqlerrm);
7780: END IF;
7781: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 7778: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

7774:
7775: EXCEPTION
7776: WHEN OTHERS THEN
7777: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7778: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
7779: 'Leaving Function is_sales_workbench because of EXCEPTION: '||sqlerrm);
7780: END IF;
7781: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
7782: p_msg_name => G_UNEXPECTED_ERROR,

Line 7856: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7852: /* Bug 8721411 */
7853: BEGIN
7854: l_api_name := 'insert_new_vendor_contact';
7855:
7856: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7857: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7858: 'Entering OKC_REP_UTIL_PVT.insert_new_vendor_contact');
7859: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7860: 'p_vendor_site_id: ' || p_vendor_site_id);

Line 7857: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

7853: BEGIN
7854: l_api_name := 'insert_new_vendor_contact';
7855:
7856: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7857: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7858: 'Entering OKC_REP_UTIL_PVT.insert_new_vendor_contact');
7859: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7860: 'p_vendor_site_id: ' || p_vendor_site_id);
7861: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7859: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7855:
7856: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7857: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7858: 'Entering OKC_REP_UTIL_PVT.insert_new_vendor_contact');
7859: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7860: 'p_vendor_site_id: ' || p_vendor_site_id);
7861: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7862: 'p_contract_id: ' || p_contract_id);
7863: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7861: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7857: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7858: 'Entering OKC_REP_UTIL_PVT.insert_new_vendor_contact');
7859: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7860: 'p_vendor_site_id: ' || p_vendor_site_id);
7861: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7862: 'p_contract_id: ' || p_contract_id);
7863: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7864: 'p_first_name: ' || p_first_name);
7865: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7863: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7859: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7860: 'p_vendor_site_id: ' || p_vendor_site_id);
7861: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7862: 'p_contract_id: ' || p_contract_id);
7863: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7864: 'p_first_name: ' || p_first_name);
7865: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7866: 'p_last_name: ' || p_last_name);
7867: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7865: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7861: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7862: 'p_contract_id: ' || p_contract_id);
7863: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7864: 'p_first_name: ' || p_first_name);
7865: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7866: 'p_last_name: ' || p_last_name);
7867: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7868: 'p_area_code: ' || p_area_code);
7869: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7867: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7863: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7864: 'p_first_name: ' || p_first_name);
7865: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7866: 'p_last_name: ' || p_last_name);
7867: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7868: 'p_area_code: ' || p_area_code);
7869: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7870: 'p_phone: ' || p_phone);
7871: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 7869: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7865: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7866: 'p_last_name: ' || p_last_name);
7867: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7868: 'p_area_code: ' || p_area_code);
7869: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7870: 'p_phone: ' || p_phone);
7871: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7872: 'p_email_address: ' || p_email_address);
7873: END IF;

Line 7871: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

7867: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7868: 'p_area_code: ' || p_area_code);
7869: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7870: 'p_phone: ' || p_phone);
7871: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7872: 'p_email_address: ' || p_email_address);
7873: END IF;
7874:
7875: -- Populate the record structure required by AP API

Line 7876: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7872: 'p_email_address: ' || p_email_address);
7873: END IF;
7874:
7875: -- Populate the record structure required by AP API
7876: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7877: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7878: 'Populate the record structure required by AP API');
7879: END IF;
7880:

Line 7877: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

7873: END IF;
7874:
7875: -- Populate the record structure required by AP API
7876: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7877: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7878: 'Populate the record structure required by AP API');
7879: END IF;
7880:
7881: OPEN contract_org_csr;

Line 7911: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7907:
7908: /* Bug 8721411 */
7909:
7910: -- Call the API to create a vendor contact
7911: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7912: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7913: 'Before calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7914: END IF;
7915:

Line 7912: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

7908: /* Bug 8721411 */
7909:
7910: -- Call the API to create a vendor contact
7911: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7912: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7913: 'Before calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7914: END IF;
7915:
7916: -- Call AP API to create a vendor contact as per user entered information

Line 7931: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7927: x_rel_id => l_rel_id,
7928: x_org_contact_id => l_org_contact_id,
7929: x_party_site_id => l_party_site_id);
7930:
7931: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7932: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7933: 'After calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7934: END IF;
7935:

Line 7932: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

7928: x_org_contact_id => l_org_contact_id,
7929: x_party_site_id => l_party_site_id);
7930:
7931: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7932: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7933: 'After calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7934: END IF;
7935:
7936: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 7936: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7932: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
7933: 'After calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7934: END IF;
7935:
7936: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7937: FND_LOG.STRING(
7938: FND_LOG.LEVEL_PROCEDURE,
7939: G_MODULE||l_api_name,
7940: 'Leaving OKC_REP_UTIL_PVT.insert_new_vendor_contact');

Line 7937: FND_LOG.STRING(

7933: 'After calling AP_VENDOR_PUB_PKG.create_vendor_contact()');
7934: END IF;
7935:
7936: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7937: FND_LOG.STRING(
7938: FND_LOG.LEVEL_PROCEDURE,
7939: G_MODULE||l_api_name,
7940: 'Leaving OKC_REP_UTIL_PVT.insert_new_vendor_contact');
7941: END IF;

Line 7938: FND_LOG.LEVEL_PROCEDURE,

7934: END IF;
7935:
7936: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7937: FND_LOG.STRING(
7938: FND_LOG.LEVEL_PROCEDURE,
7939: G_MODULE||l_api_name,
7940: 'Leaving OKC_REP_UTIL_PVT.insert_new_vendor_contact');
7941: END IF;
7942:

Line 7945: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

7941: END IF;
7942:
7943: EXCEPTION
7944: WHEN OTHERS THEN
7945: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7946: fnd_log.string(
7947: FND_LOG.LEVEL_EXCEPTION,
7948: G_MODULE || l_api_name,
7949: 'Leaving insert_new_vendor_contact because of EXCEPTION: ' || SQLERRM);

Line 7946: fnd_log.string(

7942:
7943: EXCEPTION
7944: WHEN OTHERS THEN
7945: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7946: fnd_log.string(
7947: FND_LOG.LEVEL_EXCEPTION,
7948: G_MODULE || l_api_name,
7949: 'Leaving insert_new_vendor_contact because of EXCEPTION: ' || SQLERRM);
7950: END IF;

Line 7947: FND_LOG.LEVEL_EXCEPTION,

7943: EXCEPTION
7944: WHEN OTHERS THEN
7945: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7946: fnd_log.string(
7947: FND_LOG.LEVEL_EXCEPTION,
7948: G_MODULE || l_api_name,
7949: 'Leaving insert_new_vendor_contact because of EXCEPTION: ' || SQLERRM);
7950: END IF;
7951:

Line 8016: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8012:
8013: -- Initialize API return status to success
8014: x_return_status := FND_API.G_RET_STS_SUCCESS;
8015:
8016: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8017: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
8018: 'Entering OKC_REP_UTIL_PVT.sync_con_header_attributes');
8019: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8020: 'p_contract_id: ' || p_contract_id);

Line 8017: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,

8013: -- Initialize API return status to success
8014: x_return_status := FND_API.G_RET_STS_SUCCESS;
8015:
8016: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8017: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
8018: 'Entering OKC_REP_UTIL_PVT.sync_con_header_attributes');
8019: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8020: 'p_contract_id: ' || p_contract_id);
8021: END IF;

Line 8019: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8015:
8016: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8017: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
8018: 'Entering OKC_REP_UTIL_PVT.sync_con_header_attributes');
8019: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8020: 'p_contract_id: ' || p_contract_id);
8021: END IF;
8022:
8023: OPEN contract_attribs_csr;

Line 8027: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8023: OPEN contract_attribs_csr;
8024: FETCH contract_attribs_csr INTO l_desc, l_use_acl_flag, l_expire_ntf_flag, l_expire_ntf_period, l_ntf_contact_role_id;
8025: CLOSE contract_attribs_csr;
8026:
8027: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8028: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8029: 'l_desc : ' || l_desc);
8030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8031: 'l_use_acl_flag : ' || l_use_acl_flag);

Line 8028: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8024: FETCH contract_attribs_csr INTO l_desc, l_use_acl_flag, l_expire_ntf_flag, l_expire_ntf_period, l_ntf_contact_role_id;
8025: CLOSE contract_attribs_csr;
8026:
8027: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8028: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8029: 'l_desc : ' || l_desc);
8030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8031: 'l_use_acl_flag : ' || l_use_acl_flag);
8032: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8026:
8027: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8028: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8029: 'l_desc : ' || l_desc);
8030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8031: 'l_use_acl_flag : ' || l_use_acl_flag);
8032: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8033: 'l_expire_ntf_flag : ' || l_expire_ntf_flag);
8034: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8032: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8028: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8029: 'l_desc : ' || l_desc);
8030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8031: 'l_use_acl_flag : ' || l_use_acl_flag);
8032: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8033: 'l_expire_ntf_flag : ' || l_expire_ntf_flag);
8034: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8035: 'l_expire_ntf_period : ' || l_expire_ntf_period);
8036: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8034: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8030: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8031: 'l_use_acl_flag : ' || l_use_acl_flag);
8032: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8033: 'l_expire_ntf_flag : ' || l_expire_ntf_flag);
8034: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8035: 'l_expire_ntf_period : ' || l_expire_ntf_period);
8036: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8037: 'l_ntf_contact_role_id : ' || l_ntf_contact_role_id);
8038: END IF;

Line 8036: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8032: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8033: 'l_expire_ntf_flag : ' || l_expire_ntf_flag);
8034: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8035: 'l_expire_ntf_period : ' || l_expire_ntf_period);
8036: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8037: 'l_ntf_contact_role_id : ' || l_ntf_contact_role_id);
8038: END IF;
8039:
8040: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 8040: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8036: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8037: 'l_ntf_contact_role_id : ' || l_ntf_contact_role_id);
8038: END IF;
8039:
8040: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8041: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8042: 'Updating Archived versions of Contract with new Contract header attribute values');
8043: END IF;
8044:

Line 8041: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8037: 'l_ntf_contact_role_id : ' || l_ntf_contact_role_id);
8038: END IF;
8039:
8040: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8041: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8042: 'Updating Archived versions of Contract with new Contract header attribute values');
8043: END IF;
8044:
8045: -- Update all the rows in archived contract versions table with new contract header details

Line 8059: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8055:
8056: -- Standard call to get message count and if count is 1, get message info.
8057: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
8058:
8059: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8060: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8061: 'Leaving OKC_REP_UTIL_PVT.sync_con_header_attributes');
8062: END IF;
8063:

Line 8060: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8056: -- Standard call to get message count and if count is 1, get message info.
8057: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
8058:
8059: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8060: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8061: 'Leaving OKC_REP_UTIL_PVT.sync_con_header_attributes');
8062: END IF;
8063:
8064: EXCEPTION

Line 8066: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8062: END IF;
8063:
8064: EXCEPTION
8065: WHEN OTHERS THEN
8066: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8067: fnd_log.string(
8068: FND_LOG.LEVEL_EXCEPTION,
8069: G_MODULE || l_api_name,
8070: 'Leaving sync_con_header_attributes because of EXCEPTION: ' || SQLERRM);

Line 8067: fnd_log.string(

8063:
8064: EXCEPTION
8065: WHEN OTHERS THEN
8066: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8067: fnd_log.string(
8068: FND_LOG.LEVEL_EXCEPTION,
8069: G_MODULE || l_api_name,
8070: 'Leaving sync_con_header_attributes because of EXCEPTION: ' || SQLERRM);
8071: END IF;

Line 8068: FND_LOG.LEVEL_EXCEPTION,

8064: EXCEPTION
8065: WHEN OTHERS THEN
8066: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8067: fnd_log.string(
8068: FND_LOG.LEVEL_EXCEPTION,
8069: G_MODULE || l_api_name,
8070: 'Leaving sync_con_header_attributes because of EXCEPTION: ' || SQLERRM);
8071: END IF;
8072:

Line 8138: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8134:
8135: EXCEPTION
8136: WHEN OTHERS THEN
8137:
8138: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8139: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
8140: g_module || 'check_contract_doc_access.exception',
8141: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
8142: END IF;

Line 8139: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,

8135: EXCEPTION
8136: WHEN OTHERS THEN
8137:
8138: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8139: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
8140: g_module || 'check_contract_doc_access.exception',
8141: '117: Leaving check_contract_access because of EXCEPTION: ' || sqlerrm);
8142: END IF;
8143: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 8168: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8164:
8165: l_api_name := 'get_accessible_ous';
8166:
8167:
8168: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8169: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8170: 'Entered Function OKC_REP_UTIL_PVT.get_accessible_ous');
8171: END IF;
8172:

Line 8169: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8165: l_api_name := 'get_accessible_ous';
8166:
8167:
8168: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8169: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8170: 'Entered Function OKC_REP_UTIL_PVT.get_accessible_ous');
8171: END IF;
8172:
8173: l_ou_tab := MO_GLOBAL.get_ou_tab;

Line 8191: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8187: END LOOP;
8188:
8189: END IF;
8190:
8191: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8192: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8193: 'OKC_REP_UTIL_PVT.get_accessible_ous returns l_ou_list as : '
8194: || l_ou_list);
8195: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8192: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8188:
8189: END IF;
8190:
8191: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8192: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8193: 'OKC_REP_UTIL_PVT.get_accessible_ous returns l_ou_list as : '
8194: || l_ou_list);
8195: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8196: 'Leaving Function get_accessible_ous');

Line 8195: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8191: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8192: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8193: 'OKC_REP_UTIL_PVT.get_accessible_ous returns l_ou_list as : '
8194: || l_ou_list);
8195: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8196: 'Leaving Function get_accessible_ous');
8197: END IF;
8198: RETURN l_ou_list;
8199:

Line 8202: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8198: RETURN l_ou_list;
8199:
8200: EXCEPTION
8201: WHEN OTHERS THEN
8202: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8203: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
8204: 'Leaving Function get_accessible_ous because of EXCEPTION: '||sqlerrm);
8205: END IF;
8206: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 8203: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

8199:
8200: EXCEPTION
8201: WHEN OTHERS THEN
8202: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8203: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
8204: 'Leaving Function get_accessible_ous because of EXCEPTION: '||sqlerrm);
8205: END IF;
8206: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
8207: p_msg_name => G_UNEXPECTED_ERROR,

Line 8244: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8240: BEGIN
8241:
8242: l_api_name := 'get_quote_access';
8243:
8244: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8245: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8246: 'Entered Function OKC_REP_UTIL_PVT.get_quote_access');
8247: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8248: 'Resource Id is: ' || p_resource_id);

Line 8245: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8241:
8242: l_api_name := 'get_quote_access';
8243:
8244: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8245: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8246: 'Entered Function OKC_REP_UTIL_PVT.get_quote_access');
8247: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8248: 'Resource Id is: ' || p_resource_id);
8249: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

Line 8247: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8243:
8244: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8245: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8246: 'Entered Function OKC_REP_UTIL_PVT.get_quote_access');
8247: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8248: 'Resource Id is: ' || p_resource_id);
8249: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8250: 'Quote Number is: ' || p_quote_number);
8251: END IF;

Line 8249: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8245: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8246: 'Entered Function OKC_REP_UTIL_PVT.get_quote_access');
8247: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8248: 'Resource Id is: ' || p_resource_id);
8249: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8250: 'Quote Number is: ' || p_quote_number);
8251: END IF;
8252: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8253: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8252: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8248: 'Resource Id is: ' || p_resource_id);
8249: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8250: 'Quote Number is: ' || p_quote_number);
8251: END IF;
8252: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8253: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8254: 'checking security profile - ASO_ENABLE_SECURITY_CHECK');
8255: END IF;
8256:

Line 8253: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8249: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8250: 'Quote Number is: ' || p_quote_number);
8251: END IF;
8252: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8253: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8254: 'checking security profile - ASO_ENABLE_SECURITY_CHECK');
8255: END IF;
8256:
8257: FND_PROFILE.GET(NAME => G_SALES_QUOTE_SEC_PROFILE, VAL => l_check_security_access);

Line 8258: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8254: 'checking security profile - ASO_ENABLE_SECURITY_CHECK');
8255: END IF;
8256:
8257: FND_PROFILE.GET(NAME => G_SALES_QUOTE_SEC_PROFILE, VAL => l_check_security_access);
8258: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8259: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8260: 'Profile ASO_ENABLE_SECURITY_CHECK value is: '||l_check_security_access);
8261: END IF;
8262: IF (l_check_security_access = 'N') THEN

Line 8259: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8255: END IF;
8256:
8257: FND_PROFILE.GET(NAME => G_SALES_QUOTE_SEC_PROFILE, VAL => l_check_security_access);
8258: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8259: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8260: 'Profile ASO_ENABLE_SECURITY_CHECK value is: '||l_check_security_access);
8261: END IF;
8262: IF (l_check_security_access = 'N') THEN
8263: l_access := G_SALES_QUOTE_UPDATE_ACCESS;

Line 8265: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8261: END IF;
8262: IF (l_check_security_access = 'N') THEN
8263: l_access := G_SALES_QUOTE_UPDATE_ACCESS;
8264: ELSE
8265: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8266: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8267: 'Calling ASO_SECURITY_INT.get_quote_access to get the access');
8268: END IF;
8269: l_access := ASO_SECURITY_INT.get_quote_access(p_resource_id, p_quote_number);

Line 8266: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8262: IF (l_check_security_access = 'N') THEN
8263: l_access := G_SALES_QUOTE_UPDATE_ACCESS;
8264: ELSE
8265: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8266: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8267: 'Calling ASO_SECURITY_INT.get_quote_access to get the access');
8268: END IF;
8269: l_access := ASO_SECURITY_INT.get_quote_access(p_resource_id, p_quote_number);
8270: END IF;

Line 8271: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8267: 'Calling ASO_SECURITY_INT.get_quote_access to get the access');
8268: END IF;
8269: l_access := ASO_SECURITY_INT.get_quote_access(p_resource_id, p_quote_number);
8270: END IF;
8271: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8272: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8273: 'OKC_REP_UTIL_PVT.get_quote_access returns l_access as : '
8274: || l_access);
8275: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8272: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8268: END IF;
8269: l_access := ASO_SECURITY_INT.get_quote_access(p_resource_id, p_quote_number);
8270: END IF;
8271: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8272: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8273: 'OKC_REP_UTIL_PVT.get_quote_access returns l_access as : '
8274: || l_access);
8275: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8276: 'Leaving Function get_quote_access');

Line 8275: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8271: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8272: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8273: 'OKC_REP_UTIL_PVT.get_quote_access returns l_access as : '
8274: || l_access);
8275: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8276: 'Leaving Function get_quote_access');
8277: END IF;
8278: RETURN l_access ;
8279:

Line 8282: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8278: RETURN l_access ;
8279:
8280: EXCEPTION
8281: WHEN OTHERS THEN
8282: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8283: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
8284: 'Leaving Function get_quote_access because of EXCEPTION: '||sqlerrm);
8285: END IF;
8286: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 8283: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

8279:
8280: EXCEPTION
8281: WHEN OTHERS THEN
8282: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8283: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
8284: 'Leaving Function get_quote_access because of EXCEPTION: '||sqlerrm);
8285: END IF;
8286: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
8287: p_msg_name => G_UNEXPECTED_ERROR,

Line 8322: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8318: BEGIN
8319:
8320: l_api_name := 'contract_terms_disabled_yn';
8321:
8322: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8323: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8324: 'Entered Procedure OKC_REP_UTIL_PVT.contract_terms_disabled_yn');
8325: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8326: 'Contract Type is: ' || p_contract_type);

Line 8323: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8319:
8320: l_api_name := 'contract_terms_disabled_yn';
8321:
8322: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8323: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8324: 'Entered Procedure OKC_REP_UTIL_PVT.contract_terms_disabled_yn');
8325: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8326: 'Contract Type is: ' || p_contract_type);
8327:

Line 8325: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8321:
8322: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8323: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8324: 'Entered Procedure OKC_REP_UTIL_PVT.contract_terms_disabled_yn');
8325: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8326: 'Contract Type is: ' || p_contract_type);
8327:
8328: END IF;
8329:

Line 8335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8331: 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;
8332:
8333:
8334:
8335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8337: 'OKC_REP_UTIL_PVT.contract_terms_disabled_yn returns x_disable_contract_terms_yn as : '
8338: || x_disable_contract_terms_yn);
8339: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8332:
8333:
8334:
8335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8337: 'OKC_REP_UTIL_PVT.contract_terms_disabled_yn returns x_disable_contract_terms_yn as : '
8338: || x_disable_contract_terms_yn);
8339: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8340: 'Leaving Procedure contract_terms_disabled_yn');

Line 8339: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8335: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8336: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8337: 'OKC_REP_UTIL_PVT.contract_terms_disabled_yn returns x_disable_contract_terms_yn as : '
8338: || x_disable_contract_terms_yn);
8339: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8340: 'Leaving Procedure contract_terms_disabled_yn');
8341: END IF;
8342:
8343: EXCEPTION

Line 8346: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8342:
8343: EXCEPTION
8344: WHEN OTHERS THEN
8345:
8346: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8347: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
8348: 'Leaving Function contract_terms_disabled_yn because of EXCEPTION: '||sqlerrm);
8349: END IF;
8350:

Line 8347: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

8343: EXCEPTION
8344: WHEN OTHERS THEN
8345:
8346: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8347: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
8348: 'Leaving Function contract_terms_disabled_yn because of EXCEPTION: '||sqlerrm);
8349: END IF;
8350:
8351: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 8374: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8370: BEGIN
8371:
8372: l_api_name := 'DocTyp_subent_disabled_yn';
8373:
8374: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8376: 'Entered Procedure OKC_REP_UTIL_PVT.DocTyp_subent_disabled_yn');
8377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8378: 'Contract Type is: ' || p_contract_type);

Line 8375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8371:
8372: l_api_name := 'DocTyp_subent_disabled_yn';
8373:
8374: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8376: 'Entered Procedure OKC_REP_UTIL_PVT.DocTyp_subent_disabled_yn');
8377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8378: 'Contract Type is: ' || p_contract_type);
8379:

Line 8377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8373:
8374: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8375: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8376: 'Entered Procedure OKC_REP_UTIL_PVT.DocTyp_subent_disabled_yn');
8377: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8378: 'Contract Type is: ' || p_contract_type);
8379:
8380: END IF;
8381:

Line 8385: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8381:
8382:
8383: SELECT Nvl((SELECT 'Y' FROM okc_rep_contracts_all WHERE contract_type = p_contract_type AND ROWNUM =1),'N') INTO x_disable_subentities_yn FROM dual;
8384:
8385: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8386: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8387: 'OKC_REP_UTIL_PVT.DocTyp_subent_disabled_yn returns x_disable_subentities_yn as : '
8388: || x_disable_subentities_yn);
8389: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8386: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8382:
8383: SELECT Nvl((SELECT 'Y' FROM okc_rep_contracts_all WHERE contract_type = p_contract_type AND ROWNUM =1),'N') INTO x_disable_subentities_yn FROM dual;
8384:
8385: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8386: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8387: 'OKC_REP_UTIL_PVT.DocTyp_subent_disabled_yn returns x_disable_subentities_yn as : '
8388: || x_disable_subentities_yn);
8389: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8390: 'Leaving Procedure DocTyp_subent_disabled_yn');

Line 8389: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8385: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8386: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8387: 'OKC_REP_UTIL_PVT.DocTyp_subent_disabled_yn returns x_disable_subentities_yn as : '
8388: || x_disable_subentities_yn);
8389: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8390: 'Leaving Procedure DocTyp_subent_disabled_yn');
8391: END IF;
8392:
8393: EXCEPTION

Line 8396: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8392:
8393: EXCEPTION
8394: WHEN OTHERS THEN
8395:
8396: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8397: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
8398: 'Leaving Function contract_terms_disabled_yn because of EXCEPTION: '||sqlerrm);
8399: END IF;
8400:

Line 8397: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,

8393: EXCEPTION
8394: WHEN OTHERS THEN
8395:
8396: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8397: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
8398: 'Leaving Function contract_terms_disabled_yn because of EXCEPTION: '||sqlerrm);
8399: END IF;
8400:
8401: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 8490: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8486: BEGIN
8487:
8488: l_api_name := 'validate_import_contacts';
8489:
8490: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8491: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8492: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
8493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8494: 'p_run_id = ' || p_run_id);

Line 8491: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8487:
8488: l_api_name := 'validate_import_contacts';
8489:
8490: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8491: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8492: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
8493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8494: 'p_run_id = ' || p_run_id);
8495:

Line 8493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8489:
8490: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8491: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8492: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
8493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8494: 'p_run_id = ' || p_run_id);
8495:
8496: END IF;
8497:

Line 8523: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8519: l_error_msg := NULL;
8520:
8521: --If l_valid_flag is already set to 'N', we do not perform any more checks
8522: --Party Name should exist
8523: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8524: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8525: 'Checking if user enters party name');
8526: END IF;
8527: IF l_import_contacts_rec.party_name_txt IS NOT NULL THEN

Line 8524: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8520:
8521: --If l_valid_flag is already set to 'N', we do not perform any more checks
8522: --Party Name should exist
8523: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8524: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8525: 'Checking if user enters party name');
8526: END IF;
8527: IF l_import_contacts_rec.party_name_txt IS NOT NULL THEN
8528: l_import_contacts_rec.party_name_txt := LTRIM(l_import_contacts_rec.party_name_txt);

Line 8538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8534: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_PARTY_NAME');
8535: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8536: VALUE => l_import_contacts_rec.contact_index);
8537: l_error_msg := fnd_message.get;
8538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8540: 'Party Name is missing for this contact');
8541: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8542: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);

Line 8539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8535: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8536: VALUE => l_import_contacts_rec.contact_index);
8537: l_error_msg := fnd_message.get;
8538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8540: 'Party Name is missing for this contact');
8541: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8542: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8543: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8541: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8537: l_error_msg := fnd_message.get;
8538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8540: 'Party Name is missing for this contact');
8541: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8542: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8543: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8544: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8545: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8543: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8539: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8540: 'Party Name is missing for this contact');
8541: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8542: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8543: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8544: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8545: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8546: 'l_error_msg: '||l_error_msg);
8547: END IF;

Line 8545: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8541: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8542: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8543: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8544: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8545: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8546: 'l_error_msg: '||l_error_msg);
8547: END IF;
8548: END IF;
8549:

Line 8552: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8548: END IF;
8549:
8550: --If l_valid_flag is already set to 'N', we do not perform any more checks
8551: --Party Role should exist
8552: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8553: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8554: 'Checking if user enters party role');
8555: END IF;
8556: IF l_import_contacts_rec.party_role_txt IS NOT NULL THEN

Line 8553: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8549:
8550: --If l_valid_flag is already set to 'N', we do not perform any more checks
8551: --Party Role should exist
8552: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8553: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8554: 'Checking if user enters party role');
8555: END IF;
8556: IF l_import_contacts_rec.party_role_txt IS NOT NULL THEN
8557: l_import_contacts_rec.party_role_txt := LTRIM(l_import_contacts_rec.party_role_txt);

Line 8567: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8563: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_PARTY_ROLE');
8564: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8565: VALUE => l_import_contacts_rec.contact_index);
8566: l_error_msg := fnd_message.get;
8567: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8569: 'Party Role is missing for this contact');
8570: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8571: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);

Line 8568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8564: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8565: VALUE => l_import_contacts_rec.contact_index);
8566: l_error_msg := fnd_message.get;
8567: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8569: 'Party Role is missing for this contact');
8570: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8571: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8570: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8566: l_error_msg := fnd_message.get;
8567: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8569: 'Party Role is missing for this contact');
8570: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8571: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8573: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8568: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8569: 'Party Role is missing for this contact');
8570: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8571: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8573: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8575: 'l_error_msg: '||l_error_msg);
8576: END IF;

Line 8574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8570: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8571: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8572: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8573: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8574: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8575: 'l_error_msg: '||l_error_msg);
8576: END IF;
8577:
8578: END IF;

Line 8582: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8578: END IF;
8579:
8580: --If l_valid_flag is already set to 'N', we do not perform any more checks
8581: --Party should already exist on the contract (in OKC_REP_IMP_CONTRACTS_T)
8582: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8583: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8584: 'Checking if Party exists on the contract');
8585: END IF;
8586:

Line 8583: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8579:
8580: --If l_valid_flag is already set to 'N', we do not perform any more checks
8581: --Party should already exist on the contract (in OKC_REP_IMP_CONTRACTS_T)
8582: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8583: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8584: 'Checking if Party exists on the contract');
8585: END IF;
8586:
8587: OPEN c_party_exists_csr(l_import_contacts_rec.party_role_txt, l_import_contacts_rec.party_name_txt, l_import_contacts_rec.imp_contract_id);

Line 8591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8587: OPEN c_party_exists_csr(l_import_contacts_rec.party_role_txt, l_import_contacts_rec.party_name_txt, l_import_contacts_rec.imp_contract_id);
8588: FETCH c_party_exists_csr INTO l_party_id, l_party_role_code;
8589:
8590: IF (c_party_exists_csr%NOTFOUND) THEN
8591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8593: 'Party does not exist on the contract');
8594: END IF;
8595: --CLOSE internal_party_contact_csr;

Line 8592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8588: FETCH c_party_exists_csr INTO l_party_id, l_party_role_code;
8589:
8590: IF (c_party_exists_csr%NOTFOUND) THEN
8591: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8592: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8593: 'Party does not exist on the contract');
8594: END IF;
8595: --CLOSE internal_party_contact_csr;
8596:

Line 8603: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8599: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_PARTY_ROLE');
8600: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8601: VALUE => l_import_contacts_rec.contact_index);
8602: l_error_msg := fnd_message.get;
8603: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8604: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8605: 'Party missing on contract');
8606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8607: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);

Line 8604: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8600: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8601: VALUE => l_import_contacts_rec.contact_index);
8602: l_error_msg := fnd_message.get;
8603: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8604: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8605: 'Party missing on contract');
8606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8607: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8608: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8602: l_error_msg := fnd_message.get;
8603: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8604: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8605: 'Party missing on contract');
8606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8607: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8608: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8609: 'contact_id: '||l_import_contacts_rec.imp_contact_id);
8610: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8608: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8604: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8605: 'Party missing on contract');
8606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8607: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8608: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8609: 'contact_id: '||l_import_contacts_rec.imp_contact_id);
8610: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8611: 'l_error_msg: '||l_error_msg);
8612: END IF;

Line 8610: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8607: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8608: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8609: 'contact_id: '||l_import_contacts_rec.imp_contact_id);
8610: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8611: 'l_error_msg: '||l_error_msg);
8612: END IF;
8613:
8614: END IF;

Line 8619: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8615: CLOSE c_party_exists_csr;
8616:
8617: --If l_valid_flag is already set to 'N', we do not perform any more checks
8618: --Contact Role should be entered
8619: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8620: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8621: 'Checking if user enters contact role');
8622: END IF;
8623:

Line 8620: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8616:
8617: --If l_valid_flag is already set to 'N', we do not perform any more checks
8618: --Contact Role should be entered
8619: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8620: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8621: 'Checking if user enters contact role');
8622: END IF;
8623:
8624: IF l_import_contacts_rec.contact_role_txt IS NOT NULL THEN

Line 8635: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8631: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_CONTACT_ROLE');
8632: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8633: VALUE => l_import_contacts_rec.contact_index);
8634: l_error_msg := fnd_message.get;
8635: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8636: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8637: 'Contact Role is missing');
8638: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8639: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);

Line 8636: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8632: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8633: VALUE => l_import_contacts_rec.contact_index);
8634: l_error_msg := fnd_message.get;
8635: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8636: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8637: 'Contact Role is missing');
8638: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8639: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8640: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8638: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8634: l_error_msg := fnd_message.get;
8635: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8636: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8637: 'Contact Role is missing');
8638: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8639: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8640: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8641: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8642: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8640: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8636: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8637: 'Contact Role is missing');
8638: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8639: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8640: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8641: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8642: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8643: 'l_error_msg: '||l_error_msg);
8644: END IF;

Line 8642: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8638: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8639: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8640: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8641: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8642: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8643: 'l_error_msg: '||l_error_msg);
8644: END IF;
8645:
8646: END IF;

Line 8650: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8646: END IF;
8647:
8648: --If l_valid_flag is already set to 'N', we do not perform any more checks
8649: --Contact Role should valid
8650: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8651: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8652: 'Checking if contact role is valid');
8653: END IF;
8654:

Line 8651: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8647:
8648: --If l_valid_flag is already set to 'N', we do not perform any more checks
8649: --Contact Role should valid
8650: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8651: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8652: 'Checking if contact role is valid');
8653: END IF;
8654:
8655: OPEN c_contact_role_exist_csr(l_import_contacts_rec.contact_role_txt);

Line 8668: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8664: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_INV_CONTACT_ROLE');
8665: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8666: VALUE => l_import_contacts_rec.contact_index);
8667: l_error_msg := fnd_message.get;
8668: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8669: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8670: 'Contact Role is not valid');
8671: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8672: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);

Line 8669: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8665: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8666: VALUE => l_import_contacts_rec.contact_index);
8667: l_error_msg := fnd_message.get;
8668: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8669: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8670: 'Contact Role is not valid');
8671: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8672: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8673: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8671: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8667: l_error_msg := fnd_message.get;
8668: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8669: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8670: 'Contact Role is not valid');
8671: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8672: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8673: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8674: 'Contact ID: '||l_import_contacts_rec.imp_contact_id);
8675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8673: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8669: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8670: 'Contact Role is not valid');
8671: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8672: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8673: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8674: 'Contact ID: '||l_import_contacts_rec.imp_contact_id);
8675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8676: 'Contact ID: '||l_import_contacts_rec.imp_contact_id);
8677: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8671: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8672: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8673: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8674: 'Contact ID: '||l_import_contacts_rec.imp_contact_id);
8675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8676: 'Contact ID: '||l_import_contacts_rec.imp_contact_id);
8677: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8678: 'l_error_msg: '||l_error_msg);
8679: END IF;

Line 8677: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8673: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8674: 'Contact ID: '||l_import_contacts_rec.imp_contact_id);
8675: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8676: 'Contact ID: '||l_import_contacts_rec.imp_contact_id);
8677: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8678: 'l_error_msg: '||l_error_msg);
8679: END IF;
8680:
8681: END IF;

Line 8687: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8683: CLOSE c_contact_role_exist_csr;
8684:
8685: --If l_valid_flag is already set to 'N', we do not perform any more checks
8686: --Contact Id should be entered
8687: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8688: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8689: 'Checking if user enters Contact Id');
8690: END IF;
8691: IF l_import_contacts_rec.contact_id IS NOT NULL THEN

Line 8688: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8684:
8685: --If l_valid_flag is already set to 'N', we do not perform any more checks
8686: --Contact Id should be entered
8687: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8688: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8689: 'Checking if user enters Contact Id');
8690: END IF;
8691: IF l_import_contacts_rec.contact_id IS NOT NULL THEN
8692: l_import_contacts_rec.contact_id := LTRIM(l_import_contacts_rec.contact_id);

Line 8702: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8698: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_CONTACT_ID');
8699: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8700: VALUE => l_import_contacts_rec.contact_index);
8701: l_error_msg := fnd_message.get;
8702: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8703: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8704: 'Contact Id is missing');
8705: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8706: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);

Line 8703: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8699: fnd_message.set_token(TOKEN => 'CONTACT_INDEX',
8700: VALUE => l_import_contacts_rec.contact_index);
8701: l_error_msg := fnd_message.get;
8702: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8703: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8704: 'Contact Id is missing');
8705: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8706: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8707: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8705: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8701: l_error_msg := fnd_message.get;
8702: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8703: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8704: 'Contact Id is missing');
8705: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8706: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8707: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8708: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8709: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 8707: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8703: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8704: 'Contact Id is missing');
8705: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8706: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8707: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8708: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8709: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8710: 'l_error_msg: '||l_error_msg);
8711: END IF;

Line 8709: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

8705: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8706: 'Contract ID: '||l_import_contacts_rec.imp_contract_id);
8707: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8708: 'Party ID: '||l_import_contacts_rec.imp_party_id);
8709: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
8710: 'l_error_msg: '||l_error_msg);
8711: END IF;
8712:
8713: END IF;

Line 8733: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8729: x_return_status => x_return_status,
8730: x_msg_count => x_msg_count,
8731: x_msg_data => x_msg_data);
8732:
8733: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8734: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8735: 'After calling validate_party_contact, l_valid_flag: '||l_valid_flag);
8736: END IF;
8737:

Line 8734: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8730: x_msg_count => x_msg_count,
8731: x_msg_data => x_msg_data);
8732:
8733: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8734: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8735: 'After calling validate_party_contact, l_valid_flag: '||l_valid_flag);
8736: END IF;
8737:
8738: IF(l_valid_flag = 'N') THEN

Line 8802: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8798:
8799: END LOOP;
8800: CLOSE IMPORT_CONTACTS_CSR;
8801:
8802: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8803: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8804: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
8805: END IF;
8806:

Line 8803: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8799: END LOOP;
8800: CLOSE IMPORT_CONTACTS_CSR;
8801:
8802: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8803: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8804: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
8805: END IF;
8806:
8807: EXCEPTION

Line 8823: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8819: IF c_contact_role_exist_csr%ISOPEN THEN
8820: CLOSE c_contact_role_exist_csr;
8821: END IF;
8822:
8823: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8824: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
8825: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
8826: END IF;
8827:

Line 8824: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

8820: CLOSE c_contact_role_exist_csr;
8821: END IF;
8822:
8823: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8824: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
8825: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
8826: END IF;
8827:
8828: x_return_status := FND_API.G_RET_STS_ERROR;

Line 8846: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8842: IF c_contact_role_exist_csr%ISOPEN THEN
8843: CLOSE c_contact_role_exist_csr;
8844: END IF;
8845:
8846: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8847: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
8848: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
8849: END IF;
8850:

Line 8847: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

8843: CLOSE c_contact_role_exist_csr;
8844: END IF;
8845:
8846: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8847: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
8848: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
8849: END IF;
8850:
8851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 8869: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8865: IF c_contact_role_exist_csr%ISOPEN THEN
8866: CLOSE c_contact_role_exist_csr;
8867: END IF;
8868:
8869: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8870: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
8871: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
8872: END IF;
8873:

Line 8870: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

8866: CLOSE c_contact_role_exist_csr;
8867: END IF;
8868:
8869: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8870: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
8871: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
8872: END IF;
8873:
8874: Okc_Api.Set_Message(p_app_name => G_APP_NAME,

Line 8972: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

8968: BEGIN
8969:
8970: l_api_name := 'validate_import_risks';
8971:
8972: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8973: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8974: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
8975: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8976: 'p_run_id = ' || p_run_id);

Line 8973: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8969:
8970: l_api_name := 'validate_import_risks';
8971:
8972: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8973: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8974: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
8975: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8976: 'p_run_id = ' || p_run_id);
8977:

Line 8975: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

8971:
8972: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8973: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8974: 'Entered OKC_REP_UTIL_PVT.'||l_api_name);
8975: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8976: 'p_run_id = ' || p_run_id);
8977:
8978: END IF;
8979:

Line 9005: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9001: l_error_msg := NULL;
9002:
9003: --If l_valid_flag is already set to 'N', we do not perform any more checks
9004: --Risk Event should be entered
9005: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9006: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9007: 'Checking if user enters risk_event_txt');
9008: END IF;
9009: IF l_import_risks_rec.risk_event_txt IS NOT NULL THEN

Line 9006: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9002:
9003: --If l_valid_flag is already set to 'N', we do not perform any more checks
9004: --Risk Event should be entered
9005: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9006: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9007: 'Checking if user enters risk_event_txt');
9008: END IF;
9009: IF l_import_risks_rec.risk_event_txt IS NOT NULL THEN
9010: l_import_risks_rec.risk_event_txt := LTRIM(l_import_risks_rec.risk_event_txt);

Line 9020: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9016: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_MISS_RISK_EVENT');
9017: fnd_message.set_token(TOKEN => 'RISK_INDEX',
9018: VALUE => l_import_risks_rec.risk_index);
9019: l_error_msg := fnd_message.get;
9020: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9022: 'Party Name is missing');
9023: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9024: 'Contract ID: '||l_import_risks_rec.imp_contract_id);

Line 9021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9017: fnd_message.set_token(TOKEN => 'RISK_INDEX',
9018: VALUE => l_import_risks_rec.risk_index);
9019: l_error_msg := fnd_message.get;
9020: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9022: 'Party Name is missing');
9023: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9024: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 9023: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9019: l_error_msg := fnd_message.get;
9020: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9022: 'Party Name is missing');
9023: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9024: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9026: 'l_error_msg: '||l_error_msg);
9027: END IF;

Line 9025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9021: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9022: 'Party Name is missing');
9023: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9024: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9025: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9026: 'l_error_msg: '||l_error_msg);
9027: END IF;
9028: END IF;
9029:

Line 9033: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9029:
9030:
9031: --If l_valid_flag is already set to 'N', we do not perform any more checks
9032: --Risk Event should be valid
9033: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9034: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9035: 'Checking if risk_event_txt is valid');
9036: END IF;
9037:

Line 9034: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9030:
9031: --If l_valid_flag is already set to 'N', we do not perform any more checks
9032: --Risk Event should be valid
9033: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9034: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9035: 'Checking if risk_event_txt is valid');
9036: END IF;
9037:
9038: OPEN c_risk_event_valid_csr(l_import_risks_rec.risk_event_txt);

Line 9051: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9047: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_INV_RISK_EVENT');
9048: fnd_message.set_token(TOKEN => 'RISK_INDEX',
9049: VALUE => l_import_risks_rec.risk_index);
9050: l_error_msg := fnd_message.get;
9051: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9052: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9053: 'Risk Event is not valid ');
9054: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9055: 'Contract ID: '||l_import_risks_rec.imp_contract_id);

Line 9052: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9048: fnd_message.set_token(TOKEN => 'RISK_INDEX',
9049: VALUE => l_import_risks_rec.risk_index);
9050: l_error_msg := fnd_message.get;
9051: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9052: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9053: 'Risk Event is not valid ');
9054: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9055: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9056: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 9054: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9050: l_error_msg := fnd_message.get;
9051: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9052: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9053: 'Risk Event is not valid ');
9054: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9055: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9056: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9057: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
9058: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 9056: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9052: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9053: 'Risk Event is not valid ');
9054: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9055: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9056: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9057: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
9058: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9059: 'l_error_msg: '||l_error_msg);
9060: END IF;

Line 9058: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9054: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9055: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9056: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9057: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
9058: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9059: 'l_error_msg: '||l_error_msg);
9060: END IF;
9061:
9062: END IF;

Line 9069: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9065:
9066:
9067: --If l_valid_flag is already set to 'N', we do not perform any more checks
9068: --Probability txt should be valid
9069: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9070: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9071: 'Checking if probability_txt is valid');
9072: END IF;
9073:

Line 9070: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9066:
9067: --If l_valid_flag is already set to 'N', we do not perform any more checks
9068: --Probability txt should be valid
9069: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9070: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9071: 'Checking if probability_txt is valid');
9072: END IF;
9073:
9074: OPEN c_risk_code_csr(l_import_risks_rec.probability_txt);

Line 9087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9083: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_INV_RISK_PROB');
9084: fnd_message.set_token(TOKEN => 'RISK_INDEX',
9085: VALUE => l_import_risks_rec.risk_index);
9086: l_error_msg := fnd_message.get;
9087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9089: 'Risk Probability is not valid ');
9090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9091: 'Contract ID: '||l_import_risks_rec.imp_contract_id);

Line 9088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9084: fnd_message.set_token(TOKEN => 'RISK_INDEX',
9085: VALUE => l_import_risks_rec.risk_index);
9086: l_error_msg := fnd_message.get;
9087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9089: 'Risk Probability is not valid ');
9090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9091: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 9090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9086: l_error_msg := fnd_message.get;
9087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9089: 'Risk Probability is not valid ');
9090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9091: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9093: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
9094: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 9092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9088: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9089: 'Risk Probability is not valid ');
9090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9091: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9093: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
9094: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9095: 'l_error_msg: '||l_error_msg);
9096: END IF;

Line 9094: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9090: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9091: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9092: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9093: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
9094: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9095: 'l_error_msg: '||l_error_msg);
9096: END IF;
9097:
9098: END IF;

Line 9105: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9101:
9102: --If l_valid_flag is already set to 'N', we do not perform any more checks
9103: --risk_impact_txt should be valid
9104:
9105: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9106: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9107: 'Checking if risk_impact_txt is valid');
9108: END IF;
9109:

Line 9106: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9102: --If l_valid_flag is already set to 'N', we do not perform any more checks
9103: --risk_impact_txt should be valid
9104:
9105: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9106: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9107: 'Checking if risk_impact_txt is valid');
9108: END IF;
9109:
9110: OPEN c_risk_code_csr(l_import_risks_rec.risk_impact_txt);

Line 9123: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9119: fnd_message.set_name(G_APP_NAME,'OKC_REP_IMP_INV_RISK_IMPACT');
9120: fnd_message.set_token(TOKEN => 'RISK_INDEX',
9121: VALUE => l_import_risks_rec.risk_index);
9122: l_error_msg := fnd_message.get;
9123: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9125: 'Risk Impact is not valid is not valid');
9126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9127: 'Contract ID: '||l_import_risks_rec.imp_contract_id);

Line 9124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9120: fnd_message.set_token(TOKEN => 'RISK_INDEX',
9121: VALUE => l_import_risks_rec.risk_index);
9122: l_error_msg := fnd_message.get;
9123: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9125: 'Risk Impact is not valid is not valid');
9126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9127: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 9126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9122: l_error_msg := fnd_message.get;
9123: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9125: 'Risk Impact is not valid is not valid');
9126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9127: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9129: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
9130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

Line 9128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9124: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9125: 'Risk Impact is not valid is not valid');
9126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9127: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9129: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
9130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9131: 'l_error_msg: '||l_error_msg);
9132: END IF;

Line 9130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,

9126: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9127: 'Contract ID: '||l_import_risks_rec.imp_contract_id);
9128: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9129: 'Risk Event: '||l_import_risks_rec.risk_event_txt);
9130: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
9131: 'l_error_msg: '||l_error_msg);
9132: END IF;
9133:
9134: END IF;

Line 9187: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9183:
9184: END LOOP;
9185: CLOSE IMPORT_RISKS_CSR;
9186:
9187: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9188: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
9189: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
9190: END IF;
9191:

Line 9188: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,

9184: END LOOP;
9185: CLOSE IMPORT_RISKS_CSR;
9186:
9187: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9188: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
9189: 'Leaving OKC_REP_UTIL_PVT.'||l_api_name);
9190: END IF;
9191:
9192: EXCEPTION

Line 9212: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9208: IF c_get_contract_details_csr%ISOPEN THEN
9209: CLOSE c_get_contract_details_csr;
9210: END IF;
9211:
9212: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9213: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
9214: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
9215: END IF;
9216:

Line 9213: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

9209: CLOSE c_get_contract_details_csr;
9210: END IF;
9211:
9212: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9213: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
9214: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
9215: END IF;
9216:
9217: x_return_status := FND_API.G_RET_STS_ERROR;

Line 9239: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9235: IF c_get_contract_details_csr%ISOPEN THEN
9236: CLOSE c_get_contract_details_csr;
9237: END IF;
9238:
9239: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9240: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
9241: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
9242: END IF;
9243:

Line 9240: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

9236: CLOSE c_get_contract_details_csr;
9237: END IF;
9238:
9239: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9240: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
9241: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
9242: END IF;
9243:
9244: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 9266: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

9262: IF c_get_contract_details_csr%ISOPEN THEN
9263: CLOSE c_get_contract_details_csr;
9264: END IF;
9265:
9266: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9267: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
9268: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
9269: END IF;
9270:

Line 9267: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,

9263: CLOSE c_get_contract_details_csr;
9264: END IF;
9265:
9266: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
9267: fnd_log.string(FND_LOG.LEVEL_EXCEPTION, g_module || l_api_name,
9268: 'Leaving '||l_api_name||' because of EXCEPTION: ' || sqlerrm);
9269: END IF;
9270:
9271: Okc_Api.Set_Message(p_app_name => G_APP_NAME,