DBA Data[Home] [Help]

APPS.AS_SALES_LEAD_CONTACTS_PVT dependencies on FND_API

Line 30: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

26: AS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
27: AS_DEBUG_ERROR_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_ERROR);
28:
29: PROCEDURE Validate_CONTACT_ID (
30: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
31: P_Validation_mode IN VARCHAR2,
32: P_CUSTOMER_ID IN NUMBER,
33: P_CONTACT_ID IN NUMBER,
34: X_Return_Status OUT NOCOPY VARCHAR2,

Line 88: IF FND_API.to_Boolean( p_init_msg_list )

84: l_val VARCHAR2(1);
85:
86: BEGIN
87: -- Initialize message list if p_init_msg_list is set to TRUE.
88: IF FND_API.to_Boolean( p_init_msg_list )
89: THEN
90: FND_MSG_PUB.initialize;
91: END IF;
92:

Line 94: x_return_status := FND_API.G_RET_STS_SUCCESS;

90: FND_MSG_PUB.initialize;
91: END IF;
92:
93: -- Initialize API return status to SUCCESS
94: x_return_status := FND_API.G_RET_STS_SUCCESS;
95:
96: IF (p_CONTACT_ID is NOT NULL) and
97: (p_CONTACT_ID <> FND_API.G_MISS_NUM)
98: THEN

Line 97: (p_CONTACT_ID <> FND_API.G_MISS_NUM)

93: -- Initialize API return status to SUCCESS
94: x_return_status := FND_API.G_RET_STS_SUCCESS;
95:
96: IF (p_CONTACT_ID is NOT NULL) and
97: (p_CONTACT_ID <> FND_API.G_MISS_NUM)
98: THEN
99: OPEN C_CONTACT_ID_Exists (p_CONTACT_ID);
100: FETCH C_CONTACT_ID_Exists into l_val;
101: IF C_CONTACT_ID_Exists%NOTFOUND THEN

Line 116: x_return_status := FND_API.G_RET_STS_ERROR;

112: p_token1_value => 'CONTACT_ID',
113: p_token2 => 'VALUE',
114: p_token2_value => p_CONTACT_ID );
115:
116: x_return_status := FND_API.G_RET_STS_ERROR;
117: END IF;
118: CLOSE C_CONTACT_ID_Exists;
119: END IF;
120:

Line 132: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

128: END Validate_CONTACT_ID;
129:
130:
131: PROCEDURE Validate_CONTACT_PARTY_ID (
132: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
133: P_Validation_mode IN VARCHAR2,
134: P_CUSTOMER_ID IN NUMBER,
135: P_CONTACT_PARTY_ID IN NUMBER,
136: X_Return_Status OUT NOCOPY VARCHAR2,

Line 162: IF FND_API.to_Boolean( p_init_msg_list )

158:
159: l_val VARCHAR2(1);
160: BEGIN
161: -- Initialize message list if p_init_msg_list is set to TRUE.
162: IF FND_API.to_Boolean( p_init_msg_list )
163: THEN
164: FND_MSG_PUB.initialize;
165: END IF;
166:

Line 168: x_return_status := FND_API.G_RET_STS_SUCCESS;

164: FND_MSG_PUB.initialize;
165: END IF;
166:
167: -- Initialize API return status to SUCCESS
168: x_return_status := FND_API.G_RET_STS_SUCCESS;
169:
170: -- ffang 092000 for bug 1406761
171: -- validate NOT NULL column
172: IF (p_CONTACT_PARTY_ID is NULL)

Line 186: x_return_status := FND_API.G_RET_STS_ERROR;

182: p_msg_name => 'API_MISSING_ID',
183: p_token1 => 'COLUMN',
184: p_token1_value => 'CONTACT_PARTY_ID');
185:
186: x_return_status := FND_API.G_RET_STS_ERROR;
187:
188: ELSE -- p_CONTACT_PARTY_ID is NOT NULL
189:
190: -- Calling from Create APIs, CONTACT_PARTY_ID can not be G_MISS_NUM

Line 192: (p_CONTACT_PARTY_ID = FND_API.G_MISS_NUM)

188: ELSE -- p_CONTACT_PARTY_ID is NOT NULL
189:
190: -- Calling from Create APIs, CONTACT_PARTY_ID can not be G_MISS_NUM
191: IF (p_validation_mode = AS_UTILITY_PVT.G_CREATE) and
192: (p_CONTACT_PARTY_ID = FND_API.G_MISS_NUM)
193: THEN
194: -- IF (AS_DEBUG_ERROR_ON) THEN AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
195: -- 'Private API: CONTACT_PARTY_ID is missing'); END IF;
196:

Line 201: x_return_status := FND_API.G_RET_STS_ERROR;

197: AS_UTILITY_PVT.Set_Message(
198: p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
199: p_msg_name => 'API_MISSING_CONTACT_PARTY_ID');
200:
201: x_return_status := FND_API.G_RET_STS_ERROR;
202:
203: -- If CONTACT_PARTY_ID <> G_MISS_NUM, check if it is valid
204: ELSIF (p_CONTACT_PARTY_ID <> FND_API.G_MISS_NUM)
205: THEN

Line 204: ELSIF (p_CONTACT_PARTY_ID <> FND_API.G_MISS_NUM)

200:
201: x_return_status := FND_API.G_RET_STS_ERROR;
202:
203: -- If CONTACT_PARTY_ID <> G_MISS_NUM, check if it is valid
204: ELSIF (p_CONTACT_PARTY_ID <> FND_API.G_MISS_NUM)
205: THEN
206: OPEN C_CONTACT_PARTY_ID_Exists (p_CONTACT_PARTY_ID);
207: FETCH C_CONTACT_PARTY_ID_Exists into l_val;
208: IF C_CONTACT_PARTY_ID_Exists%NOTFOUND

Line 224: x_return_status := FND_API.G_RET_STS_ERROR;

220: p_token1_value => 'CONTACT_PARTY_ID',
221: p_token2 => 'VALUE',
222: p_token2_value => p_CONTACT_PARTY_ID );
223:
224: x_return_status := FND_API.G_RET_STS_ERROR;
225: END IF;
226:
227: -- ffang 092800: Forgot to close cursor
228: CLOSE C_CONTACT_PARTY_ID_Exists;

Line 245: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

241: END Validate_CONTACT_PARTY_ID;
242:
243:
244: PROCEDURE Validate_PHONE_ID (
245: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
246: P_Validation_mode IN VARCHAR2,
247: P_CONTACT_ID IN NUMBER,
248: P_CONTACT_PARTY_ID IN NUMBER,
249: P_PHONE_ID IN NUMBER,

Line 271: IF FND_API.to_Boolean( p_init_msg_list )

267:
268: BEGIN
269:
270: -- Initialize message list if p_init_msg_list is set to TRUE.
271: IF FND_API.to_Boolean( p_init_msg_list )
272: THEN
273: FND_MSG_PUB.initialize;
274: END IF;
275:

Line 278: x_return_status := FND_API.G_RET_STS_SUCCESS;

274: END IF;
275:
276:
277: -- Initialize API return status to SUCCESS
278: x_return_status := FND_API.G_RET_STS_SUCCESS;
279:
280: IF (p_PHONE_ID is NOT NULL) and
281: (p_PHONE_ID <> FND_API.G_MISS_NUM)
282: THEN

Line 281: (p_PHONE_ID <> FND_API.G_MISS_NUM)

277: -- Initialize API return status to SUCCESS
278: x_return_status := FND_API.G_RET_STS_SUCCESS;
279:
280: IF (p_PHONE_ID is NOT NULL) and
281: (p_PHONE_ID <> FND_API.G_MISS_NUM)
282: THEN
283: OPEN C_PHONE_ID_Exists (p_PHONE_ID);
284: FETCH C_PHONE_ID_Exists into l_val;
285: IF C_PHONE_ID_Exists%NOTFOUND THEN

Line 300: x_return_status := FND_API.G_RET_STS_ERROR;

296: p_token1_value => 'PHONE_ID',
297: p_token2 => 'VALUE',
298: p_token2_value => p_PHONE_ID );
299:
300: x_return_status := FND_API.G_RET_STS_ERROR;
301: END IF;
302: CLOSE C_PHONE_ID_Exists;
303: END IF;
304:

Line 315: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

311: END Validate_PHONE_ID;
312:
313:
314: PROCEDURE Validate_CONTACT_ROLE_CODE (
315: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
316: P_Validation_mode IN VARCHAR2,
317: P_CONTACT_ROLE_CODE IN VARCHAR2,
318: X_Return_Status OUT NOCOPY VARCHAR2,
319: X_Msg_Count OUT NOCOPY NUMBER,

Line 334: IF FND_API.to_Boolean( p_init_msg_list )

330:
331: l_val VARCHAR2(1);
332: BEGIN
333: -- Initialize message list IF p_init_msg_list is set to TRUE.
334: IF FND_API.to_Boolean( p_init_msg_list )
335: THEN
336: FND_MSG_PUB.initialize;
337: END IF;
338:

Line 340: x_return_status := FND_API.G_RET_STS_SUCCESS;

336: FND_MSG_PUB.initialize;
337: END IF;
338:
339: -- Initialize API return status to SUCCESS
340: x_return_status := FND_API.G_RET_STS_SUCCESS;
341:
342: -- Debug Message
343: -- IF (AS_DEBUG_LOW_ON) THEN AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
344: -- 'Validate contact role code'); END IF;

Line 348: AND p_contact_role_code <> FND_API.G_MISS_CHAR)

344: -- 'Validate contact role code'); END IF;
345:
346: -- Validate contact role code
347: IF (p_contact_role_code is NOT NULL
348: AND p_contact_role_code <> FND_API.G_MISS_CHAR)
349: THEN
350: OPEN C_Lookup_Exists ( p_contact_role_code, 'LEAD_CONTACT_ROLE');
351: FETCH C_Lookup_Exists into l_val;
352:

Line 362: x_return_status := FND_API.G_RET_STS_ERROR;

358: p_token1 => 'COLUMN',
359: p_token1_value => 'CONTACT_ROLE_CODE',
360: p_token2 => 'VALUE',
361: p_token2_value => p_CONTACT_ROLE_CODE );
362: x_return_status := FND_API.G_RET_STS_ERROR;
363: END IF;
364: CLOSE C_Lookup_Exists;
365: END IF;
366:

Line 389: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

385: -- validation procedures
386: --
387:
388: PROCEDURE Validate_sales_lead_contact(
389: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
390: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
391: P_Validation_mode IN VARCHAR2,
392: P_SALES_LEAD_CONTACT_Rec IN AS_SALES_LEADS_PUB.SALES_LEAD_CONTACT_Rec_Type,
393: X_Return_Status OUT NOCOPY VARCHAR2,

Line 390: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

386: --
387:
388: PROCEDURE Validate_sales_lead_contact(
389: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
390: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
391: P_Validation_mode IN VARCHAR2,
392: P_SALES_LEAD_CONTACT_Rec IN AS_SALES_LEADS_PUB.SALES_LEAD_CONTACT_Rec_Type,
393: X_Return_Status OUT NOCOPY VARCHAR2,
394: X_Msg_Count OUT NOCOPY NUMBER,

Line 402: IF FND_API.to_Boolean( p_init_msg_list )

398: l_api_name CONSTANT VARCHAR2(30) := 'Validate_sales_lead_contact';
399: l_Return_Status VARCHAR2(1);
400: BEGIN
401: -- Initialize message list IF p_init_msg_list is set to TRUE.
402: IF FND_API.to_Boolean( p_init_msg_list )
403: THEN
404: FND_MSG_PUB.initialize;
405: END IF;
406:

Line 415: x_return_status := FND_API.G_RET_STS_SUCCESS;

411: 'PVT: ' || l_api_name || ' Start');
412: END IF;
413:
414: -- Initialize API return status to SUCCESS
415: x_return_status := FND_API.G_RET_STS_SUCCESS;
416:
417:
418: IF ( P_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM)
419: THEN

Line 422: p_init_msg_list => FND_API.G_FALSE,

418: IF ( P_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM)
419: THEN
420: -- Perform item level validation
421: AS_SALES_LEADS_PVT.Validate_CUSTOMER_ID(
422: p_init_msg_list => FND_API.G_FALSE,
423: p_validation_mode => p_validation_mode,
424: p_CUSTOMER_ID => P_SALES_LEAD_CONTACT_Rec.CUSTOMER_ID,
425: x_return_status => x_return_status,
426: x_msg_count => x_msg_count,

Line 428: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

424: p_CUSTOMER_ID => P_SALES_LEAD_CONTACT_Rec.CUSTOMER_ID,
425: x_return_status => x_return_status,
426: x_msg_count => x_msg_count,
427: x_msg_data => x_msg_data);
428: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
429: l_return_status := FND_API.G_RET_STS_ERROR;
430: -- raise FND_API.G_EXC_ERROR;
431: END IF;
432:

Line 429: l_return_status := FND_API.G_RET_STS_ERROR;

425: x_return_status => x_return_status,
426: x_msg_count => x_msg_count,
427: x_msg_data => x_msg_data);
428: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
429: l_return_status := FND_API.G_RET_STS_ERROR;
430: -- raise FND_API.G_EXC_ERROR;
431: END IF;
432:
433: -- ffang 081001, bug 1930170, if no addres_id, then skip validation

Line 430: -- raise FND_API.G_EXC_ERROR;

426: x_msg_count => x_msg_count,
427: x_msg_data => x_msg_data);
428: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
429: l_return_status := FND_API.G_RET_STS_ERROR;
430: -- raise FND_API.G_EXC_ERROR;
431: END IF;
432:
433: -- ffang 081001, bug 1930170, if no addres_id, then skip validation
434: IF (P_SALES_LEAD_CONTACT_Rec.ADDRESS_ID IS NOT NULL and

Line 435: P_SALES_LEAD_CONTACT_Rec.ADDRESS_ID <> FND_API.G_MISS_NUM)

431: END IF;
432:
433: -- ffang 081001, bug 1930170, if no addres_id, then skip validation
434: IF (P_SALES_LEAD_CONTACT_Rec.ADDRESS_ID IS NOT NULL and
435: P_SALES_LEAD_CONTACT_Rec.ADDRESS_ID <> FND_API.G_MISS_NUM)
436: THEN
437: AS_SALES_LEADS_PVT.Validate_ADDRESS_ID(
438: p_init_msg_list => FND_API.G_FALSE,
439: p_validation_mode => p_validation_mode,

Line 438: p_init_msg_list => FND_API.G_FALSE,

434: IF (P_SALES_LEAD_CONTACT_Rec.ADDRESS_ID IS NOT NULL and
435: P_SALES_LEAD_CONTACT_Rec.ADDRESS_ID <> FND_API.G_MISS_NUM)
436: THEN
437: AS_SALES_LEADS_PVT.Validate_ADDRESS_ID(
438: p_init_msg_list => FND_API.G_FALSE,
439: p_validation_mode => p_validation_mode,
440: p_CUSTOMER_ID => P_SALES_LEAD_CONTACT_Rec.CUSTOMER_ID,
441: p_ADDRESS_ID => P_SALES_LEAD_CONTACT_Rec.ADDRESS_ID,
442: x_return_status => x_return_status,

Line 445: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

441: p_ADDRESS_ID => P_SALES_LEAD_CONTACT_Rec.ADDRESS_ID,
442: x_return_status => x_return_status,
443: x_msg_count => x_msg_count,
444: x_msg_data => x_msg_data);
445: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
446: l_return_status := FND_API.G_RET_STS_ERROR;
447: -- raise FND_API.G_EXC_ERROR;
448: END IF;
449: END IF;

Line 446: l_return_status := FND_API.G_RET_STS_ERROR;

442: x_return_status => x_return_status,
443: x_msg_count => x_msg_count,
444: x_msg_data => x_msg_data);
445: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
446: l_return_status := FND_API.G_RET_STS_ERROR;
447: -- raise FND_API.G_EXC_ERROR;
448: END IF;
449: END IF;
450:

Line 447: -- raise FND_API.G_EXC_ERROR;

443: x_msg_count => x_msg_count,
444: x_msg_data => x_msg_data);
445: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
446: l_return_status := FND_API.G_RET_STS_ERROR;
447: -- raise FND_API.G_EXC_ERROR;
448: END IF;
449: END IF;
450:
451: Validate_CONTACT_PARTY_ID(

Line 452: p_init_msg_list => FND_API.G_FALSE,

448: END IF;
449: END IF;
450:
451: Validate_CONTACT_PARTY_ID(
452: p_init_msg_list => FND_API.G_FALSE,
453: p_validation_mode => p_validation_mode,
454: p_CUSTOMER_ID => P_SALES_LEAD_CONTACT_Rec.CUSTOMER_ID,
455: p_CONTACT_PARTY_ID => P_SALES_LEAD_CONTACT_Rec.CONTACT_PARTY_ID,
456: x_return_status => x_return_status,

Line 459: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

455: p_CONTACT_PARTY_ID => P_SALES_LEAD_CONTACT_Rec.CONTACT_PARTY_ID,
456: x_return_status => x_return_status,
457: x_msg_count => x_msg_count,
458: x_msg_data => x_msg_data);
459: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
460: l_return_status := FND_API.G_RET_STS_ERROR;
461: -- raise FND_API.G_EXC_ERROR;
462: END IF;
463:

Line 460: l_return_status := FND_API.G_RET_STS_ERROR;

456: x_return_status => x_return_status,
457: x_msg_count => x_msg_count,
458: x_msg_data => x_msg_data);
459: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
460: l_return_status := FND_API.G_RET_STS_ERROR;
461: -- raise FND_API.G_EXC_ERROR;
462: END IF;
463:
464: Validate_CONTACT_ID(

Line 461: -- raise FND_API.G_EXC_ERROR;

457: x_msg_count => x_msg_count,
458: x_msg_data => x_msg_data);
459: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
460: l_return_status := FND_API.G_RET_STS_ERROR;
461: -- raise FND_API.G_EXC_ERROR;
462: END IF;
463:
464: Validate_CONTACT_ID(
465: p_init_msg_list => FND_API.G_FALSE,

Line 465: p_init_msg_list => FND_API.G_FALSE,

461: -- raise FND_API.G_EXC_ERROR;
462: END IF;
463:
464: Validate_CONTACT_ID(
465: p_init_msg_list => FND_API.G_FALSE,
466: p_validation_mode => p_validation_mode,
467: p_CUSTOMER_ID => P_SALES_LEAD_CONTACT_Rec.CUSTOMER_ID,
468: p_CONTACT_ID => P_SALES_LEAD_CONTACT_Rec.CONTACT_ID,
469: x_return_status => x_return_status,

Line 472: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

468: p_CONTACT_ID => P_SALES_LEAD_CONTACT_Rec.CONTACT_ID,
469: x_return_status => x_return_status,
470: x_msg_count => x_msg_count,
471: x_msg_data => x_msg_data);
472: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
473: l_return_status := FND_API.G_RET_STS_ERROR;
474: -- raise FND_API.G_EXC_ERROR;
475: END IF;
476:

Line 473: l_return_status := FND_API.G_RET_STS_ERROR;

469: x_return_status => x_return_status,
470: x_msg_count => x_msg_count,
471: x_msg_data => x_msg_data);
472: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
473: l_return_status := FND_API.G_RET_STS_ERROR;
474: -- raise FND_API.G_EXC_ERROR;
475: END IF;
476:
477: Validate_PHONE_ID(

Line 474: -- raise FND_API.G_EXC_ERROR;

470: x_msg_count => x_msg_count,
471: x_msg_data => x_msg_data);
472: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
473: l_return_status := FND_API.G_RET_STS_ERROR;
474: -- raise FND_API.G_EXC_ERROR;
475: END IF;
476:
477: Validate_PHONE_ID(
478: p_init_msg_list => FND_API.G_FALSE,

Line 478: p_init_msg_list => FND_API.G_FALSE,

474: -- raise FND_API.G_EXC_ERROR;
475: END IF;
476:
477: Validate_PHONE_ID(
478: p_init_msg_list => FND_API.G_FALSE,
479: p_validation_mode => p_validation_mode,
480: p_CONTACT_ID => P_SALES_LEAD_CONTACT_Rec.CONTACT_ID,
481: p_CONTACT_PARTY_ID => P_SALES_LEAD_CONTACT_Rec.CONTACT_PARTY_ID,
482: p_PHONE_ID => P_SALES_LEAD_CONTACT_Rec.PHONE_ID,

Line 486: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

482: p_PHONE_ID => P_SALES_LEAD_CONTACT_Rec.PHONE_ID,
483: x_return_status => x_return_status,
484: x_msg_count => x_msg_count,
485: x_msg_data => x_msg_data);
486: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
487: l_return_status := FND_API.G_RET_STS_ERROR;
488: -- raise FND_API.G_EXC_ERROR;
489: END IF;
490:

Line 487: l_return_status := FND_API.G_RET_STS_ERROR;

483: x_return_status => x_return_status,
484: x_msg_count => x_msg_count,
485: x_msg_data => x_msg_data);
486: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
487: l_return_status := FND_API.G_RET_STS_ERROR;
488: -- raise FND_API.G_EXC_ERROR;
489: END IF;
490:
491: Validate_CONTACT_ROLE_CODE(

Line 488: -- raise FND_API.G_EXC_ERROR;

484: x_msg_count => x_msg_count,
485: x_msg_data => x_msg_data);
486: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
487: l_return_status := FND_API.G_RET_STS_ERROR;
488: -- raise FND_API.G_EXC_ERROR;
489: END IF;
490:
491: Validate_CONTACT_ROLE_CODE(
492: p_init_msg_list => FND_API.G_FALSE,

Line 492: p_init_msg_list => FND_API.G_FALSE,

488: -- raise FND_API.G_EXC_ERROR;
489: END IF;
490:
491: Validate_CONTACT_ROLE_CODE(
492: p_init_msg_list => FND_API.G_FALSE,
493: p_validation_mode => p_validation_mode,
494: p_CONTACT_ROLE_CODE => P_SALES_LEAD_CONTACT_Rec.CONTACT_ROLE_CODE,
495: x_return_status => x_return_status,
496: x_msg_count => x_msg_count,

Line 498: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

494: p_CONTACT_ROLE_CODE => P_SALES_LEAD_CONTACT_Rec.CONTACT_ROLE_CODE,
495: x_return_status => x_return_status,
496: x_msg_count => x_msg_count,
497: x_msg_data => x_msg_data);
498: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
499: l_return_status := FND_API.G_RET_STS_ERROR;
500: -- raise FND_API.G_EXC_ERROR;
501: END IF;
502:

Line 499: l_return_status := FND_API.G_RET_STS_ERROR;

495: x_return_status => x_return_status,
496: x_msg_count => x_msg_count,
497: x_msg_data => x_msg_data);
498: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
499: l_return_status := FND_API.G_RET_STS_ERROR;
500: -- raise FND_API.G_EXC_ERROR;
501: END IF;
502:
503: AS_SALES_LEADS_PVT.Validate_FLAGS(

Line 500: -- raise FND_API.G_EXC_ERROR;

496: x_msg_count => x_msg_count,
497: x_msg_data => x_msg_data);
498: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
499: l_return_status := FND_API.G_RET_STS_ERROR;
500: -- raise FND_API.G_EXC_ERROR;
501: END IF;
502:
503: AS_SALES_LEADS_PVT.Validate_FLAGS(
504: p_init_msg_list => FND_API.G_FALSE,

Line 504: p_init_msg_list => FND_API.G_FALSE,

500: -- raise FND_API.G_EXC_ERROR;
501: END IF;
502:
503: AS_SALES_LEADS_PVT.Validate_FLAGS(
504: p_init_msg_list => FND_API.G_FALSE,
505: p_validation_mode => p_validation_mode,
506: p_Flag_Value =>
507: P_SALES_LEAD_CONTACT_Rec.PRIMARY_CONTACT_FLAG,
508: p_Flag_Type => 'PRIMARY_CONTACT_FLAG',

Line 512: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

508: p_Flag_Type => 'PRIMARY_CONTACT_FLAG',
509: x_return_status => x_return_status,
510: x_msg_count => x_msg_count,
511: x_msg_data => x_msg_data);
512: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
513: l_return_status := FND_API.G_RET_STS_ERROR;
514: -- raise FND_API.G_EXC_ERROR;
515: END IF;
516:

Line 513: l_return_status := FND_API.G_RET_STS_ERROR;

509: x_return_status => x_return_status,
510: x_msg_count => x_msg_count,
511: x_msg_data => x_msg_data);
512: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
513: l_return_status := FND_API.G_RET_STS_ERROR;
514: -- raise FND_API.G_EXC_ERROR;
515: END IF;
516:
517: END IF;

