49: -- Parameters
50: --
51: -- IN
52: -- p_api_version_number IN NUMBER Required
53: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
54: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
55: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
56: -- p_invite_headers_rec IN invite_headers_rec_type Required
57: --
50: --
51: -- IN
52: -- p_api_version_number IN NUMBER Required
53: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
54: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
55: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
56: -- p_invite_headers_rec IN invite_headers_rec_type Required
57: --
58: -- OUT
51: -- IN
52: -- p_api_version_number IN NUMBER Required
53: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
54: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
55: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
56: -- p_invite_headers_rec IN invite_headers_rec_type Required
57: --
58: -- OUT
59: -- x_return_status OUT VARCHAR2
75: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
76:
77: PROCEDURE Create_Invite_Headers(
78: p_api_version_number IN NUMBER,
79: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
80: p_commit IN VARCHAR2 := FND_API.G_FALSE,
81: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
82:
83: x_return_status OUT NOCOPY VARCHAR2,
76:
77: PROCEDURE Create_Invite_Headers(
78: p_api_version_number IN NUMBER,
79: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
80: p_commit IN VARCHAR2 := FND_API.G_FALSE,
81: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
82:
83: x_return_status OUT NOCOPY VARCHAR2,
84: x_msg_count OUT NOCOPY NUMBER,
77: PROCEDURE Create_Invite_Headers(
78: p_api_version_number IN NUMBER,
79: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
80: p_commit IN VARCHAR2 := FND_API.G_FALSE,
81: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
82:
83: x_return_status OUT NOCOPY VARCHAR2,
84: x_msg_count OUT NOCOPY NUMBER,
85: x_msg_data OUT NOCOPY VARCHAR2,
92: L_API_NAME CONSTANT VARCHAR2(30) := 'Create_Invite_Headers';
93: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
94: l_return_status_full VARCHAR2(1);
95: l_object_version_number NUMBER := 1;
96: l_org_id NUMBER := FND_API.G_MISS_NUM;
97: l_INVITE_HEADER_ID NUMBER;
98: l_dummy NUMBER;
99: CURSOR c_id IS
100: SELECT pv_pg_invite_headers_b_s.NEXTVAL
108: -- Standard Start of API savepoint
109: SAVEPOINT create_invite_headers_pvt;
110:
111: -- Standard call to check for call compatibility.
112: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
113: p_api_version_number,
114: l_api_name,
115: G_PKG_NAME)
116: THEN
113: p_api_version_number,
114: l_api_name,
115: G_PKG_NAME)
116: THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
119:
120:
121: -- Initialize message list if p_init_msg_list is set to TRUE.
118: END IF;
119:
120:
121: -- Initialize message list if p_init_msg_list is set to TRUE.
122: IF FND_API.to_Boolean( p_init_msg_list )
123: THEN
124: FND_MSG_PUB.initialize;
125: END IF;
126:
135:
136:
137:
138: -- Initialize API return status to SUCCESS
139: x_return_status := FND_API.G_RET_STS_SUCCESS;
140:
141: -- =========================================================================
142: -- Validate Environment
143: -- =========================================================================
144:
145: IF FND_GLOBAL.USER_ID IS NULL
146: THEN
147: PVX_UTility_PVT.Error_Message(p_message_name => 'USER_PROFILE_MISSING');
148: RAISE FND_API.G_EXC_ERROR;
149: END IF;
150:
151: --DBMS_OUTPUT.PUT_LINE('Control is before validation level');
152: /*
149: END IF;
150:
151: --DBMS_OUTPUT.PUT_LINE('Control is before validation level');
152: /*
153: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
154: THEN
155: -- Debug message
156: IF (PV_DEBUG_HIGH_ON) THEN
157:
160:
161: -- Invoke validation procedures
162: Validate_invite_headers(
163: p_api_version_number => 1.0,
164: p_init_msg_list => FND_API.G_FALSE,
165: p_validation_level => p_validation_level,
166: p_validation_mode => JTF_PLSQL_API.g_create,
167: p_invite_headers_rec => p_invite_headers_rec,
168: x_return_status => x_return_status,
170: x_msg_data => x_msg_data);
171: END IF;
172: */
173: --DBMS_OUTPUT.PUT_LINE('Control is after validation level :' || x_return_status);
174: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
175: RAISE FND_API.G_EXC_ERROR;
176: END IF;
177:
178: -- Local variable initialization
171: END IF;
172: */
173: --DBMS_OUTPUT.PUT_LINE('Control is after validation level :' || x_return_status);
174: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
175: RAISE FND_API.G_EXC_ERROR;
176: END IF;
177:
178: -- Local variable initialization
179:
176: END IF;
177:
178: -- Local variable initialization
179:
180: IF p_invite_headers_rec.INVITE_HEADER_ID IS NULL OR p_invite_headers_rec.INVITE_HEADER_ID = FND_API.g_miss_num THEN
181: LOOP
182: l_dummy := NULL;
183: OPEN c_id;
184: FETCH c_id INTO l_INVITE_HEADER_ID;
223: p_EMAIL_CONTENT => p_invite_headers_rec.EMAIL_CONTENT
224: );
225:
226: x_INVITE_HEADER_ID := l_INVITE_HEADER_ID;
227: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
228: -- RAISE 'INVITE ID' || l_INVITE_HEADER_ID
229: RAISE FND_API.G_EXC_ERROR;
230: END IF;
231: --
225:
226: x_INVITE_HEADER_ID := l_INVITE_HEADER_ID;
227: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
228: -- RAISE 'INVITE ID' || l_INVITE_HEADER_ID
229: RAISE FND_API.G_EXC_ERROR;
230: END IF;
231: --
232: -- End of API body
233: --
232: -- End of API body
233: --
234: --DBMS_OUTPUT.PUT_LINE('Private API: End of API body');
235: -- Standard check for p_commit
236: IF FND_API.to_Boolean( p_commit )
237: THEN
238: COMMIT WORK;
239: END IF;
240:
253: );
254: EXCEPTION
255:
256: WHEN PVX_UTility_PVT.resource_locked THEN
257: x_return_status := FND_API.g_ret_sts_error;
258: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
259:
260: WHEN FND_API.G_EXC_ERROR THEN
261: ROLLBACK TO CREATE_Invite_Headers_PVT;
256: WHEN PVX_UTility_PVT.resource_locked THEN
257: x_return_status := FND_API.g_ret_sts_error;
258: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
259:
260: WHEN FND_API.G_EXC_ERROR THEN
261: ROLLBACK TO CREATE_Invite_Headers_PVT;
262: x_return_status := FND_API.G_RET_STS_ERROR;
263: -- Standard call to get message count and if count=1, get the message
264: FND_MSG_PUB.Count_And_Get (
258: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
259:
260: WHEN FND_API.G_EXC_ERROR THEN
261: ROLLBACK TO CREATE_Invite_Headers_PVT;
262: x_return_status := FND_API.G_RET_STS_ERROR;
263: -- Standard call to get message count and if count=1, get the message
264: FND_MSG_PUB.Count_And_Get (
265: p_encoded => FND_API.G_FALSE,
266: p_count => x_msg_count,
261: ROLLBACK TO CREATE_Invite_Headers_PVT;
262: x_return_status := FND_API.G_RET_STS_ERROR;
263: -- Standard call to get message count and if count=1, get the message
264: FND_MSG_PUB.Count_And_Get (
265: p_encoded => FND_API.G_FALSE,
266: p_count => x_msg_count,
267: p_data => x_msg_data
268: );
269:
266: p_count => x_msg_count,
267: p_data => x_msg_data
268: );
269:
270: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
271: ROLLBACK TO CREATE_Invite_Headers_PVT;
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
273: -- Standard call to get message count and if count=1, get the message
274: FND_MSG_PUB.Count_And_Get (
268: );
269:
270: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
271: ROLLBACK TO CREATE_Invite_Headers_PVT;
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
273: -- Standard call to get message count and if count=1, get the message
274: FND_MSG_PUB.Count_And_Get (
275: p_encoded => FND_API.G_FALSE,
276: p_count => x_msg_count,
271: ROLLBACK TO CREATE_Invite_Headers_PVT;
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
273: -- Standard call to get message count and if count=1, get the message
274: FND_MSG_PUB.Count_And_Get (
275: p_encoded => FND_API.G_FALSE,
276: p_count => x_msg_count,
277: p_data => x_msg_data
278: );
279:
278: );
279:
280: WHEN OTHERS THEN
281: ROLLBACK TO CREATE_Invite_Headers_PVT;
282: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
283: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
284: THEN
285: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
286: END IF;
285: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
286: END IF;
287: -- Standard call to get message count and if count=1, get the message
288: FND_MSG_PUB.Count_And_Get (
289: p_encoded => FND_API.G_FALSE,
290: p_count => x_msg_count,
291: p_data => x_msg_data
292: );
293: End Create_Invite_Headers;
305: -- Parameters
306: --
307: -- IN
308: -- p_api_version_number IN NUMBER Required
309: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
310: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
311: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
312: -- p_invite_headers_rec IN invite_headers_rec_type Required
313: --
306: --
307: -- IN
308: -- p_api_version_number IN NUMBER Required
309: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
310: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
311: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
312: -- p_invite_headers_rec IN invite_headers_rec_type Required
313: --
314: -- OUT
307: -- IN
308: -- p_api_version_number IN NUMBER Required
309: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
310: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
311: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
312: -- p_invite_headers_rec IN invite_headers_rec_type Required
313: --
314: -- OUT
315: -- x_return_status OUT VARCHAR2
327: -- ==============================================================================
328:
329: PROCEDURE Update_Invite_Headers(
330: p_api_version_number IN NUMBER,
331: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
332: p_commit IN VARCHAR2 := FND_API.G_FALSE,
333: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
334:
335: x_return_status OUT NOCOPY VARCHAR2,
328:
329: PROCEDURE Update_Invite_Headers(
330: p_api_version_number IN NUMBER,
331: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
332: p_commit IN VARCHAR2 := FND_API.G_FALSE,
333: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
334:
335: x_return_status OUT NOCOPY VARCHAR2,
336: x_msg_count OUT NOCOPY NUMBER,
329: PROCEDURE Update_Invite_Headers(
330: p_api_version_number IN NUMBER,
331: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
332: p_commit IN VARCHAR2 := FND_API.G_FALSE,
333: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
334:
335: x_return_status OUT NOCOPY VARCHAR2,
336: x_msg_count OUT NOCOPY NUMBER,
337: x_msg_data OUT NOCOPY VARCHAR2,
362: -- Standard Start of API savepoint
363: SAVEPOINT update_invite_headers_pvt;
364:
365: -- Standard call to check for call compatibility.
366: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
367: p_api_version_number,
368: l_api_name,
369: G_PKG_NAME)
370: THEN
367: p_api_version_number,
368: l_api_name,
369: G_PKG_NAME)
370: THEN
371: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
372: END IF;
373:
374:
375: -- Initialize message list if p_init_msg_list is set to TRUE.
372: END IF;
373:
374:
375: -- Initialize message list if p_init_msg_list is set to TRUE.
376: IF FND_API.to_Boolean( p_init_msg_list )
377: THEN
378: FND_MSG_PUB.initialize;
379: END IF;
380:
388:
389:
390:
391: -- Initialize API return status to SUCCESS
392: x_return_status := FND_API.G_RET_STS_SUCCESS;
393:
394: -- Debug Message
395: IF (PV_DEBUG_HIGH_ON) THEN
396:
404: If ( c_get_Invite_Headers%NOTFOUND) THEN
405: PVX_UTility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
406: p_token_name => 'INFO',
407: p_token_value => 'Invite_Headers') ;
408: RAISE FND_API.G_EXC_ERROR;
409: END IF;
410: -- Debug Message
411: IF (PV_DEBUG_HIGH_ON) THEN
412:
415: CLOSE c_get_Invite_Headers;
416:
417:
418: If (l_tar_invite_headers_rec.object_version_number is NULL or
419: l_tar_invite_headers_rec.object_version_number = FND_API.G_MISS_NUM ) Then
420: PVX_UTility_PVT.Error_Message(p_message_name => 'API_VERSION_MISSING',
421: p_token_name => 'COLUMN',
422: p_token_value => 'Last_Update_Date') ;
423: raise FND_API.G_EXC_ERROR;
419: l_tar_invite_headers_rec.object_version_number = FND_API.G_MISS_NUM ) Then
420: PVX_UTility_PVT.Error_Message(p_message_name => 'API_VERSION_MISSING',
421: p_token_name => 'COLUMN',
422: p_token_value => 'Last_Update_Date') ;
423: raise FND_API.G_EXC_ERROR;
424: End if;
425: -- Check Whether record has been changed by someone else
426: If (l_tar_invite_headers_rec.object_version_number <> l_ref_invite_headers_rec.object_version_number) Then
427: PVX_UTility_PVT.Error_Message(p_message_name => 'API_RECORD_CHANGED',
426: If (l_tar_invite_headers_rec.object_version_number <> l_ref_invite_headers_rec.object_version_number) Then
427: PVX_UTility_PVT.Error_Message(p_message_name => 'API_RECORD_CHANGED',
428: p_token_name => 'INFO',
429: p_token_value => 'Invite_Headers') ;
430: raise FND_API.G_EXC_ERROR;
431: End if;
432:
433:
434: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
430: raise FND_API.G_EXC_ERROR;
431: End if;
432:
433:
434: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
435: THEN
436: -- Debug message
437: IF (PV_DEBUG_HIGH_ON) THEN
438:
441:
442: -- Invoke validation procedures
443: Validate_invite_headers(
444: p_api_version_number => 1.0,
445: p_init_msg_list => FND_API.G_FALSE,
446: p_validation_level => p_validation_level,
447: p_validation_mode => JTF_PLSQL_API.g_update,
448: p_invite_headers_rec => p_invite_headers_rec,
449: x_return_status => x_return_status,
450: x_msg_count => x_msg_count,
451: x_msg_data => x_msg_data);
452: END IF;
453:
454: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
455: RAISE FND_API.G_EXC_ERROR;
456: END IF;
457:
458:
451: x_msg_data => x_msg_data);
452: END IF;
453:
454: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
455: RAISE FND_API.G_EXC_ERROR;
456: END IF;
457:
458:
459: -- Debug Message
483: -- End of API body.
484: --
485:
486: -- Standard check for p_commit
487: IF FND_API.to_Boolean( p_commit )
488: THEN
489: COMMIT WORK;
490: END IF;
491:
504: );
505: EXCEPTION
506:
507: WHEN PVX_UTility_PVT.resource_locked THEN
508: x_return_status := FND_API.g_ret_sts_error;
509: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
510:
511: WHEN FND_API.G_EXC_ERROR THEN
512: ROLLBACK TO UPDATE_Invite_Headers_PVT;
507: WHEN PVX_UTility_PVT.resource_locked THEN
508: x_return_status := FND_API.g_ret_sts_error;
509: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
510:
511: WHEN FND_API.G_EXC_ERROR THEN
512: ROLLBACK TO UPDATE_Invite_Headers_PVT;
513: x_return_status := FND_API.G_RET_STS_ERROR;
514: -- Standard call to get message count and if count=1, get the message
515: FND_MSG_PUB.Count_And_Get (
509: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
510:
511: WHEN FND_API.G_EXC_ERROR THEN
512: ROLLBACK TO UPDATE_Invite_Headers_PVT;
513: x_return_status := FND_API.G_RET_STS_ERROR;
514: -- Standard call to get message count and if count=1, get the message
515: FND_MSG_PUB.Count_And_Get (
516: p_encoded => FND_API.G_FALSE,
517: p_count => x_msg_count,
512: ROLLBACK TO UPDATE_Invite_Headers_PVT;
513: x_return_status := FND_API.G_RET_STS_ERROR;
514: -- Standard call to get message count and if count=1, get the message
515: FND_MSG_PUB.Count_And_Get (
516: p_encoded => FND_API.G_FALSE,
517: p_count => x_msg_count,
518: p_data => x_msg_data
519: );
520:
517: p_count => x_msg_count,
518: p_data => x_msg_data
519: );
520:
521: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
522: ROLLBACK TO UPDATE_Invite_Headers_PVT;
523: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
524: -- Standard call to get message count and if count=1, get the message
525: FND_MSG_PUB.Count_And_Get (
519: );
520:
521: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
522: ROLLBACK TO UPDATE_Invite_Headers_PVT;
523: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
524: -- Standard call to get message count and if count=1, get the message
525: FND_MSG_PUB.Count_And_Get (
526: p_encoded => FND_API.G_FALSE,
527: p_count => x_msg_count,
522: ROLLBACK TO UPDATE_Invite_Headers_PVT;
523: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
524: -- Standard call to get message count and if count=1, get the message
525: FND_MSG_PUB.Count_And_Get (
526: p_encoded => FND_API.G_FALSE,
527: p_count => x_msg_count,
528: p_data => x_msg_data
529: );
530:
529: );
530:
531: WHEN OTHERS THEN
532: ROLLBACK TO UPDATE_Invite_Headers_PVT;
533: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
534: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
535: THEN
536: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
537: END IF;
536: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
537: END IF;
538: -- Standard call to get message count and if count=1, get the message
539: FND_MSG_PUB.Count_And_Get (
540: p_encoded => FND_API.G_FALSE,
541: p_count => x_msg_count,
542: p_data => x_msg_data
543: );
544: End Update_Invite_Headers;
556: -- Parameters
557: --
558: -- IN
559: -- p_api_version_number IN NUMBER Required
560: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
561: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
562: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
563: -- p_INVITE_HEADER_ID IN NUMBER
564: -- p_object_version_number IN NUMBER Optional Default = NULL
557: --
558: -- IN
559: -- p_api_version_number IN NUMBER Required
560: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
561: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
562: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
563: -- p_INVITE_HEADER_ID IN NUMBER
564: -- p_object_version_number IN NUMBER Optional Default = NULL
565: --
558: -- IN
559: -- p_api_version_number IN NUMBER Required
560: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
561: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
562: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
563: -- p_INVITE_HEADER_ID IN NUMBER
564: -- p_object_version_number IN NUMBER Optional Default = NULL
565: --
566: -- OUT
579: -- ==============================================================================
580:
581: PROCEDURE Delete_Invite_Headers(
582: p_api_version_number IN NUMBER,
583: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
584: p_commit IN VARCHAR2 := FND_API.G_FALSE,
585: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
586: x_return_status OUT NOCOPY VARCHAR2,
587: x_msg_count OUT NOCOPY NUMBER,
580:
581: PROCEDURE Delete_Invite_Headers(
582: p_api_version_number IN NUMBER,
583: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
584: p_commit IN VARCHAR2 := FND_API.G_FALSE,
585: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
586: x_return_status OUT NOCOPY VARCHAR2,
587: x_msg_count OUT NOCOPY NUMBER,
588: x_msg_data OUT NOCOPY VARCHAR2,
581: PROCEDURE Delete_Invite_Headers(
582: p_api_version_number IN NUMBER,
583: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
584: p_commit IN VARCHAR2 := FND_API.G_FALSE,
585: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
586: x_return_status OUT NOCOPY VARCHAR2,
587: x_msg_count OUT NOCOPY NUMBER,
588: x_msg_data OUT NOCOPY VARCHAR2,
589: p_INVITE_HEADER_ID IN NUMBER,
599: -- Standard Start of API savepoint
600: SAVEPOINT delete_invite_headers_pvt;
601:
602: -- Standard call to check for call compatibility.
603: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
604: p_api_version_number,
605: l_api_name,
606: G_PKG_NAME)
607: THEN
604: p_api_version_number,
605: l_api_name,
606: G_PKG_NAME)
607: THEN
608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
609: END IF;
610:
611:
612: -- Initialize message list if p_init_msg_list is set to TRUE.
609: END IF;
610:
611:
612: -- Initialize message list if p_init_msg_list is set to TRUE.
613: IF FND_API.to_Boolean( p_init_msg_list )
614: THEN
615: FND_MSG_PUB.initialize;
616: END IF;
617:
625:
626:
627:
628: -- Initialize API return status to SUCCESS
629: x_return_status := FND_API.G_RET_STS_SUCCESS;
630:
631: --
632: -- Api body
633: --
645: -- End of API body
646: --
647:
648: -- Standard check for p_commit
649: IF FND_API.to_Boolean( p_commit )
650: THEN
651: COMMIT WORK;
652: END IF;
653:
666: );
667: EXCEPTION
668:
669: WHEN PVX_UTility_PVT.resource_locked THEN
670: x_return_status := FND_API.g_ret_sts_error;
671: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
672:
673: WHEN FND_API.G_EXC_ERROR THEN
674: ROLLBACK TO DELETE_Invite_Headers_PVT;
669: WHEN PVX_UTility_PVT.resource_locked THEN
670: x_return_status := FND_API.g_ret_sts_error;
671: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
672:
673: WHEN FND_API.G_EXC_ERROR THEN
674: ROLLBACK TO DELETE_Invite_Headers_PVT;
675: x_return_status := FND_API.G_RET_STS_ERROR;
676: -- Standard call to get message count and if count=1, get the message
677: FND_MSG_PUB.Count_And_Get (
671: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
672:
673: WHEN FND_API.G_EXC_ERROR THEN
674: ROLLBACK TO DELETE_Invite_Headers_PVT;
675: x_return_status := FND_API.G_RET_STS_ERROR;
676: -- Standard call to get message count and if count=1, get the message
677: FND_MSG_PUB.Count_And_Get (
678: p_encoded => FND_API.G_FALSE,
679: p_count => x_msg_count,
674: ROLLBACK TO DELETE_Invite_Headers_PVT;
675: x_return_status := FND_API.G_RET_STS_ERROR;
676: -- Standard call to get message count and if count=1, get the message
677: FND_MSG_PUB.Count_And_Get (
678: p_encoded => FND_API.G_FALSE,
679: p_count => x_msg_count,
680: p_data => x_msg_data
681: );
682:
679: p_count => x_msg_count,
680: p_data => x_msg_data
681: );
682:
683: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
684: ROLLBACK TO DELETE_Invite_Headers_PVT;
685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
686: -- Standard call to get message count and if count=1, get the message
687: FND_MSG_PUB.Count_And_Get (
681: );
682:
683: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
684: ROLLBACK TO DELETE_Invite_Headers_PVT;
685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
686: -- Standard call to get message count and if count=1, get the message
687: FND_MSG_PUB.Count_And_Get (
688: p_encoded => FND_API.G_FALSE,
689: p_count => x_msg_count,
684: ROLLBACK TO DELETE_Invite_Headers_PVT;
685: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
686: -- Standard call to get message count and if count=1, get the message
687: FND_MSG_PUB.Count_And_Get (
688: p_encoded => FND_API.G_FALSE,
689: p_count => x_msg_count,
690: p_data => x_msg_data
691: );
692:
691: );
692:
693: WHEN OTHERS THEN
694: ROLLBACK TO DELETE_Invite_Headers_PVT;
695: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
696: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
697: THEN
698: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
699: END IF;
698: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
699: END IF;
700: -- Standard call to get message count and if count=1, get the message
701: FND_MSG_PUB.Count_And_Get (
702: p_encoded => FND_API.G_FALSE,
703: p_count => x_msg_count,
704: p_data => x_msg_data
705: );
706: End Delete_Invite_Headers;
720: -- Parameters
721: --
722: -- IN
723: -- p_api_version_number IN NUMBER Required
724: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
725: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
726: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
727: -- p_invite_headers_rec IN invite_headers_rec_type Required
728: --
721: --
722: -- IN
723: -- p_api_version_number IN NUMBER Required
724: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
725: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
726: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
727: -- p_invite_headers_rec IN invite_headers_rec_type Required
728: --
729: -- OUT
722: -- IN
723: -- p_api_version_number IN NUMBER Required
724: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
725: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
726: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
727: -- p_invite_headers_rec IN invite_headers_rec_type Required
728: --
729: -- OUT
730: -- x_return_status OUT VARCHAR2
742: -- ==============================================================================
743:
744: PROCEDURE Lock_Invite_Headers(
745: p_api_version_number IN NUMBER,
746: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
747:
748: x_return_status OUT NOCOPY VARCHAR2,
749: x_msg_count OUT NOCOPY NUMBER,
750: x_msg_data OUT NOCOPY VARCHAR2,
768: END IF;
769:
770:
771: -- Initialize message list if p_init_msg_list is set to TRUE.
772: IF FND_API.to_Boolean( p_init_msg_list )
773: THEN
774: FND_MSG_PUB.initialize;
775: END IF;
776:
776:
777:
778:
779: -- Standard call to check for call compatibility.
780: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
781: p_api_version_number,
782: l_api_name,
783: G_PKG_NAME)
784: THEN
781: p_api_version_number,
782: l_api_name,
783: G_PKG_NAME)
784: THEN
785: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
786: END IF;
787:
788:
789:
787:
788:
789:
790: -- Initialize API return status to SUCCESS
791: x_return_status := FND_API.G_RET_STS_SUCCESS;
792:
793:
794: ------------------------ lock -------------------------
795: Pv_Pg_Invite_Headers_Pkg.Lock_Row(l_INVITE_HEADER_ID,p_object_version);
796:
797:
798: -------------------- finish --------------------------
799: FND_MSG_PUB.count_and_get(
800: p_encoded => FND_API.g_false,
801: p_count => x_msg_count,
802: p_data => x_msg_data);
803: IF (PV_DEBUG_HIGH_ON) THEN
804:
806: END IF;
807: EXCEPTION
808:
809: WHEN PVX_UTility_PVT.resource_locked THEN
810: x_return_status := FND_API.g_ret_sts_error;
811: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
812:
813: WHEN FND_API.G_EXC_ERROR THEN
814: ROLLBACK TO LOCK_Invite_Headers_PVT;
809: WHEN PVX_UTility_PVT.resource_locked THEN
810: x_return_status := FND_API.g_ret_sts_error;
811: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
812:
813: WHEN FND_API.G_EXC_ERROR THEN
814: ROLLBACK TO LOCK_Invite_Headers_PVT;
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: -- Standard call to get message count and if count=1, get the message
817: FND_MSG_PUB.Count_And_Get (
811: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
812:
813: WHEN FND_API.G_EXC_ERROR THEN
814: ROLLBACK TO LOCK_Invite_Headers_PVT;
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: -- Standard call to get message count and if count=1, get the message
817: FND_MSG_PUB.Count_And_Get (
818: p_encoded => FND_API.G_FALSE,
819: p_count => x_msg_count,
814: ROLLBACK TO LOCK_Invite_Headers_PVT;
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: -- Standard call to get message count and if count=1, get the message
817: FND_MSG_PUB.Count_And_Get (
818: p_encoded => FND_API.G_FALSE,
819: p_count => x_msg_count,
820: p_data => x_msg_data
821: );
822:
819: p_count => x_msg_count,
820: p_data => x_msg_data
821: );
822:
823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
824: ROLLBACK TO LOCK_Invite_Headers_PVT;
825: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
826: -- Standard call to get message count and if count=1, get the message
827: FND_MSG_PUB.Count_And_Get (
821: );
822:
823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
824: ROLLBACK TO LOCK_Invite_Headers_PVT;
825: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
826: -- Standard call to get message count and if count=1, get the message
827: FND_MSG_PUB.Count_And_Get (
828: p_encoded => FND_API.G_FALSE,
829: p_count => x_msg_count,
824: ROLLBACK TO LOCK_Invite_Headers_PVT;
825: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
826: -- Standard call to get message count and if count=1, get the message
827: FND_MSG_PUB.Count_And_Get (
828: p_encoded => FND_API.G_FALSE,
829: p_count => x_msg_count,
830: p_data => x_msg_data
831: );
832:
831: );
832:
833: WHEN OTHERS THEN
834: ROLLBACK TO LOCK_Invite_Headers_PVT;
835: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
836: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
837: THEN
838: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
839: END IF;
838: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
839: END IF;
840: -- Standard call to get message count and if count=1, get the message
841: FND_MSG_PUB.Count_And_Get (
842: p_encoded => FND_API.G_FALSE,
843: p_count => x_msg_count,
844: p_data => x_msg_data
845: );
846: End Lock_Invite_Headers;
855: IS
856: l_valid_flag VARCHAR2(1);
857:
858: BEGIN
859: x_return_status := FND_API.g_ret_sts_success;
860: IF p_validation_mode = JTF_PLSQL_API.g_create
861: AND p_invite_headers_rec.INVITE_HEADER_ID IS NOT NULL
862: THEN
863: l_valid_flag := PVX_UTility_PVT.check_uniqueness(
865: 'INVITE_HEADER_ID = ''' || p_invite_headers_rec.INVITE_HEADER_ID ||''''
866: );
867: END IF;
868:
869: IF l_valid_flag = FND_API.g_false THEN
870: PVX_UTility_PVT.Error_Message(p_message_name => 'Pv_Pg_Invite_HEADER_ID_DUPLICATE');
871: x_return_status := FND_API.g_ret_sts_error;
872: END IF;
873:
867: END IF;
868:
869: IF l_valid_flag = FND_API.g_false THEN
870: PVX_UTility_PVT.Error_Message(p_message_name => 'Pv_Pg_Invite_HEADER_ID_DUPLICATE');
871: x_return_status := FND_API.g_ret_sts_error;
872: END IF;
873:
874: END check_Invite_Headers_Uk_Items;
875:
881: x_return_status OUT NOCOPY VARCHAR2
882: )
883: IS
884: BEGIN
885: x_return_status := FND_API.g_ret_sts_success;
886:
887: IF p_validation_mode = JTF_PLSQL_API.g_create THEN
888:
889:
886:
887: IF p_validation_mode = JTF_PLSQL_API.g_create THEN
888:
889:
890: IF p_invite_headers_rec.invite_header_id = FND_API.G_MISS_NUM OR p_invite_headers_rec.invite_header_id IS NULL THEN
891: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'INVITE_HEADER_ID' );
892: x_return_status := FND_API.g_ret_sts_error;
893: END IF;
894:
888:
889:
890: IF p_invite_headers_rec.invite_header_id = FND_API.G_MISS_NUM OR p_invite_headers_rec.invite_header_id IS NULL THEN
891: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'INVITE_HEADER_ID' );
892: x_return_status := FND_API.g_ret_sts_error;
893: END IF;
894:
895:
896: IF p_invite_headers_rec.object_version_number = FND_API.G_MISS_NUM OR p_invite_headers_rec.object_version_number IS NULL THEN
892: x_return_status := FND_API.g_ret_sts_error;
893: END IF;
894:
895:
896: IF p_invite_headers_rec.object_version_number = FND_API.G_MISS_NUM OR p_invite_headers_rec.object_version_number IS NULL THEN
897: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'OBJECT_VERSION_NUMBER' );
898: x_return_status := FND_API.g_ret_sts_error;
899: END IF;
900:
894:
895:
896: IF p_invite_headers_rec.object_version_number = FND_API.G_MISS_NUM OR p_invite_headers_rec.object_version_number IS NULL THEN
897: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'OBJECT_VERSION_NUMBER' );
898: x_return_status := FND_API.g_ret_sts_error;
899: END IF;
900:
901:
902: IF p_invite_headers_rec.invite_for_program_id = FND_API.G_MISS_NUM OR p_invite_headers_rec.invite_for_program_id IS NULL THEN
898: x_return_status := FND_API.g_ret_sts_error;
899: END IF;
900:
901:
902: IF p_invite_headers_rec.invite_for_program_id = FND_API.G_MISS_NUM OR p_invite_headers_rec.invite_for_program_id IS NULL THEN
903: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'INVITE_FOR_PROGRAM_ID' );
904: x_return_status := FND_API.g_ret_sts_error;
905: END IF;
906:
900:
901:
902: IF p_invite_headers_rec.invite_for_program_id = FND_API.G_MISS_NUM OR p_invite_headers_rec.invite_for_program_id IS NULL THEN
903: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'INVITE_FOR_PROGRAM_ID' );
904: x_return_status := FND_API.g_ret_sts_error;
905: END IF;
906:
907:
908: IF p_invite_headers_rec.partner_id = FND_API.G_MISS_NUM OR p_invite_headers_rec.partner_id IS NULL THEN
904: x_return_status := FND_API.g_ret_sts_error;
905: END IF;
906:
907:
908: IF p_invite_headers_rec.partner_id = FND_API.G_MISS_NUM OR p_invite_headers_rec.partner_id IS NULL THEN
909: PVX_UTILITY_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'PARTNER_ID' );
910: x_return_status := FND_API.g_ret_sts_error;
911: END IF;
912:
906:
907:
908: IF p_invite_headers_rec.partner_id = FND_API.G_MISS_NUM OR p_invite_headers_rec.partner_id IS NULL THEN
909: PVX_UTILITY_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'PARTNER_ID' );
910: x_return_status := FND_API.g_ret_sts_error;
911: END IF;
912:
913: ELSE
914:
912:
913: ELSE
914:
915:
916: IF p_invite_headers_rec.invite_header_id = FND_API.G_MISS_NUM THEN
917: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'INVITE_HEADER_ID' );
918: x_return_status := FND_API.g_ret_sts_error;
919: END IF;
920:
914:
915:
916: IF p_invite_headers_rec.invite_header_id = FND_API.G_MISS_NUM THEN
917: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'INVITE_HEADER_ID' );
918: x_return_status := FND_API.g_ret_sts_error;
919: END IF;
920:
921:
922: IF p_invite_headers_rec.object_version_number = FND_API.G_MISS_NUM THEN
918: x_return_status := FND_API.g_ret_sts_error;
919: END IF;
920:
921:
922: IF p_invite_headers_rec.object_version_number = FND_API.G_MISS_NUM THEN
923: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'OBJECT_VERSION_NUMBER' );
924: x_return_status := FND_API.g_ret_sts_error;
925: END IF;
926:
920:
921:
922: IF p_invite_headers_rec.object_version_number = FND_API.G_MISS_NUM THEN
923: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'OBJECT_VERSION_NUMBER' );
924: x_return_status := FND_API.g_ret_sts_error;
925: END IF;
926:
927:
928: IF p_invite_headers_rec.invite_for_program_id = FND_API.G_MISS_NUM THEN
924: x_return_status := FND_API.g_ret_sts_error;
925: END IF;
926:
927:
928: IF p_invite_headers_rec.invite_for_program_id = FND_API.G_MISS_NUM THEN
929: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'INVITE_FOR_PROGRAM_ID' );
930: x_return_status := FND_API.g_ret_sts_error;
931: END IF;
932:
926:
927:
928: IF p_invite_headers_rec.invite_for_program_id = FND_API.G_MISS_NUM THEN
929: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'INVITE_FOR_PROGRAM_ID' );
930: x_return_status := FND_API.g_ret_sts_error;
931: END IF;
932:
933: IF p_invite_headers_rec.partner_id = FND_API.G_MISS_NUM THEN
934: PVX_UTILITY_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'PARTNER_ID' );
929: PVX_UTility_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'INVITE_FOR_PROGRAM_ID' );
930: x_return_status := FND_API.g_ret_sts_error;
931: END IF;
932:
933: IF p_invite_headers_rec.partner_id = FND_API.G_MISS_NUM THEN
934: PVX_UTILITY_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'PARTNER_ID' );
935: x_return_status := FND_API.g_ret_sts_error;
936: END IF;
937:
931: END IF;
932:
933: IF p_invite_headers_rec.partner_id = FND_API.G_MISS_NUM THEN
934: PVX_UTILITY_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'PARTNER_ID' );
935: x_return_status := FND_API.g_ret_sts_error;
936: END IF;
937:
938: END IF;
939:
946: x_return_status OUT NOCOPY VARCHAR2
947: )
948: IS
949: BEGIN
950: x_return_status := FND_API.g_ret_sts_success;
951:
952: -- Enter custom code here
953:
954: END check_Invite_Headers_Fk_Items;
960: x_return_status OUT NOCOPY VARCHAR2
961: )
962: IS
963: BEGIN
964: x_return_status := FND_API.g_ret_sts_success;
965:
966: -- Enter custom code here
967:
968: END check_Ihdrs_Lookup_Items;
977: IS
978: l_return_status VARCHAR2(1);
979: BEGIN
980:
981: l_return_status := FND_API.g_ret_sts_success;
982: -- Check Items Uniqueness API calls
983:
984: check_Invite_headers_Uk_Items(
985: p_invite_headers_rec => p_invite_headers_rec,
984: check_Invite_headers_Uk_Items(
985: p_invite_headers_rec => p_invite_headers_rec,
986: p_validation_mode => p_validation_mode,
987: x_return_status => x_return_status);
988: IF x_return_status <> FND_API.g_ret_sts_success THEN
989: l_return_status := FND_API.g_ret_sts_error;
990: END IF;
991:
992: -- Check Items Required/NOT NULL API calls
985: p_invite_headers_rec => p_invite_headers_rec,
986: p_validation_mode => p_validation_mode,
987: x_return_status => x_return_status);
988: IF x_return_status <> FND_API.g_ret_sts_success THEN
989: l_return_status := FND_API.g_ret_sts_error;
990: END IF;
991:
992: -- Check Items Required/NOT NULL API calls
993:
994: check_invite_headers_req_items(
995: p_invite_headers_rec => p_invite_headers_rec,
996: p_validation_mode => p_validation_mode,
997: x_return_status => x_return_status);
998: IF x_return_status <> FND_API.g_ret_sts_success THEN
999: l_return_status := FND_API.g_ret_sts_error;
1000: END IF;
1001: -- Check Items Foreign Keys API calls
1002:
995: p_invite_headers_rec => p_invite_headers_rec,
996: p_validation_mode => p_validation_mode,
997: x_return_status => x_return_status);
998: IF x_return_status <> FND_API.g_ret_sts_success THEN
999: l_return_status := FND_API.g_ret_sts_error;
1000: END IF;
1001: -- Check Items Foreign Keys API calls
1002:
1003: check_invite_headers_FK_items(
1002:
1003: check_invite_headers_FK_items(
1004: p_invite_headers_rec => p_invite_headers_rec,
1005: x_return_status => x_return_status);
1006: IF x_return_status <> FND_API.g_ret_sts_success THEN
1007: l_return_status := FND_API.g_ret_sts_error;
1008: END IF;
1009: -- Check Items Lookups
1010:
1003: check_invite_headers_FK_items(
1004: p_invite_headers_rec => p_invite_headers_rec,
1005: x_return_status => x_return_status);
1006: IF x_return_status <> FND_API.g_ret_sts_success THEN
1007: l_return_status := FND_API.g_ret_sts_error;
1008: END IF;
1009: -- Check Items Lookups
1010:
1011: check_Ihdrs_Lookup_Items(
1010:
1011: check_Ihdrs_Lookup_Items(
1012: p_invite_headers_rec => p_invite_headers_rec,
1013: x_return_status => x_return_status);
1014: IF x_return_status <> FND_API.g_ret_sts_success THEN
1015: l_return_status := FND_API.g_ret_sts_error;
1016: END IF;
1017:
1018: x_return_status := l_return_status;
1011: check_Ihdrs_Lookup_Items(
1012: p_invite_headers_rec => p_invite_headers_rec,
1013: x_return_status => x_return_status);
1014: IF x_return_status <> FND_API.g_ret_sts_success THEN
1015: l_return_status := FND_API.g_ret_sts_error;
1016: END IF;
1017:
1018: x_return_status := l_return_status;
1019:
1126: l_invite_headers_rec invite_headers_rec_type := p_invite_headers_rec;
1127: BEGIN
1128: -- Developers should put their code to default the record type
1129: -- e.g. IF p_campaign_rec.status_code IS NULL
1130: -- OR p_campaign_rec.status_code = FND_API.G_MISS_CHAR THEN
1131: -- l_campaign_rec.status_code := 'NEW' ;
1132: -- END IF ;
1133: --
1134: NULL ;
1138:
1139:
1140: PROCEDURE Validate_Invite_Headers(
1141: p_api_version_number IN NUMBER,
1142: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1143: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1144: p_invite_headers_rec IN invite_headers_rec_type,
1145: p_validation_mode IN VARCHAR2,
1146: x_return_status OUT NOCOPY VARCHAR2,
1139:
1140: PROCEDURE Validate_Invite_Headers(
1141: p_api_version_number IN NUMBER,
1142: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1143: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1144: p_invite_headers_rec IN invite_headers_rec_type,
1145: p_validation_mode IN VARCHAR2,
1146: x_return_status OUT NOCOPY VARCHAR2,
1147: x_msg_count OUT NOCOPY NUMBER,
1158: -- Standard Start of API savepoint
1159: SAVEPOINT validate_invite_headers_;
1160:
1161: -- Standard call to check for call compatibility.
1162: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1163: p_api_version_number,
1164: l_api_name,
1165: G_PKG_NAME)
1166: THEN
1163: p_api_version_number,
1164: l_api_name,
1165: G_PKG_NAME)
1166: THEN
1167: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1168: END IF;
1169:
1170:
1171: -- Initialize message list if p_init_msg_list is set to TRUE.
1168: END IF;
1169:
1170:
1171: -- Initialize message list if p_init_msg_list is set to TRUE.
1172: IF FND_API.to_Boolean( p_init_msg_list )
1173: THEN
1174: FND_MSG_PUB.initialize;
1175: END IF;
1176:
1181: p_validation_mode => p_validation_mode,
1182: x_return_status => x_return_status
1183: );
1184:
1185: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1186: RAISE FND_API.G_EXC_ERROR;
1187: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1189: END IF;
1182: x_return_status => x_return_status
1183: );
1184:
1185: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1186: RAISE FND_API.G_EXC_ERROR;
1187: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1189: END IF;
1190: END IF;
1183: );
1184:
1185: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1186: RAISE FND_API.G_EXC_ERROR;
1187: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1189: END IF;
1190: END IF;
1191:
1184:
1185: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1186: RAISE FND_API.G_EXC_ERROR;
1187: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1189: END IF;
1190: END IF;
1191:
1192: IF p_validation_mode = JTF_PLSQL_API.g_create THEN
1204:
1205: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1206: Validate_invite_headers_Rec(
1207: p_api_version_number => 1.0,
1208: p_init_msg_list => FND_API.G_FALSE,
1209: x_return_status => x_return_status,
1210: x_msg_count => x_msg_count,
1211: x_msg_data => x_msg_data,
1212: p_invite_headers_rec => l_invite_headers_rec);
1210: x_msg_count => x_msg_count,
1211: x_msg_data => x_msg_data,
1212: p_invite_headers_rec => l_invite_headers_rec);
1213:
1214: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1215: RAISE FND_API.G_EXC_ERROR;
1216: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1217: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1218: END IF;
1211: x_msg_data => x_msg_data,
1212: p_invite_headers_rec => l_invite_headers_rec);
1213:
1214: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1215: RAISE FND_API.G_EXC_ERROR;
1216: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1217: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1218: END IF;
1219: END IF;
1212: p_invite_headers_rec => l_invite_headers_rec);
1213:
1214: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1215: RAISE FND_API.G_EXC_ERROR;
1216: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1217: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1218: END IF;
1219: END IF;
1220:
1213:
1214: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1215: RAISE FND_API.G_EXC_ERROR;
1216: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1217: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1218: END IF;
1219: END IF;
1220:
1221:
1227:
1228:
1229:
1230: -- Initialize API return status to SUCCESS
1231: x_return_status := FND_API.G_RET_STS_SUCCESS;
1232:
1233:
1234: -- Debug Message
1235: IF (PV_DEBUG_HIGH_ON) THEN
1245: );
1246: EXCEPTION
1247:
1248: WHEN PVX_UTility_PVT.resource_locked THEN
1249: x_return_status := FND_API.g_ret_sts_error;
1250: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
1251:
1252: WHEN FND_API.G_EXC_ERROR THEN
1253: ROLLBACK TO VALIDATE_Invite_Headers_;
1248: WHEN PVX_UTility_PVT.resource_locked THEN
1249: x_return_status := FND_API.g_ret_sts_error;
1250: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
1251:
1252: WHEN FND_API.G_EXC_ERROR THEN
1253: ROLLBACK TO VALIDATE_Invite_Headers_;
1254: x_return_status := FND_API.G_RET_STS_ERROR;
1255: -- Standard call to get message count and if count=1, get the message
1256: FND_MSG_PUB.Count_And_Get (
1250: PVX_UTility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
1251:
1252: WHEN FND_API.G_EXC_ERROR THEN
1253: ROLLBACK TO VALIDATE_Invite_Headers_;
1254: x_return_status := FND_API.G_RET_STS_ERROR;
1255: -- Standard call to get message count and if count=1, get the message
1256: FND_MSG_PUB.Count_And_Get (
1257: p_encoded => FND_API.G_FALSE,
1258: p_count => x_msg_count,
1253: ROLLBACK TO VALIDATE_Invite_Headers_;
1254: x_return_status := FND_API.G_RET_STS_ERROR;
1255: -- Standard call to get message count and if count=1, get the message
1256: FND_MSG_PUB.Count_And_Get (
1257: p_encoded => FND_API.G_FALSE,
1258: p_count => x_msg_count,
1259: p_data => x_msg_data
1260: );
1261:
1258: p_count => x_msg_count,
1259: p_data => x_msg_data
1260: );
1261:
1262: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1263: ROLLBACK TO VALIDATE_Invite_Headers_;
1264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1265: -- Standard call to get message count and if count=1, get the message
1266: FND_MSG_PUB.Count_And_Get (
1260: );
1261:
1262: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1263: ROLLBACK TO VALIDATE_Invite_Headers_;
1264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1265: -- Standard call to get message count and if count=1, get the message
1266: FND_MSG_PUB.Count_And_Get (
1267: p_encoded => FND_API.G_FALSE,
1268: p_count => x_msg_count,
1263: ROLLBACK TO VALIDATE_Invite_Headers_;
1264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1265: -- Standard call to get message count and if count=1, get the message
1266: FND_MSG_PUB.Count_And_Get (
1267: p_encoded => FND_API.G_FALSE,
1268: p_count => x_msg_count,
1269: p_data => x_msg_data
1270: );
1271:
1270: );
1271:
1272: WHEN OTHERS THEN
1273: ROLLBACK TO VALIDATE_Invite_Headers_;
1274: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1275: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1276: THEN
1277: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1278: END IF;
1277: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1278: END IF;
1279: -- Standard call to get message count and if count=1, get the message
1280: FND_MSG_PUB.Count_And_Get (
1281: p_encoded => FND_API.G_FALSE,
1282: p_count => x_msg_count,
1283: p_data => x_msg_data
1284: );
1285: End Validate_Invite_Headers;
1286:
1287:
1288: PROCEDURE Validate_Invite_Headers_Rec (
1289: p_api_version_number IN NUMBER,
1290: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1291: x_return_status OUT NOCOPY VARCHAR2,
1292: x_msg_count OUT NOCOPY NUMBER,
1293: x_msg_data OUT NOCOPY VARCHAR2,
1294: p_invite_headers_rec IN invite_headers_rec_type
1295: )
1296: IS
1297: BEGIN
1298: -- Initialize message list if p_init_msg_list is set to TRUE.
1299: IF FND_API.to_Boolean( p_init_msg_list )
1300: THEN
1301: FND_MSG_PUB.initialize;
1302: END IF;
1303:
1303:
1304:
1305:
1306: -- Initialize API return status to SUCCESS
1307: x_return_status := FND_API.G_RET_STS_SUCCESS;
1308:
1309: -- Hint: Validate data
1310: -- If data not valid
1311: -- THEN
1308:
1309: -- Hint: Validate data
1310: -- If data not valid
1311: -- THEN
1312: -- x_return_status := FND_API.G_RET_STS_ERROR;
1313:
1314: -- Debug Message
1315: IF (PV_DEBUG_HIGH_ON) THEN
1316: