DBA Data[Home] [Help]

APPS.AS_INTEREST_PVT dependencies on FND_API

Line 33: -- FND_API.G_MISS for update purpose

29: -- Add interest_id, customer_id, address_id,
30: -- contact_id and lead_id into
31: -- interest record
32: -- Changed interest rec default value NULL to
33: -- FND_API.G_MISS for update purpose
34: --
35:
36:
37: /*************************** PRIVATE ROUTINES *********************************/

Line 44: if (l_interest_rec.interest_id = FND_API.G_MISS_NUM)

40: PROCEDURE convert_miss_interest_rec(p_interest_rec IN INTEREST_REC_TYPE,
41: x_interest_rec OUT NOCOPY INTEREST_REC_TYPE) is
42: l_interest_rec INTEREST_REC_TYPE := p_interest_rec;
43: Begin
44: if (l_interest_rec.interest_id = FND_API.G_MISS_NUM)
45: then
46: l_interest_rec.interest_id := NULL;
47: end if;
48: if (l_interest_rec.customer_id = FND_API.G_MISS_NUM)

Line 48: if (l_interest_rec.customer_id = FND_API.G_MISS_NUM)

44: if (l_interest_rec.interest_id = FND_API.G_MISS_NUM)
45: then
46: l_interest_rec.interest_id := NULL;
47: end if;
48: if (l_interest_rec.customer_id = FND_API.G_MISS_NUM)
49: then
50: l_interest_rec.customer_id := NULL;
51: end if;
52: if (l_interest_rec.address_id = FND_API.G_MISS_NUM)

Line 52: if (l_interest_rec.address_id = FND_API.G_MISS_NUM)

48: if (l_interest_rec.customer_id = FND_API.G_MISS_NUM)
49: then
50: l_interest_rec.customer_id := NULL;
51: end if;
52: if (l_interest_rec.address_id = FND_API.G_MISS_NUM)
53: then
54: l_interest_rec.address_id := NULL;
55: end if;
56: if (l_interest_rec.contact_id = FND_API.G_MISS_NUM)

Line 56: if (l_interest_rec.contact_id = FND_API.G_MISS_NUM)

52: if (l_interest_rec.address_id = FND_API.G_MISS_NUM)
53: then
54: l_interest_rec.address_id := NULL;
55: end if;
56: if (l_interest_rec.contact_id = FND_API.G_MISS_NUM)
57: then
58: l_interest_rec.contact_id := NULL;
59: end if;
60: if (l_interest_rec.lead_id = FND_API.G_MISS_NUM)

Line 60: if (l_interest_rec.lead_id = FND_API.G_MISS_NUM)

56: if (l_interest_rec.contact_id = FND_API.G_MISS_NUM)
57: then
58: l_interest_rec.contact_id := NULL;
59: end if;
60: if (l_interest_rec.lead_id = FND_API.G_MISS_NUM)
61: then
62: l_interest_rec.lead_id := NULL;
63: end if;
64: if (l_interest_rec.interest_type_id = FND_API.G_MISS_NUM)

Line 64: if (l_interest_rec.interest_type_id = FND_API.G_MISS_NUM)

60: if (l_interest_rec.lead_id = FND_API.G_MISS_NUM)
61: then
62: l_interest_rec.lead_id := NULL;
63: end if;
64: if (l_interest_rec.interest_type_id = FND_API.G_MISS_NUM)
65: then
66: l_interest_rec.interest_type_id := NULL;
67: end if;
68: if (l_interest_rec.primary_interest_code_id = FND_API.G_MISS_NUM)

Line 68: if (l_interest_rec.primary_interest_code_id = FND_API.G_MISS_NUM)

64: if (l_interest_rec.interest_type_id = FND_API.G_MISS_NUM)
65: then
66: l_interest_rec.interest_type_id := NULL;
67: end if;
68: if (l_interest_rec.primary_interest_code_id = FND_API.G_MISS_NUM)
69: then
70: l_interest_rec.primary_interest_code_id := NULL;
71: end if;
72: if (l_interest_rec.secondary_interest_code_id = FND_API.G_MISS_NUM)

Line 72: if (l_interest_rec.secondary_interest_code_id = FND_API.G_MISS_NUM)

68: if (l_interest_rec.primary_interest_code_id = FND_API.G_MISS_NUM)
69: then
70: l_interest_rec.primary_interest_code_id := NULL;
71: end if;
72: if (l_interest_rec.secondary_interest_code_id = FND_API.G_MISS_NUM)
73: then
74: l_interest_rec.secondary_interest_code_id := NULL;
75: end if;
76: if (l_interest_rec.status_code = FND_API.G_MISS_CHAR)

Line 76: if (l_interest_rec.status_code = FND_API.G_MISS_CHAR)

72: if (l_interest_rec.secondary_interest_code_id = FND_API.G_MISS_NUM)
73: then
74: l_interest_rec.secondary_interest_code_id := NULL;
75: end if;
76: if (l_interest_rec.status_code = FND_API.G_MISS_CHAR)
77: then
78: l_interest_rec.status_code := NULL;
79: end if;
80: if (l_interest_rec.status = FND_API.G_MISS_CHAR)

Line 80: if (l_interest_rec.status = FND_API.G_MISS_CHAR)

76: if (l_interest_rec.status_code = FND_API.G_MISS_CHAR)
77: then
78: l_interest_rec.status_code := NULL;
79: end if;
80: if (l_interest_rec.status = FND_API.G_MISS_CHAR)
81: then
82: l_interest_rec.status := NULL;
83: end if;
84: if (l_interest_rec.description = FND_API.G_MISS_CHAR)

Line 84: if (l_interest_rec.description = FND_API.G_MISS_CHAR)

80: if (l_interest_rec.status = FND_API.G_MISS_CHAR)
81: then
82: l_interest_rec.status := NULL;
83: end if;
84: if (l_interest_rec.description = FND_API.G_MISS_CHAR)
85: then
86: l_interest_rec.description := NULL;
87: end if;
88: if (l_interest_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR)

Line 88: if (l_interest_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR)

84: if (l_interest_rec.description = FND_API.G_MISS_CHAR)
85: then
86: l_interest_rec.description := NULL;
87: end if;
88: if (l_interest_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR)
89: then
90: l_interest_rec.ATTRIBUTE_CATEGORY := NULL;
91: end if;
92: if (l_interest_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR)

Line 92: if (l_interest_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR)

88: if (l_interest_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR)
89: then
90: l_interest_rec.ATTRIBUTE_CATEGORY := NULL;
91: end if;
92: if (l_interest_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR)
93: then
94: l_interest_rec.ATTRIBUTE1 := NULL;
95: end if;
96: if (l_interest_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR)

Line 96: if (l_interest_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR)

92: if (l_interest_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR)
93: then
94: l_interest_rec.ATTRIBUTE1 := NULL;
95: end if;
96: if (l_interest_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR)
97: then
98: l_interest_rec.ATTRIBUTE2 := NULL;
99: end if;
100: if (l_interest_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR)

Line 100: if (l_interest_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR)

96: if (l_interest_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR)
97: then
98: l_interest_rec.ATTRIBUTE2 := NULL;
99: end if;
100: if (l_interest_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR)
101: then
102: l_interest_rec.ATTRIBUTE3 := NULL;
103: end if;
104: if (l_interest_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR)

Line 104: if (l_interest_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR)

100: if (l_interest_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR)
101: then
102: l_interest_rec.ATTRIBUTE3 := NULL;
103: end if;
104: if (l_interest_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR)
105: then
106: l_interest_rec.ATTRIBUTE4 := NULL;
107: end if;
108: if (l_interest_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR)

Line 108: if (l_interest_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR)

104: if (l_interest_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR)
105: then
106: l_interest_rec.ATTRIBUTE4 := NULL;
107: end if;
108: if (l_interest_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR)
109: then
110: l_interest_rec.ATTRIBUTE5 := NULL;
111: end if;
112: if (l_interest_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR)

Line 112: if (l_interest_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR)

108: if (l_interest_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR)
109: then
110: l_interest_rec.ATTRIBUTE5 := NULL;
111: end if;
112: if (l_interest_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR)
113: then
114: l_interest_rec.ATTRIBUTE6 := NULL;
115: end if;
116: if (l_interest_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR)

Line 116: if (l_interest_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR)

112: if (l_interest_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR)
113: then
114: l_interest_rec.ATTRIBUTE6 := NULL;
115: end if;
116: if (l_interest_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR)
117: then
118: l_interest_rec.ATTRIBUTE7 := NULL;
119: end if;
120: if (l_interest_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR)

Line 120: if (l_interest_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR)

116: if (l_interest_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR)
117: then
118: l_interest_rec.ATTRIBUTE7 := NULL;
119: end if;
120: if (l_interest_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR)
121: then
122: l_interest_rec.ATTRIBUTE8 := NULL;
123: end if;
124: if (l_interest_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR)

Line 124: if (l_interest_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR)

120: if (l_interest_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR)
121: then
122: l_interest_rec.ATTRIBUTE8 := NULL;
123: end if;
124: if (l_interest_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR)
125: then
126: l_interest_rec.ATTRIBUTE9 := NULL;
127: end if;
128: if (l_interest_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR)

Line 128: if (l_interest_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR)

124: if (l_interest_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR)
125: then
126: l_interest_rec.ATTRIBUTE9 := NULL;
127: end if;
128: if (l_interest_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR)
129: then
130: l_interest_rec.ATTRIBUTE10 := NULL;
131: end if;
132: if (l_interest_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR)

Line 132: if (l_interest_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR)

128: if (l_interest_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR)
129: then
130: l_interest_rec.ATTRIBUTE10 := NULL;
131: end if;
132: if (l_interest_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR)
133: then
134: l_interest_rec.ATTRIBUTE11 := NULL;
135: end if;
136: if (l_interest_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR)

Line 136: if (l_interest_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR)

132: if (l_interest_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR)
133: then
134: l_interest_rec.ATTRIBUTE11 := NULL;
135: end if;
136: if (l_interest_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR)
137: then
138: l_interest_rec.ATTRIBUTE12 := NULL;
139: end if;
140: if (l_interest_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR)