Line 514: -- raise FND_API.G_EXC_ERROR;

510: x_msg_count => x_msg_count,
511: x_msg_data => x_msg_data);
512: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
513: l_return_status := FND_API.G_RET_STS_ERROR;
514: -- raise FND_API.G_EXC_ERROR;
515: END IF;
516:
517: END IF;
518:

Line 523: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

519: -- FFANG 112700 For bug 1512008, instead of erroring out once a invalid
520: -- column was found, raise the exception after all validation procedures
521: -- have been gone through.
522: x_return_status := l_return_status;
523: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
524: raise FND_API.G_EXC_ERROR;
525: END IF;
526: -- END FFANG 112700
527:

Line 524: raise FND_API.G_EXC_ERROR;

520: -- column was found, raise the exception after all validation procedures
521: -- have been gone through.
522: x_return_status := l_return_status;
523: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
524: raise FND_API.G_EXC_ERROR;
525: END IF;
526: -- END FFANG 112700
527:
528: -- Debug Message

Line 543: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

539: -- ***************************
540:
541: PROCEDURE Create_sales_lead_contacts(
542: P_Api_Version_Number IN NUMBER,
543: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
544: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
545: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
546: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
547: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

Line 544: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

540:
541: PROCEDURE Create_sales_lead_contacts(
542: P_Api_Version_Number IN NUMBER,
543: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
544: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
545: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
546: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
547: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
548: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,

Line 545: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

541: PROCEDURE Create_sales_lead_contacts(
542: P_Api_Version_Number IN NUMBER,
543: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
544: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
545: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
546: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
547: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
548: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
549: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,

Line 546: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

542: P_Api_Version_Number IN NUMBER,
543: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
544: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
545: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
546: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
547: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
548: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
549: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
550: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type

Line 547: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

543: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
544: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
545: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
546: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
547: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
548: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
549: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
550: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
551: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,

Line 548: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,

544: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
545: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
546: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
547: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
548: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
549: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
550: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
551: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,
552: P_SALES_LEAD_CONTACT_Tbl IN AS_SALES_LEADS_PUB.SALES_LEAD_CONTACT_Tbl_Type

Line 549: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,

545: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
546: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
547: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
548: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
549: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
550: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
551: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,
552: P_SALES_LEAD_CONTACT_Tbl IN AS_SALES_LEADS_PUB.SALES_LEAD_CONTACT_Tbl_Type
553: := AS_SALES_LEADS_PUB.G_MISS_SALES_LEAD_CONTACT_Tbl,

Line 601: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

597: BEGIN
598: -- Standard Start of API savepoint
599: SAVEPOINT CREATE_SALES_LEAD_CONTACTS_PVT;
600: -- Standard call to check for call compatibility.
601: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
602: p_api_version_number,
603: l_api_name,
604: G_PKG_NAME)
605: THEN

Line 606: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

602: p_api_version_number,
603: l_api_name,
604: G_PKG_NAME)
605: THEN
606: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
607: END IF;
608:
609:
610: -- Initialize message list IF p_init_msg_list is set to TRUE.

Line 611: IF FND_API.to_Boolean( p_init_msg_list )

607: END IF;
608:
609:
610: -- Initialize message list IF p_init_msg_list is set to TRUE.
611: IF FND_API.to_Boolean( p_init_msg_list )
612: THEN
613: FND_MSG_PUB.initialize;
614: END IF;
615:

Line 624: x_return_status := FND_API.G_RET_STS_SUCCESS;

620: 'PVT: ' || l_api_name || ' Start');
621: END IF;
622:
623: -- Initialize API return status to SUCCESS
624: x_return_status := FND_API.G_RET_STS_SUCCESS;
625:
626: --
627: -- API body
628: --

Line 642: RAISE FND_API.G_EXC_ERROR;

638: p_msg_name => 'UT_CANNOT_GET_PROFILE_VALUE',
639: p_token1 => 'PROFILE',
640: p_token1_value => 'USER_ID');
641: END IF;
642: RAISE FND_API.G_EXC_ERROR;
643: END IF;
644:
645: IF (p_validation_level = fnd_api.g_valid_level_full)
646: THEN

Line 645: IF (p_validation_level = fnd_api.g_valid_level_full)

641: END IF;
642: RAISE FND_API.G_EXC_ERROR;
643: END IF;
644:
645: IF (p_validation_level = fnd_api.g_valid_level_full)
646: THEN
647: AS_SALES_ORG_MANAGER_PVT.Get_CurrentUser(
648: p_api_version_number => 2.0
649: ,p_init_msg_list => p_init_msg_list

Line 658: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

654: ,x_msg_data => x_msg_data
655: ,x_sales_member_rec => l_identity_sales_member_rec);
656: END IF;
657:
658: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
659: RAISE FND_API.G_EXC_ERROR;
660: END IF;
661:
662:

Line 659: RAISE FND_API.G_EXC_ERROR;

655: ,x_sales_member_rec => l_identity_sales_member_rec);
656: END IF;
657:
658: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
659: RAISE FND_API.G_EXC_ERROR;
660: END IF;
661:
662:
663: -- Bug 3357273 - MASS1R10:11510:FUNC:CONTACT NOT MARKED'PRIMARY'WHEN LEAD HAS MORE THAN 1 CONTACT

Line 674: := FND_API.G_RET_STS_SUCCESS;

670:
671:
672: FOR l_curr_row IN 1..p_sales_lead_contact_tbl.count LOOP
673: x_sales_lead_cnt_out_tbl(l_curr_row).return_status
674: := FND_API.G_RET_STS_SUCCESS;
675:
676: -- Progress Message
677: --
678: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)

Line 725: p_init_msg_list => FND_API.G_FALSE,

721: END IF;
722:
723: -- Invoke validation procedures
724: Validate_sales_lead_contact(
725: p_init_msg_list => FND_API.G_FALSE,
726: p_validation_level => p_validation_level,
727: p_validation_mode => AS_UTILITY_PVT.G_CREATE,
728: P_SALES_LEAD_CONTACT_Rec => l_SALES_LEAD_CONTACT_Rec,
729: x_return_status => x_return_status,

Line 733: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

729: x_return_status => x_return_status,
730: x_msg_count => x_msg_count,
731: x_msg_data => x_msg_data);
732:
733: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
734: x_sales_lead_cnt_out_tbl(l_curr_row).return_status:=x_return_status;
735: RAISE FND_API.G_EXC_ERROR;
736: END IF;
737:

Line 735: RAISE FND_API.G_EXC_ERROR;

731: x_msg_data => x_msg_data);
732:
733: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
734: x_sales_lead_cnt_out_tbl(l_curr_row).return_status:=x_return_status;
735: RAISE FND_API.G_EXC_ERROR;
736: END IF;
737:
738: IF l_SALES_LEAD_CONTACT_rec.ENABLED_FLAG IS NULL OR
739: l_SALES_LEAD_CONTACT_rec.ENABLED_FLAG = FND_API.G_MISS_CHAR

Line 739: l_SALES_LEAD_CONTACT_rec.ENABLED_FLAG = FND_API.G_MISS_CHAR

735: RAISE FND_API.G_EXC_ERROR;
736: END IF;
737:
738: IF l_SALES_LEAD_CONTACT_rec.ENABLED_FLAG IS NULL OR
739: l_SALES_LEAD_CONTACT_rec.ENABLED_FLAG = FND_API.G_MISS_CHAR
740: THEN
741: l_SALES_LEAD_CONTACT_rec.ENABLED_FLAG := 'Y';
742: END IF;
743:

Line 767: ,p_init_msg_list => FND_API.G_FALSE

763: END IF;
764:
765: AS_ACCESS_PUB.Has_updateLeadAccess(
766: p_api_version_number => 2.0
767: ,p_init_msg_list => FND_API.G_FALSE
768: ,p_validation_level => p_validation_level
769: ,p_access_profile_rec => l_access_profile_rec
770: ,p_admin_flag => p_admin_flag
771: ,p_admin_group_id => p_admin_group_id

Line 788: RAISE FND_API.G_EXC_ERROR;

784:
785: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
786: 'API_NO_CREATE_PRIVILEGE');
787: END IF;
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790:
791: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
792: RAISE FND_API.G_EXC_ERROR;

Line 791: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

787: END IF;
788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790:
791: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
792: RAISE FND_API.G_EXC_ERROR;
793: END IF;
794:
795: END IF;

Line 792: RAISE FND_API.G_EXC_ERROR;

788: RAISE FND_API.G_EXC_ERROR;
789: END IF;
790:
791: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
792: RAISE FND_API.G_EXC_ERROR;
793: END IF;
794:
795: END IF;
796:

Line 869: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

865: x_sales_lead_cnt_out_tbl(l_curr_row).lead_contact_id
866: := l_lead_contact_id;
867: x_sales_lead_cnt_out_tbl(l_curr_row).return_status := x_return_status;
868:
869: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
870: RAISE FND_API.G_EXC_ERROR;
871: END IF;
872:
873: END LOOP;

Line 870: RAISE FND_API.G_EXC_ERROR;

866: := l_lead_contact_id;
867: x_sales_lead_cnt_out_tbl(l_curr_row).return_status := x_return_status;
868:
869: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
870: RAISE FND_API.G_EXC_ERROR;
871: END IF;
872:
873: END LOOP;
874:

Line 898: ,P_Init_Msg_List => FND_API.G_FALSE

894:
895: -- Check IF there is only one primary contact
896: Check_primary_contact (
897: P_Api_Version_Number => 2.0
898: ,P_Init_Msg_List => FND_API.G_FALSE
899: ,P_Commit => FND_API.G_FALSE
900: ,p_validation_level => P_Validation_Level
901: ,P_Check_Access_Flag => P_Check_Access_Flag
902: ,P_Admin_Flag => P_Admin_Flag

Line 899: ,P_Commit => FND_API.G_FALSE

895: -- Check IF there is only one primary contact
896: Check_primary_contact (
897: P_Api_Version_Number => 2.0
898: ,P_Init_Msg_List => FND_API.G_FALSE
899: ,P_Commit => FND_API.G_FALSE
900: ,p_validation_level => P_Validation_Level
901: ,P_Check_Access_Flag => P_Check_Access_Flag
902: ,P_Admin_Flag => P_Admin_Flag
903: ,P_Admin_Group_Id => P_Admin_Group_Id

Line 912: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

908: ,X_Msg_Count => X_Msg_Count
909: ,X_Msg_Data => X_Msg_Data
910: );
911:
912: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
913: RAISE FND_API.G_EXC_ERROR;
914: END IF;
915:
916: -- ffang 082801, for bug 1939730, denorm primary contact's

Line 913: RAISE FND_API.G_EXC_ERROR;

909: ,X_Msg_Data => X_Msg_Data
910: );
911:
912: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
913: RAISE FND_API.G_EXC_ERROR;
914: END IF;
915:
916: -- ffang 082801, for bug 1939730, denorm primary contact's
917: -- contact_party_id to as_sales_leads.primary_contact_party_id

Line 953: IF FND_API.to_Boolean( p_commit )

949: -- END of API body
950: --
951:
952: -- Standard check for p_commit
953: IF FND_API.to_Boolean( p_commit )
954: THEN
955: COMMIT WORK;
956: END IF;
957:

Line 974: WHEN FND_API.G_EXC_ERROR THEN

970: p_data => x_msg_data
971: );
972:
973: EXCEPTION
974: WHEN FND_API.G_EXC_ERROR THEN
975: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
976: P_API_NAME => L_API_NAME
977: ,P_PKG_NAME => G_PKG_NAME
978: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 984: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

980: ,X_MSG_COUNT => X_MSG_COUNT
981: ,X_MSG_DATA => X_MSG_DATA
982: ,X_RETURN_STATUS => X_RETURN_STATUS);
983:
984: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
985: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
986: P_API_NAME => L_API_NAME
987: ,P_PKG_NAME => G_PKG_NAME
988: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 1010: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1006:
1007:
1008: PROCEDURE Update_sales_lead_contacts(
1009: P_Api_Version_Number IN NUMBER,
1010: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1011: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1012: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1013: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1014: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

Line 1011: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1007:
1008: PROCEDURE Update_sales_lead_contacts(
1009: P_Api_Version_Number IN NUMBER,
1010: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1011: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1012: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1013: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1014: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1015: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,

Line 1012: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1008: PROCEDURE Update_sales_lead_contacts(
1009: P_Api_Version_Number IN NUMBER,
1010: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1011: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1012: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1013: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1014: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1015: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1016: P_Identity_Salesforce_Id IN NUMBER := FND_API.G_MISS_NUM,

Line 1013: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

1009: P_Api_Version_Number IN NUMBER,
1010: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1011: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1012: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1013: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1014: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1015: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1016: P_Identity_Salesforce_Id IN NUMBER := FND_API.G_MISS_NUM,
1017: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type

Line 1014: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

1010: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1011: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1012: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1013: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1014: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1015: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1016: P_Identity_Salesforce_Id IN NUMBER := FND_API.G_MISS_NUM,
1017: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
1018: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,

Line 1015: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,

1011: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1012: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1013: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1014: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1015: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1016: P_Identity_Salesforce_Id IN NUMBER := FND_API.G_MISS_NUM,
1017: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
1018: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,
1019: P_SALES_LEAD_CONTACT_Tbl IN

Line 1016: P_Identity_Salesforce_Id IN NUMBER := FND_API.G_MISS_NUM,

1012: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1013: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1014: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1015: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1016: P_Identity_Salesforce_Id IN NUMBER := FND_API.G_MISS_NUM,
1017: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
1018: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,
1019: P_SALES_LEAD_CONTACT_Tbl IN
1020: AS_SALES_LEADS_PUB.SALES_LEAD_CONTACT_Tbl_Type,

Line 1066: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1062: -- Standard Start of API savepoint
1063: SAVEPOINT UPDATE_SALES_LEAD_CONTACTS_PVT;
1064:
1065: -- Standard call to check for call compatibility.
1066: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1067: p_api_version_number,
1068: l_api_name,
1069: G_PKG_NAME)
1070: THEN

Line 1071: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1067: p_api_version_number,
1068: l_api_name,
1069: G_PKG_NAME)
1070: THEN
1071: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1072: END IF;
1073:
1074: -- Initialize message list IF p_init_msg_list is set to TRUE.
1075: IF FND_API.to_Boolean( p_init_msg_list )

Line 1075: IF FND_API.to_Boolean( p_init_msg_list )

1071: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1072: END IF;
1073:
1074: -- Initialize message list IF p_init_msg_list is set to TRUE.
1075: IF FND_API.to_Boolean( p_init_msg_list )
1076: THEN
1077: FND_MSG_PUB.initialize;
1078: END IF;
1079:

Line 1088: x_return_status := FND_API.G_RET_STS_SUCCESS;

1084: 'PVT: ' || l_api_name || ' Start');
1085: END IF;
1086:
1087: -- Initialize API return status to SUCCESS
1088: x_return_status := FND_API.G_RET_STS_SUCCESS;
1089:
1090: --
1091: -- Api body
1092: --

Line 1107: RAISE FND_API.G_EXC_ERROR;

1103: p_msg_name => 'UT_CANNOT_GET_PROFILE_VALUE',
1104: p_token1 => 'PROFILE',
1105: p_token1_value => 'USER_ID');
1106: END IF;
1107: RAISE FND_API.G_EXC_ERROR;
1108: END IF;
1109:
1110: IF (p_validation_level = fnd_api.g_valid_level_full)
1111: THEN

Line 1110: IF (p_validation_level = fnd_api.g_valid_level_full)

1106: END IF;
1107: RAISE FND_API.G_EXC_ERROR;
1108: END IF;
1109:
1110: IF (p_validation_level = fnd_api.g_valid_level_full)
1111: THEN
1112: AS_SALES_ORG_MANAGER_PVT.Get_CurrentUser(
1113: p_api_version_number => 2.0
1114: ,p_init_msg_list => p_init_msg_list

Line 1123: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1119: ,x_msg_data => x_msg_data
1120: ,x_sales_member_rec => l_identity_sales_member_rec);
1121: END IF;
1122:
1123: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1124: RAISE FND_API.G_EXC_ERROR;
1125: END IF;
1126:
1127: FOR l_curr_row IN 1..p_sales_lead_contact_tbl.count LOOP

Line 1124: RAISE FND_API.G_EXC_ERROR;

1120: ,x_sales_member_rec => l_identity_sales_member_rec);
1121: END IF;
1122:
1123: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1124: RAISE FND_API.G_EXC_ERROR;
1125: END IF;
1126:
1127: FOR l_curr_row IN 1..p_sales_lead_contact_tbl.count LOOP
1128: x_sales_lead_cnt_out_tbl(l_curr_row).return_status

Line 1129: := FND_API.G_RET_STS_SUCCESS;

1125: END IF;
1126:
1127: FOR l_curr_row IN 1..p_sales_lead_contact_tbl.count LOOP
1128: x_sales_lead_cnt_out_tbl(l_curr_row).return_status
1129: := FND_API.G_RET_STS_SUCCESS;
1130:
1131: -- Progress Message
1132: --
1133: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)

Line 1176: raise FND_API.G_EXC_ERROR;

1172: FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
1173: FND_MESSAGE.Set_Token ('INFO', 'SALES_LEAD_CONTACT', FALSE);
1174: FND_MSG_PUB.Add;
1175: END IF;
1176: raise FND_API.G_EXC_ERROR;
1177: END IF;
1178:
1179: -- Debug Message
1180: IF (AS_DEBUG_LOW_ON) THEN

Line 1189: l_tar_SALES_LEAD_CONTACT_rec.last_update_date = FND_API.G_MISS_Date )

1185: Close C_Get_contact;
1186:
1187: -- Check Whether record has been changed by someone else
1188: IF (l_tar_SALES_LEAD_CONTACT_rec.last_update_date is NULL or
1189: l_tar_SALES_LEAD_CONTACT_rec.last_update_date = FND_API.G_MISS_Date )
1190: THEN
1191: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1192: THEN
1193: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');

Line 1197: raise FND_API.G_EXC_ERROR;

1193: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1194: FND_MESSAGE.Set_Token('COLUMN', 'LAST_UPDATE_DATE', FALSE);
1195: FND_MSG_PUB.ADD;
1196: END IF;
1197: raise FND_API.G_EXC_ERROR;
1198: END IF;
1199:
1200: IF (l_tar_SALES_LEAD_CONTACT_rec.last_update_date <> l_last_update_date)
1201: THEN

Line 1208: raise FND_API.G_EXC_ERROR;

1204: FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
1205: FND_MESSAGE.Set_Token('INFO', 'SALES_LEAD_CONTACT', FALSE);
1206: FND_MSG_PUB.ADD;
1207: END IF;
1208: raise FND_API.G_EXC_ERROR;
1209: END IF;
1210:
1211: -- Debug message
1212: IF (AS_DEBUG_LOW_ON) THEN

Line 1220: p_init_msg_list => FND_API.G_FALSE,

1216: END IF;
1217:
1218: -- Invoke validation procedures
1219: Validate_sales_lead_contact(
1220: p_init_msg_list => FND_API.G_FALSE,
1221: p_validation_level => p_validation_level,
1222: p_validation_mode => AS_UTILITY_PVT.G_UPDATE,
1223: P_SALES_LEAD_CONTACT_Rec => l_tar_SALES_LEAD_CONTACT_Rec,
1224: x_return_status => x_return_status,

Line 1228: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1224: x_return_status => x_return_status,
1225: x_msg_count => x_msg_count,
1226: x_msg_data => x_msg_data);
1227:
1228: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1229: x_sales_lead_cnt_out_tbl(l_curr_row).return_status:=x_return_status;
1230: RAISE FND_API.G_EXC_ERROR;
1231: END IF;
1232:

Line 1230: RAISE FND_API.G_EXC_ERROR;

1226: x_msg_data => x_msg_data);
1227:
1228: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1229: x_sales_lead_cnt_out_tbl(l_curr_row).return_status:=x_return_status;
1230: RAISE FND_API.G_EXC_ERROR;
1231: END IF;
1232:
1233: IF(P_Check_Access_Flag = 'Y') THEN
1234: -- Call Get_Access_Profiles to get access_profile_rec

Line 1264: ,p_init_msg_list => FND_API.G_FALSE

1260:
1261: END IF;
1262: AS_ACCESS_PUB.Has_updateLeadAccess(
1263: p_api_version_number => 2.0
1264: ,p_init_msg_list => FND_API.G_FALSE
1265: ,p_validation_level => p_validation_level
1266: ,p_access_profile_rec => l_access_profile_rec
1267: ,p_admin_flag => p_admin_flag
1268: ,p_admin_group_id => p_admin_group_id

Line 1285: RAISE FND_API.G_EXC_ERROR;

1281:
1282: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
1283: 'API_NO_CREATE_PRIVILEGE');
1284: END IF;
1285: RAISE FND_API.G_EXC_ERROR;
1286: END IF;
1287:
1288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1289: RAISE FND_API.G_EXC_ERROR;

Line 1288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1284: END IF;
1285: RAISE FND_API.G_EXC_ERROR;
1286: END IF;
1287:
1288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1289: RAISE FND_API.G_EXC_ERROR;
1290: END IF;
1291:
1292: END IF;

Line 1289: RAISE FND_API.G_EXC_ERROR;

1285: RAISE FND_API.G_EXC_ERROR;
1286: END IF;
1287:
1288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1289: RAISE FND_API.G_EXC_ERROR;
1290: END IF;
1291:
1292: END IF;
1293:

Line 1367: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1363: x_sales_lead_cnt_out_tbl(l_curr_row).lead_contact_id
1364: := l_tar_sales_lead_contact_rec.lead_contact_id;
1365: x_sales_lead_cnt_out_tbl(l_curr_row).return_status := x_return_status;
1366:
1367: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1368: RAISE FND_API.G_EXC_ERROR;
1369: END IF;
1370: END LOOP;
1371:

Line 1368: RAISE FND_API.G_EXC_ERROR;

1364: := l_tar_sales_lead_contact_rec.lead_contact_id;
1365: x_sales_lead_cnt_out_tbl(l_curr_row).return_status := x_return_status;
1366:
1367: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1368: RAISE FND_API.G_EXC_ERROR;
1369: END IF;
1370: END LOOP;
1371:
1372: -- Debug Message

Line 1396: ,P_Init_Msg_List => FND_API.G_FALSE

1392:
1393: -- Check IF there is only one primary contact
1394: Check_primary_contact (
1395: P_Api_Version_Number => 2.0
1396: ,P_Init_Msg_List => FND_API.G_FALSE
1397: ,P_Commit => FND_API.G_FALSE
1398: ,p_validation_level => P_Validation_Level
1399: ,P_Check_Access_Flag => P_Check_Access_Flag
1400: ,P_Admin_Flag => P_Admin_Flag

Line 1397: ,P_Commit => FND_API.G_FALSE

1393: -- Check IF there is only one primary contact
1394: Check_primary_contact (
1395: P_Api_Version_Number => 2.0
1396: ,P_Init_Msg_List => FND_API.G_FALSE
1397: ,P_Commit => FND_API.G_FALSE
1398: ,p_validation_level => P_Validation_Level
1399: ,P_Check_Access_Flag => P_Check_Access_Flag
1400: ,P_Admin_Flag => P_Admin_Flag
1401: ,P_Admin_Group_Id => P_Admin_Group_Id

Line 1410: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1406: ,X_Msg_Count => X_Msg_Count
1407: ,X_Msg_Data => X_Msg_Data
1408: );
1409:
1410: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1411: RAISE FND_API.G_EXC_ERROR;
1412: END IF;
1413:
1414: -- ffang 082801, for bug 1939730, denorm primary contact's

Line 1411: RAISE FND_API.G_EXC_ERROR;

1407: ,X_Msg_Data => X_Msg_Data
1408: );
1409:
1410: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1411: RAISE FND_API.G_EXC_ERROR;
1412: END IF;
1413:
1414: -- ffang 082801, for bug 1939730, denorm primary contact's
1415: -- contact_party_id to as_sales_leads.primary_contact_party_id

Line 1455: IF FND_API.to_Boolean( p_commit )

1451: -- END of API body.
1452: --
1453:
1454: -- Standard check for p_commit
1455: IF FND_API.to_Boolean( p_commit )
1456: THEN
1457: COMMIT WORK;
1458: END IF;
1459:

Line 1473: WHEN FND_API.G_EXC_ERROR THEN

1469: ( p_count => x_msg_count,
1470: p_data => x_msg_data );
1471:
1472: EXCEPTION
1473: WHEN FND_API.G_EXC_ERROR THEN
1474: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1475: P_API_NAME => L_API_NAME
1476: ,P_PKG_NAME => G_PKG_NAME
1477: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 1483: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1479: ,X_MSG_COUNT => X_MSG_COUNT
1480: ,X_MSG_DATA => X_MSG_DATA
1481: ,X_RETURN_STATUS => X_RETURN_STATUS);
1482:
1483: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1484: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1485: P_API_NAME => L_API_NAME
1486: ,P_PKG_NAME => G_PKG_NAME
1487: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 1509: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1505:
1506:
1507: PROCEDURE Delete_sales_lead_contacts(
1508: P_Api_Version_Number IN NUMBER,
1509: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1512: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1513: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

Line 1510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1506:
1507: PROCEDURE Delete_sales_lead_contacts(
1508: P_Api_Version_Number IN NUMBER,
1509: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1512: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1513: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1514: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,

Line 1511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1507: PROCEDURE Delete_sales_lead_contacts(
1508: P_Api_Version_Number IN NUMBER,
1509: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1512: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1513: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1514: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1515: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,

Line 1512: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

1508: P_Api_Version_Number IN NUMBER,
1509: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1512: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1513: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1514: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1515: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
1516: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type

Line 1513: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

1509: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1512: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1513: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1514: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1515: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
1516: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
1517: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,

Line 1514: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,

1510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1512: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1513: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1514: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1515: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
1516: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
1517: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,
1518: P_SALES_LEAD_CONTACT_Tbl IN

Line 1515: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,

1511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1512: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1513: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1514: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1515: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
1516: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
1517: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,
1518: P_SALES_LEAD_CONTACT_Tbl IN
1519: AS_SALES_LEADS_PUB.SALES_LEAD_CONTACT_Tbl_Type,

Line 1552: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1548: -- Standard Start of API savepoint
1549: SAVEPOINT DELETE_SALES_LEAD_CONTACTS_PVT;
1550:
1551: -- Standard call to check for call compatibility.
1552: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1553: p_api_version_number,
1554: l_api_name,
1555: G_PKG_NAME)
1556: THEN

Line 1557: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1553: p_api_version_number,
1554: l_api_name,
1555: G_PKG_NAME)
1556: THEN
1557: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1558: END IF;
1559:
1560: -- Initialize message list IF p_init_msg_list is set to TRUE.
1561: IF FND_API.to_Boolean( p_init_msg_list )

Line 1561: IF FND_API.to_Boolean( p_init_msg_list )

1557: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1558: END IF;
1559:
1560: -- Initialize message list IF p_init_msg_list is set to TRUE.
1561: IF FND_API.to_Boolean( p_init_msg_list )
1562: THEN
1563: FND_MSG_PUB.initialize;
1564: END IF;
1565:

Line 1574: x_return_status := FND_API.G_RET_STS_SUCCESS;

1570: 'PVT:' || l_api_name || 'start');
1571: END IF;
1572:
1573: -- Initialize API return status to SUCCESS
1574: x_return_status := FND_API.G_RET_STS_SUCCESS;
1575:
1576: --
1577: -- Api body
1578: --

Line 1593: RAISE FND_API.G_EXC_ERROR;

1589: p_msg_name => 'UT_CANNOT_GET_PROFILE_VALUE',
1590: p_token1 => 'PROFILE',
1591: p_token1_value => 'USER_ID');
1592: END IF;
1593: RAISE FND_API.G_EXC_ERROR;
1594: END IF;
1595:
1596: IF (p_validation_level = fnd_api.g_valid_level_full)
1597: THEN

Line 1596: IF (p_validation_level = fnd_api.g_valid_level_full)

1592: END IF;
1593: RAISE FND_API.G_EXC_ERROR;
1594: END IF;
1595:
1596: IF (p_validation_level = fnd_api.g_valid_level_full)
1597: THEN
1598: AS_SALES_ORG_MANAGER_PVT.Get_CurrentUser(
1599: p_api_version_number => 2.0
1600: ,p_init_msg_list => p_init_msg_list

Line 1609: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1605: ,x_msg_data => x_msg_data
1606: ,x_sales_member_rec => l_identity_sales_member_rec);
1607: END IF;
1608:
1609: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1610: RAISE FND_API.G_EXC_ERROR;
1611: END IF;
1612:
1613:

Line 1610: RAISE FND_API.G_EXC_ERROR;

1606: ,x_sales_member_rec => l_identity_sales_member_rec);
1607: END IF;
1608:
1609: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1610: RAISE FND_API.G_EXC_ERROR;
1611: END IF;
1612:
1613:
1614: FOR l_curr_row IN 1..p_sales_lead_contact_tbl.count LOOP

Line 1616: := FND_API.G_RET_STS_SUCCESS;

1612:
1613:
1614: FOR l_curr_row IN 1..p_sales_lead_contact_tbl.count LOOP
1615: x_sales_lead_cnt_out_tbl(l_curr_row).return_status
1616: := FND_API.G_RET_STS_SUCCESS;
1617:
1618: -- Progress Message
1619: --
1620: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)

Line 1649: raise FND_API.G_EXC_ERROR;

1645: FND_MESSAGE.Set_Name('AS', 'API_MISSING_UPDATE_TARGET');
1646: FND_MESSAGE.Set_Token ('INFO', 'SALES_LEAD_CONTACT', FALSE);
1647: FND_MSG_PUB.Add;
1648: END IF;
1649: raise FND_API.G_EXC_ERROR;
1650: END IF;
1651:
1652: -- Debug Message
1653: IF (AS_DEBUG_LOW_ON) THEN

Line 1683: ,p_init_msg_list => FND_API.G_FALSE

1679: END IF;
1680:
1681: AS_ACCESS_PUB.Has_updateLeadAccess(
1682: p_api_version_number => 2.0
1683: ,p_init_msg_list => FND_API.G_FALSE
1684: ,p_validation_level => p_validation_level
1685: ,p_access_profile_rec => l_access_profile_rec
1686: ,p_admin_flag => p_admin_flag
1687: ,p_admin_group_id => p_admin_group_id

Line 1704: RAISE FND_API.G_EXC_ERROR;

1700:
1701: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR,
1702: 'API_NO_CREATE_PRIVILEGE');
1703: END IF;
1704: RAISE FND_API.G_EXC_ERROR;
1705: END IF;
1706:
1707: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1708: RAISE FND_API.G_EXC_ERROR;

Line 1707: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1703: END IF;
1704: RAISE FND_API.G_EXC_ERROR;
1705: END IF;
1706:
1707: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1708: RAISE FND_API.G_EXC_ERROR;
1709: END IF;
1710:
1711: END IF;

Line 1708: RAISE FND_API.G_EXC_ERROR;

1704: RAISE FND_API.G_EXC_ERROR;
1705: END IF;
1706:
1707: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1708: RAISE FND_API.G_EXC_ERROR;
1709: END IF;
1710:
1711: END IF;
1712:

Line 1728: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1724: x_sales_lead_cnt_out_tbl(l_curr_row).lead_contact_id
1725: := l_sales_lead_contact_rec.lead_contact_id;
1726: x_sales_lead_cnt_out_tbl(l_curr_row).return_status := x_return_status;
1727:
1728: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: END IF;
1731:
1732: -- Debug Message

Line 1729: RAISE FND_API.G_EXC_ERROR;

1725: := l_sales_lead_contact_rec.lead_contact_id;
1726: x_sales_lead_cnt_out_tbl(l_curr_row).return_status := x_return_status;
1727:
1728: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1729: RAISE FND_API.G_EXC_ERROR;
1730: END IF;
1731:
1732: -- Debug Message
1733: IF (AS_DEBUG_LOW_ON) THEN

Line 1769: IF FND_API.to_Boolean( p_commit )

1765: -- END of API body
1766: --
1767:
1768: -- Standard check for p_commit
1769: IF FND_API.to_Boolean( p_commit )
1770: THEN
1771: COMMIT WORK;
1772: END IF;
1773:

Line 1788: WHEN FND_API.G_EXC_ERROR THEN

1784: ( p_count => x_msg_count,
1785: p_data => x_msg_data );
1786:
1787: EXCEPTION
1788: WHEN FND_API.G_EXC_ERROR THEN
1789: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1790: P_API_NAME => L_API_NAME
1791: ,P_PKG_NAME => G_PKG_NAME
1792: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 1798: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1794: ,X_MSG_COUNT => X_MSG_COUNT
1795: ,X_MSG_DATA => X_MSG_DATA
1796: ,X_RETURN_STATUS => X_RETURN_STATUS);
1797:
1798: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1799: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1800: P_API_NAME => L_API_NAME
1801: ,P_PKG_NAME => G_PKG_NAME
1802: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

Line 1826: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,

1822: -- API Name: Check_primary_contact
1823:
1824: PROCEDURE Check_primary_contact (
1825: P_Api_Version_Number IN NUMBER,
1826: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1827: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1828: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1829: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1830: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

Line 1827: P_Commit IN VARCHAR2 := FND_API.G_FALSE,

1823:
1824: PROCEDURE Check_primary_contact (
1825: P_Api_Version_Number IN NUMBER,
1826: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1827: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1828: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1829: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1830: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1831: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,

Line 1828: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1824: PROCEDURE Check_primary_contact (
1825: P_Api_Version_Number IN NUMBER,
1826: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1827: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1828: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1829: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1830: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1831: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1832: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,

Line 1829: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

1825: P_Api_Version_Number IN NUMBER,
1826: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1827: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1828: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1829: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1830: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1831: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1832: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
1833: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type

Line 1830: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,

1826: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1827: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1828: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1829: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1830: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1831: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1832: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
1833: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
1834: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,

Line 1831: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,

1827: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
1828: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1829: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1830: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1831: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1832: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
1833: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
1834: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,
1835: P_SALES_LEAD_ID IN NUMBER,

Line 1832: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,

1828: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1829: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1830: P_Admin_Flag IN VARCHAR2 := FND_API.G_MISS_CHAR,
1831: P_Admin_Group_Id IN NUMBER := FND_API.G_MISS_NUM,
1832: P_identity_salesforce_id IN NUMBER := FND_API.G_MISS_NUM,
1833: P_Sales_Lead_Profile_Tbl IN AS_UTILITY_PUB.Profile_Tbl_Type
1834: := AS_UTILITY_PUB.G_MISS_PROFILE_TBL,
1835: P_SALES_LEAD_ID IN NUMBER,
1836: X_Return_Status OUT NOCOPY VARCHAR2,

Line 1859: IF FND_API.to_Boolean( p_init_msg_list )

1855: l_member_access VARCHAR2(5);
1856:
1857: BEGIN
1858: -- Initialize message list IF p_init_msg_list is set to TRUE.
1859: IF FND_API.to_Boolean( p_init_msg_list )
1860: THEN
1861: FND_MSG_PUB.initialize;
1862: END IF;
1863:

Line 1865: x_return_status := FND_API.G_RET_STS_SUCCESS;

1861: FND_MSG_PUB.initialize;
1862: END IF;
1863:
1864: -- Initialize API return status to SUCCESS
1865: x_return_status := FND_API.G_RET_STS_SUCCESS;
1866:
1867: --
1868: -- Api body
1869: --

Line 1884: RAISE FND_API.G_EXC_ERROR;

1880: p_msg_name => 'UT_CANNOT_GET_PROFILE_VALUE',
1881: p_token1 => 'PROFILE',
1882: p_token1_value => 'USER_ID');
1883: END IF;
1884: RAISE FND_API.G_EXC_ERROR;
1885: END IF;
1886:
1887: IF (p_validation_level = fnd_api.g_valid_level_full)
1888: THEN

Line 1887: IF (p_validation_level = fnd_api.g_valid_level_full)

1883: END IF;
1884: RAISE FND_API.G_EXC_ERROR;
1885: END IF;
1886:
1887: IF (p_validation_level = fnd_api.g_valid_level_full)
1888: THEN
1889: AS_SALES_ORG_MANAGER_PVT.Get_CurrentUser(
1890: p_api_version_number => 2.0
1891: ,p_init_msg_list => p_init_msg_list

Line 1900: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1896: ,x_msg_data => x_msg_data
1897: ,x_sales_member_rec => l_identity_sales_member_rec);
1898: END IF;
1899:
1900: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1901: RAISE FND_API.G_EXC_ERROR;
1902: END IF;
1903:
1904: OPEN C_Get_Primary_Contact_Count (P_SALES_LEAD_ID);

Line 1901: RAISE FND_API.G_EXC_ERROR;

1897: ,x_sales_member_rec => l_identity_sales_member_rec);
1898: END IF;
1899:
1900: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1901: RAISE FND_API.G_EXC_ERROR;
1902: END IF;
1903:
1904: OPEN C_Get_Primary_Contact_Count (P_SALES_LEAD_ID);
1905: FETCH C_Get_Primary_Contact_Count into l_count;

Line 1925: RAISE FND_API.G_EXC_ERROR;

1921: 'More than one primary contact');
1922: END IF;
1923: AS_UTILITY_PVT.Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1924: p_msg_name => 'API_PRIMARY_CONTACT_DUP_FOUND');
1925: RAISE FND_API.G_EXC_ERROR;
1926: END IF;
1927:
1928: --
1929: -- END of API body

Line 1933: IF FND_API.to_Boolean( p_commit )

1929: -- END of API body
1930: --
1931:
1932: -- Standard check for p_commit
1933: IF FND_API.to_Boolean( p_commit )
1934: THEN
1935: COMMIT WORK;
1936: END IF;
1937:

Line 1953: WHEN FND_API.G_EXC_ERROR THEN

1949: p_data => x_msg_data
1950: );
1951:
1952: EXCEPTION
1953: WHEN FND_API.G_EXC_ERROR THEN
1954: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1955: P_API_NAME => L_API_NAME
1956: ,P_PKG_NAME => G_PKG_NAME
1957: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

Line 1963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1959: ,X_MSG_COUNT => X_MSG_COUNT
1960: ,X_MSG_DATA => X_MSG_DATA
1961: ,X_RETURN_STATUS => X_RETURN_STATUS);
1962:
1963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1964: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1965: P_API_NAME => L_API_NAME
1966: ,P_PKG_NAME => G_PKG_NAME
1967: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR