[Home] [Help]
10: G_FILE_NAME CONSTANT VARCHAR2(12) := 'cspvptab.pls';
11: -- Hint: Primary key needs to be returned.
12: PROCEDURE Create_product_task(
13: P_Api_Version_Number IN NUMBER,
14: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
15: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
16: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
17: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type := G_MISS_PROD_TASK_REC,
18: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
11: -- Hint: Primary key needs to be returned.
12: PROCEDURE Create_product_task(
13: P_Api_Version_Number IN NUMBER,
14: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
15: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
16: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
17: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type := G_MISS_PROD_TASK_REC,
18: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
19: X_PRODUCT_TASK_ID OUT NOCOPY NUMBER,
12: PROCEDURE Create_product_task(
13: P_Api_Version_Number IN NUMBER,
14: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
15: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
16: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
17: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type := G_MISS_PROD_TASK_REC,
18: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
19: X_PRODUCT_TASK_ID OUT NOCOPY NUMBER,
20: X_Return_Status OUT NOCOPY VARCHAR2,
29: BEGIN
30: -- Standard Start of API savepoint
31: SAVEPOINT CREATE_PRODUCT_TASK_PVT;
32: -- Standard call to check for call compatibility.
33: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
34: p_api_version_number,
35: l_api_name,
36: G_PKG_NAME)
37: THEN
34: p_api_version_number,
35: l_api_name,
36: G_PKG_NAME)
37: THEN
38: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
39: END IF;
40: -- Initialize message list if p_init_msg_list is set to TRUE.
41: IF FND_API.to_Boolean( p_init_msg_list )
42: THEN
37: THEN
38: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
39: END IF;
40: -- Initialize message list if p_init_msg_list is set to TRUE.
41: IF FND_API.to_Boolean( p_init_msg_list )
42: THEN
43: FND_MSG_PUB.initialize;
44: END IF;
45: -- Initialize API return status to SUCCESS
42: THEN
43: FND_MSG_PUB.initialize;
44: END IF;
45: -- Initialize API return status to SUCCESS
46: x_return_status := FND_API.G_RET_STS_SUCCESS;
47: --
48: -- API body
49: --
50: -- ******************************************************************
57: FND_MESSAGE.Set_Name('CSP', 'UT_CANNOT_GET_PROFILE_VALUE');
58: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
59: FND_MSG_PUB.ADD;
60: END IF;
61: RAISE FND_API.G_EXC_ERROR;
62: END IF;
63: -- Invoke validation procedures
64: Validate_product_task(
65: p_init_msg_list => FND_API.G_FALSE,
61: RAISE FND_API.G_EXC_ERROR;
62: END IF;
63: -- Invoke validation procedures
64: Validate_product_task(
65: p_init_msg_list => FND_API.G_FALSE,
66: p_validation_level => p_validation_level,
67: p_validation_mode => JTF_PLSQL_API.G_CREATE,
68: P_PROD_TASK_Rec => P_PROD_TASK_Rec,
69: x_return_status => x_return_status,
68: P_PROD_TASK_Rec => P_PROD_TASK_Rec,
69: x_return_status => x_return_status,
70: x_msg_count => x_msg_count,
71: x_msg_data => x_msg_data);
72: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
73: RAISE FND_API.G_EXC_ERROR;
74: END IF;
75: -- Invoke table handler(CSP_PRODUCT_TASKS_PKG.Insert_Row)
76: CSP_PRODUCT_TASKS_PKG.Insert_Row(
69: x_return_status => x_return_status,
70: x_msg_count => x_msg_count,
71: x_msg_data => x_msg_data);
72: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
73: RAISE FND_API.G_EXC_ERROR;
74: END IF;
75: -- Invoke table handler(CSP_PRODUCT_TASKS_PKG.Insert_Row)
76: CSP_PRODUCT_TASKS_PKG.Insert_Row(
77: px_PRODUCT_TASK_ID => x_PRODUCT_TASK_ID,
102: p_LAST_UPDATE_DATE => SYSDATE,
103: p_LAST_UPDATE_LOGIN => p_PROD_TASK_rec.LAST_UPDATE_LOGIN);
104: -- Hint: Primary key should be returned.
105: -- x_PRODUCT_TASK_ID := px_PRODUCT_TASK_ID;
106: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
107: RAISE FND_API.G_EXC_ERROR;
108: END IF;
109: --
110: -- End of API body
103: p_LAST_UPDATE_LOGIN => p_PROD_TASK_rec.LAST_UPDATE_LOGIN);
104: -- Hint: Primary key should be returned.
105: -- x_PRODUCT_TASK_ID := px_PRODUCT_TASK_ID;
106: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
107: RAISE FND_API.G_EXC_ERROR;
108: END IF;
109: --
110: -- End of API body
111: --
109: --
110: -- End of API body
111: --
112: -- Standard check for p_commit
113: IF FND_API.to_Boolean( p_commit )
114: THEN
115: COMMIT WORK;
116: END IF;
117: -- Standard call to get message count and if count is 1, get message info.
119: ( p_count => x_msg_count,
120: p_data => x_msg_data
121: );
122: EXCEPTION
123: WHEN FND_API.G_EXC_ERROR THEN
124: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
125: P_API_NAME => L_API_NAME
126: ,P_PKG_NAME => G_PKG_NAME
127: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
128: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
129: ,X_MSG_COUNT => X_MSG_COUNT
130: ,X_MSG_DATA => X_MSG_DATA
131: ,X_RETURN_STATUS => X_RETURN_STATUS);
132: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
133: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
134: P_API_NAME => L_API_NAME
135: ,P_PKG_NAME => G_PKG_NAME
136: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
152: End Create_product_task;
153: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
154: PROCEDURE Update_product_task(
155: P_Api_Version_Number IN NUMBER,
156: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
157: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
158: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
159: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
160: X_Return_Status OUT NOCOPY VARCHAR2,
153: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
154: PROCEDURE Update_product_task(
155: P_Api_Version_Number IN NUMBER,
156: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
157: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
158: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
159: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
160: X_Return_Status OUT NOCOPY VARCHAR2,
161: X_Msg_Count OUT NOCOPY NUMBER,
154: PROCEDURE Update_product_task(
155: P_Api_Version_Number IN NUMBER,
156: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
157: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
158: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
159: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
160: X_Return_Status OUT NOCOPY VARCHAR2,
161: X_Msg_Count OUT NOCOPY NUMBER,
162: X_Msg_Data OUT NOCOPY VARCHAR2
206: BEGIN
207: -- Standard Start of API savepoint
208: SAVEPOINT UPDATE_PRODUCT_TASK_PVT;
209: -- Standard call to check for call compatibility.
210: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
211: p_api_version_number,
212: l_api_name,
213: G_PKG_NAME)
214: THEN
211: p_api_version_number,
212: l_api_name,
213: G_PKG_NAME)
214: THEN
215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
216: END IF;
217:
218: -- Initialize message list if p_init_msg_list is set to TRUE.
219: IF FND_API.to_Boolean( p_init_msg_list )
215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
216: END IF;
217:
218: -- Initialize message list if p_init_msg_list is set to TRUE.
219: IF FND_API.to_Boolean( p_init_msg_list )
220: THEN
221: FND_MSG_PUB.initialize;
222: END IF;
223: -- Initialize API return status to SUCCESS
220: THEN
221: FND_MSG_PUB.initialize;
222: END IF;
223: -- Initialize API return status to SUCCESS
224: x_return_status := FND_API.G_RET_STS_SUCCESS;
225: --
226: -- Api body
227: --
228: /*
264: FND_MESSAGE.Set_Token ('INFO', 'product_task', FALSE);
265: FND_MSG_PUB.Add;
266: END IF;
267: Close C_Get_product_task;
268: raise FND_API.G_EXC_ERROR;
269: END IF;
270: Close C_Get_product_task;
271:
272: If (l_tar_PROD_TASK_rec.last_update_date is NULL or
269: END IF;
270: Close C_Get_product_task;
271:
272: If (l_tar_PROD_TASK_rec.last_update_date is NULL or
273: l_tar_PROD_TASK_rec.last_update_date = FND_API.G_MISS_Date ) Then
274: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
275: THEN
276: DBMS_OUTPUT.PUT_LINE('UPDATE DATE2 '||l_tar_PROD_TASK_rec.last_update_date);
277: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_ID');
277: FND_MESSAGE.Set_Name('CSP', 'API_MISSING_ID');
278: FND_MESSAGE.Set_Token('COLUMN', 'Last_Update_Date', FALSE);
279: FND_MSG_PUB.ADD;
280: END IF;
281: raise FND_API.G_EXC_ERROR;
282: End if;
283:
284: -- Check Whether record has been changed by someone else
285: If (l_tar_PROD_TASK_rec.last_update_date <> l_ref_PROD_TASK_rec.last_update_date) Then
288: FND_MESSAGE.Set_Name('CSP', 'API_RECORD_CHANGED');
289: FND_MESSAGE.Set_Token('INFO', 'product_task', FALSE);
290: FND_MSG_PUB.ADD;
291: END IF;
292: raise FND_API.G_EXC_ERROR;
293: End if;
294:
295: */
296:
295: */
296:
297: -- Invoke validation procedures
298: Validate_product_task(
299: p_init_msg_list => FND_API.G_FALSE,
300: p_validation_level => p_validation_level,
301: p_validation_mode => JTF_PLSQL_API.G_UPDATE,
302: P_PROD_TASK_Rec => P_PROD_TASK_Rec,
303: x_return_status => x_return_status,
302: P_PROD_TASK_Rec => P_PROD_TASK_Rec,
303: x_return_status => x_return_status,
304: x_msg_count => x_msg_count,
305: x_msg_data => x_msg_data);
306: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
307: RAISE FND_API.G_EXC_ERROR;
308: END IF;
309: -- Hint: Add corresponding Master-Detail business logic here if necessary.
310: -- Invoke table handler(CSP_PRODUCT_TASKS_PKG.Update_Row)
303: x_return_status => x_return_status,
304: x_msg_count => x_msg_count,
305: x_msg_data => x_msg_data);
306: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
307: RAISE FND_API.G_EXC_ERROR;
308: END IF;
309: -- Hint: Add corresponding Master-Detail business logic here if necessary.
310: -- Invoke table handler(CSP_PRODUCT_TASKS_PKG.Update_Row)
311:
331: p_ATTRIBUTE12 => p_PROD_TASK_rec.ATTRIBUTE12,
332: p_ATTRIBUTE13 => p_PROD_TASK_rec.ATTRIBUTE13,
333: p_ATTRIBUTE14 => p_PROD_TASK_rec.ATTRIBUTE14,
334: p_ATTRIBUTE15 => p_PROD_TASK_rec.ATTRIBUTE15,
335: p_CREATED_BY => FND_API.G_MISS_NUM,
336: p_CREATION_DATE => FND_API.G_MISS_DATE,
337: p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID,
338: p_LAST_UPDATE_DATE => SYSDATE,
339: p_LAST_UPDATE_LOGIN => p_PROD_TASK_rec.LAST_UPDATE_LOGIN);
332: p_ATTRIBUTE13 => p_PROD_TASK_rec.ATTRIBUTE13,
333: p_ATTRIBUTE14 => p_PROD_TASK_rec.ATTRIBUTE14,
334: p_ATTRIBUTE15 => p_PROD_TASK_rec.ATTRIBUTE15,
335: p_CREATED_BY => FND_API.G_MISS_NUM,
336: p_CREATION_DATE => FND_API.G_MISS_DATE,
337: p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID,
338: p_LAST_UPDATE_DATE => SYSDATE,
339: p_LAST_UPDATE_LOGIN => p_PROD_TASK_rec.LAST_UPDATE_LOGIN);
340:
341: --
342: -- End of API body.
343: --
344: -- Standard check for p_commit
345: IF FND_API.to_Boolean( p_commit )
346: THEN
347: COMMIT WORK;
348: END IF;
349: -- Standard call to get message count and if count is 1, get message info.
351: ( p_count => x_msg_count,
352: p_data => x_msg_data
353: );
354: EXCEPTION
355: WHEN FND_API.G_EXC_ERROR THEN
356: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
357: P_API_NAME => L_API_NAME
358: ,P_PKG_NAME => G_PKG_NAME
359: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
360: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
361: ,X_MSG_COUNT => X_MSG_COUNT
362: ,X_MSG_DATA => X_MSG_DATA
363: ,X_RETURN_STATUS => X_RETURN_STATUS);
364: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
365: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
366: P_API_NAME => L_API_NAME
367: ,P_PKG_NAME => G_PKG_NAME
368: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
385: -- Hint: Add corresponding delete detail table procedures if it's master-detail relationship.
386: -- The Master delete procedure may not be needed depends on different business requirements.
387: PROCEDURE Delete_product_task(
388: P_Api_Version_Number IN NUMBER,
389: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
390: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
391: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
392: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
393: X_Return_Status OUT NOCOPY VARCHAR2,
386: -- The Master delete procedure may not be needed depends on different business requirements.
387: PROCEDURE Delete_product_task(
388: P_Api_Version_Number IN NUMBER,
389: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
390: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
391: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
392: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
393: X_Return_Status OUT NOCOPY VARCHAR2,
394: X_Msg_Count OUT NOCOPY NUMBER,
387: PROCEDURE Delete_product_task(
388: P_Api_Version_Number IN NUMBER,
389: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
390: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
391: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
392: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
393: X_Return_Status OUT NOCOPY VARCHAR2,
394: X_Msg_Count OUT NOCOPY NUMBER,
395: X_Msg_Data OUT NOCOPY VARCHAR2
400: BEGIN
401: -- Standard Start of API savepoint
402: SAVEPOINT DELETE_PRODUCT_TASK_PVT;
403: -- Standard call to check for call compatibility.
404: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
405: p_api_version_number,
406: l_api_name,
407: G_PKG_NAME)
408: THEN
405: p_api_version_number,
406: l_api_name,
407: G_PKG_NAME)
408: THEN
409: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
410: END IF;
411: -- Initialize message list if p_init_msg_list is set to TRUE.
412: IF FND_API.to_Boolean( p_init_msg_list )
413: THEN
408: THEN
409: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
410: END IF;
411: -- Initialize message list if p_init_msg_list is set to TRUE.
412: IF FND_API.to_Boolean( p_init_msg_list )
413: THEN
414: FND_MSG_PUB.initialize;
415: END IF;
416: -- Initialize API return status to SUCCESS
413: THEN
414: FND_MSG_PUB.initialize;
415: END IF;
416: -- Initialize API return status to SUCCESS
417: x_return_status := FND_API.G_RET_STS_SUCCESS;
418: --
419: -- Api body
420: --
421: -- Invoke table handler(CSP_PRODUCT_TASKS_PKG.Delete_Row)
424: --
425: -- End of API body
426: --
427: -- Standard check for p_commit
428: IF FND_API.to_Boolean( p_commit )
429: THEN
430: COMMIT WORK;
431: END IF;
432: -- Standard call to get message count and if count is 1, get message info.
434: ( p_count => x_msg_count,
435: p_data => x_msg_data
436: );
437: EXCEPTION
438: WHEN FND_API.G_EXC_ERROR THEN
439: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
440: P_API_NAME => L_API_NAME
441: ,P_PKG_NAME => G_PKG_NAME
442: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
443: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
444: ,X_MSG_COUNT => X_MSG_COUNT
445: ,X_MSG_DATA => X_MSG_DATA
446: ,X_RETURN_STATUS => X_RETURN_STATUS);
447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
448: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
449: P_API_NAME => L_API_NAME
450: ,P_PKG_NAME => G_PKG_NAME
451: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
538: -- Bind variables
539: -- Only those that are not NULL
540: -- The following example applies to all columns,
541: -- developers can copy and paste them.
542: IF( (P_PROD_TASK_Rec.PRODUCT_TASK_ID IS NOT NULL) AND (P_PROD_TASK_Rec.PRODUCT_TASK_ID <> FND_API.G_MISS_NUM) )
543: THEN
544: DBMS_SQL.BIND_VARIABLE(p_cur_get_PROD_TASK, ':p_PRODUCT_TASK_ID', P_PROD_TASK_Rec.PRODUCT_TASK_ID);
545: END IF;
546: END Bind;
600: -- There are three examples for each kind of datatype:
601: -- NUMBER, DATE, VARCHAR2.
602: -- Developer can copy and paste the following codes for your own record.
603: -- example for NUMBER datatype
604: IF( (P_PROD_TASK_Rec.PRODUCT_TASK_ID IS NOT NULL) AND (P_PROD_TASK_Rec.PRODUCT_TASK_ID <> FND_API.G_MISS_NUM) )
605: THEN
606: IF(x_PROD_TASK_where IS NULL) THEN
607: x_PROD_TASK_where := 'Where';
608: ELSE
610: END IF;
611: x_PROD_TASK_where := x_PROD_TASK_where || 'P_PROD_TASK_Rec.PRODUCT_TASK_ID = :p_PRODUCT_TASK_ID';
612: END IF;
613: -- example for DATE datatype
614: IF( (P_PROD_TASK_Rec.CREATION_DATE IS NOT NULL) AND (P_PROD_TASK_Rec.CREATION_DATE <> FND_API.G_MISS_DATE) )
615: THEN
616: -- check if item value contains '%' wildcard
617: OPEN c_chk_str1(P_PROD_TASK_Rec.CREATION_DATE);
618: FETCH c_chk_str1 INTO str_csr1;
638: END IF;
639: x_PROD_TASK_where := x_PROD_TASK_where || 'P_PROD_TASK_Rec.CREATION_DATE ' || l_operator || ' :p_CREATION_DATE';
640: END IF;
641: -- example for VARCHAR2 datatype
642: IF( (P_PROD_TASK_Rec.AUTO_MANUAL IS NOT NULL) AND (P_PROD_TASK_Rec.AUTO_MANUAL <> FND_API.G_MISS_CHAR) )
643: THEN
644: -- check if item value contains '%' wildcard
645: OPEN c_chk_str1(P_PROD_TASK_Rec.AUTO_MANUAL);
646: FETCH c_chk_str1 INTO str_csr1;
670: END Gen_PROD_TASK_Where;
671:
672: -- Item-level validation procedures
673: PROCEDURE Validate_PRODUCT_TASK_ID (
674: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
675: P_Validation_mode IN VARCHAR2,
676: P_PRODUCT_TASK_ID IN NUMBER,
677: -- Hint: You may add 'X_Item_Property_Rec OUT NOCOPY AS_UTILITY_PVT.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
678: X_Return_Status OUT NOCOPY VARCHAR2,
681: )
682: IS
683: BEGIN
684: -- Initialize message list if p_init_msg_list is set to TRUE.
685: IF FND_API.to_Boolean( p_init_msg_list )
686: THEN
687: FND_MSG_PUB.initialize;
688: END IF;
689: -- Initialize API return status to SUCCESS
686: THEN
687: FND_MSG_PUB.initialize;
688: END IF;
689: -- Initialize API return status to SUCCESS
690: x_return_status := FND_API.G_RET_STS_SUCCESS;
691: -- validate NOT NULL column
692: IF(p_PRODUCT_TASK_ID is NULL)
693: THEN
694: x_return_status := FND_API.G_RET_STS_ERROR;
690: x_return_status := FND_API.G_RET_STS_SUCCESS;
691: -- validate NOT NULL column
692: IF(p_PRODUCT_TASK_ID is NULL)
693: THEN
694: x_return_status := FND_API.G_RET_STS_ERROR;
695: END IF;
696: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
697: THEN
698: -- Hint: Validate data
697: THEN
698: -- Hint: Validate data
699: -- IF p_PRODUCT_TASK_ID is not NULL and p_PRODUCT_TASK_ID <> G_MISS_CHAR
700: -- verify if data is valid
701: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
702: NULL;
703: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
704: THEN
705: -- Hint: Validate data
704: THEN
705: -- Hint: Validate data
706: -- IF p_PRODUCT_TASK_ID <> G_MISS_CHAR
707: -- verify if data is valid
708: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
709: NULL;
710: END IF;
711: -- Standard call to get message count and if count is 1, get message info.
712: FND_MSG_PUB.Count_And_Get
714: p_data => x_msg_data
715: );
716: END Validate_PRODUCT_TASK_ID;
717: PROCEDURE Validate_PRODUCT_ID (
718: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
719: P_Validation_mode IN VARCHAR2,
720: P_PRODUCT_ID IN NUMBER,
721: -- Hint: You may add 'X_Item_Property_Rec OUT NOCOPY AS_UTILITY_PVT.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
722: X_Return_Status OUT NOCOPY VARCHAR2,
725: )
726: IS
727: BEGIN
728: -- Initialize message list if p_init_msg_list is set to TRUE.
729: IF FND_API.to_Boolean( p_init_msg_list )
730: THEN
731: FND_MSG_PUB.initialize;
732: END IF;
733: -- Initialize API return status to SUCCESS
730: THEN
731: FND_MSG_PUB.initialize;
732: END IF;
733: -- Initialize API return status to SUCCESS
734: x_return_status := FND_API.G_RET_STS_SUCCESS;
735: -- validate NOT NULL column
736: IF(p_PRODUCT_ID is NULL)
737: THEN
738: x_return_status := FND_API.G_RET_STS_ERROR;
734: x_return_status := FND_API.G_RET_STS_SUCCESS;
735: -- validate NOT NULL column
736: IF(p_PRODUCT_ID is NULL)
737: THEN
738: x_return_status := FND_API.G_RET_STS_ERROR;
739: END IF;
740: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
741: THEN
742: -- Hint: Validate data
741: THEN
742: -- Hint: Validate data
743: -- IF p_PRODUCT_ID is not NULL and p_PRODUCT_ID <> G_MISS_CHAR
744: -- verify if data is valid
745: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
746: NULL;
747: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
748: THEN
749: -- Hint: Validate data
748: THEN
749: -- Hint: Validate data
750: -- IF p_PRODUCT_ID <> G_MISS_CHAR
751: -- verify if data is valid
752: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
753: NULL;
754: END IF;
755: -- Standard call to get message count and if count is 1, get message info.
756: FND_MSG_PUB.Count_And_Get
758: p_data => x_msg_data
759: );
760: END Validate_PRODUCT_ID;
761: PROCEDURE Validate_TASK_TEMPLATE_ID (
762: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
763: P_Validation_mode IN VARCHAR2,
764: P_TASK_TEMPLATE_ID IN NUMBER,
765: -- Hint: You may add 'X_Item_Property_Rec OUT NOCOPY AS_UTILITY_PVT.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
766: X_Return_Status OUT NOCOPY VARCHAR2,
769: )
770: IS
771: BEGIN
772: -- Initialize message list if p_init_msg_list is set to TRUE.
773: IF FND_API.to_Boolean( p_init_msg_list )
774: THEN
775: FND_MSG_PUB.initialize;
776: END IF;
777: -- Initialize API return status to SUCCESS
774: THEN
775: FND_MSG_PUB.initialize;
776: END IF;
777: -- Initialize API return status to SUCCESS
778: x_return_status := FND_API.G_RET_STS_SUCCESS;
779: -- validate NOT NULL column
780: IF(p_TASK_TEMPLATE_ID is NULL)
781: THEN
782: x_return_status := FND_API.G_RET_STS_ERROR;
778: x_return_status := FND_API.G_RET_STS_SUCCESS;
779: -- validate NOT NULL column
780: IF(p_TASK_TEMPLATE_ID is NULL)
781: THEN
782: x_return_status := FND_API.G_RET_STS_ERROR;
783: END IF;
784: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
785: THEN
786: -- Hint: Validate data
785: THEN
786: -- Hint: Validate data
787: -- IF p_TASK_TEMPLATE_ID is not NULL and p_TASK_TEMPLATE_ID <> G_MISS_CHAR
788: -- verify if data is valid
789: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
790: NULL;
791: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
792: THEN
793: -- Hint: Validate data
792: THEN
793: -- Hint: Validate data
794: -- IF p_TASK_TEMPLATE_ID <> G_MISS_CHAR
795: -- verify if data is valid
796: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
797: NULL;
798: END IF;
799: -- Standard call to get message count and if count is 1, get message info.
800: FND_MSG_PUB.Count_And_Get
802: p_data => x_msg_data
803: );
804: END Validate_TASK_TEMPLATE_ID;
805: PROCEDURE Validate_AUTO_MANUAL (
806: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
807: P_Validation_mode IN VARCHAR2,
808: P_AUTO_MANUAL IN VARCHAR2,
809: -- Hint: You may add 'X_Item_Property_Rec OUT NOCOPY AS_UTILITY_PVT.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
810: X_Return_Status OUT NOCOPY VARCHAR2,
813: )
814: IS
815: BEGIN
816: -- Initialize message list if p_init_msg_list is set to TRUE.
817: IF FND_API.to_Boolean( p_init_msg_list )
818: THEN
819: FND_MSG_PUB.initialize;
820: END IF;
821: -- Initialize API return status to SUCCESS
818: THEN
819: FND_MSG_PUB.initialize;
820: END IF;
821: -- Initialize API return status to SUCCESS
822: x_return_status := FND_API.G_RET_STS_SUCCESS;
823: -- validate NOT NULL column
824: IF(p_AUTO_MANUAL is NULL)
825: THEN
826: x_return_status := FND_API.G_RET_STS_ERROR;
822: x_return_status := FND_API.G_RET_STS_SUCCESS;
823: -- validate NOT NULL column
824: IF(p_AUTO_MANUAL is NULL)
825: THEN
826: x_return_status := FND_API.G_RET_STS_ERROR;
827: END IF;
828: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
829: THEN
830: -- Hint: Validate data
829: THEN
830: -- Hint: Validate data
831: -- IF p_AUTO_MANUAL is not NULL and p_AUTO_MANUAL <> G_MISS_CHAR
832: -- verify if data is valid
833: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
834: NULL;
835: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
836: THEN
837: -- Hint: Validate data
836: THEN
837: -- Hint: Validate data
838: -- IF p_AUTO_MANUAL <> G_MISS_CHAR
839: -- verify if data is valid
840: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
841: NULL;
842: END IF;
843: -- Standard call to get message count and if count is 1, get message info.
844: FND_MSG_PUB.Count_And_Get
846: p_data => x_msg_data
847: );
848: END Validate_AUTO_MANUAL;
849: PROCEDURE Validate_ACTUAL_TIMES_USED (
850: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
851: P_Validation_mode IN VARCHAR2,
852: P_ACTUAL_TIMES_USED IN NUMBER,
853: -- Hint: You may add 'X_Item_Property_Rec OUT NOCOPY AS_UTILITY_PVT.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
854: X_Return_Status OUT NOCOPY VARCHAR2,
857: )
858: IS
859: BEGIN
860: -- Initialize message list if p_init_msg_list is set to TRUE.
861: IF FND_API.to_Boolean( p_init_msg_list )
862: THEN
863: FND_MSG_PUB.initialize;
864: END IF;
865: -- Initialize API return status to SUCCESS
862: THEN
863: FND_MSG_PUB.initialize;
864: END IF;
865: -- Initialize API return status to SUCCESS
866: x_return_status := FND_API.G_RET_STS_SUCCESS;
867: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
868: THEN
869: -- Hint: Validate data
870: -- IF p_ACTUAL_TIMES_USED is not NULL and p_ACTUAL_TIMES_USED <> G_MISS_CHAR
868: THEN
869: -- Hint: Validate data
870: -- IF p_ACTUAL_TIMES_USED is not NULL and p_ACTUAL_TIMES_USED <> G_MISS_CHAR
871: -- verify if data is valid
872: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
873: NULL;
874: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
875: THEN
876: -- Hint: Validate data
875: THEN
876: -- Hint: Validate data
877: -- IF p_ACTUAL_TIMES_USED <> G_MISS_CHAR
878: -- verify if data is valid
879: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
880: NULL;
881: END IF;
882: -- Standard call to get message count and if count is 1, get message info.
883: FND_MSG_PUB.Count_And_Get
885: p_data => x_msg_data
886: );
887: END Validate_ACTUAL_TIMES_USED;
888: PROCEDURE Validate_TASK_PERCENTAGE (
889: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
890: P_Validation_mode IN VARCHAR2,
891: P_TASK_PERCENTAGE IN NUMBER,
892: -- Hint: You may add 'X_Item_Property_Rec OUT NOCOPY AS_UTILITY_PVT.ITEM_PROPERTY_REC_TYPE' here if you'd like to pass back item property.
893: X_Return_Status OUT NOCOPY VARCHAR2,
896: )
897: IS
898: BEGIN
899: -- Initialize message list if p_init_msg_list is set to TRUE.
900: IF FND_API.to_Boolean( p_init_msg_list )
901: THEN
902: FND_MSG_PUB.initialize;
903: END IF;
904: -- Initialize API return status to SUCCESS
901: THEN
902: FND_MSG_PUB.initialize;
903: END IF;
904: -- Initialize API return status to SUCCESS
905: x_return_status := FND_API.G_RET_STS_SUCCESS;
906: IF(p_validation_mode = JTF_PLSQL_API.G_CREATE)
907: THEN
908: -- Hint: Validate data
909: -- IF p_TASK_PERCENTAGE is not NULL and p_TASK_PERCENTAGE <> G_MISS_CHAR
907: THEN
908: -- Hint: Validate data
909: -- IF p_TASK_PERCENTAGE is not NULL and p_TASK_PERCENTAGE <> G_MISS_CHAR
910: -- verify if data is valid
911: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
912: NULL;
913: ELSIF(p_validation_mode = JTF_PLSQL_API.G_UPDATE)
914: THEN
915: -- Hint: Validate data
914: THEN
915: -- Hint: Validate data
916: -- IF p_TASK_PERCENTAGE <> G_MISS_CHAR
917: -- verify if data is valid
918: -- if data is not valid : x_return_status := FND_API.G_RET_STS_ERROR;
919: NULL;
920: END IF;
921: -- Standard call to get message count and if count is 1, get message info.
922: FND_MSG_PUB.Count_And_Get
928: -- Hint: If p_validation_mode = AS_UTILITY_PVT.G_VALIDATE_UPDATE, we should use cursor
929: -- to get old values for all fields used in inter-field validation and set all G_MISS_XXX fields to original value
930: -- stored in database table.
931: PROCEDURE Validate_PROD_TASK_rec(
932: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
933: P_Validation_mode IN VARCHAR2,
934: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
935: X_Return_Status OUT NOCOPY VARCHAR2,
936: X_Msg_Count OUT NOCOPY NUMBER,
938: )
939: IS
940: BEGIN
941: -- Initialize message list if p_init_msg_list is set to TRUE.
942: IF FND_API.to_Boolean( p_init_msg_list )
943: THEN
944: FND_MSG_PUB.initialize;
945: END IF;
946: -- Initialize API return status to SUCCESS
943: THEN
944: FND_MSG_PUB.initialize;
945: END IF;
946: -- Initialize API return status to SUCCESS
947: x_return_status := FND_API.G_RET_STS_SUCCESS;
948: -- Hint: Validate data
949: -- If data not valid
950: -- THEN
951: -- x_return_status := FND_API.G_RET_STS_ERROR;
947: x_return_status := FND_API.G_RET_STS_SUCCESS;
948: -- Hint: Validate data
949: -- If data not valid
950: -- THEN
951: -- x_return_status := FND_API.G_RET_STS_ERROR;
952: -- Debug Message
953: -- Standard call to get message count and if count is 1, get message info.
954: FND_MSG_PUB.Count_And_Get
955: ( p_count => x_msg_count,
956: p_data => x_msg_data
957: );
958: END Validate_PROD_TASK_Rec;
959: PROCEDURE Validate_product_task(
960: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
961: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
962: P_Validation_mode IN VARCHAR2,
963: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
964: X_Return_Status OUT NOCOPY VARCHAR2,
957: );
958: END Validate_PROD_TASK_Rec;
959: PROCEDURE Validate_product_task(
960: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
961: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
962: P_Validation_mode IN VARCHAR2,
963: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
964: X_Return_Status OUT NOCOPY VARCHAR2,
965: X_Msg_Count OUT NOCOPY NUMBER,
968: IS
969: l_api_name CONSTANT VARCHAR2(30) := 'Validate_product_task';
970: BEGIN
971: -- Initialize API return status to SUCCESS
972: x_return_status := FND_API.G_RET_STS_SUCCESS;
973: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_ITEM) THEN
974: -- Hint: We provide validation procedure for every column. Developer should delete
975: -- unnecessary validation procedures.
976: Validate_PRODUCT_TASK_ID(
973: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_ITEM) THEN
974: -- Hint: We provide validation procedure for every column. Developer should delete
975: -- unnecessary validation procedures.
976: Validate_PRODUCT_TASK_ID(
977: p_init_msg_list => FND_API.G_FALSE,
978: p_validation_mode => p_validation_mode,
979: p_PRODUCT_TASK_ID => P_PROD_TASK_Rec.PRODUCT_TASK_ID,
980: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
981: x_return_status => x_return_status,
980: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
981: x_return_status => x_return_status,
982: x_msg_count => x_msg_count,
983: x_msg_data => x_msg_data);
984: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
985: raise FND_API.G_EXC_ERROR;
986: END IF;
987: Validate_PRODUCT_ID(
988: p_init_msg_list => FND_API.G_FALSE,
981: x_return_status => x_return_status,
982: x_msg_count => x_msg_count,
983: x_msg_data => x_msg_data);
984: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
985: raise FND_API.G_EXC_ERROR;
986: END IF;
987: Validate_PRODUCT_ID(
988: p_init_msg_list => FND_API.G_FALSE,
989: p_validation_mode => p_validation_mode,
984: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
985: raise FND_API.G_EXC_ERROR;
986: END IF;
987: Validate_PRODUCT_ID(
988: p_init_msg_list => FND_API.G_FALSE,
989: p_validation_mode => p_validation_mode,
990: p_PRODUCT_ID => P_PROD_TASK_Rec.PRODUCT_ID,
991: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
992: x_return_status => x_return_status,
991: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
992: x_return_status => x_return_status,
993: x_msg_count => x_msg_count,
994: x_msg_data => x_msg_data);
995: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
996: raise FND_API.G_EXC_ERROR;
997: END IF;
998: Validate_TASK_TEMPLATE_ID(
999: p_init_msg_list => FND_API.G_FALSE,
992: x_return_status => x_return_status,
993: x_msg_count => x_msg_count,
994: x_msg_data => x_msg_data);
995: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
996: raise FND_API.G_EXC_ERROR;
997: END IF;
998: Validate_TASK_TEMPLATE_ID(
999: p_init_msg_list => FND_API.G_FALSE,
1000: p_validation_mode => p_validation_mode,
995: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
996: raise FND_API.G_EXC_ERROR;
997: END IF;
998: Validate_TASK_TEMPLATE_ID(
999: p_init_msg_list => FND_API.G_FALSE,
1000: p_validation_mode => p_validation_mode,
1001: p_TASK_TEMPLATE_ID => P_PROD_TASK_Rec.TASK_TEMPLATE_ID,
1002: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
1003: x_return_status => x_return_status,
1002: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
1003: x_return_status => x_return_status,
1004: x_msg_count => x_msg_count,
1005: x_msg_data => x_msg_data);
1006: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1007: raise FND_API.G_EXC_ERROR;
1008: END IF;
1009: Validate_AUTO_MANUAL(
1010: p_init_msg_list => FND_API.G_FALSE,
1003: x_return_status => x_return_status,
1004: x_msg_count => x_msg_count,
1005: x_msg_data => x_msg_data);
1006: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1007: raise FND_API.G_EXC_ERROR;
1008: END IF;
1009: Validate_AUTO_MANUAL(
1010: p_init_msg_list => FND_API.G_FALSE,
1011: p_validation_mode => p_validation_mode,
1006: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1007: raise FND_API.G_EXC_ERROR;
1008: END IF;
1009: Validate_AUTO_MANUAL(
1010: p_init_msg_list => FND_API.G_FALSE,
1011: p_validation_mode => p_validation_mode,
1012: p_AUTO_MANUAL => P_PROD_TASK_Rec.AUTO_MANUAL,
1013: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
1014: x_return_status => x_return_status,
1013: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
1014: x_return_status => x_return_status,
1015: x_msg_count => x_msg_count,
1016: x_msg_data => x_msg_data);
1017: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1018: raise FND_API.G_EXC_ERROR;
1019: END IF;
1020: Validate_ACTUAL_TIMES_USED(
1021: p_init_msg_list => FND_API.G_FALSE,
1014: x_return_status => x_return_status,
1015: x_msg_count => x_msg_count,
1016: x_msg_data => x_msg_data);
1017: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1018: raise FND_API.G_EXC_ERROR;
1019: END IF;
1020: Validate_ACTUAL_TIMES_USED(
1021: p_init_msg_list => FND_API.G_FALSE,
1022: p_validation_mode => p_validation_mode,
1017: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1018: raise FND_API.G_EXC_ERROR;
1019: END IF;
1020: Validate_ACTUAL_TIMES_USED(
1021: p_init_msg_list => FND_API.G_FALSE,
1022: p_validation_mode => p_validation_mode,
1023: p_ACTUAL_TIMES_USED => P_PROD_TASK_Rec.ACTUAL_TIMES_USED,
1024: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
1025: x_return_status => x_return_status,
1024: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
1025: x_return_status => x_return_status,
1026: x_msg_count => x_msg_count,
1027: x_msg_data => x_msg_data);
1028: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1029: raise FND_API.G_EXC_ERROR;
1030: END IF;
1031: Validate_TASK_PERCENTAGE(
1032: p_init_msg_list => FND_API.G_FALSE,
1025: x_return_status => x_return_status,
1026: x_msg_count => x_msg_count,
1027: x_msg_data => x_msg_data);
1028: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1029: raise FND_API.G_EXC_ERROR;
1030: END IF;
1031: Validate_TASK_PERCENTAGE(
1032: p_init_msg_list => FND_API.G_FALSE,
1033: p_validation_mode => p_validation_mode,
1028: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1029: raise FND_API.G_EXC_ERROR;
1030: END IF;
1031: Validate_TASK_PERCENTAGE(
1032: p_init_msg_list => FND_API.G_FALSE,
1033: p_validation_mode => p_validation_mode,
1034: p_TASK_PERCENTAGE => P_PROD_TASK_Rec.TASK_PERCENTAGE,
1035: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
1036: x_return_status => x_return_status,
1035: -- Hint: You may add x_item_property_rec as one of your out parameter if you'd like to pass back item property.
1036: x_return_status => x_return_status,
1037: x_msg_count => x_msg_count,
1038: x_msg_data => x_msg_data);
1039: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1040: raise FND_API.G_EXC_ERROR;
1041: END IF;
1042: END IF;
1043: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_RECORD) THEN
1036: x_return_status => x_return_status,
1037: x_msg_count => x_msg_count,
1038: x_msg_data => x_msg_data);
1039: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1040: raise FND_API.G_EXC_ERROR;
1041: END IF;
1042: END IF;
1043: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_RECORD) THEN
1044: -- Hint: Inter-field level validation can be added here
1043: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_RECORD) THEN
1044: -- Hint: Inter-field level validation can be added here
1045: -- invoke record level validation procedures
1046: Validate_PROD_TASK_Rec(
1047: p_init_msg_list => FND_API.G_FALSE,
1048: p_validation_mode => p_validation_mode,
1049: P_PROD_TASK_Rec => P_PROD_TASK_Rec,
1050: x_return_status => x_return_status,
1051: x_msg_count => x_msg_count,
1049: P_PROD_TASK_Rec => P_PROD_TASK_Rec,
1050: x_return_status => x_return_status,
1051: x_msg_count => x_msg_count,
1052: x_msg_data => x_msg_data);
1053: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1054: raise FND_API.G_EXC_ERROR;
1055: END IF;
1056: END IF;
1057: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_INTER_RECORD) THEN
1050: x_return_status => x_return_status,
1051: x_msg_count => x_msg_count,
1052: x_msg_data => x_msg_data);
1053: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1054: raise FND_API.G_EXC_ERROR;
1055: END IF;
1056: END IF;
1057: IF (p_validation_level >= JTF_PLSQL_API.G_VALID_LEVEL_INTER_RECORD) THEN
1058: -- invoke inter-record level validation procedures