Line 140: if (l_interest_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR)

136: if (l_interest_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR)
137: then
138: l_interest_rec.ATTRIBUTE12 := NULL;
139: end if;
140: if (l_interest_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR)
141: then
142: l_interest_rec.ATTRIBUTE13 := NULL;
143: end if;
144: if (l_interest_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR)

Line 144: if (l_interest_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR)

140: if (l_interest_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR)
141: then
142: l_interest_rec.ATTRIBUTE13 := NULL;
143: end if;
144: if (l_interest_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR)
145: then
146: l_interest_rec.ATTRIBUTE14 := NULL;
147: end if;
148: if (l_interest_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR)

Line 148: if (l_interest_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR)

144: if (l_interest_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR)
145: then
146: l_interest_rec.ATTRIBUTE14 := NULL;
147: end if;
148: if (l_interest_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR)
149: then
150: l_interest_rec.ATTRIBUTE15 := NULL;
151: end if;
152: if (l_interest_rec.product_category_id = FND_API.G_MISS_NUM)

Line 152: if (l_interest_rec.product_category_id = FND_API.G_MISS_NUM)

148: if (l_interest_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR)
149: then
150: l_interest_rec.ATTRIBUTE15 := NULL;
151: end if;
152: if (l_interest_rec.product_category_id = FND_API.G_MISS_NUM)
153: then
154: l_interest_rec.product_category_id := NULL;
155: end if;
156: if (l_interest_rec.product_cat_set_id = FND_API.G_MISS_NUM)

Line 156: if (l_interest_rec.product_cat_set_id = FND_API.G_MISS_NUM)

152: if (l_interest_rec.product_category_id = FND_API.G_MISS_NUM)
153: then
154: l_interest_rec.product_category_id := NULL;
155: end if;
156: if (l_interest_rec.product_cat_set_id = FND_API.G_MISS_NUM)
157: then
158: l_interest_rec.product_cat_set_id := NULL;
159: end if;
160:

Line 206: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

202: END INVALID_USE;
203:
204:
205: PROCEDURE Validate_party_id (
206: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
207: p_party_id IN NUMBER,
208: x_return_status OUT NOCOPY VARCHAR2,
209: x_msg_count OUT NOCOPY NUMBER,
210: x_msg_data OUT NOCOPY VARCHAR2

Line 227: IF FND_API.to_Boolean(p_init_msg_list) THEN

223: BEGIN
224:
225: -- initialize message list if p_init_msg_list is set to TRUE;
226:
227: IF FND_API.to_Boolean(p_init_msg_list) THEN
228: FND_MSG_PUB.initialize;
229: END IF;
230:
231: l_return_status := FND_API.G_RET_STS_SUCCESS;

Line 231: l_return_status := FND_API.G_RET_STS_SUCCESS;

227: IF FND_API.to_Boolean(p_init_msg_list) THEN
228: FND_MSG_PUB.initialize;
229: END IF;
230:
231: l_return_status := FND_API.G_RET_STS_SUCCESS;
232: open C_Party_Exists(p_party_id);
233: fetch C_Party_Exists into l_val;
234: IF (C_Party_Exists%NOTFOUND) THEN
235: x_return_status := FND_API.G_RET_STS_ERROR;

Line 235: x_return_status := FND_API.G_RET_STS_ERROR;

231: l_return_status := FND_API.G_RET_STS_SUCCESS;
232: open C_Party_Exists(p_party_id);
233: fetch C_Party_Exists into l_val;
234: IF (C_Party_Exists%NOTFOUND) THEN
235: x_return_status := FND_API.G_RET_STS_ERROR;
236: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
237: THEN
238: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');
239: FND_MESSAGE.Set_Token('COLUMN', 'PARTY_ID', FALSE);

Line 273: l_interest_fields_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

269: p_return_status OUT NOCOPY VARCHAR2
270: )
271: IS
272: l_return_status VARCHAR2(1);
273: l_interest_fields_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
274: l_interest_rec INTEREST_REC_TYPE := p_interest_rec;
275: BEGIN
276: l_return_status := FND_API.G_RET_STS_SUCCESS;
277:

Line 276: l_return_status := FND_API.G_RET_STS_SUCCESS;

272: l_return_status VARCHAR2(1);
273: l_interest_fields_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
274: l_interest_rec INTEREST_REC_TYPE := p_interest_rec;
275: BEGIN
276: l_return_status := FND_API.G_RET_STS_SUCCESS;
277:
278: --convert_miss_interest_rec(l_interest_rec,l_interest_rec);
279:
280: -- Interest Validation

Line 300: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS

296: p_return_status => l_interest_fields_status
297: );
298: END IF;
299:
300: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS
301: THEN
302: l_return_status := FND_API.G_RET_STS_ERROR;
303:
304: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 302: l_return_status := FND_API.G_RET_STS_ERROR;

298: END IF;
299:
300: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS
301: THEN
302: l_return_status := FND_API.G_RET_STS_ERROR;
303:
304: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
305: THEN
306: FND_MESSAGE.Set_Name('AS', 'API_ROW_NOT_PROCESSED');

Line 320: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

316:
317: /*************************** PUBLIC ROUTINES *********************************/
318:
319: PROCEDURE Create_Interest( p_api_version_number IN NUMBER,
320: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
321: p_commit IN VARCHAR2 := FND_API.G_FALSE,
322: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
323: p_interest_tbl IN INTEREST_TBL_TYPE := G_MISS_INTEREST_TBL,
324: p_customer_id IN NUMBER,

Line 321: p_commit IN VARCHAR2 := FND_API.G_FALSE,

317: /*************************** PUBLIC ROUTINES *********************************/
318:
319: PROCEDURE Create_Interest( p_api_version_number IN NUMBER,
320: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
321: p_commit IN VARCHAR2 := FND_API.G_FALSE,
322: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
323: p_interest_tbl IN INTEREST_TBL_TYPE := G_MISS_INTEREST_TBL,
324: p_customer_id IN NUMBER,
325: p_address_id IN NUMBER,

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

318:
319: PROCEDURE Create_Interest( p_api_version_number IN NUMBER,
320: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
321: p_commit IN VARCHAR2 := FND_API.G_FALSE,
322: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
323: p_interest_tbl IN INTEREST_TBL_TYPE := G_MISS_INTEREST_TBL,
324: p_customer_id IN NUMBER,
325: p_address_id IN NUMBER,
326: p_contact_id IN NUMBER,

Line 382: IF NOT FND_API.Compatible_API_Call( l_api_version_number,

378: -- Standard Start of API savepoint
379: SAVEPOINT CREATE_INTEREST_PVT;
380:
381: -- Standard call to check for call compatibility.
382: IF NOT FND_API.Compatible_API_Call( l_api_version_number,
383: p_api_version_number,
384: l_api_name,
385: G_PKG_NAME)
386: THEN

Line 387: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

383: p_api_version_number,
384: l_api_name,
385: G_PKG_NAME)
386: THEN
387: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
388: END IF;
389:
390:
391: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 392: IF FND_API.to_Boolean( p_init_msg_list )

388: END IF;
389:
390:
391: -- Initialize message list if p_init_msg_list is set to TRUE.
392: IF FND_API.to_Boolean( p_init_msg_list )
393: THEN
394: FND_MSG_PUB.initialize;
395: END IF;
396:

Line 405: p_return_status := FND_API.G_RET_STS_SUCCESS;

401: FND_MSG_PUB.Add;
402: END IF;
403:
404: -- Initialize API return status to success
405: p_return_status := FND_API.G_RET_STS_SUCCESS;
406: l_return_status := FND_API.G_RET_STS_SUCCESS;
407:
408: --
409: -- API body

Line 406: l_return_status := FND_API.G_RET_STS_SUCCESS;

402: END IF;
403:
404: -- Initialize API return status to success
405: p_return_status := FND_API.G_RET_STS_SUCCESS;
406: l_return_status := FND_API.G_RET_STS_SUCCESS;
407:
408: --
409: -- API body
410: --

Line 423: RAISE FND_API.G_EXC_ERROR;

419: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
420: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
421: FND_MSG_PUB.ADD;
422: END IF;
423: RAISE FND_API.G_EXC_ERROR;
424: END IF;
425: -- ******************************************************************
426:
427: IF(p_validation_level = FND_API.G_VALID_LEVEL_FULL) THEN

Line 427: IF(p_validation_level = FND_API.G_VALID_LEVEL_FULL) THEN

423: RAISE FND_API.G_EXC_ERROR;
424: END IF;
425: -- ******************************************************************
426:
427: IF(p_validation_level = FND_API.G_VALID_LEVEL_FULL) THEN
428:
429: AS_SALES_ORG_MANAGER_PVT.Get_CurrentUser
430: ( p_api_version_number => 2.0
431: ,p_salesforce_id => p_identity_salesforce_id

Line 438: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

434: ,x_msg_count => l_msg_count
435: ,x_msg_data => l_msg_data
436: ,x_sales_member_rec => l_identity_sales_member_rec);
437:
438: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
439: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
440: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Get_CurrentUser fail');
441: END IF;
442: RAISE FND_API.G_EXC_ERROR;

Line 442: RAISE FND_API.G_EXC_ERROR;

438: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
439: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
440: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Get_CurrentUser fail');
441: END IF;
442: RAISE FND_API.G_EXC_ERROR;
443: END IF;
444: END IF;
445:
446: IF (p_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM) and

Line 452: IF (p_customer_id is NULL or p_customer_id = FND_API.G_MISS_NUM)

448: THEN
449:
450: -- Insure that all required parameters exist
451: --
452: IF (p_customer_id is NULL or p_customer_id = FND_API.G_MISS_NUM)
453: THEN
454: p_return_status := FND_API.G_RET_STS_ERROR;
455:
456: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 454: p_return_status := FND_API.G_RET_STS_ERROR;

450: -- Insure that all required parameters exist
451: --
452: IF (p_customer_id is NULL or p_customer_id = FND_API.G_MISS_NUM)
453: THEN
454: p_return_status := FND_API.G_RET_STS_ERROR;
455:
456: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
457: THEN
458: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');

Line 462: RAISE FND_API.G_EXC_ERROR;

458: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
459: FND_MESSAGE.Set_Token('COLUMN', 'CUSTOMER_ID', FALSE);
460: FND_MSG_PUB.ADD;
461: END IF;
462: RAISE FND_API.G_EXC_ERROR;
463:
464: /* ELSIF (p_address_id is NULL or p_address_id = FND_API.G_MISS_NUM)
465: THEN
466: p_return_status := FND_API.G_RET_STS_ERROR;

Line 464: /* ELSIF (p_address_id is NULL or p_address_id = FND_API.G_MISS_NUM)

460: FND_MSG_PUB.ADD;
461: END IF;
462: RAISE FND_API.G_EXC_ERROR;
463:
464: /* ELSIF (p_address_id is NULL or p_address_id = FND_API.G_MISS_NUM)
465: THEN
466: p_return_status := FND_API.G_RET_STS_ERROR;
467:
468: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 466: p_return_status := FND_API.G_RET_STS_ERROR;

462: RAISE FND_API.G_EXC_ERROR;
463:
464: /* ELSIF (p_address_id is NULL or p_address_id = FND_API.G_MISS_NUM)
465: THEN
466: p_return_status := FND_API.G_RET_STS_ERROR;
467:
468: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
469: THEN
470: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');

Line 474: RAISE FND_API.G_EXC_ERROR; */

470: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
471: FND_MESSAGE.Set_Token('COLUMN', 'ADDRESS_ID', FALSE);
472: FND_MSG_PUB.ADD;
473: END IF;
474: RAISE FND_API.G_EXC_ERROR; */
475:
476: END IF;
477:
478: -- validate customer_id

Line 480: p_init_msg_list => FND_API.G_FALSE,

476: END IF;
477:
478: -- validate customer_id
479: validate_party_id(
480: p_init_msg_list => FND_API.G_FALSE,
481: p_party_id => p_customer_id,
482: x_return_status => l_return_status,
483: x_msg_count => l_msg_count,
484: x_msg_data => l_msg_data);

Line 485: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

481: p_party_id => p_customer_id,
482: x_return_status => l_return_status,
483: x_msg_count => l_msg_count,
484: x_msg_data => l_msg_data);
485: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
486: raise FND_API.G_EXC_ERROR;
487: END IF;
488:
489: -- check to see if the address_id and customer_id passed are valid.

Line 486: raise FND_API.G_EXC_ERROR;

482: x_return_status => l_return_status,
483: x_msg_count => l_msg_count,
484: x_msg_data => l_msg_data);
485: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
486: raise FND_API.G_EXC_ERROR;
487: END IF;
488:
489: -- check to see if the address_id and customer_id passed are valid.
490: if (p_address_id is not NULL and p_address_id <> FND_API.G_MISS_NUM)

Line 490: if (p_address_id is not NULL and p_address_id <> FND_API.G_MISS_NUM)

486: raise FND_API.G_EXC_ERROR;
487: END IF;
488:
489: -- check to see if the address_id and customer_id passed are valid.
490: if (p_address_id is not NULL and p_address_id <> FND_API.G_MISS_NUM)
491: then
492: AS_TCA_PVT.VALIDATE_PARTY_SITE_ID(
493: p_init_msg_list => p_init_msg_list
494: ,p_party_id => p_customer_id

Line 500: if l_return_status = FND_API.G_RET_STS_ERROR then

496: ,x_return_status => l_return_status
497: ,x_msg_count => l_msg_count
498: ,x_msg_data => l_msg_data);
499:
500: if l_return_status = FND_API.G_RET_STS_ERROR then
501: raise FND_API.G_EXC_ERROR;
502: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
503: raise FND_API.G_EXC_UNEXPECTED_ERROR;
504: end if;

Line 501: raise FND_API.G_EXC_ERROR;

497: ,x_msg_count => l_msg_count
498: ,x_msg_data => l_msg_data);
499:
500: if l_return_status = FND_API.G_RET_STS_ERROR then
501: raise FND_API.G_EXC_ERROR;
502: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
503: raise FND_API.G_EXC_UNEXPECTED_ERROR;
504: end if;
505: end if;

Line 502: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

498: ,x_msg_data => l_msg_data);
499:
500: if l_return_status = FND_API.G_RET_STS_ERROR then
501: raise FND_API.G_EXC_ERROR;
502: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
503: raise FND_API.G_EXC_UNEXPECTED_ERROR;
504: end if;
505: end if;
506:

Line 503: raise FND_API.G_EXC_UNEXPECTED_ERROR;

499:
500: if l_return_status = FND_API.G_RET_STS_ERROR then
501: raise FND_API.G_EXC_ERROR;
502: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
503: raise FND_API.G_EXC_UNEXPECTED_ERROR;
504: end if;
505: end if;
506:
507: -- if the contact_id is passed check to see if it is valid.

Line 508: if (p_contact_id is not null and p_contact_id <> FND_API.G_MISS_NUM)

504: end if;
505: end if;
506:
507: -- if the contact_id is passed check to see if it is valid.
508: if (p_contact_id is not null and p_contact_id <> FND_API.G_MISS_NUM)
509: then
510: AS_TCA_PVT.VALIDATE_CONTACT_ID(
511: p_init_msg_list => p_init_msg_list
512: ,p_party_id => p_customer_id

Line 518: if l_return_status = FND_API.G_RET_STS_ERROR then

514: ,x_return_status => l_return_status
515: ,x_msg_count => l_msg_count
516: ,x_msg_data => l_msg_data);
517:
518: if l_return_status = FND_API.G_RET_STS_ERROR then
519: raise FND_API.G_EXC_ERROR;
520: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
521: raise FND_API.G_EXC_UNEXPECTED_ERROR;
522: end if;

Line 519: raise FND_API.G_EXC_ERROR;

515: ,x_msg_count => l_msg_count
516: ,x_msg_data => l_msg_data);
517:
518: if l_return_status = FND_API.G_RET_STS_ERROR then
519: raise FND_API.G_EXC_ERROR;
520: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
521: raise FND_API.G_EXC_UNEXPECTED_ERROR;
522: end if;
523: end if;

Line 520: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

516: ,x_msg_data => l_msg_data);
517:
518: if l_return_status = FND_API.G_RET_STS_ERROR then
519: raise FND_API.G_EXC_ERROR;
520: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
521: raise FND_API.G_EXC_UNEXPECTED_ERROR;
522: end if;
523: end if;
524:

Line 521: raise FND_API.G_EXC_UNEXPECTED_ERROR;

517:
518: if l_return_status = FND_API.G_RET_STS_ERROR then
519: raise FND_API.G_EXC_ERROR;
520: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
521: raise FND_API.G_EXC_UNEXPECTED_ERROR;
522: end if;
523: end if;
524:
525: -- If the interest use code is not consistent with the ids that are passed in

Line 530: p_return_status := FND_API.G_RET_STS_ERROR;

526: -- then return an error
527: IF INVALID_USE (p_interest_use_code, p_customer_id, p_address_id,
528: p_contact_id, p_lead_id)
529: THEN
530: p_return_status := FND_API.G_RET_STS_ERROR;
531:
532: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
533: THEN
534: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');

Line 539: RAISE FND_API.G_EXC_ERROR;

535: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_USE_CODE', FALSE);
536: FND_MESSAGE.Set_Token('VALUE', p_interest_use_code, FALSE);
537: FND_MSG_PUB.ADD;
538: END IF;
539: RAISE FND_API.G_EXC_ERROR;
540: END IF;
541:
542: END IF;
543:

Line 547: IF (p_lead_id is NULL or p_lead_id = FND_API.G_MISS_NUM) THEN

543:
544: -- check access here
545:
546: IF(p_check_access_flag = 'Y') THEN
547: IF (p_lead_id is NULL or p_lead_id = FND_API.G_MISS_NUM) THEN
548: AS_ACCESS_PUB.has_updateCustomerAccess
549: ( p_api_version_number => 2.0
550: ,p_init_msg_list => p_init_msg_list
551: ,p_validation_level => p_validation_level

Line 566: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

562: ,x_msg_data => l_msg_data
563: ,x_update_access_flag => l_update_access_flag
564: );
565:
566: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
567: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
568: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateCustomerAccess fail');
569: END IF;
570: RAISE FND_API.G_EXC_ERROR;

Line 570: RAISE FND_API.G_EXC_ERROR;

566: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
567: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
568: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateCustomerAccess fail');
569: END IF;
570: RAISE FND_API.G_EXC_ERROR;
571: END IF;
572:
573: IF (l_update_access_flag <> 'Y') THEN
574: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 578: RAISE FND_API.G_EXC_ERROR;

574: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
575: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
576: FND_MSG_PUB.ADD;
577: END IF;
578: RAISE FND_API.G_EXC_ERROR;
579: END IF;
580: ELSE
581: AS_ACCESS_PUB.has_updateOpportunityAccess
582: ( p_api_version_number => 2.0

Line 599: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

595: ,x_msg_data => l_msg_data
596: ,x_update_access_flag => l_update_access_flag
597: );
598:
599: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
600: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
601: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
602: END IF;
603: RAISE FND_API.G_EXC_ERROR;

Line 603: RAISE FND_API.G_EXC_ERROR;

599: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
600: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
601: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
602: END IF;
603: RAISE FND_API.G_EXC_ERROR;
604: END IF;
605:
606: IF (l_update_access_flag <> 'Y') THEN
607: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 611: p_return_status := FND_API.G_RET_STS_ERROR;

607: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
608: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
609: FND_MSG_PUB.ADD;
610: END IF;
611: p_return_status := FND_API.G_RET_STS_ERROR;
612: RAISE FND_API.G_EXC_ERROR;
613: END IF;
614: END IF;
615: END IF;

Line 612: RAISE FND_API.G_EXC_ERROR;

608: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
609: FND_MSG_PUB.ADD;
610: END IF;
611: p_return_status := FND_API.G_RET_STS_ERROR;
612: RAISE FND_API.G_EXC_ERROR;
613: END IF;
614: END IF;
615: END IF;
616:

Line 639: l_return_status_tbl(l_curr_row) := FND_API.G_RET_STS_SUCCESS;

635: */
636: -- Row savepoint
637: SAVEPOINT CREATE_INTEREST_PVT_ROW;
638:
639: l_return_status_tbl(l_curr_row) := FND_API.G_RET_STS_SUCCESS;
640:
641: -- If the validation level is full, then validate the interest record
642: --
643: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL)

Line 643: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL)

639: l_return_status_tbl(l_curr_row) := FND_API.G_RET_STS_SUCCESS;
640:
641: -- If the validation level is full, then validate the interest record
642: --
643: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL)
644: THEN
645:
646: -- Debug Message
647: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 655: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

651: END IF;
652:
653: Validate_Interest ( p_interest_use_code, p_interest_tbl(l_curr_row), l_return_status );
654:
655: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
656: THEN
657: RAISE FND_API.G_EXC_ERROR;
658: END IF;
659:

Line 657: RAISE FND_API.G_EXC_ERROR;

653: Validate_Interest ( p_interest_use_code, p_interest_tbl(l_curr_row), l_return_status );
654:
655: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
656: THEN
657: RAISE FND_API.G_EXC_ERROR;
658: END IF;
659:
660: END IF;
661:

Line 671: RAISE FND_API.G_EXC_ERROR;

667: THEN
668: FND_MESSAGE.Set_Name('AS', 'AS_DUPLICATE_MAPPING');
669: FND_MSG_PUB.Add;
670: Close duplicate_cat_cur;
671: RAISE FND_API.G_EXC_ERROR;
672: END IF;
673: Close duplicate_cat_cur;
674:
675: -- remarked by ACNG, 07/06/2000

Line 738: WHEN FND_API.G_EXC_ERROR THEN

734: -- Handle exceptions within the loop, so that other rows will be processed if possible
735: --
736: EXCEPTION
737:
738: WHEN FND_API.G_EXC_ERROR THEN
739:
740: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
741: P_MODULE => l_module
742: ,P_API_NAME => L_API_NAME

Line 750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

746: ,X_MSG_COUNT => P_MSG_COUNT
747: ,X_MSG_DATA => P_MSG_DATA
748: ,X_RETURN_STATUS => l_RETURN_STATUS);
749:
750: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
751:
752: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
753: P_MODULE => l_module
754: ,P_API_NAME => L_API_NAME

Line 782: IF (p_lead_id is not NULL AND p_lead_id <> FND_API.G_MISS_NUM) THEN

778:
779: END LOOP;
780:
781: -- Fix bug 2304022
782: IF (p_lead_id is not NULL AND p_lead_id <> FND_API.G_MISS_NUM) THEN
783: IF l_debug THEN
784: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
785: 'Calling Opportunity Real Time API ');
786: END IF;

Line 789: P_Init_Msg_List => FND_API.G_FALSE,

785: 'Calling Opportunity Real Time API ');
786: END IF;
787: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
788: P_Api_Version_Number => 1.0,
789: P_Init_Msg_List => FND_API.G_FALSE,
790: P_Commit => FND_API.G_FALSE,
791: p_lead_id => p_LEAD_ID,
792: X_Return_Status => l_return_status,
793: X_Msg_Count => l_msg_count,

Line 790: P_Commit => FND_API.G_FALSE,

786: END IF;
787: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
788: P_Api_Version_Number => 1.0,
789: P_Init_Msg_List => FND_API.G_FALSE,
790: P_Commit => FND_API.G_FALSE,
791: p_lead_id => p_LEAD_ID,
792: X_Return_Status => l_return_status,
793: X_Msg_Count => l_msg_count,
794: X_Msg_Data => l_msg_data

Line 797: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN

793: X_Msg_Count => l_msg_count,
794: X_Msg_Data => l_msg_data
795: );
796:
797: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
798: IF l_debug THEN
799: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
800: 'Opportunity Real Time API fail');
801: END IF;

Line 802: RAISE FND_API.G_EXC_ERROR;

798: IF l_debug THEN
799: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
800: 'Opportunity Real Time API fail');
801: END IF;
802: RAISE FND_API.G_EXC_ERROR;
803: END IF;
804: END IF;
805:
806:

Line 810: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_ERROR

806:
807: -- Calculate the return status
808: FOR l_curr_row IN 1..l_interest_count
809: LOOP
810: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_ERROR
811: THEN
812: p_return_status := FND_API.G_RET_STS_ERROR;
813: l_return_status := FND_API.G_RET_STS_ERROR;
814:

Line 812: p_return_status := FND_API.G_RET_STS_ERROR;

808: FOR l_curr_row IN 1..l_interest_count
809: LOOP
810: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_ERROR
811: THEN
812: p_return_status := FND_API.G_RET_STS_ERROR;
813: l_return_status := FND_API.G_RET_STS_ERROR;
814:
815: EXIT;
816: END IF;

Line 813: l_return_status := FND_API.G_RET_STS_ERROR;

809: LOOP
810: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_ERROR
811: THEN
812: p_return_status := FND_API.G_RET_STS_ERROR;
813: l_return_status := FND_API.G_RET_STS_ERROR;
814:
815: EXIT;
816: END IF;
817: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_UNEXP_ERROR

Line 817: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_UNEXP_ERROR

813: l_return_status := FND_API.G_RET_STS_ERROR;
814:
815: EXIT;
816: END IF;
817: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_UNEXP_ERROR
818: THEN
819: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 819: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

815: EXIT;
816: END IF;
817: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_UNEXP_ERROR
818: THEN
819: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
822: EXIT;
823: END IF;

Line 820: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

816: END IF;
817: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_UNEXP_ERROR
818: THEN
819: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
822: EXIT;
823: END IF;
824: END LOOP;

Line 821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

817: IF l_return_status_tbl(l_curr_row) = FND_API.G_RET_STS_UNEXP_ERROR
818: THEN
819: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
822: EXIT;
823: END IF;
824: END LOOP;
825:

Line 843: l_return_status = FND_API.G_RET_STS_SUCCESS

839:
840:
841: -- Success Message
842: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) and
843: l_return_status = FND_API.G_RET_STS_SUCCESS
844: THEN
845: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
846: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);
847: FND_MSG_PUB.Add;

Line 851: IF FND_API.To_Boolean ( p_commit )

847: FND_MSG_PUB.Add;
848: END IF;
849:
850: -- Standard check of p_commit.
851: IF FND_API.To_Boolean ( p_commit )
852: THEN
853: COMMIT WORK;
854: END IF;
855:

Line 873: WHEN FND_API.G_EXC_ERROR THEN

869: -- Normal API Exception handling, if exception occurs outside of interest processing loop
870: --
871: EXCEPTION
872:
873: WHEN FND_API.G_EXC_ERROR THEN
874:
875: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
876: P_MODULE => l_module
877: ,P_API_NAME => L_API_NAME

Line 885: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

881: ,X_MSG_COUNT => P_MSG_COUNT
882: ,X_MSG_DATA => P_MSG_DATA
883: ,X_RETURN_STATUS => l_RETURN_STATUS);
884:
885: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
886:
887: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
888: P_MODULE => l_module
889: ,P_API_NAME => L_API_NAME

Line 923: -- Default = FND_API.G_FALSE

919: -- Parameters
920: -- IN :
921: -- p_api_version_number IN NUMBER Required
922: -- p_init_msg_list IN VARCHAR2 Optional
923: -- Default = FND_API.G_FALSE
924: -- p_commit IN VARCHAR2 Optional
925: -- Default = FND_API.G_FALSE
926: -- p_validation_level IN NUMBER Optional
927: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 925: -- Default = FND_API.G_FALSE

921: -- p_api_version_number IN NUMBER Required
922: -- p_init_msg_list IN VARCHAR2 Optional
923: -- Default = FND_API.G_FALSE
924: -- p_commit IN VARCHAR2 Optional
925: -- Default = FND_API.G_FALSE
926: -- p_validation_level IN NUMBER Optional
927: -- Default = FND_API.G_VALID_LEVEL_FULL
928: -- p_interest_rec IN INTEREST_REC_TYPE Optional
929: -- p_interest_use_code IN VARCHAR2 Required

Line 927: -- Default = FND_API.G_VALID_LEVEL_FULL

923: -- Default = FND_API.G_FALSE
924: -- p_commit IN VARCHAR2 Optional
925: -- Default = FND_API.G_FALSE
926: -- p_validation_level IN NUMBER Optional
927: -- Default = FND_API.G_VALID_LEVEL_FULL
928: -- p_interest_rec IN INTEREST_REC_TYPE Optional
929: -- p_interest_use_code IN VARCHAR2 Required
930: -- (LEAD_CLASSIFICATION, COMPANY_CLASSIFICATION,
931: -- CONTACT_INTEREST)

Line 959: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

955: --
956: -- End of Comments
957: PROCEDURE Update_Interest
958: ( p_api_version_number IN NUMBER,
959: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
960: p_commit IN VARCHAR2 := FND_API.G_FALSE,
961: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
962: p_identity_salesforce_id IN NUMBER,
963: p_interest_rec IN INTEREST_REC_TYPE := G_MISS_INTEREST_REC,

Line 960: p_commit IN VARCHAR2 := FND_API.G_FALSE,

956: -- End of Comments
957: PROCEDURE Update_Interest
958: ( p_api_version_number IN NUMBER,
959: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
960: p_commit IN VARCHAR2 := FND_API.G_FALSE,
961: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
962: p_identity_salesforce_id IN NUMBER,
963: p_interest_rec IN INTEREST_REC_TYPE := G_MISS_INTEREST_REC,
964: p_interest_use_code IN VARCHAR2,

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

957: PROCEDURE Update_Interest
958: ( p_api_version_number IN NUMBER,
959: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
960: p_commit IN VARCHAR2 := FND_API.G_FALSE,
961: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
962: p_identity_salesforce_id IN NUMBER,
963: p_interest_rec IN INTEREST_REC_TYPE := G_MISS_INTEREST_REC,
964: p_interest_use_code IN VARCHAR2,
965: p_check_access_flag IN VARCHAR2,

Line 1014: IF NOT FND_API.Compatible_API_Call( l_api_version_number,

1010: -- Standard Start of API savepoint
1011: SAVEPOINT UPDATE_INTEREST_PVT;
1012:
1013: -- Standard call to check for call compatibility.
1014: IF NOT FND_API.Compatible_API_Call( l_api_version_number,
1015: p_api_version_number,
1016: l_api_name,
1017: G_PKG_NAME)
1018: THEN

Line 1019: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1015: p_api_version_number,
1016: l_api_name,
1017: G_PKG_NAME)
1018: THEN
1019: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1020: END IF;
1021:
1022:
1023: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1024: IF FND_API.to_Boolean( p_init_msg_list )

1020: END IF;
1021:
1022:
1023: -- Initialize message list if p_init_msg_list is set to TRUE.
1024: IF FND_API.to_Boolean( p_init_msg_list )
1025: THEN
1026: FND_MSG_PUB.initialize;
1027: END IF;
1028:

Line 1037: x_return_status := FND_API.G_RET_STS_SUCCESS;

1033: FND_MSG_PUB.Add;
1034: END IF;
1035:
1036: -- Initialize API return status to success
1037: x_return_status := FND_API.G_RET_STS_SUCCESS;
1038: l_return_status := FND_API.G_RET_STS_SUCCESS;
1039:
1040: --
1041: -- API body

Line 1038: l_return_status := FND_API.G_RET_STS_SUCCESS;

1034: END IF;
1035:
1036: -- Initialize API return status to success
1037: x_return_status := FND_API.G_RET_STS_SUCCESS;
1038: l_return_status := FND_API.G_RET_STS_SUCCESS;
1039:
1040: --
1041: -- API body
1042: --

Line 1048: IF(p_validation_level = FND_API.G_VALID_LEVEL_FULL) THEN

1044: -- ******************************************************************
1045: -- Validate Environment
1046: -- ******************************************************************
1047:
1048: IF(p_validation_level = FND_API.G_VALID_LEVEL_FULL) THEN
1049:
1050: AS_SALES_ORG_MANAGER_PVT.Get_CurrentUser(
1051: p_api_version_number => 2.0
1052: ,p_salesforce_id => p_identity_salesforce_id

Line 1059: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1055: ,x_msg_count => x_msg_count
1056: ,x_msg_data => x_msg_data
1057: ,x_sales_member_rec => l_identity_sales_member_rec);
1058:
1059: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1060: IF l_debug THEN
1061: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Get_CurrentUser fail');
1062: END IF;
1063: RAISE FND_API.G_EXC_ERROR;

Line 1063: RAISE FND_API.G_EXC_ERROR;

1059: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1060: IF l_debug THEN
1061: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'Get_CurrentUser fail');
1062: END IF;
1063: RAISE FND_API.G_EXC_ERROR;
1064: END IF;
1065: END IF;
1066:
1067: IF (p_validation_level >= AS_UTILITY_PUB.G_VALID_LEVEL_ITEM)

Line 1072: IF (p_interest_rec.customer_id is NULL or p_interest_rec.customer_id = FND_API.G_MISS_NUM) THEN

1068: THEN
1069:
1070: -- Insure that all required parameters exist
1071: --
1072: IF (p_interest_rec.customer_id is NULL or p_interest_rec.customer_id = FND_API.G_MISS_NUM) THEN
1073: x_return_status := FND_API.G_RET_STS_ERROR;
1074:
1075: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1076: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');

Line 1073: x_return_status := FND_API.G_RET_STS_ERROR;

1069:
1070: -- Insure that all required parameters exist
1071: --
1072: IF (p_interest_rec.customer_id is NULL or p_interest_rec.customer_id = FND_API.G_MISS_NUM) THEN
1073: x_return_status := FND_API.G_RET_STS_ERROR;
1074:
1075: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1076: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1077: FND_MESSAGE.Set_Token('COLUMN', 'CUSTOMER_ID', FALSE);

Line 1080: RAISE FND_API.G_EXC_ERROR;

1076: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1077: FND_MESSAGE.Set_Token('COLUMN', 'CUSTOMER_ID', FALSE);
1078: FND_MSG_PUB.ADD;
1079: END IF;
1080: RAISE FND_API.G_EXC_ERROR;
1081: END IF;
1082:
1083: -- check to see if the address_id and customer_id passed are valid.
1084: if p_interest_rec.address_id is not NULL and p_interest_rec.address_id <> FND_API.G_MISS_NUM

Line 1084: if p_interest_rec.address_id is not NULL and p_interest_rec.address_id <> FND_API.G_MISS_NUM

1080: RAISE FND_API.G_EXC_ERROR;
1081: END IF;
1082:
1083: -- check to see if the address_id and customer_id passed are valid.
1084: if p_interest_rec.address_id is not NULL and p_interest_rec.address_id <> FND_API.G_MISS_NUM
1085: then
1086: AS_TCA_PVT.VALIDATE_PARTY_SITE_ID(
1087: p_init_msg_list => p_init_msg_list
1088: ,p_party_id => p_interest_rec.customer_id

Line 1094: if l_return_status = FND_API.G_RET_STS_ERROR then

1090: ,x_return_status => l_return_status
1091: ,x_msg_count => l_msg_count
1092: ,x_msg_data => l_msg_data);
1093:
1094: if l_return_status = FND_API.G_RET_STS_ERROR then
1095: raise FND_API.G_EXC_ERROR;
1096: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1097: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1098: end if;

Line 1095: raise FND_API.G_EXC_ERROR;

1091: ,x_msg_count => l_msg_count
1092: ,x_msg_data => l_msg_data);
1093:
1094: if l_return_status = FND_API.G_RET_STS_ERROR then
1095: raise FND_API.G_EXC_ERROR;
1096: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1097: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1098: end if;
1099: end if;

Line 1096: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1092: ,x_msg_data => l_msg_data);
1093:
1094: if l_return_status = FND_API.G_RET_STS_ERROR then
1095: raise FND_API.G_EXC_ERROR;
1096: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1097: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1098: end if;
1099: end if;
1100:

Line 1097: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1093:
1094: if l_return_status = FND_API.G_RET_STS_ERROR then
1095: raise FND_API.G_EXC_ERROR;
1096: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1097: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1098: end if;
1099: end if;
1100:
1101: -- if the contact_id is passed check to see if it is valid.

Line 1102: if p_interest_rec.contact_id is not null and p_interest_rec.contact_id <> FND_API.G_MISS_NUM

1098: end if;
1099: end if;
1100:
1101: -- if the contact_id is passed check to see if it is valid.
1102: if p_interest_rec.contact_id is not null and p_interest_rec.contact_id <> FND_API.G_MISS_NUM
1103: then
1104: AS_TCA_PVT.VALIDATE_CONTACT_ID(
1105: p_init_msg_list => p_init_msg_list
1106: ,p_party_id => p_interest_rec.customer_id

Line 1112: if l_return_status = FND_API.G_RET_STS_ERROR then

1108: ,x_return_status => l_return_status
1109: ,x_msg_count => l_msg_count
1110: ,x_msg_data => l_msg_data);
1111:
1112: if l_return_status = FND_API.G_RET_STS_ERROR then
1113: raise FND_API.G_EXC_ERROR;
1114: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1115: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1116: end if;

Line 1113: raise FND_API.G_EXC_ERROR;

1109: ,x_msg_count => l_msg_count
1110: ,x_msg_data => l_msg_data);
1111:
1112: if l_return_status = FND_API.G_RET_STS_ERROR then
1113: raise FND_API.G_EXC_ERROR;
1114: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1115: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1116: end if;
1117: end if;

Line 1114: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1110: ,x_msg_data => l_msg_data);
1111:
1112: if l_return_status = FND_API.G_RET_STS_ERROR then
1113: raise FND_API.G_EXC_ERROR;
1114: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1115: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1116: end if;
1117: end if;
1118:

Line 1115: raise FND_API.G_EXC_UNEXPECTED_ERROR;

1111:
1112: if l_return_status = FND_API.G_RET_STS_ERROR then
1113: raise FND_API.G_EXC_ERROR;
1114: elsif l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1115: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1116: end if;
1117: end if;
1118:
1119: -- If the interest use code is not consistent with the ids that are passed in

Line 1124: x_return_status := FND_API.G_RET_STS_ERROR;

1120: -- then return an error
1121: IF INVALID_USE (p_interest_use_code, p_interest_rec.customer_id, p_interest_rec.address_id,
1122: p_interest_rec.contact_id, p_interest_rec.lead_id)
1123: THEN
1124: x_return_status := FND_API.G_RET_STS_ERROR;
1125:
1126: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1127: THEN
1128: FND_MESSAGE.Set_Name('AS', 'API_INVALID_ID');

Line 1133: RAISE FND_API.G_EXC_ERROR;

1129: FND_MESSAGE.Set_Token('COLUMN', 'INTEREST_USE_CODE', FALSE);
1130: FND_MESSAGE.Set_Token('VALUE', p_interest_use_code, FALSE);
1131: FND_MSG_PUB.ADD;
1132: END IF;
1133: RAISE FND_API.G_EXC_ERROR;
1134: END IF;
1135:
1136: END IF;
1137:

Line 1141: IF (p_interest_rec.lead_id is NULL or p_interest_rec.lead_id = FND_API.G_MISS_NUM) THEN

