[Home] [Help]
25:
26: -- Hint: Primary key needs to be returned.
27: PROCEDURE Create_grp_camp(
28: P_Api_Version_Number IN NUMBER,
29: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
30: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
31: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
32: P_grp_camp_Rec IN grp_camp_Rec_Type := G_MISS_grp_camp_REC,
33: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
26: -- Hint: Primary key needs to be returned.
27: PROCEDURE Create_grp_camp(
28: P_Api_Version_Number IN NUMBER,
29: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
30: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
31: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
32: P_grp_camp_Rec IN grp_camp_Rec_Type := G_MISS_grp_camp_REC,
33: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
34: X_GROUP_CAMPAIGN_ID OUT NUMBER,
27: PROCEDURE Create_grp_camp(
28: P_Api_Version_Number IN NUMBER,
29: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
30: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
31: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
32: P_grp_camp_Rec IN grp_camp_Rec_Type := G_MISS_grp_camp_REC,
33: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
34: X_GROUP_CAMPAIGN_ID OUT NUMBER,
35: X_Return_Status OUT VARCHAR2,
46: -- Standard Start of API savepoint
47: SAVEPOINT CREATE_grp_camp_PVT;
48:
49: -- Standard call to check for call compatibility.
50: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
51: p_api_version_number,
52: l_api_name,
53: G_PKG_NAME)
54: THEN
51: p_api_version_number,
52: l_api_name,
53: G_PKG_NAME)
54: THEN
55: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
56: END IF;
57:
58:
59: -- Initialize message list if p_init_msg_list is set to TRUE.
56: END IF;
57:
58:
59: -- Initialize message list if p_init_msg_list is set to TRUE.
60: IF FND_API.to_Boolean( p_init_msg_list )
61: THEN
62: FND_MSG_PUB.initialize;
63: END IF;
64:
67: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: ' || l_api_name || 'start');
68:
69:
70: -- Initialize API return status to SUCCESS
71: x_return_status := FND_API.G_RET_STS_SUCCESS;
72:
73: --
74: -- API body
75: --
80: IF(FND_PROFILE.VALUE('AS_PRE_CUSTOM_ENABLED')='Y')
81: THEN
82: AS_CALLOUT_PKG.Create_grp_camp_BC(
83: p_api_version_number => 1.0,
84: p_init_msg_list => FND_API.G_FALSE,
85: p_commit => FND_API.G_FALSE,
86: p_validation_level => p_validation_level,
87: P_grp_camp_Rec => P_grp_camp_Rec,
88: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
81: THEN
82: AS_CALLOUT_PKG.Create_grp_camp_BC(
83: p_api_version_number => 1.0,
84: p_init_msg_list => FND_API.G_FALSE,
85: p_commit => FND_API.G_FALSE,
86: p_validation_level => p_validation_level,
87: P_grp_camp_Rec => P_grp_camp_Rec,
88: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
89: x_return_status => x_return_status,
101: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
102: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
103: FND_MSG_PUB.ADD;
104: END IF;
105: RAISE FND_API.G_EXC_ERROR;
106: END IF;
107:
108:
109: /* AS_SALES_ORG_MANAGER_PVT.Get_CurrentUser(
113: ,x_msg_count => x_msg_count
114: ,x_msg_data => x_msg_data
115: ,x_sales_member_rec => l_identity_sales_member_rec);
116:
117: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
118: RAISE FND_API.G_EXC_ERROR;
119: END IF;
120: */
121:
114: ,x_msg_data => x_msg_data
115: ,x_sales_member_rec => l_identity_sales_member_rec);
116:
117: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
118: RAISE FND_API.G_EXC_ERROR;
119: END IF;
120: */
121:
122: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
118: RAISE FND_API.G_EXC_ERROR;
119: END IF;
120: */
121:
122: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
123: THEN
124: -- Debug message
125: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: Validate_grp_camp');
126:
125: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: Validate_grp_camp');
126:
127: -- Invoke validation procedures
128: Validate_grp_camp(
129: p_init_msg_list => FND_API.G_FALSE,
130: p_validation_level => p_validation_level,
131: p_validation_mode => JTF_PLSQL_API.G_CREATE,
132: P_grp_camp_Rec => P_grp_camp_Rec,
133: x_return_status => x_return_status,
134: x_msg_count => x_msg_count,
135: x_msg_data => x_msg_data);
136: END IF;
137:
138: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
139: RAISE FND_API.G_EXC_ERROR;
140: END IF;
141:
142: -- Hint: Add corresponding Master-Detail business logic here if necessary.
135: x_msg_data => x_msg_data);
136: END IF;
137:
138: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
139: RAISE FND_API.G_EXC_ERROR;
140: END IF;
141:
142: -- Hint: Add corresponding Master-Detail business logic here if necessary.
143:
159: p_CREATION_DATE => p_grp_camp_rec.CREATION_DATE);
160: -- Hint: Primary key should be returned.
161: -- x_GROUP_CAMPAIGN_ID := px_GROUP_CAMPAIGN_ID;
162:
163: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
164: RAISE FND_API.G_EXC_ERROR;
165: END IF;
166:
167: --
160: -- Hint: Primary key should be returned.
161: -- x_GROUP_CAMPAIGN_ID := px_GROUP_CAMPAIGN_ID;
162:
163: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
164: RAISE FND_API.G_EXC_ERROR;
165: END IF;
166:
167: --
168: -- End of API body
168: -- End of API body
169: --
170:
171: -- Standard check for p_commit
172: IF FND_API.to_Boolean( p_commit )
173: THEN
174: COMMIT WORK;
175: END IF;
176:
191: IF(FND_PROFILE.VALUE('AS_POST_CUSTOM_ENABLED')='Y')
192: THEN
193: AS_CALLOUT_PKG.Create_grp_camp_AC(
194: p_api_version_number => 1.0,
195: p_init_msg_list => FND_API.G_FALSE,
196: p_commit => FND_API.G_FALSE,
197: p_validation_level => p_validation_level,
198: P_grp_camp_Rec => P_grp_camp_Rec,
199: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
192: THEN
193: AS_CALLOUT_PKG.Create_grp_camp_AC(
194: p_api_version_number => 1.0,
195: p_init_msg_list => FND_API.G_FALSE,
196: p_commit => FND_API.G_FALSE,
197: p_validation_level => p_validation_level,
198: P_grp_camp_Rec => P_grp_camp_Rec,
199: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
200: x_return_status => x_return_status,
202: x_msg_data => x_msg_data);
203: END IF;
204: */
205: EXCEPTION
206: WHEN FND_API.G_EXC_ERROR THEN
207: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
208: P_API_NAME => L_API_NAME
209: ,P_PKG_NAME => G_PKG_NAME
210: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
212: ,X_MSG_COUNT => X_MSG_COUNT
213: ,X_MSG_DATA => X_MSG_DATA
214: ,X_RETURN_STATUS => X_RETURN_STATUS);
215:
216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
217: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
218: P_API_NAME => L_API_NAME
219: ,P_PKG_NAME => G_PKG_NAME
220: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
237:
238: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
239: PROCEDURE Update_grp_camp(
240: P_Api_Version_Number IN NUMBER,
241: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
242: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
243: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
244: P_Identity_Salesforce_Id IN NUMBER := NULL,
245: P_grp_camp_Rec IN grp_camp_Rec_Type,
238: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
239: PROCEDURE Update_grp_camp(
240: P_Api_Version_Number IN NUMBER,
241: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
242: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
243: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
244: P_Identity_Salesforce_Id IN NUMBER := NULL,
245: P_grp_camp_Rec IN grp_camp_Rec_Type,
246: X_Return_Status OUT VARCHAR2,
239: PROCEDURE Update_grp_camp(
240: P_Api_Version_Number IN NUMBER,
241: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
242: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
243: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
244: P_Identity_Salesforce_Id IN NUMBER := NULL,
245: P_grp_camp_Rec IN grp_camp_Rec_Type,
246: X_Return_Status OUT VARCHAR2,
247: X_Msg_Count OUT NUMBER,
277: -- Standard Start of API savepoint
278: SAVEPOINT UPDATE_grp_camp_PVT;
279:
280: -- Standard call to check for call compatibility.
281: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
282: p_api_version_number,
283: l_api_name,
284: G_PKG_NAME)
285: THEN
282: p_api_version_number,
283: l_api_name,
284: G_PKG_NAME)
285: THEN
286: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
287: END IF;
288:
289:
290: -- Initialize message list if p_init_msg_list is set to TRUE.
287: END IF;
288:
289:
290: -- Initialize message list if p_init_msg_list is set to TRUE.
291: IF FND_API.to_Boolean( p_init_msg_list )
292: THEN
293: FND_MSG_PUB.initialize;
294: END IF;
295:
298: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: ' || l_api_name || 'start');
299:
300:
301: -- Initialize API return status to SUCCESS
302: x_return_status := FND_API.G_RET_STS_SUCCESS;
303:
304: --
305: -- Api body
306: --
310: IF(FND_PROFILE.VALUE('AS_PRE_CUSTOM_ENABLED')='Y')
311: THEN
312: AS_CALLOUT_PKG.Update_grp_camp_BU(
313: p_api_version_number => 1.0,
314: p_init_msg_list => FND_API.G_FALSE,
315: p_commit => FND_API.G_FALSE,
316: p_validation_level => p_validation_level,
317: p_identity_salesforce_id => p_identity_salesforce_id,
318: P_grp_camp_Rec => P_grp_camp_Rec,
311: THEN
312: AS_CALLOUT_PKG.Update_grp_camp_BU(
313: p_api_version_number => 1.0,
314: p_init_msg_list => FND_API.G_FALSE,
315: p_commit => FND_API.G_FALSE,
316: p_validation_level => p_validation_level,
317: p_identity_salesforce_id => p_identity_salesforce_id,
318: P_grp_camp_Rec => P_grp_camp_Rec,
319: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
330: ,x_msg_count => x_msg_count
331: ,x_msg_data => x_msg_data
332: ,x_sales_member_rec => l_identity_sales_member_rec);
333:
334: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
335: RAISE FND_API.G_EXC_ERROR;
336: END IF;
337: */
338: -- Debug Message
331: ,x_msg_data => x_msg_data
332: ,x_sales_member_rec => l_identity_sales_member_rec);
333:
334: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
335: RAISE FND_API.G_EXC_ERROR;
336: END IF;
337: */
338: -- Debug Message
339: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: - Open Cursor to Select');
361: FND_MESSAGE.Set_Name('ast', 'API_MISSING_UPDATE_TARGET');
362: FND_MESSAGE.Set_Token ('INFO', 'grp_camp', FALSE);
363: FND_MSG_PUB.Add;
364: END IF;
365: raise FND_API.G_EXC_ERROR;
366: END IF;
367: -- Debug Message
368: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: - Close Cursor');
369: Close C_Get_grp_camp;
370:
371:
372:
373: If (l_tar_grp_camp_rec.last_update_date is NULL or
374: l_tar_grp_camp_rec.last_update_date = FND_API.G_MISS_Date ) Then
375: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
376: THEN
377: FND_MESSAGE.Set_Name('ast', 'API_MISSING_ID');
378: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
377: FND_MESSAGE.Set_Name('ast', 'API_MISSING_ID');
378: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
379: FND_MSG_PUB.ADD;
380: END IF;
381: raise FND_API.G_EXC_ERROR;
382: End if;
383: /* by jypark
384: -- Check Whether record has been changed by someone else
385: If (l_tar_grp_camp_rec.last_update_date <> l_ref_grp_camp_rec.last_update_date) Then
388: FND_MESSAGE.Set_Name('ast', 'API_RECORD_CHANGED');
389: FND_MESSAGE.Set_Token('INFO', 'grp_camp', FALSE);
390: FND_MSG_PUB.ADD;
391: END IF;
392: raise FND_API.G_EXC_ERROR;
393: End if;
394: */
395: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
396: THEN
391: END IF;
392: raise FND_API.G_EXC_ERROR;
393: End if;
394: */
395: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
396: THEN
397: -- Debug message
398: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: Validate_grp_camp');
399:
398: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: Validate_grp_camp');
399:
400: -- Invoke validation procedures
401: Validate_grp_camp(
402: p_init_msg_list => FND_API.G_FALSE,
403: p_validation_level => p_validation_level,
404: p_validation_mode => JTF_PLSQL_API.G_UPDATE,
405: P_grp_camp_Rec => P_grp_camp_Rec,
406: x_return_status => x_return_status,
407: x_msg_count => x_msg_count,
408: x_msg_data => x_msg_data);
409: END IF;
410:
411: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
412: RAISE FND_API.G_EXC_ERROR;
413: END IF;
414:
415: -- Hint: Add corresponding Master-Detail business logic here if necessary.
408: x_msg_data => x_msg_data);
409: END IF;
410:
411: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
412: RAISE FND_API.G_EXC_ERROR;
413: END IF;
414:
415: -- Hint: Add corresponding Master-Detail business logic here if necessary.
416:
434: -- End of API body.
435: --
436:
437: -- Standard check for p_commit
438: IF FND_API.to_Boolean( p_commit )
439: THEN
440: COMMIT WORK;
441: END IF;
442:
457: IF(FND_PROFILE.VALUE('AS_POST_CUSTOM_ENABLED')='Y')
458: THEN
459: AS_CALLOUT_PKG.Update_grp_camp_AU(
460: p_api_version_number => 1.0,
461: p_init_msg_list => FND_API.G_FALSE,
462: p_commit => FND_API.G_FALSE,
463: p_validation_level => p_validation_level,
464: p_identity_salesforce_id => p_identity_salesforce_id,
465: P_grp_camp_Rec => P_grp_camp_Rec,
458: THEN
459: AS_CALLOUT_PKG.Update_grp_camp_AU(
460: p_api_version_number => 1.0,
461: p_init_msg_list => FND_API.G_FALSE,
462: p_commit => FND_API.G_FALSE,
463: p_validation_level => p_validation_level,
464: p_identity_salesforce_id => p_identity_salesforce_id,
465: P_grp_camp_Rec => P_grp_camp_Rec,
466: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
469: x_msg_data => x_msg_data);
470: END IF;
471: */
472: EXCEPTION
473: WHEN FND_API.G_EXC_ERROR THEN
474: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
475: P_API_NAME => L_API_NAME
476: ,P_PKG_NAME => G_PKG_NAME
477: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
479: ,X_MSG_COUNT => X_MSG_COUNT
480: ,X_MSG_DATA => X_MSG_DATA
481: ,X_RETURN_STATUS => X_RETURN_STATUS);
482:
483: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
484: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
485: P_API_NAME => L_API_NAME
486: ,P_PKG_NAME => G_PKG_NAME
487: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
505: -- Hint: Add corresponding delete detail table procedures if it's master-detail relationship.
506: -- The Master delete procedure may not be needed depends on different business requirements.
507: PROCEDURE Delete_grp_camp(
508: P_Api_Version_Number IN NUMBER,
509: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
512: P_identity_salesforce_id IN NUMBER := NULL,
513: P_grp_camp_Rec IN grp_camp_Rec_Type,
506: -- The Master delete procedure may not be needed depends on different business requirements.
507: PROCEDURE Delete_grp_camp(
508: P_Api_Version_Number IN NUMBER,
509: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
512: P_identity_salesforce_id IN NUMBER := NULL,
513: P_grp_camp_Rec IN grp_camp_Rec_Type,
514: X_Return_Status OUT VARCHAR2,
507: PROCEDURE Delete_grp_camp(
508: P_Api_Version_Number IN NUMBER,
509: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
510: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
511: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
512: P_identity_salesforce_id IN NUMBER := NULL,
513: P_grp_camp_Rec IN grp_camp_Rec_Type,
514: X_Return_Status OUT VARCHAR2,
515: X_Msg_Count OUT NUMBER,
524: -- Standard Start of API savepoint
525: SAVEPOINT DELETE_grp_camp_PVT;
526:
527: -- Standard call to check for call compatibility.
528: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
529: p_api_version_number,
530: l_api_name,
531: G_PKG_NAME)
532: THEN
529: p_api_version_number,
530: l_api_name,
531: G_PKG_NAME)
532: THEN
533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
534: END IF;
535:
536:
537: -- Initialize message list if p_init_msg_list is set to TRUE.
534: END IF;
535:
536:
537: -- Initialize message list if p_init_msg_list is set to TRUE.
538: IF FND_API.to_Boolean( p_init_msg_list )
539: THEN
540: FND_MSG_PUB.initialize;
541: END IF;
542:
545: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: ' || l_api_name || 'start');
546:
547:
548: -- Initialize API return status to SUCCESS
549: x_return_status := FND_API.G_RET_STS_SUCCESS;
550:
551: --
552: -- Api body
553: --
557: IF(FND_PROFILE.VALUE('AS_PRE_CUSTOM_ENABLED')='Y')
558: THEN
559: AS_CALLOUT_PKG.Delete_grp_camp_BD(
560: p_api_version_number => 1.0,
561: p_init_msg_list => FND_API.G_FALSE,
562: p_commit => FND_API.G_FALSE,
563: p_validation_level => p_validation_level,
564: p_identity_salesforce_id => p_identity_salesforce_id,
565: P_grp_camp_Rec => P_grp_camp_Rec,
558: THEN
559: AS_CALLOUT_PKG.Delete_grp_camp_BD(
560: p_api_version_number => 1.0,
561: p_init_msg_list => FND_API.G_FALSE,
562: p_commit => FND_API.G_FALSE,
563: p_validation_level => p_validation_level,
564: p_identity_salesforce_id => p_identity_salesforce_id,
565: P_grp_camp_Rec => P_grp_camp_Rec,
566: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
577: ,x_msg_count => x_msg_count
578: ,x_msg_data => x_msg_data
579: ,x_sales_member_rec => l_identity_sales_member_rec);
580:
581: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
582: RAISE FND_API.G_EXC_ERROR;
583: END IF;
584: */
585: -- Debug Message
578: ,x_msg_data => x_msg_data
579: ,x_sales_member_rec => l_identity_sales_member_rec);
580:
581: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
582: RAISE FND_API.G_EXC_ERROR;
583: END IF;
584: */
585: -- Debug Message
586: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: Calling delete table handler');
594: -- End of API body
595: --
596:
597: -- Standard check for p_commit
598: IF FND_API.to_Boolean( p_commit )
599: THEN
600: COMMIT WORK;
601: END IF;
602:
617: IF(FND_PROFILE.VALUE('AS_POST_CUSTOM_ENABLED')='Y')
618: THEN
619: AS_CALLOUT_PKG.Delete_grp_camp_AD(
620: p_api_version_number => 1.0,
621: p_init_msg_list => FND_API.G_FALSE,
622: p_commit => FND_API.G_FALSE,
623: p_validation_level => p_validation_level,
624: p_identity_salesforce_id => p_identity_salesforce_id,
625: P_grp_camp_Rec => P_grp_camp_Rec,
618: THEN
619: AS_CALLOUT_PKG.Delete_grp_camp_AD(
620: p_api_version_number => 1.0,
621: p_init_msg_list => FND_API.G_FALSE,
622: p_commit => FND_API.G_FALSE,
623: p_validation_level => p_validation_level,
624: p_identity_salesforce_id => p_identity_salesforce_id,
625: P_grp_camp_Rec => P_grp_camp_Rec,
626: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
629: x_msg_data => x_msg_data);
630: END IF;
631: */
632: EXCEPTION
633: WHEN FND_API.G_EXC_ERROR THEN
634: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
635: P_API_NAME => L_API_NAME
636: ,P_PKG_NAME => G_PKG_NAME
637: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
639: ,X_MSG_COUNT => X_MSG_COUNT
640: ,X_MSG_DATA => X_MSG_DATA
641: ,X_RETURN_STATUS => X_RETURN_STATUS);
642:
643: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
644: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
645: P_API_NAME => L_API_NAME
646: ,P_PKG_NAME => G_PKG_NAME
647: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
729: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Invoke JTF_PLSQL_API.Translate_OrderBy');
730:
731: JTF_PLSQL_API.Translate_OrderBy(
732: p_api_version_number => 1.0
733: ,p_init_msg_list => FND_API.G_FALSE
734: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
735: ,p_order_by_tbl => l_util_order_by_tbl
736: ,x_order_by_clause => l_order_by_cl
737: ,x_return_status => x_return_status
730:
731: JTF_PLSQL_API.Translate_OrderBy(
732: p_api_version_number => 1.0
733: ,p_init_msg_list => FND_API.G_FALSE
734: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
735: ,p_order_by_tbl => l_util_order_by_tbl
736: ,x_order_by_clause => l_order_by_cl
737: ,x_return_status => x_return_status
738: ,x_msg_count => x_msg_count
762: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: Bind Variables Begins');
763:
764: -- The following example applies to all columns,
765: -- developers can copy and paste them.
766: IF( (P_grp_camp_Rec.GROUP_CAMPAIGN_ID IS NOT NULL) AND (P_grp_camp_Rec.GROUP_CAMPAIGN_ID <> FND_API.G_MISS_NUM) )
767: THEN
768: DBMS_SQL.BIND_VARIABLE(p_cur_get_grp_camp, ':p_GROUP_CAMPAIGN_ID', P_grp_camp_Rec.GROUP_CAMPAIGN_ID);
769: END IF;
770:
824: -- NUMBER, DATE, VARCHAR2.
825: -- Developer can copy and paste the following codes for your own record.
826:
827: -- example for NUMBER datatype
828: IF( (P_grp_camp_Rec.GROUP_CAMPAIGN_ID IS NOT NULL) AND (P_grp_camp_Rec.GROUP_CAMPAIGN_ID <> FND_API.G_MISS_NUM) )
829: THEN
830: IF(x_grp_camp_where IS NULL) THEN
831: x_grp_camp_where := 'Where';
832: ELSE
835: x_grp_camp_where := x_grp_camp_where || 'P_grp_camp_Rec.GROUP_CAMPAIGN_ID = :p_GROUP_CAMPAIGN_ID';
836: END IF;
837:
838: -- example for DATE datatype
839: IF( (P_grp_camp_Rec.START_DATE IS NOT NULL) AND (P_grp_camp_Rec.START_DATE <> FND_API.G_MISS_DATE) )
840: THEN
841: -- check if item value contains '%' wildcard
842: OPEN c_chk_str1(P_grp_camp_Rec.START_DATE);
843: FETCH c_chk_str1 INTO str_csr1;
868: x_grp_camp_where := x_grp_camp_where || 'P_grp_camp_Rec.START_DATE ' || l_operator || ' :p_START_DATE';
869: END IF;
870:
871: -- example for VARCHAR2 datatype
872: IF( (P_grp_camp_Rec.ENABLED_FLAG IS NOT NULL) AND (P_grp_camp_Rec.ENABLED_FLAG <> FND_API.G_MISS_CHAR) )
873: THEN
874: -- check if item value contains '%' wildcard
875: OPEN c_chk_str1(P_grp_camp_Rec.ENABLED_FLAG);
876: FETCH c_chk_str1 INTO str_csr1;
909: END Gen_grp_camp_Where;
910:
911: PROCEDURE Get_grp_camp(
912: P_Api_Version_Number IN NUMBER,
913: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
914: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
915: P_identity_salesforce_id IN NUMBER := NULL,
916: P_grp_camp_Rec IN ast_grp_camp_PUB.grp_camp_Rec_Type,
917: -- Hint: Add list of bind variables here
910:
911: PROCEDURE Get_grp_camp(
912: P_Api_Version_Number IN NUMBER,
913: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
914: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
915: P_identity_salesforce_id IN NUMBER := NULL,
916: P_grp_camp_Rec IN ast_grp_camp_PUB.grp_camp_Rec_Type,
917: -- Hint: Add list of bind variables here
918: p_rec_requested IN NUMBER := G_DEFAULT_NUM_REC_FETCH,
916: P_grp_camp_Rec IN ast_grp_camp_PUB.grp_camp_Rec_Type,
917: -- Hint: Add list of bind variables here
918: p_rec_requested IN NUMBER := G_DEFAULT_NUM_REC_FETCH,
919: p_start_rec_prt IN NUMBER := 1,
920: p_return_tot_count IN NUMBER := FND_API.G_FALSE,
921: -- Hint: user defined record type
922: p_order_by_rec IN ast_grp_camp_PUB.grp_camp_sort_rec_type,
923: x_return_status OUT VARCHAR2,
924: x_msg_count OUT NUMBER,
969: -- Standard Start of API savepoint
970: SAVEPOINT GET_grp_camp_PVT;
971:
972: -- Standard call to check for call compatibility.
973: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
974: p_api_version_number,
975: l_api_name,
976: G_PKG_NAME)
977: THEN
974: p_api_version_number,
975: l_api_name,
976: G_PKG_NAME)
977: THEN
978: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
979: END IF;
980:
981:
982: -- Initialize message list if p_init_msg_list is set to TRUE.
979: END IF;
980:
981:
982: -- Initialize message list if p_init_msg_list is set to TRUE.
983: IF FND_API.to_Boolean( p_init_msg_list )
984: THEN
985: FND_MSG_PUB.initialize;
986: END IF;
987:
990: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: ' || l_api_name || 'start');
991:
992:
993: -- Initialize API return status to SUCCESS
994: x_return_status := FND_API.G_RET_STS_SUCCESS;
995:
996: --
997: -- Api body
998: --
1004: ,x_msg_count => x_msg_count
1005: ,x_msg_data => x_msg_data
1006: ,x_sales_member_rec => l_identity_sales_member_rec);
1007:
1008: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1009: RAISE FND_API.G_EXC_ERROR;
1010: END IF;
1011: */
1012: -- *************************************************
1005: ,x_msg_data => x_msg_data
1006: ,x_sales_member_rec => l_identity_sales_member_rec);
1007:
1008: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1009: RAISE FND_API.G_EXC_ERROR;
1010: END IF;
1011: */
1012: -- *************************************************
1013: -- Generate Dynamic SQL based on criteria passed in.
1097: LOOP
1098: -- 1. There are more rows in the cursor.
1099: -- 2. User does not care about total records, and we need to return more.
1100: -- 3. Or user cares about total number of records.
1101: IF((dbms_sql.fetch_rows(l_cur_get_grp_camp)>0) AND ((p_return_tot_count = FND_API.G_TRUE)
1102: OR (l_returned_rec_count
1104: -- Debug Message
1105: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: found');
1098: -- 1. There are more rows in the cursor.
1099: -- 2. User does not care about total records, and we need to return more.
1100: -- 3. Or user cares about total number of records.
1101: IF((dbms_sql.fetch_rows(l_cur_get_grp_camp)>0) AND ((p_return_tot_count = FND_API.G_TRUE)
1102: OR (l_returned_rec_count
1104: -- Debug Message
1105: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: found');
1106:
1143: p_data => x_msg_data
1144: );
1145:
1146: EXCEPTION
1147: WHEN FND_API.G_EXC_ERROR THEN
1148: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1149: P_API_NAME => L_API_NAME
1150: ,P_PKG_NAME => G_PKG_NAME
1151: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1153: ,X_MSG_COUNT => X_MSG_COUNT
1154: ,X_MSG_DATA => X_MSG_DATA
1155: ,X_RETURN_STATUS => X_RETURN_STATUS);
1156:
1157: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1158: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1159: P_API_NAME => L_API_NAME
1160: ,P_PKG_NAME => G_PKG_NAME
1161: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1177:
1178:
1179: -- Item-level validation procedures
1180: PROCEDURE Validate_GROUP_CAMPAIGN_ID (
1181: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1182: P_Validation_mode IN VARCHAR2,
1183: P_GROUP_CAMPAIGN_ID IN NUMBER,
1184: -- Hint: You may add 'X_Item_Property_Rec OUT JTF_PLSQL_API.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
1185:
1190: IS
1191: BEGIN
1192:
1193: -- Initialize message list if p_init_msg_list is set to TRUE.
1194: IF FND_API.to_Boolean( p_init_msg_list )
1195: THEN
1196: FND_MSG_PUB.initialize;
1197: END IF;
1198:
1197: END IF;
1198:
1199:
1200: -- Initialize API return status to SUCCESS
1201: x_return_status := FND_API.G_RET_STS_SUCCESS;
1202:
1203: -- validate NOT NULL column
1204: IF(p_GROUP_CAMPAIGN_ID is NULL)
1205: THEN
1204: IF(p_GROUP_CAMPAIGN_ID is NULL)
1205: THEN
1206: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'ast', 'Private grp_camp API: -Violate NOT NULL constraint(GROUP_CAMPAIGN_ID)');
1207:
1208: x_return_status := FND_API.G_RET_STS_ERROR;
1209: END IF;
1210:
1211: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1212: THEN
1212: THEN
1213: -- Hint: Validate data
1214: -- IF p_GROUP_CAMPAIGN_ID is not NULL and p_GROUP_CAMPAIGN_ID <> G_MISS_CHAR
1215: -- verify if data is valid
1216: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1217: NULL;
1218: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
1219: THEN
1220: -- Hint: Validate data
1219: THEN
1220: -- Hint: Validate data
1221: -- IF p_GROUP_CAMPAIGN_ID <> G_MISS_CHAR
1222: -- verify if data is valid
1223: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1224: NULL;
1225: END IF;
1226:
1227: -- Standard call to get message count and if count is 1, get message info.
1233: END Validate_GROUP_CAMPAIGN_ID;
1234:
1235:
1236: PROCEDURE Validate_GROUP_ID (
1237: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1238: P_Validation_mode IN VARCHAR2,
1239: P_GROUP_ID IN NUMBER,
1240: -- Hint: You may add 'X_Item_Property_Rec OUT JTF_PLSQL_API.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
1241:
1246: IS
1247: BEGIN
1248:
1249: -- Initialize message list if p_init_msg_list is set to TRUE.
1250: IF FND_API.to_Boolean( p_init_msg_list )
1251: THEN
1252: FND_MSG_PUB.initialize;
1253: END IF;
1254:
1253: END IF;
1254:
1255:
1256: -- Initialize API return status to SUCCESS
1257: x_return_status := FND_API.G_RET_STS_SUCCESS;
1258:
1259: -- validate NOT NULL column
1260: IF(p_GROUP_ID is NULL)
1261: THEN
1260: IF(p_GROUP_ID is NULL)
1261: THEN
1262: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'ast', 'Private grp_camp API: -Violate NOT NULL constraint(GROUP_ID)');
1263:
1264: x_return_status := FND_API.G_RET_STS_ERROR;
1265: END IF;
1266:
1267: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1268: THEN
1268: THEN
1269: -- Hint: Validate data
1270: -- IF p_GROUP_ID is not NULL and p_GROUP_ID <> G_MISS_CHAR
1271: -- verify if data is valid
1272: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1273: NULL;
1274: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
1275: THEN
1276: -- Hint: Validate data
1275: THEN
1276: -- Hint: Validate data
1277: -- IF p_GROUP_ID <> G_MISS_CHAR
1278: -- verify if data is valid
1279: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1280: NULL;
1281: END IF;
1282:
1283: -- Standard call to get message count and if count is 1, get message info.
1289: END Validate_GROUP_ID;
1290:
1291:
1292: PROCEDURE Validate_CAMPAIGN_ID (
1293: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1294: P_Validation_mode IN VARCHAR2,
1295: P_CAMPAIGN_ID IN NUMBER,
1296: -- Hint: You may add 'X_Item_Property_Rec OUT JTF_PLSQL_API.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
1297:
1302: IS
1303: BEGIN
1304:
1305: -- Initialize message list if p_init_msg_list is set to TRUE.
1306: IF FND_API.to_Boolean( p_init_msg_list )
1307: THEN
1308: FND_MSG_PUB.initialize;
1309: END IF;
1310:
1309: END IF;
1310:
1311:
1312: -- Initialize API return status to SUCCESS
1313: x_return_status := FND_API.G_RET_STS_SUCCESS;
1314:
1315: -- validate NOT NULL column
1316: IF(p_CAMPAIGN_ID is NULL)
1317: THEN
1316: IF(p_CAMPAIGN_ID is NULL)
1317: THEN
1318: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'ast', 'Private grp_camp API: -Violate NOT NULL constraint(CAMPAIGN_ID)');
1319:
1320: x_return_status := FND_API.G_RET_STS_ERROR;
1321: END IF;
1322:
1323: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1324: THEN
1324: THEN
1325: -- Hint: Validate data
1326: -- IF p_CAMPAIGN_ID is not NULL and p_CAMPAIGN_ID <> G_MISS_CHAR
1327: -- verify if data is valid
1328: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1329: NULL;
1330: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
1331: THEN
1332: -- Hint: Validate data
1331: THEN
1332: -- Hint: Validate data
1333: -- IF p_CAMPAIGN_ID <> G_MISS_CHAR
1334: -- verify if data is valid
1335: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1336: NULL;
1337: END IF;
1338:
1339: -- Standard call to get message count and if count is 1, get message info.
1345: END Validate_CAMPAIGN_ID;
1346:
1347:
1348: PROCEDURE Validate_START_DATE (
1349: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1350: P_Validation_mode IN VARCHAR2,
1351: P_START_DATE IN DATE,
1352: -- Hint: You may add 'X_Item_Property_Rec OUT JTF_PLSQL_API.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
1353:
1358: IS
1359: BEGIN
1360:
1361: -- Initialize message list if p_init_msg_list is set to TRUE.
1362: IF FND_API.to_Boolean( p_init_msg_list )
1363: THEN
1364: FND_MSG_PUB.initialize;
1365: END IF;
1366:
1365: END IF;
1366:
1367:
1368: -- Initialize API return status to SUCCESS
1369: x_return_status := FND_API.G_RET_STS_SUCCESS;
1370:
1371: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1372: THEN
1373: -- Hint: Validate data
1372: THEN
1373: -- Hint: Validate data
1374: -- IF p_START_DATE is not NULL and p_START_DATE <> G_MISS_CHAR
1375: -- verify if data is valid
1376: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1377: NULL;
1378: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
1379: THEN
1380: -- Hint: Validate data
1379: THEN
1380: -- Hint: Validate data
1381: -- IF p_START_DATE <> G_MISS_CHAR
1382: -- verify if data is valid
1383: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1384: NULL;
1385: END IF;
1386:
1387: -- Standard call to get message count and if count is 1, get message info.
1393: END Validate_START_DATE;
1394:
1395:
1396: PROCEDURE Validate_END_DATE (
1397: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1398: P_Validation_mode IN VARCHAR2,
1399: P_END_DATE IN DATE,
1400: -- Hint: You may add 'X_Item_Property_Rec OUT JTF_PLSQL_API.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
1401:
1406: IS
1407: BEGIN
1408:
1409: -- Initialize message list if p_init_msg_list is set to TRUE.
1410: IF FND_API.to_Boolean( p_init_msg_list )
1411: THEN
1412: FND_MSG_PUB.initialize;
1413: END IF;
1414:
1413: END IF;
1414:
1415:
1416: -- Initialize API return status to SUCCESS
1417: x_return_status := FND_API.G_RET_STS_SUCCESS;
1418:
1419: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1420: THEN
1421: -- Hint: Validate data
1420: THEN
1421: -- Hint: Validate data
1422: -- IF p_END_DATE is not NULL and p_END_DATE <> G_MISS_CHAR
1423: -- verify if data is valid
1424: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1425: NULL;
1426: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
1427: THEN
1428: -- Hint: Validate data
1427: THEN
1428: -- Hint: Validate data
1429: -- IF p_END_DATE <> G_MISS_CHAR
1430: -- verify if data is valid
1431: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1432: NULL;
1433: END IF;
1434:
1435: -- Standard call to get message count and if count is 1, get message info.
1441: END Validate_END_DATE;
1442:
1443:
1444: PROCEDURE Validate_ENABLED_FLAG (
1445: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1446: P_Validation_mode IN VARCHAR2,
1447: P_ENABLED_FLAG IN VARCHAR2,
1448: -- Hint: You may add 'X_Item_Property_Rec OUT JTF_PLSQL_API.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
1449:
1454: IS
1455: BEGIN
1456:
1457: -- Initialize message list if p_init_msg_list is set to TRUE.
1458: IF FND_API.to_Boolean( p_init_msg_list )
1459: THEN
1460: FND_MSG_PUB.initialize;
1461: END IF;
1462:
1461: END IF;
1462:
1463:
1464: -- Initialize API return status to SUCCESS
1465: x_return_status := FND_API.G_RET_STS_SUCCESS;
1466:
1467: -- validate NOT NULL column
1468: IF(p_ENABLED_FLAG is NULL)
1469: THEN
1468: IF(p_ENABLED_FLAG is NULL)
1469: THEN
1470: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_ERROR, 'ast', 'Private grp_camp API: -Violate NOT NULL constraint(ENABLED_FLAG)');
1471:
1472: x_return_status := FND_API.G_RET_STS_ERROR;
1473: END IF;
1474:
1475: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
1476: THEN
1476: THEN
1477: -- Hint: Validate data
1478: -- IF p_ENABLED_FLAG is not NULL and p_ENABLED_FLAG <> G_MISS_CHAR
1479: -- verify if data is valid
1480: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1481: NULL;
1482: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
1483: THEN
1484: -- Hint: Validate data
1483: THEN
1484: -- Hint: Validate data
1485: -- IF p_ENABLED_FLAG <> G_MISS_CHAR
1486: -- verify if data is valid
1487: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
1488: NULL;
1489: END IF;
1490:
1491: -- Standard call to get message count and if count is 1, get message info.
1503:
1504:
1505: -- stored in database table.
1506: PROCEDURE Validate_grp_camp_rec(
1507: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1508: P_Validation_mode IN VARCHAR2,
1509: P_grp_camp_Rec IN grp_camp_Rec_Type,
1510: X_Return_Status OUT VARCHAR2,
1511: X_Msg_Count OUT NUMBER,
1514: IS
1515: BEGIN
1516:
1517: -- Initialize message list if p_init_msg_list is set to TRUE.
1518: IF FND_API.to_Boolean( p_init_msg_list )
1519: THEN
1520: FND_MSG_PUB.initialize;
1521: END IF;
1522:
1521: END IF;
1522:
1523:
1524: -- Initialize API return status to SUCCESS
1525: x_return_status := FND_API.G_RET_STS_SUCCESS;
1526:
1527: -- Hint: Validate data
1528: -- If data not valid
1529: -- THEN
1526:
1527: -- Hint: Validate data
1528: -- If data not valid
1529: -- THEN
1530: -- x_return_status := FND_API.G_RET_STS_ERROR;
1531:
1532: -- Debug Message
1533: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'API_INVALID_RECORD');
1534:
1540:
1541: END Validate_grp_camp_Rec;
1542:
1543: PROCEDURE Validate_grp_camp(
1544: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1545: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1546: P_Validation_mode IN VARCHAR2,
1547: P_grp_camp_Rec IN grp_camp_Rec_Type,
1548: X_Return_Status OUT VARCHAR2,
1541: END Validate_grp_camp_Rec;
1542:
1543: PROCEDURE Validate_grp_camp(
1544: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
1545: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1546: P_Validation_mode IN VARCHAR2,
1547: P_grp_camp_Rec IN grp_camp_Rec_Type,
1548: X_Return_Status OUT VARCHAR2,
1549: X_Msg_Count OUT NUMBER,
1557: JTF_PLSQL_API.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'ast', 'Private API: ' || l_api_name || 'start');
1558:
1559:
1560: -- Initialize API return status to SUCCESS
1561: x_return_status := FND_API.G_RET_STS_SUCCESS;
1562:
1563: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_ITEM) THEN
1564: -- Hint: We provide validation procedure for every column. Developer should delete
1565: -- unnecessary validation procedures.
1563: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_ITEM) THEN
1564: -- Hint: We provide validation procedure for every column. Developer should delete
1565: -- unnecessary validation procedures.
1566: Validate_GROUP_CAMPAIGN_ID(
1567: p_init_msg_list => FND_API.G_FALSE,
1568: p_validation_mode => p_validation_mode,
1569: p_GROUP_CAMPAIGN_ID => P_grp_camp_Rec.GROUP_CAMPAIGN_ID,
1570: -- Hint: You may add x_item_property_rec as one of your OUT parameter if you'd like to pass back item property.
1571:
1571:
1572: x_return_status => x_return_status,
1573: x_msg_count => x_msg_count,
1574: x_msg_data => x_msg_data);
1575: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1576: raise FND_API.G_EXC_ERROR;
1577: END IF;
1578:
1579: Validate_GROUP_ID(
1572: x_return_status => x_return_status,
1573: x_msg_count => x_msg_count,
1574: x_msg_data => x_msg_data);
1575: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1576: raise FND_API.G_EXC_ERROR;
1577: END IF;
1578:
1579: Validate_GROUP_ID(
1580: p_init_msg_list => FND_API.G_FALSE,
1576: raise FND_API.G_EXC_ERROR;
1577: END IF;
1578:
1579: Validate_GROUP_ID(
1580: p_init_msg_list => FND_API.G_FALSE,
1581: p_validation_mode => p_validation_mode,
1582: p_GROUP_ID => P_grp_camp_Rec.GROUP_ID,
1583: -- Hint: You may add x_item_property_rec as one of your OUT parameter if you'd like to pass back item property.
1584:
1584:
1585: x_return_status => x_return_status,
1586: x_msg_count => x_msg_count,
1587: x_msg_data => x_msg_data);
1588: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1589: raise FND_API.G_EXC_ERROR;
1590: END IF;
1591:
1592: Validate_CAMPAIGN_ID(
1585: x_return_status => x_return_status,
1586: x_msg_count => x_msg_count,
1587: x_msg_data => x_msg_data);
1588: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1589: raise FND_API.G_EXC_ERROR;
1590: END IF;
1591:
1592: Validate_CAMPAIGN_ID(
1593: p_init_msg_list => FND_API.G_FALSE,
1589: raise FND_API.G_EXC_ERROR;
1590: END IF;
1591:
1592: Validate_CAMPAIGN_ID(
1593: p_init_msg_list => FND_API.G_FALSE,
1594: p_validation_mode => p_validation_mode,
1595: p_CAMPAIGN_ID => P_grp_camp_Rec.CAMPAIGN_ID,
1596: -- Hint: You may add x_item_property_rec as one of your OUT parameter if you'd like to pass back item property.
1597:
1597:
1598: x_return_status => x_return_status,
1599: x_msg_count => x_msg_count,
1600: x_msg_data => x_msg_data);
1601: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1602: raise FND_API.G_EXC_ERROR;
1603: END IF;
1604:
1605: Validate_START_DATE(
1598: x_return_status => x_return_status,
1599: x_msg_count => x_msg_count,
1600: x_msg_data => x_msg_data);
1601: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1602: raise FND_API.G_EXC_ERROR;
1603: END IF;
1604:
1605: Validate_START_DATE(
1606: p_init_msg_list => FND_API.G_FALSE,
1602: raise FND_API.G_EXC_ERROR;
1603: END IF;
1604:
1605: Validate_START_DATE(
1606: p_init_msg_list => FND_API.G_FALSE,
1607: p_validation_mode => p_validation_mode,
1608: p_START_DATE => P_grp_camp_Rec.START_DATE,
1609: -- Hint: You may add x_item_property_rec as one of your OUT parameter if you'd like to pass back item property.
1610:
1610:
1611: x_return_status => x_return_status,
1612: x_msg_count => x_msg_count,
1613: x_msg_data => x_msg_data);
1614: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1615: raise FND_API.G_EXC_ERROR;
1616: END IF;
1617:
1618: Validate_END_DATE(
1611: x_return_status => x_return_status,
1612: x_msg_count => x_msg_count,
1613: x_msg_data => x_msg_data);
1614: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1615: raise FND_API.G_EXC_ERROR;
1616: END IF;
1617:
1618: Validate_END_DATE(
1619: p_init_msg_list => FND_API.G_FALSE,
1615: raise FND_API.G_EXC_ERROR;
1616: END IF;
1617:
1618: Validate_END_DATE(
1619: p_init_msg_list => FND_API.G_FALSE,
1620: p_validation_mode => p_validation_mode,
1621: p_END_DATE => P_grp_camp_Rec.END_DATE,
1622: -- Hint: You may add x_item_property_rec as one of your OUT parameter if you'd like to pass back item property.
1623:
1623:
1624: x_return_status => x_return_status,
1625: x_msg_count => x_msg_count,
1626: x_msg_data => x_msg_data);
1627: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1628: raise FND_API.G_EXC_ERROR;
1629: END IF;
1630:
1631: Validate_ENABLED_FLAG(
1624: x_return_status => x_return_status,
1625: x_msg_count => x_msg_count,
1626: x_msg_data => x_msg_data);
1627: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1628: raise FND_API.G_EXC_ERROR;
1629: END IF;
1630:
1631: Validate_ENABLED_FLAG(
1632: p_init_msg_list => FND_API.G_FALSE,
1628: raise FND_API.G_EXC_ERROR;
1629: END IF;
1630:
1631: Validate_ENABLED_FLAG(
1632: p_init_msg_list => FND_API.G_FALSE,
1633: p_validation_mode => p_validation_mode,
1634: p_ENABLED_FLAG => P_grp_camp_Rec.ENABLED_FLAG,
1635: -- Hint: You may add x_item_property_rec as one of your OUT parameter if you'd like to pass back item property.
1636:
1636:
1637: x_return_status => x_return_status,
1638: x_msg_count => x_msg_count,
1639: x_msg_data => x_msg_data);
1640: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1641: raise FND_API.G_EXC_ERROR;
1642: END IF;
1643:
1644: END IF;
1637: x_return_status => x_return_status,
1638: x_msg_count => x_msg_count,
1639: x_msg_data => x_msg_data);
1640: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1641: raise FND_API.G_EXC_ERROR;
1642: END IF;
1643:
1644: END IF;
1645:
1646: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_RECORD) THEN
1647: -- Hint: Inter-field level validation can be added here
1648: -- invoke record level validation procedures
1649: Validate_grp_camp_Rec(
1650: p_init_msg_list => FND_API.G_FALSE,
1651: p_validation_mode => p_validation_mode,
1652: P_grp_camp_Rec => P_grp_camp_Rec,
1653: x_return_status => x_return_status,
1654: x_msg_count => x_msg_count,
1653: x_return_status => x_return_status,
1654: x_msg_count => x_msg_count,
1655: x_msg_data => x_msg_data);
1656:
1657: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1658: raise FND_API.G_EXC_ERROR;
1659: END IF;
1660: END IF;
1661:
1654: x_msg_count => x_msg_count,
1655: x_msg_data => x_msg_data);
1656:
1657: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1658: raise FND_API.G_EXC_ERROR;
1659: END IF;
1660: END IF;
1661:
1662: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_INTER_RECORD) THEN