1137:
1138: -- check access here
1139:
1140: IF(p_check_access_flag = 'Y') THEN
1141: IF (p_interest_rec.lead_id is NULL or p_interest_rec.lead_id = FND_API.G_MISS_NUM) THEN
1142: AS_ACCESS_PUB.has_updateCustomerAccess
1143: ( p_api_version_number => 2.0
1144: ,p_init_msg_list => p_init_msg_list
1145: ,p_validation_level => p_validation_level

Line 1160: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1156: ,x_msg_data => l_msg_data
1157: ,x_update_access_flag => l_update_access_flag
1158: );
1159:
1160: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1161: IF l_debug THEN
1162: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateCustomerAccess fail');
1163: END IF;
1164: RAISE FND_API.G_EXC_ERROR;

Line 1164: RAISE FND_API.G_EXC_ERROR;

1160: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1161: IF l_debug THEN
1162: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateCustomerAccess fail');
1163: END IF;
1164: RAISE FND_API.G_EXC_ERROR;
1165: END IF;
1166:
1167: IF (l_update_access_flag <> 'Y') THEN
1168: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 1172: RAISE FND_API.G_EXC_ERROR;

1168: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1169: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
1170: FND_MSG_PUB.ADD;
1171: END IF;
1172: RAISE FND_API.G_EXC_ERROR;
1173: END IF;
1174: ELSE
1175: AS_ACCESS_PUB.has_updateOpportunityAccess
1176: ( p_api_version_number => 2.0

Line 1193: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1189: ,x_msg_data => l_msg_data
1190: ,x_update_access_flag => l_update_access_flag
1191: );
1192:
1193: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1194: IF l_debug THEN
1195: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
1196: END IF;
1197: RAISE FND_API.G_EXC_ERROR;

Line 1197: RAISE FND_API.G_EXC_ERROR;

1193: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1194: IF l_debug THEN
1195: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
1196: END IF;
1197: RAISE FND_API.G_EXC_ERROR;
1198: END IF;
1199:
1200: IF (l_update_access_flag <> 'Y') THEN
1201: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 1205: RAISE FND_API.G_EXC_ERROR;

1201: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1202: FND_MESSAGE.Set_Name('AS', 'API_NO_UPDATE_PRIVILEGE');
1203: FND_MSG_PUB.ADD;
1204: END IF;
1205: RAISE FND_API.G_EXC_ERROR;
1206: END IF;
1207: END IF;
1208: END IF;
1209:

Line 1212: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL)

1208: END IF;
1209:
1210: -- If the validation level is full, then validate the interest record
1211: --
1212: IF (p_validation_level = FND_API.G_VALID_LEVEL_FULL)
1213: THEN
1214:
1215: -- Debug Message
1216: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1224: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

1220: END IF;
1221:
1222: Validate_Interest ( p_interest_use_code, p_interest_rec, l_return_status );
1223:
1224: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1225: THEN
1226: RAISE FND_API.G_EXC_ERROR;
1227: END IF;
1228:

Line 1226: RAISE FND_API.G_EXC_ERROR;

1222: Validate_Interest ( p_interest_use_code, p_interest_rec, l_return_status );
1223:
1224: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1225: THEN
1226: RAISE FND_API.G_EXC_ERROR;
1227: END IF;
1228:
1229: END IF;
1230:

Line 1241: RAISE FND_API.G_EXC_ERROR;

1237: THEN
1238: FND_MESSAGE.Set_Name('AS', 'AS_DUPLICATE_MAPPING');
1239: FND_MSG_PUB.Add;
1240: Close duplicate_cat_cur;
1241: RAISE FND_API.G_EXC_ERROR;
1242: END IF;
1243: Close duplicate_cat_cur;
1244:
1245: -- Debug Message

Line 1259: or p_interest_rec.last_update_date = FND_API.G_MISS_DATE)

1255: fetch get_interest_info_csr into l_rowid, l_last_update_date;
1256: close get_interest_info_csr;
1257:
1258: if (p_interest_rec.last_update_date is NULL
1259: or p_interest_rec.last_update_date = FND_API.G_MISS_DATE)
1260: then
1261: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1262: THEN
1263: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');

Line 1267: RAISE FND_API.G_EXC_ERROR;

1263: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1264: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
1265: FND_MSG_PUB.ADD;
1266: END IF;
1267: RAISE FND_API.G_EXC_ERROR;
1268: end if;
1269:
1270: if (l_last_update_date <> p_interest_rec.last_update_date)
1271: then

Line 1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1274: FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
1275: FND_MESSAGE.Set_Token('INFO', 'AS_INTERESTS', FALSE);
1276: FND_MSG_PUB.ADD;
1277: END IF;
1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: else
1280:
1281: AS_INTERESTS_PKG.Update_Row ( X_Rowid => l_rowid,
1282: X_Interest_Id => p_interest_rec.interest_id,

Line 1324: p_interest_rec.lead_id <> FND_API.G_MISS_NUM) THEN

1320: x_interest_id := p_interest_rec.interest_id;
1321:
1322: -- Fix bug 2304022
1323: IF (p_interest_rec.lead_id is not NULL AND
1324: p_interest_rec.lead_id <> FND_API.G_MISS_NUM) THEN
1325: IF l_debug THEN
1326: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1327: 'Calling Opportunity Real Time API');
1328: END IF;

Line 1331: P_Init_Msg_List => FND_API.G_FALSE,

1327: 'Calling Opportunity Real Time API');
1328: END IF;
1329: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
1330: P_Api_Version_Number => 1.0,
1331: P_Init_Msg_List => FND_API.G_FALSE,
1332: P_Commit => FND_API.G_FALSE,
1333: p_lead_id => p_interest_rec.lead_id,
1334: X_Return_Status => l_return_status,
1335: X_Msg_Count => l_msg_count,

Line 1332: P_Commit => FND_API.G_FALSE,

1328: END IF;
1329: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
1330: P_Api_Version_Number => 1.0,
1331: P_Init_Msg_List => FND_API.G_FALSE,
1332: P_Commit => FND_API.G_FALSE,
1333: p_lead_id => p_interest_rec.lead_id,
1334: X_Return_Status => l_return_status,
1335: X_Msg_Count => l_msg_count,
1336: X_Msg_Data => l_msg_data

Line 1339: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1335: X_Msg_Count => l_msg_count,
1336: X_Msg_Data => l_msg_data
1337: );
1338:
1339: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1340: IF l_debug THEN
1341: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1342: 'Opportunity Real Time API fail');
1343: END IF;

Line 1344: RAISE FND_API.G_EXC_ERROR;

1340: IF l_debug THEN
1341: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1342: 'Opportunity Real Time API fail');
1343: END IF;
1344: RAISE FND_API.G_EXC_ERROR;
1345:
1346: END IF;
1347: END IF;
1348:

Line 1352: l_return_status = FND_API.G_RET_STS_SUCCESS

1348:
1349:
1350: -- Success Message
1351: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) and
1352: l_return_status = FND_API.G_RET_STS_SUCCESS
1353: THEN
1354: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1355: FND_MESSAGE.Set_Token('ROW', 'AS_INTEREST', TRUE);
1356: FND_MSG_PUB.Add;

Line 1360: IF FND_API.To_Boolean ( p_commit )

1356: FND_MSG_PUB.Add;
1357: END IF;
1358:
1359: -- Standard check of p_commit.
1360: IF FND_API.To_Boolean ( p_commit )
1361: THEN
1362: COMMIT WORK;
1363: END IF;
1364:

Line 1381: x_return_status := FND_API.G_RET_STS_ERROR ;

1377: EXCEPTION
1378:
1379: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
1380: ROLLBACK TO UPDATE_INTEREST_PVT;
1381: x_return_status := FND_API.G_RET_STS_ERROR ;
1382:
1383: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1384: THEN
1385: FND_MESSAGE.Set_Name('AS', 'API_CANNOT_RESERVE_RECORD');

Line 1390: WHEN FND_API.G_EXC_ERROR THEN

1386: FND_MESSAGE.Set_Token('INFO', 'UPDATE_INTEREST', FALSE);
1387: FND_MSG_PUB.Add;
1388: END IF;
1389:
1390: WHEN FND_API.G_EXC_ERROR THEN
1391: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1392: P_MODULE => l_module
1393: ,P_API_NAME => L_API_NAME
1394: ,P_PKG_NAME => G_PKG_NAME

Line 1401: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1397: ,X_MSG_COUNT => X_MSG_COUNT
1398: ,X_MSG_DATA => X_MSG_DATA
1399: ,X_RETURN_STATUS => X_RETURN_STATUS);
1400:
1401: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1402: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1403: P_MODULE => l_module
1404: ,P_API_NAME => L_API_NAME
1405: ,P_PKG_NAME => G_PKG_NAME

Line 1429: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1425: END Update_Interest;
1426:
1427: PROCEDURE Delete_Interest
1428: ( p_api_version_number IN NUMBER,
1429: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1430: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1431: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
1432: p_identity_salesforce_id IN NUMBER,
1433: p_interest_rec IN INTEREST_REC_TYPE := G_MISS_INTEREST_REC,

Line 1430: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1426:
1427: PROCEDURE Delete_Interest
1428: ( p_api_version_number IN NUMBER,
1429: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1430: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1431: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
1432: p_identity_salesforce_id IN NUMBER,
1433: p_interest_rec IN INTEREST_REC_TYPE := G_MISS_INTEREST_REC,
1434: p_interest_use_code IN VARCHAR2,

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

1427: PROCEDURE Delete_Interest
1428: ( p_api_version_number IN NUMBER,
1429: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1430: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1431: p_validation_level IN NUMBER :=FND_API.G_VALID_LEVEL_FULL,
1432: p_identity_salesforce_id IN NUMBER,
1433: p_interest_rec IN INTEREST_REC_TYPE := G_MISS_INTEREST_REC,
1434: p_interest_use_code IN VARCHAR2,
1435: p_check_access_flag in varchar2,

Line 1464: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1460: -- Standard Start of API savepoint
1461: SAVEPOINT DELETE_INTEREST_PVT;
1462:
1463: -- Standard call to check for call compatibility.
1464: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1465: p_api_version_number,
1466: l_api_name,
1467: G_PKG_NAME)
1468: THEN

Line 1469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1465: p_api_version_number,
1466: l_api_name,
1467: G_PKG_NAME)
1468: THEN
1469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1470: END IF;
1471:
1472:
1473: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1474: IF FND_API.to_Boolean( p_init_msg_list )

1470: END IF;
1471:
1472:
1473: -- Initialize message list if p_init_msg_list is set to TRUE.
1474: IF FND_API.to_Boolean( p_init_msg_list )
1475: THEN
1476: FND_MSG_PUB.initialize;
1477: END IF;
1478:

Line 1480: x_return_status := FND_API.G_RET_STS_SUCCESS;

1476: FND_MSG_PUB.initialize;
1477: END IF;
1478:
1479: -- Initialize API return status to success
1480: x_return_status := FND_API.G_RET_STS_SUCCESS;
1481: l_return_status := FND_API.G_RET_STS_SUCCESS;
1482: --
1483: -- API body
1484: --

Line 1481: l_return_status := FND_API.G_RET_STS_SUCCESS;

1477: END IF;
1478:
1479: -- Initialize API return status to success
1480: x_return_status := FND_API.G_RET_STS_SUCCESS;
1481: l_return_status := FND_API.G_RET_STS_SUCCESS;
1482: --
1483: -- API body
1484: --
1485:

Line 1497: RAISE FND_API.G_EXC_ERROR;

1493: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
1494: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
1495: FND_MSG_PUB.ADD;
1496: END IF;
1497: RAISE FND_API.G_EXC_ERROR;
1498: END IF;
1499:
1500: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
1501: then

Line 1500: if p_validation_level = FND_API.G_VALID_LEVEL_FULL

1496: END IF;
1497: RAISE FND_API.G_EXC_ERROR;
1498: END IF;
1499:
1500: if p_validation_level = FND_API.G_VALID_LEVEL_FULL
1501: then
1502:
1503: AS_SALES_ORG_MANAGER_PVT.Get_CurrentUser(
1504: p_api_version_number => 2.0

Line 1512: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1508: ,x_msg_count => x_msg_count
1509: ,x_msg_data => x_msg_data
1510: ,x_sales_member_rec => l_identity_sales_member_rec);
1511:
1512: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1513: RAISE FND_API.G_EXC_ERROR;
1514: END IF;
1515: end if;
1516:

Line 1513: RAISE FND_API.G_EXC_ERROR;

1509: ,x_msg_data => x_msg_data
1510: ,x_sales_member_rec => l_identity_sales_member_rec);
1511:
1512: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1513: RAISE FND_API.G_EXC_ERROR;
1514: END IF;
1515: end if;
1516:
1517:

Line 1543: raise FND_API.G_EXC_ERROR;

1539: fnd_message.set_token('VALUE', p_interest_rec.interest_id, FALSE);
1540: FND_MSG_PUB.ADD;
1541: END IF;
1542: close get_interest_info_csr;
1543: raise FND_API.G_EXC_ERROR;
1544: End if;
1545: if p_check_access_flag = 'Y'
1546: then
1547: IF p_interest_rec.lead_id is NULL or p_interest_rec.lead_id = FND_API.G_MISS_NUM

Line 1547: IF p_interest_rec.lead_id is NULL or p_interest_rec.lead_id = FND_API.G_MISS_NUM

1543: raise FND_API.G_EXC_ERROR;
1544: End if;
1545: if p_check_access_flag = 'Y'
1546: then
1547: IF p_interest_rec.lead_id is NULL or p_interest_rec.lead_id = FND_API.G_MISS_NUM
1548: THEN
1549: AS_ACCESS_PUB.has_updateCustomerAccess
1550: ( p_api_version_number => 2.0
1551: ,p_init_msg_list => p_init_msg_list

Line 1567: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1563: ,x_msg_data => x_msg_data
1564: ,x_update_access_flag => l_update_access_flag
1565: );
1566:
1567: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1568: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1569: END IF;
1570:
1571: IF (l_update_access_flag <> 'Y') THEN

Line 1568: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1564: ,x_update_access_flag => l_update_access_flag
1565: );
1566:
1567: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1568: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1569: END IF;
1570:
1571: IF (l_update_access_flag <> 'Y') THEN
1572: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 1576: RAISE FND_API.G_EXC_ERROR;

1572: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1573: FND_MESSAGE.Set_Name('AS', 'API_NO_DELETE_PRIVILEGE');
1574: FND_MSG_PUB.ADD;
1575: END IF;
1576: RAISE FND_API.G_EXC_ERROR;
1577: END IF;
1578: ELSE
1579: AS_ACCESS_PUB.has_updateOpportunityAccess
1580: ( p_api_version_number => 2.0

Line 1597: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1593: ,x_msg_data => x_msg_data
1594: ,x_update_access_flag => l_update_access_flag
1595: );
1596:
1597: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1598: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1599: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
1600: END IF;
1601: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1601: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1597: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1598: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1599: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,'has_updateOpportunityAccess fail');
1600: END IF;
1601: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1602: END IF;
1603:
1604: IF (l_update_access_flag <> 'Y') THEN
1605: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 1610: RAISE FND_API.G_EXC_ERROR;

1606: FND_MESSAGE.Set_Name('AS', 'API_NO_DELETE_PRIVILEGE');
1607: FND_MESSAGE.Set_Token('INFO', 'CUSTOMER_ID,OPPORTUNITY_ID,SALESFORCE_ID', FALSE);
1608: FND_MSG_PUB.ADD;
1609: END IF;
1610: RAISE FND_API.G_EXC_ERROR;
1611: END IF;
1612: END IF;
1613: end if; -- p_check_access_flag = 'Y'
1614:

Line 1620: p_interest_rec.lead_id <> FND_API.G_MISS_NUM) THEN

1616: where interest_id = p_interest_rec.interest_id;
1617:
1618: -- Fix bug 2304022
1619: IF (p_interest_rec.lead_id is not NULL AND
1620: p_interest_rec.lead_id <> FND_API.G_MISS_NUM) THEN
1621: IF l_debug THEN
1622: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1623: 'Calling Opportunity Real Time API');
1624: END IF;

Line 1627: P_Init_Msg_List => FND_API.G_FALSE,

1623: 'Calling Opportunity Real Time API');
1624: END IF;
1625: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
1626: P_Api_Version_Number => 1.0,
1627: P_Init_Msg_List => FND_API.G_FALSE,
1628: P_Commit => FND_API.G_FALSE,
1629: p_lead_id => p_interest_rec.lead_id,
1630: X_Return_Status => l_return_status,
1631: X_Msg_Count => x_msg_count,

Line 1628: P_Commit => FND_API.G_FALSE,

1624: END IF;
1625: AS_RTTAP_OPPTY.RTTAP_WRAPPER(
1626: P_Api_Version_Number => 1.0,
1627: P_Init_Msg_List => FND_API.G_FALSE,
1628: P_Commit => FND_API.G_FALSE,
1629: p_lead_id => p_interest_rec.lead_id,
1630: X_Return_Status => l_return_status,
1631: X_Msg_Count => x_msg_count,
1632: X_Msg_Data => x_msg_data

Line 1635: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN

1631: X_Msg_Count => x_msg_count,
1632: X_Msg_Data => x_msg_data
1633: );
1634:
1635: IF l_return_status<>FND_API.G_RET_STS_SUCCESS THEN
1636: IF l_debug THEN
1637: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1638: 'Opportunity Real Time API fail');
1639: END IF;

Line 1641: RAISE FND_API.G_EXC_ERROR;

1637: AS_UTILITY_PVT.Debug_Message(l_module, FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW,
1638: 'Opportunity Real Time API fail');
1639: END IF;
1640:
1641: RAISE FND_API.G_EXC_ERROR;
1642: END IF;
1643: END IF;
1644:
1645: x_return_status := l_return_status;

Line 1652: IF FND_API.To_Boolean ( p_commit )

1648: -- End of API body.
1649: --
1650:
1651: -- Standard check of p_commit.
1652: IF FND_API.To_Boolean ( p_commit )
1653: THEN
1654: COMMIT WORK;
1655: END IF;
1656:

Line 1664: WHEN FND_API.G_EXC_ERROR THEN

1660: p_data => x_msg_data
1661: );
1662:
1663: EXCEPTION
1664: WHEN FND_API.G_EXC_ERROR THEN
1665: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1666: P_MODULE => l_module
1667: ,P_API_NAME => L_API_NAME
1668: ,P_PKG_NAME => G_PKG_NAME

Line 1675: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1671: ,X_MSG_COUNT => X_MSG_COUNT
1672: ,X_MSG_DATA => X_MSG_DATA
1673: ,X_RETURN_STATUS => X_RETURN_STATUS);
1674:
1675: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1676: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
1677: P_MODULE => l_module
1678: ,P_API_NAME => L_API_NAME
1679: ,P_PKG_NAME => G_PKG_NAME

Line 1716: l_interest_fields_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1712: FROM AS_INTERESTS_ALL
1713: WHERE INTEREST_ID = l_interest_id;
1714:
1715: l_return_status VARCHAR2(1);
1716: l_interest_fields_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1717: l_old_product_category_id NUMBER;
1718: l_old_product_cat_set_id NUMBER;
1719: l_validation_level VARCHAR2(1) := 'L';
1720: BEGIN

Line 1721: l_return_status := FND_API.G_RET_STS_SUCCESS;

1717: l_old_product_category_id NUMBER;
1718: l_old_product_cat_set_id NUMBER;
1719: l_validation_level VARCHAR2(1) := 'L';
1720: BEGIN
1721: l_return_status := FND_API.G_RET_STS_SUCCESS;
1722:
1723: -- Interest Validation
1724: --
1725: IF ((p_product_category_id is NULL)

Line 1726: or (p_product_category_id = FND_API.G_MISS_NUM))

1722:
1723: -- Interest Validation
1724: --
1725: IF ((p_product_category_id is NULL)
1726: or (p_product_category_id = FND_API.G_MISS_NUM))
1727: THEN
1728: l_return_status := FND_API.G_RET_STS_ERROR;
1729:
1730: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 1728: l_return_status := FND_API.G_RET_STS_ERROR;

1724: --
1725: IF ((p_product_category_id is NULL)
1726: or (p_product_category_id = FND_API.G_MISS_NUM))
1727: THEN
1728: l_return_status := FND_API.G_RET_STS_ERROR;
1729:
1730: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1731: THEN
1732: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');

Line 1737: or (p_product_cat_set_id = FND_API.G_MISS_NUM))

1733: FND_MESSAGE.Set_Token('COLUMN', 'PRODUCT_CATEGORY_ID', FALSE);
1734: FND_MSG_PUB.ADD;
1735: END IF;
1736: ELSIF ((p_product_cat_set_id is NULL)
1737: or (p_product_cat_set_id = FND_API.G_MISS_NUM))
1738: THEN
1739: l_return_status := FND_API.G_RET_STS_ERROR;
1740:
1741: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 1739: l_return_status := FND_API.G_RET_STS_ERROR;

1735: END IF;
1736: ELSIF ((p_product_cat_set_id is NULL)
1737: or (p_product_cat_set_id = FND_API.G_MISS_NUM))
1738: THEN
1739: l_return_status := FND_API.G_RET_STS_ERROR;
1740:
1741: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1742: THEN
1743: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');

Line 1769: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS

1765: p_validation_level => l_validation_level,
1766: x_return_status => l_interest_fields_status
1767: );
1768:
1769: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS
1770: THEN
1771: l_return_status := FND_API.G_RET_STS_ERROR;
1772: END IF;
1773: END IF;

Line 1771: l_return_status := FND_API.G_RET_STS_ERROR;

1767: );
1768:
1769: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS
1770: THEN
1771: l_return_status := FND_API.G_RET_STS_ERROR;
1772: END IF;
1773: END IF;
1774:
1775: -- Now validate interest status

Line 1777: IF (l_return_status = FND_API.G_RET_STS_SUCCESS)

1773: END IF;
1774:
1775: -- Now validate interest status
1776: --
1777: IF (l_return_status = FND_API.G_RET_STS_SUCCESS)
1778: THEN
1779: Validate_Int_Status_For_PC(p_product_category_id => p_product_category_id,
1780: p_product_cat_set_id => p_product_cat_set_id,
1781: p_interest_status_code => p_interest_status_code,

Line 1798: l_interest_fields_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1794: p_return_status OUT NOCOPY VARCHAR2
1795: )
1796: IS
1797: l_return_status VARCHAR2(1);
1798: l_interest_fields_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1799: BEGIN
1800: l_return_status := FND_API.G_RET_STS_SUCCESS;
1801:
1802: -- Interest Validation

Line 1800: l_return_status := FND_API.G_RET_STS_SUCCESS;

1796: IS
1797: l_return_status VARCHAR2(1);
1798: l_interest_fields_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1799: BEGIN
1800: l_return_status := FND_API.G_RET_STS_SUCCESS;
1801:
1802: -- Interest Validation
1803: --
1804: IF ((p_interest_type_id is NULL)

Line 1805: or (p_interest_type_id = FND_API.G_MISS_NUM))

1801:
1802: -- Interest Validation
1803: --
1804: IF ((p_interest_type_id is NULL)
1805: or (p_interest_type_id = FND_API.G_MISS_NUM))
1806: THEN
1807: l_return_status := FND_API.G_RET_STS_ERROR;
1808:
1809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 1807: l_return_status := FND_API.G_RET_STS_ERROR;

1803: --
1804: IF ((p_interest_type_id is NULL)
1805: or (p_interest_type_id = FND_API.G_MISS_NUM))
1806: THEN
1807: l_return_status := FND_API.G_RET_STS_ERROR;
1808:
1809: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1810: THEN
1811: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');

Line 1825: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS

1821: p_secondary_interest_code_id => p_secondary_interest_code_id,
1822: p_return_status => l_interest_fields_status
1823: );
1824:
1825: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS
1826: THEN
1827: l_return_status := FND_API.G_RET_STS_ERROR;
1828: END IF;
1829: END IF;

Line 1827: l_return_status := FND_API.G_RET_STS_ERROR;

1823: );
1824:
1825: IF l_interest_fields_status <> FND_API.G_RET_STS_SUCCESS
1826: THEN
1827: l_return_status := FND_API.G_RET_STS_ERROR;
1828: END IF;
1829: END IF;
1830:
1831: -- Now validate interest status

Line 1833: IF (l_return_status = FND_API.G_RET_STS_SUCCESS)

1829: END IF;
1830:
1831: -- Now validate interest status
1832: --
1833: IF (l_return_status = FND_API.G_RET_STS_SUCCESS)
1834: THEN
1835: Validate_Int_Status(p_interest_type_id => p_interest_type_id,
1836: p_primary_interest_code_id => p_primary_interest_code_id,
1837: p_secondary_interest_code_id => p_secondary_interest_code_id,

Line 1879: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1875: And Sic.Interest_Code_Id = X_Sec_Int_Code_Id
1876: And Sic.Parent_Interest_Code_Id = X_Int_Code_Id;
1877:
1878: l_variable VARCHAR2(1);
1879: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1880: Begin
1881:
1882: OPEN C_Int_Type_Exists (p_interest_type_id);
1883: FETCH C_Int_Type_Exists INTO l_variable;

Line 1895: l_return_status := FND_API.G_RET_STS_ERROR;

1891: FND_MESSAGE.Set_Token('VALUE', p_interest_type_id, FALSE);
1892: FND_MSG_PUB.Add;
1893: END IF;
1894:
1895: l_return_status := FND_API.G_RET_STS_ERROR;
1896: END IF;
1897: CLOSE C_Int_Type_Exists;
1898:
1899:

Line 1901: and p_primary_interest_code_id <> FND_API.G_MISS_NUM

1897: CLOSE C_Int_Type_Exists;
1898:
1899:
1900: IF p_primary_interest_code_id is NOT NULL
1901: and p_primary_interest_code_id <> FND_API.G_MISS_NUM
1902: THEN
1903: OPEN C_Prim_Int_Code_Exists ( p_primary_interest_code_id,
1904: p_interest_type_id);
1905: FETCH C_Prim_Int_Code_Exists INTO l_variable;

Line 1917: l_return_status := FND_API.G_RET_STS_ERROR;

1913: FND_MESSAGE.Set_Token('VALUE', p_primary_interest_code_id, FALSE);
1914: FND_MSG_PUB.Add;
1915: END IF;
1916:
1917: l_return_status := FND_API.G_RET_STS_ERROR;
1918: END IF;
1919: CLOSE C_Prim_Int_Code_Exists;
1920: END IF;
1921:

Line 1924: and p_secondary_interest_code_id <> FND_API.G_MISS_NUM

1920: END IF;
1921:
1922:
1923: IF p_secondary_interest_code_id is NOT NULL
1924: and p_secondary_interest_code_id <> FND_API.G_MISS_NUM
1925: THEN
1926: OPEN C_Sec_Int_Code_Exists (p_secondary_interest_code_id,
1927: p_primary_interest_code_id,
1928: p_interest_type_id);

Line 1940: l_return_status := FND_API.G_RET_STS_ERROR;

1936: FND_MESSAGE.Set_Token('VALUE', p_secondary_interest_code_id, FALSE);
1937: FND_MSG_PUB.ADD;
1938: END IF;
1939:
1940: l_return_status := FND_API.G_RET_STS_ERROR;
1941: END IF;
1942: CLOSE C_Sec_Int_Code_Exists;
1943: END IF;
1944:

Line 1968: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1964: WHERE Interest_Type_Id = X_Int_Type_Id
1965: And Interest_Status_Code = X_Int_Status_Code;
1966:
1967: l_variable VARCHAR2(1);
1968: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1969: Begin
1970:
1971: IF p_interest_status_code is NOT NULL
1972: and p_interest_status_code <> FND_API.G_MISS_CHAR

Line 1972: and p_interest_status_code <> FND_API.G_MISS_CHAR

1968: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1969: Begin
1970:
1971: IF p_interest_status_code is NOT NULL
1972: and p_interest_status_code <> FND_API.G_MISS_CHAR
1973: THEN
1974: OPEN C_Int_Status_Exists (p_interest_status_code,
1975: p_interest_type_id);
1976: FETCH C_Int_Status_Exists INTO l_variable;

Line 1987: l_return_status := FND_API.G_RET_STS_ERROR;

1983: FND_MESSAGE.Set_Token('VALUE', p_interest_status_code, FALSE);
1984: FND_MSG_PUB.ADD;
1985: END IF;
1986:
1987: l_return_status := FND_API.G_RET_STS_ERROR;
1988: END IF;
1989: CLOSE C_Int_Status_Exists;
1990: END IF;
1991:

Line 2016: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2012: And Product_Cat_Set_Id = X_Product_Cat_Set_Id
2013: And Interest_Status_Code = X_Int_Status_Code;
2014:
2015: l_variable VARCHAR2(1);
2016: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2017: Begin
2018:
2019: IF p_interest_status_code is NOT NULL
2020: and p_interest_status_code <> FND_API.G_MISS_CHAR

Line 2020: and p_interest_status_code <> FND_API.G_MISS_CHAR

2016: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2017: Begin
2018:
2019: IF p_interest_status_code is NOT NULL
2020: and p_interest_status_code <> FND_API.G_MISS_CHAR
2021: THEN
2022: OPEN C_Int_Status_Exists (p_interest_status_code,
2023: p_product_category_id, p_product_cat_set_id);
2024: FETCH C_Int_Status_Exists INTO l_variable;

Line 2035: l_return_status := FND_API.G_RET_STS_ERROR;

2031: FND_MESSAGE.Set_Token('VALUE', p_interest_status_code, FALSE);
2032: FND_MSG_PUB.ADD;
2033: END IF;
2034:
2035: l_return_status := FND_API.G_RET_STS_ERROR;
2036: END IF;
2037: CLOSE C_Int_Status_Exists;
2038: END IF;
2039: