29: --
30: -- End of Comments
31: PROCEDURE Create_product_task(
32: P_Api_Version_Number IN NUMBER,
33: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
34: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
35: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
36: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type := G_MISS_PROD_TASK_REC,
37: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
30: -- End of Comments
31: PROCEDURE Create_product_task(
32: P_Api_Version_Number IN NUMBER,
33: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
34: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
35: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
36: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type := G_MISS_PROD_TASK_REC,
37: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
38: X_PRODUCT_TASK_ID OUT NOCOPY NUMBER,
31: PROCEDURE Create_product_task(
32: P_Api_Version_Number IN NUMBER,
33: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
34: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
35: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
36: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type := G_MISS_PROD_TASK_REC,
37: --Hint: Add detail tables as parameter lists if it's master-detail relationship.
38: X_PRODUCT_TASK_ID OUT NOCOPY NUMBER,
39: X_Return_Status OUT NOCOPY VARCHAR2,
47: BEGIN
48: -- Standard Start of API savepoint
49: SAVEPOINT CREATE_PRODUCT_TASK_PUB;
50: -- Standard call to check for call compatibility.
51: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
52: p_api_version_number,
53: l_api_name,
54: G_PKG_NAME)
55: THEN
52: p_api_version_number,
53: l_api_name,
54: G_PKG_NAME)
55: THEN
56: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
57: END IF;
58: -- Initialize message list if p_init_msg_list is set to TRUE.
59: IF FND_API.to_Boolean( p_init_msg_list )
60: THEN
55: THEN
56: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
57: END IF;
58: -- Initialize message list if p_init_msg_list is set to TRUE.
59: IF FND_API.to_Boolean( p_init_msg_list )
60: THEN
61: FND_MSG_PUB.initialize;
62: END IF;
63: -- Initialize API return status to SUCCESS
60: THEN
61: FND_MSG_PUB.initialize;
62: END IF;
63: -- Initialize API return status to SUCCESS
64: x_return_status := FND_API.G_RET_STS_SUCCESS;
65: --
66: -- API body
67: --
68: -- Un-comment the following statements when user hooks is ready.
72: THEN
73: AS_product_task_CUHK.Create_product_task_Pre(
74: p_api_version_number => 1.0,
75: p_validation_level => p_validation_level,
76: p_commit => FND_API.G_FALSE,
77: p_profile_tbl => p_profile_tbl,
78: p_check_access_flag => p_check_access_flag,
79: p_admin_flag => p_admin_flag,
80: p_admin_group_id => p_admin_group_id,
83: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
84: x_return_status => x_return_status,
85: x_msg_count => x_msg_count,
86: x_msg_data => x_msg_data);
87: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
88: RAISE fnd_api.g_exc_error;
89: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
90: RAISE fnd_api.g_exc_unexpected_error;
91: END IF;
84: x_return_status => x_return_status,
85: x_msg_count => x_msg_count,
86: x_msg_data => x_msg_data);
87: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
88: RAISE fnd_api.g_exc_error;
89: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
90: RAISE fnd_api.g_exc_unexpected_error;
91: END IF;
92: END IF;
85: x_msg_count => x_msg_count,
86: x_msg_data => x_msg_data);
87: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
88: RAISE fnd_api.g_exc_error;
89: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
90: RAISE fnd_api.g_exc_unexpected_error;
91: END IF;
92: END IF;
93: -- USER HOOKS standard : vertical industry pre-processing section - mandatory
86: x_msg_data => x_msg_data);
87: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
88: RAISE fnd_api.g_exc_error;
89: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
90: RAISE fnd_api.g_exc_unexpected_error;
91: END IF;
92: END IF;
93: -- USER HOOKS standard : vertical industry pre-processing section - mandatory
94: IF(JTF_USR_HKS.Ok_to_execute('AS_product_task_PUB', 'Create_product_task','B','V'))
95: THEN
96: AS_product_task_VUHK.Create_product_task_Pre(
97: p_api_version_number => 1.0,
98: p_validation_level => p_validation_level,
99: p_commit => FND_API.G_FALSE,
100: p_profile_tbl => p_profile_tbl,
101: p_check_access_flag => p_check_access_flag,
102: p_admin_flag => p_admin_flag,
103: p_admin_group_id => p_admin_group_id,
106: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
107: x_return_status => x_return_status,
108: x_msg_count => x_msg_count,
109: x_msg_data => x_msg_data);
110: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
111: RAISE fnd_api.g_exc_error;
112: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
113: RAISE fnd_api.g_exc_unexpected_error;
114: END IF;
107: x_return_status => x_return_status,
108: x_msg_count => x_msg_count,
109: x_msg_data => x_msg_data);
110: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
111: RAISE fnd_api.g_exc_error;
112: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
113: RAISE fnd_api.g_exc_unexpected_error;
114: END IF;
115: */
108: x_msg_count => x_msg_count,
109: x_msg_data => x_msg_data);
110: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
111: RAISE fnd_api.g_exc_error;
112: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
113: RAISE fnd_api.g_exc_unexpected_error;
114: END IF;
115: */
116: -- Calling Private package: Create_PRODUCT_TASK
109: x_msg_data => x_msg_data);
110: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
111: RAISE fnd_api.g_exc_error;
112: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
113: RAISE fnd_api.g_exc_unexpected_error;
114: END IF;
115: */
116: -- Calling Private package: Create_PRODUCT_TASK
117: -- Hint: Primary key needs to be returned
116: -- Calling Private package: Create_PRODUCT_TASK
117: -- Hint: Primary key needs to be returned
118: CSP_product_task_PVT.Create_product_task(
119: P_Api_Version_Number => 1.0,
120: P_Init_Msg_List => FND_API.G_FALSE,
121: P_Commit => FND_API.G_FALSE,
122: P_Validation_Level => P_Validation_Level,
123: P_PROD_TASK_Rec => l_pvt_PROD_TASK_Rec ,
124: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
117: -- Hint: Primary key needs to be returned
118: CSP_product_task_PVT.Create_product_task(
119: P_Api_Version_Number => 1.0,
120: P_Init_Msg_List => FND_API.G_FALSE,
121: P_Commit => FND_API.G_FALSE,
122: P_Validation_Level => P_Validation_Level,
123: P_PROD_TASK_Rec => l_pvt_PROD_TASK_Rec ,
124: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
125: X_PRODUCT_TASK_ID => x_PRODUCT_TASK_ID,
126: X_Return_Status => x_return_status,
127: X_Msg_Count => x_msg_count,
128: X_Msg_Data => x_msg_data);
129: -- Check return status from the above procedure call
130: IF x_return_status = FND_API.G_RET_STS_ERROR then
131: raise FND_API.G_EXC_ERROR;
132: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
133: raise FND_API.G_EXC_UNEXPECTED_ERROR;
134: END IF;
127: X_Msg_Count => x_msg_count,
128: X_Msg_Data => x_msg_data);
129: -- Check return status from the above procedure call
130: IF x_return_status = FND_API.G_RET_STS_ERROR then
131: raise FND_API.G_EXC_ERROR;
132: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
133: raise FND_API.G_EXC_UNEXPECTED_ERROR;
134: END IF;
135: --
128: X_Msg_Data => x_msg_data);
129: -- Check return status from the above procedure call
130: IF x_return_status = FND_API.G_RET_STS_ERROR then
131: raise FND_API.G_EXC_ERROR;
132: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
133: raise FND_API.G_EXC_UNEXPECTED_ERROR;
134: END IF;
135: --
136: -- End of API body.
129: -- Check return status from the above procedure call
130: IF x_return_status = FND_API.G_RET_STS_ERROR then
131: raise FND_API.G_EXC_ERROR;
132: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
133: raise FND_API.G_EXC_UNEXPECTED_ERROR;
134: END IF;
135: --
136: -- End of API body.
137: --
135: --
136: -- End of API body.
137: --
138: -- Standard check for p_commit
139: IF FND_API.to_Boolean( p_commit )
140: THEN
141: COMMIT WORK;
142: END IF;
143: -- Standard call to get message count and if count is 1, get message info.
152: THEN
153: AS_product_task_VUHK.Create_product_task_Post(
154: p_api_version_number => 1.0,
155: p_validation_level => p_validation_level,
156: p_commit => FND_API.G_FALSE,
157: p_profile_tbl => p_profile_tbl,
158: P_PROD_TASK_Rec => P_PROD_TASK_Rec,
159: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
160: x_return_status => x_return_status,
159: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
160: x_return_status => x_return_status,
161: x_msg_count => x_msg_count,
162: x_msg_data => x_msg_data);
163: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
164: RAISE fnd_api.g_exc_error;
165: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
166: RAISE fnd_api.g_exc_unexpected_error;
167: END IF;
160: x_return_status => x_return_status,
161: x_msg_count => x_msg_count,
162: x_msg_data => x_msg_data);
163: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
164: RAISE fnd_api.g_exc_error;
165: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
166: RAISE fnd_api.g_exc_unexpected_error;
167: END IF;
168: END IF;
161: x_msg_count => x_msg_count,
162: x_msg_data => x_msg_data);
163: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
164: RAISE fnd_api.g_exc_error;
165: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
166: RAISE fnd_api.g_exc_unexpected_error;
167: END IF;
168: END IF;
169: -- USER HOOKS standard : customer pre-processing section - mandatory
162: x_msg_data => x_msg_data);
163: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
164: RAISE fnd_api.g_exc_error;
165: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
166: RAISE fnd_api.g_exc_unexpected_error;
167: END IF;
168: END IF;
169: -- USER HOOKS standard : customer pre-processing section - mandatory
170: IF(JTF_USR_HKS.Ok_to_execute('AS_product_task_PUB', 'Create_product_task','A','C'))
171: THEN
172: AS_product_task_CUHK.Create_product_task_Pre(
173: p_api_version_number => 1.0,
174: p_validation_level => p_validation_level,
175: p_commit => FND_API.G_FALSE,
176: p_profile_tbl => p_profile_tbl,
177: p_check_access_flag => p_check_access_flag,
178: p_admin_flag => p_admin_flag,
179: p_admin_group_id => p_admin_group_id,
182: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
183: x_return_status => x_return_status,
184: x_msg_count => x_msg_count,
185: x_msg_data => x_msg_data);
186: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
187: RAISE fnd_api.g_exc_error;
188: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
189: RAISE fnd_api.g_exc_unexpected_error;
190: END IF;
183: x_return_status => x_return_status,
184: x_msg_count => x_msg_count,
185: x_msg_data => x_msg_data);
186: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
187: RAISE fnd_api.g_exc_error;
188: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
189: RAISE fnd_api.g_exc_unexpected_error;
190: END IF;
191: END IF;
184: x_msg_count => x_msg_count,
185: x_msg_data => x_msg_data);
186: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
187: RAISE fnd_api.g_exc_error;
188: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
189: RAISE fnd_api.g_exc_unexpected_error;
190: END IF;
191: END IF;
192: */
185: x_msg_data => x_msg_data);
186: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
187: RAISE fnd_api.g_exc_error;
188: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
189: RAISE fnd_api.g_exc_unexpected_error;
190: END IF;
191: END IF;
192: */
193: EXCEPTION
190: END IF;
191: END IF;
192: */
193: EXCEPTION
194: WHEN FND_API.G_EXC_ERROR THEN
195: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
196: P_API_NAME => L_API_NAME
197: ,P_PKG_NAME => G_PKG_NAME
198: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
199: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
200: ,X_MSG_COUNT => X_MSG_COUNT
201: ,X_MSG_DATA => X_MSG_DATA
202: ,X_RETURN_STATUS => X_RETURN_STATUS);
203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
204: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
205: P_API_NAME => L_API_NAME
206: ,P_PKG_NAME => G_PKG_NAME
207: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
223: End Create_product_task;
224: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
225: PROCEDURE Update_product_task(
226: P_Api_Version_Number IN NUMBER,
227: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
228: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
229: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
230: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
231: X_Return_Status OUT NOCOPY VARCHAR2,
224: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
225: PROCEDURE Update_product_task(
226: P_Api_Version_Number IN NUMBER,
227: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
228: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
229: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
230: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
231: X_Return_Status OUT NOCOPY VARCHAR2,
232: X_Msg_Count OUT NOCOPY NUMBER,
225: PROCEDURE Update_product_task(
226: P_Api_Version_Number IN NUMBER,
227: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
228: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
229: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
230: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
231: X_Return_Status OUT NOCOPY VARCHAR2,
232: X_Msg_Count OUT NOCOPY NUMBER,
233: X_Msg_Data OUT NOCOPY VARCHAR2
239: BEGIN
240: -- Standard Start of API savepoint
241: SAVEPOINT UPDATE_PRODUCT_TASK_PUB;
242: -- Standard call to check for call compatibility.
243: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
244: p_api_version_number,
245: l_api_name,
246: G_PKG_NAME)
247: THEN
244: p_api_version_number,
245: l_api_name,
246: G_PKG_NAME)
247: THEN
248: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
249: END IF;
250: -- Initialize message list if p_init_msg_list is set to TRUE.
251: IF FND_API.to_Boolean( p_init_msg_list )
252: THEN
247: THEN
248: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
249: END IF;
250: -- Initialize message list if p_init_msg_list is set to TRUE.
251: IF FND_API.to_Boolean( p_init_msg_list )
252: THEN
253: FND_MSG_PUB.initialize;
254: END IF;
255: -- Initialize API return status to SUCCESS
252: THEN
253: FND_MSG_PUB.initialize;
254: END IF;
255: -- Initialize API return status to SUCCESS
256: x_return_status := FND_API.G_RET_STS_SUCCESS;
257: --
258: -- API body
259: --
260: -- Un-comment the following statements when user hooks is ready.
264: THEN
265: AS_product_task_CUHK.Update_product_task_Pre(
266: p_api_version_number => 1.0,
267: p_validation_level => p_validation_level,
268: p_commit => FND_API.G_FALSE,
269: p_profile_tbl => p_profile_tbl,
270: p_check_access_flag => p_check_access_flag,
271: p_admin_flag => p_admin_flag,
272: p_admin_group_id => p_admin_group_id,
275: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
276: x_return_status => x_return_status,
277: x_msg_count => x_msg_count,
278: x_msg_data => x_msg_data);
279: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
280: RAISE fnd_api.g_exc_error;
281: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
282: RAISE fnd_api.g_exc_unexpected_error;
283: END IF;
276: x_return_status => x_return_status,
277: x_msg_count => x_msg_count,
278: x_msg_data => x_msg_data);
279: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
280: RAISE fnd_api.g_exc_error;
281: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
282: RAISE fnd_api.g_exc_unexpected_error;
283: END IF;
284: END IF;
277: x_msg_count => x_msg_count,
278: x_msg_data => x_msg_data);
279: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
280: RAISE fnd_api.g_exc_error;
281: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
282: RAISE fnd_api.g_exc_unexpected_error;
283: END IF;
284: END IF;
285: -- USER HOOKS standard : vertical industry pre-processing section - mandatory
278: x_msg_data => x_msg_data);
279: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
280: RAISE fnd_api.g_exc_error;
281: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
282: RAISE fnd_api.g_exc_unexpected_error;
283: END IF;
284: END IF;
285: -- USER HOOKS standard : vertical industry pre-processing section - mandatory
286: IF(JTF_USR_HKS.Ok_to_execute('AS_product_task_PUB', 'Update_product_task','B','V'))
287: THEN
288: AS_product_task_VUHK.Update_product_task_Pre(
289: p_api_version_number => 1.0,
290: p_validation_level => p_validation_level,
291: p_commit => FND_API.G_FALSE,
292: p_profile_tbl => p_profile_tbl,
293: p_check_access_flag => p_check_access_flag,
294: p_admin_flag => p_admin_flag,
295: p_admin_group_id => p_admin_group_id,
298: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
299: x_return_status => x_return_status,
300: x_msg_count => x_msg_count,
301: x_msg_data => x_msg_data);
302: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
303: RAISE fnd_api.g_exc_error;
304: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
305: RAISE fnd_api.g_exc_unexpected_error;
306: END IF;
299: x_return_status => x_return_status,
300: x_msg_count => x_msg_count,
301: x_msg_data => x_msg_data);
302: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
303: RAISE fnd_api.g_exc_error;
304: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
305: RAISE fnd_api.g_exc_unexpected_error;
306: END IF;
307: */
300: x_msg_count => x_msg_count,
301: x_msg_data => x_msg_data);
302: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
303: RAISE fnd_api.g_exc_error;
304: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
305: RAISE fnd_api.g_exc_unexpected_error;
306: END IF;
307: */
308: CSP_product_task_PVT.Update_product_task(
301: x_msg_data => x_msg_data);
302: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
303: RAISE fnd_api.g_exc_error;
304: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
305: RAISE fnd_api.g_exc_unexpected_error;
306: END IF;
307: */
308: CSP_product_task_PVT.Update_product_task(
309: P_Api_Version_Number => 1.0,
306: END IF;
307: */
308: CSP_product_task_PVT.Update_product_task(
309: P_Api_Version_Number => 1.0,
310: P_Init_Msg_List => FND_API.G_FALSE,
311: P_Commit => p_commit,
312: P_Validation_Level => P_Validation_Level,
313: P_PROD_TASK_Rec => l_pvt_PROD_TASK_Rec ,
314: X_Return_Status => x_return_status,
314: X_Return_Status => x_return_status,
315: X_Msg_Count => x_msg_count,
316: X_Msg_Data => x_msg_data);
317: -- Check return status from the above procedure call
318: IF x_return_status = FND_API.G_RET_STS_ERROR then
319: raise FND_API.G_EXC_ERROR;
320: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
321: raise FND_API.G_EXC_UNEXPECTED_ERROR;
322: END IF;
315: X_Msg_Count => x_msg_count,
316: X_Msg_Data => x_msg_data);
317: -- Check return status from the above procedure call
318: IF x_return_status = FND_API.G_RET_STS_ERROR then
319: raise FND_API.G_EXC_ERROR;
320: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
321: raise FND_API.G_EXC_UNEXPECTED_ERROR;
322: END IF;
323: --
316: X_Msg_Data => x_msg_data);
317: -- Check return status from the above procedure call
318: IF x_return_status = FND_API.G_RET_STS_ERROR then
319: raise FND_API.G_EXC_ERROR;
320: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
321: raise FND_API.G_EXC_UNEXPECTED_ERROR;
322: END IF;
323: --
324: -- End of API body
317: -- Check return status from the above procedure call
318: IF x_return_status = FND_API.G_RET_STS_ERROR then
319: raise FND_API.G_EXC_ERROR;
320: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
321: raise FND_API.G_EXC_UNEXPECTED_ERROR;
322: END IF;
323: --
324: -- End of API body
325: --
323: --
324: -- End of API body
325: --
326: -- Standard check for p_commit
327: IF FND_API.to_Boolean( p_commit )
328: THEN
329: COMMIT WORK;
330: END IF;
331: -- Standard call to get message count and if count is 1, get message info.
340: THEN
341: AS_product_task_VUHK.Update_product_task_Post(
342: p_api_version_number => 1.0,
343: p_validation_level => p_validation_level,
344: p_commit => FND_API.G_FALSE,
345: p_profile_tbl => p_profile_tbl,
346: p_check_access_flag => p_check_access_flag,
347: p_admin_flag => p_admin_flag,
348: p_admin_group_id => p_admin_group_id,
351: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
352: x_return_status => x_return_status,
353: x_msg_count => x_msg_count,
354: x_msg_data => x_msg_data);
355: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
356: RAISE fnd_api.g_exc_error;
357: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
358: RAISE fnd_api.g_exc_unexpected_error;
359: END IF;
352: x_return_status => x_return_status,
353: x_msg_count => x_msg_count,
354: x_msg_data => x_msg_data);
355: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
356: RAISE fnd_api.g_exc_error;
357: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
358: RAISE fnd_api.g_exc_unexpected_error;
359: END IF;
360: END IF;
353: x_msg_count => x_msg_count,
354: x_msg_data => x_msg_data);
355: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
356: RAISE fnd_api.g_exc_error;
357: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
358: RAISE fnd_api.g_exc_unexpected_error;
359: END IF;
360: END IF;
361: -- USER HOOKS standard : customer pre-processing section - mandatory
354: x_msg_data => x_msg_data);
355: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
356: RAISE fnd_api.g_exc_error;
357: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
358: RAISE fnd_api.g_exc_unexpected_error;
359: END IF;
360: END IF;
361: -- USER HOOKS standard : customer pre-processing section - mandatory
362: IF(JTF_USR_HKS.Ok_to_execute('AS_product_task_PUB', 'Update_product_task','A','C'))
363: THEN
364: AS_product_task_CUHK.Update_product_task_Pre(
365: p_api_version_number => 1.0,
366: p_validation_level => p_validation_level,
367: p_commit => FND_API.G_FALSE,
368: p_profile_tbl => p_profile_tbl,
369: p_check_access_flag => p_check_access_flag,
370: p_admin_flag => p_admin_flag,
371: p_admin_group_id => p_admin_group_id,
374: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
375: x_return_status => x_return_status,
376: x_msg_count => x_msg_count,
377: x_msg_data => x_msg_data);
378: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
379: RAISE fnd_api.g_exc_error;
380: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
381: RAISE fnd_api.g_exc_unexpected_error;
382: END IF;
375: x_return_status => x_return_status,
376: x_msg_count => x_msg_count,
377: x_msg_data => x_msg_data);
378: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
379: RAISE fnd_api.g_exc_error;
380: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
381: RAISE fnd_api.g_exc_unexpected_error;
382: END IF;
383: END IF;
376: x_msg_count => x_msg_count,
377: x_msg_data => x_msg_data);
378: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
379: RAISE fnd_api.g_exc_error;
380: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
381: RAISE fnd_api.g_exc_unexpected_error;
382: END IF;
383: END IF;
384: */
377: x_msg_data => x_msg_data);
378: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
379: RAISE fnd_api.g_exc_error;
380: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
381: RAISE fnd_api.g_exc_unexpected_error;
382: END IF;
383: END IF;
384: */
385: EXCEPTION
382: END IF;
383: END IF;
384: */
385: EXCEPTION
386: WHEN FND_API.G_EXC_ERROR THEN
387: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
388: P_API_NAME => L_API_NAME
389: ,P_PKG_NAME => G_PKG_NAME
390: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
391: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
392: ,X_MSG_COUNT => X_MSG_COUNT
393: ,X_MSG_DATA => X_MSG_DATA
394: ,X_RETURN_STATUS => X_RETURN_STATUS);
395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
396: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
397: P_API_NAME => L_API_NAME
398: ,P_PKG_NAME => G_PKG_NAME
399: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
416: -- Hint: Add corresponding delete detail table procedures if it's master-detail relationship.
417: -- The Master delete procedure may not be needed depends on different business requirements.
418: PROCEDURE Delete_product_task(
419: P_Api_Version_Number IN NUMBER,
420: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
421: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
422: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
423: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
424: X_Return_Status OUT NOCOPY VARCHAR2,
417: -- The Master delete procedure may not be needed depends on different business requirements.
418: PROCEDURE Delete_product_task(
419: P_Api_Version_Number IN NUMBER,
420: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
421: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
422: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
423: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
424: X_Return_Status OUT NOCOPY VARCHAR2,
425: X_Msg_Count OUT NOCOPY NUMBER,
418: PROCEDURE Delete_product_task(
419: P_Api_Version_Number IN NUMBER,
420: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
421: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
422: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
423: P_PROD_TASK_Rec IN PROD_TASK_Rec_Type,
424: X_Return_Status OUT NOCOPY VARCHAR2,
425: X_Msg_Count OUT NOCOPY NUMBER,
426: X_Msg_Data OUT NOCOPY VARCHAR2
432: BEGIN
433: -- Standard Start of API savepoint
434: SAVEPOINT DELETE_PRODUCT_TASK_PUB;
435: -- Standard call to check for call compatibility.
436: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
437: p_api_version_number,
438: l_api_name,
439: G_PKG_NAME)
440: THEN
437: p_api_version_number,
438: l_api_name,
439: G_PKG_NAME)
440: THEN
441: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
442: END IF;
443: -- Initialize message list if p_init_msg_list is set to TRUE.
444: IF FND_API.to_Boolean( p_init_msg_list )
445: THEN
440: THEN
441: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
442: END IF;
443: -- Initialize message list if p_init_msg_list is set to TRUE.
444: IF FND_API.to_Boolean( p_init_msg_list )
445: THEN
446: FND_MSG_PUB.initialize;
447: END IF;
448: -- Initialize API return status to SUCCESS
445: THEN
446: FND_MSG_PUB.initialize;
447: END IF;
448: -- Initialize API return status to SUCCESS
449: x_return_status := FND_API.G_RET_STS_SUCCESS;
450: --
451: -- API body
452: --
453: CSP_product_task_PVT.Delete_product_task(
451: -- API body
452: --
453: CSP_product_task_PVT.Delete_product_task(
454: P_Api_Version_Number => 1.0,
455: P_Init_Msg_List => FND_API.G_FALSE,
456: P_Commit => p_commit,
457: P_Validation_Level => p_Validation_Level,
458: P_PROD_TASK_Rec => l_pvt_PROD_TASK_Rec,
459: X_Return_Status => x_return_status,
466: THEN
467: AS_product_task_CUHK.Delete_product_task_Pre(
468: p_api_version_number => 1.0,
469: p_validation_level => p_validation_level,
470: p_commit => FND_API.G_FALSE,
471: p_profile_tbl => p_profile_tbl,
472: p_check_access_flag => p_check_access_flag,
473: p_admin_flag => p_admin_flag,
474: p_admin_group_id => p_admin_group_id,
477: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
478: x_return_status => x_return_status,
479: x_msg_count => x_msg_count,
480: x_msg_data => x_msg_data);
481: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
482: RAISE fnd_api.g_exc_error;
483: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
484: RAISE fnd_api.g_exc_unexpected_error;
485: END IF;
478: x_return_status => x_return_status,
479: x_msg_count => x_msg_count,
480: x_msg_data => x_msg_data);
481: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
482: RAISE fnd_api.g_exc_error;
483: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
484: RAISE fnd_api.g_exc_unexpected_error;
485: END IF;
486: END IF;
479: x_msg_count => x_msg_count,
480: x_msg_data => x_msg_data);
481: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
482: RAISE fnd_api.g_exc_error;
483: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
484: RAISE fnd_api.g_exc_unexpected_error;
485: END IF;
486: END IF;
487: -- USER HOOKS standard : vertical industry pre-processing section - mandatory
480: x_msg_data => x_msg_data);
481: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
482: RAISE fnd_api.g_exc_error;
483: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
484: RAISE fnd_api.g_exc_unexpected_error;
485: END IF;
486: END IF;
487: -- USER HOOKS standard : vertical industry pre-processing section - mandatory
488: IF(JTF_USR_HKS.Ok_to_execute('AS_product_task_PUB', 'Delete_product_task','B','V'))
489: THEN
490: AS_product_task_VUHK.Delete_product_task_Pre(
491: p_api_version_number => 1.0,
492: p_validation_level => p_validation_level,
493: p_commit => FND_API.G_FALSE,
494: p_profile_tbl => p_profile_tbl,
495: p_check_access_flag => p_check_access_flag,
496: p_admin_flag => p_admin_flag,
497: p_admin_group_id => p_admin_group_id,
500: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
501: x_return_status => x_return_status,
502: x_msg_count => x_msg_count,
503: x_msg_data => x_msg_data);
504: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
505: RAISE fnd_api.g_exc_error;
506: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
507: RAISE fnd_api.g_exc_unexpected_error;
508: END IF;
501: x_return_status => x_return_status,
502: x_msg_count => x_msg_count,
503: x_msg_data => x_msg_data);
504: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
505: RAISE fnd_api.g_exc_error;
506: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
507: RAISE fnd_api.g_exc_unexpected_error;
508: END IF;
509: */
502: x_msg_count => x_msg_count,
503: x_msg_data => x_msg_data);
504: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
505: RAISE fnd_api.g_exc_error;
506: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
507: RAISE fnd_api.g_exc_unexpected_error;
508: END IF;
509: */
510: -- Check return status from the above procedure call
503: x_msg_data => x_msg_data);
504: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
505: RAISE fnd_api.g_exc_error;
506: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
507: RAISE fnd_api.g_exc_unexpected_error;
508: END IF;
509: */
510: -- Check return status from the above procedure call
511: IF x_return_status = FND_API.G_RET_STS_ERROR then
507: RAISE fnd_api.g_exc_unexpected_error;
508: END IF;
509: */
510: -- Check return status from the above procedure call
511: IF x_return_status = FND_API.G_RET_STS_ERROR then
512: raise FND_API.G_EXC_ERROR;
513: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
514: raise FND_API.G_EXC_UNEXPECTED_ERROR;
515: END IF;
508: END IF;
509: */
510: -- Check return status from the above procedure call
511: IF x_return_status = FND_API.G_RET_STS_ERROR then
512: raise FND_API.G_EXC_ERROR;
513: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
514: raise FND_API.G_EXC_UNEXPECTED_ERROR;
515: END IF;
516: --
509: */
510: -- Check return status from the above procedure call
511: IF x_return_status = FND_API.G_RET_STS_ERROR then
512: raise FND_API.G_EXC_ERROR;
513: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
514: raise FND_API.G_EXC_UNEXPECTED_ERROR;
515: END IF;
516: --
517: -- End of API body
510: -- Check return status from the above procedure call
511: IF x_return_status = FND_API.G_RET_STS_ERROR then
512: raise FND_API.G_EXC_ERROR;
513: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
514: raise FND_API.G_EXC_UNEXPECTED_ERROR;
515: END IF;
516: --
517: -- End of API body
518: --
516: --
517: -- End of API body
518: --
519: -- Standard check for p_commit
520: IF FND_API.to_Boolean( p_commit )
521: THEN
522: COMMIT WORK;
523: END IF;
524: -- Standard call to get message count and if count is 1, get message info.
533: THEN
534: AS_product_task_VUHK.Delete_product_task_Post(
535: p_api_version_number => 1.0,
536: p_validation_level => p_validation_level,
537: p_commit => FND_API.G_FALSE,
538: p_profile_tbl => p_profile_tbl,
539: P_PROD_TASK_Rec => P_PROD_TASK_Rec,
540: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
541: x_return_status => x_return_status,
540: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
541: x_return_status => x_return_status,
542: x_msg_count => x_msg_count,
543: x_msg_data => x_msg_data);
544: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
545: RAISE fnd_api.g_exc_error;
546: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
547: RAISE fnd_api.g_exc_unexpected_error;
548: END IF;
541: x_return_status => x_return_status,
542: x_msg_count => x_msg_count,
543: x_msg_data => x_msg_data);
544: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
545: RAISE fnd_api.g_exc_error;
546: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
547: RAISE fnd_api.g_exc_unexpected_error;
548: END IF;
549: END IF;
542: x_msg_count => x_msg_count,
543: x_msg_data => x_msg_data);
544: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
545: RAISE fnd_api.g_exc_error;
546: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
547: RAISE fnd_api.g_exc_unexpected_error;
548: END IF;
549: END IF;
550: -- USER HOOKS standard : customer pre-processing section - mandatory
543: x_msg_data => x_msg_data);
544: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
545: RAISE fnd_api.g_exc_error;
546: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
547: RAISE fnd_api.g_exc_unexpected_error;
548: END IF;
549: END IF;
550: -- USER HOOKS standard : customer pre-processing section - mandatory
551: IF(JTF_USR_HKS.Ok_to_execute('AS_product_task_PUB', 'Delete_product_task','A','C'))
552: THEN
553: AS_product_task_CUHK.Delete_product_task_Pre(
554: p_api_version_number => 1.0,
555: p_validation_level => p_validation_level,
556: p_commit => FND_API.G_FALSE,
557: p_profile_tbl => p_profile_tbl,
558: p_check_access_flag => p_check_access_flag,
559: p_admin_flag => p_admin_flag,
560: p_admin_group_id => p_admin_group_id,
563: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
564: x_return_status => x_return_status,
565: x_msg_count => x_msg_count,
566: x_msg_data => x_msg_data);
567: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
568: RAISE fnd_api.g_exc_error;
569: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
570: RAISE fnd_api.g_exc_unexpected_error;
571: END IF;
564: x_return_status => x_return_status,
565: x_msg_count => x_msg_count,
566: x_msg_data => x_msg_data);
567: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
568: RAISE fnd_api.g_exc_error;
569: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
570: RAISE fnd_api.g_exc_unexpected_error;
571: END IF;
572: END IF;
565: x_msg_count => x_msg_count,
566: x_msg_data => x_msg_data);
567: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
568: RAISE fnd_api.g_exc_error;
569: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
570: RAISE fnd_api.g_exc_unexpected_error;
571: END IF;
572: END IF;
573: */
566: x_msg_data => x_msg_data);
567: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
568: RAISE fnd_api.g_exc_error;
569: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
570: RAISE fnd_api.g_exc_unexpected_error;
571: END IF;
572: END IF;
573: */
574: EXCEPTION
571: END IF;
572: END IF;
573: */
574: EXCEPTION
575: WHEN FND_API.G_EXC_ERROR THEN
576: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
577: P_API_NAME => L_API_NAME
578: ,P_PKG_NAME => G_PKG_NAME
579: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
580: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
581: ,X_MSG_COUNT => X_MSG_COUNT
582: ,X_MSG_DATA => X_MSG_DATA
583: ,X_RETURN_STATUS => X_RETURN_STATUS);
584: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
585: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
586: P_API_NAME => L_API_NAME
587: ,P_PKG_NAME => G_PKG_NAME
588: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
603: ,X_RETURN_STATUS => X_RETURN_STATUS);
604: End Delete_product_task;
605: PROCEDURE Get_product_task(
606: P_Api_Version_Number IN NUMBER,
607: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
608: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
609: P_PROD_TASK_Rec IN CSP_product_task_PUB.PROD_TASK_Rec_Type,
610: -- Hint: Add list of bind variables here
611: p_rec_requested IN NUMBER := G_DEFAULT_NUM_REC_FETCH,
604: End Delete_product_task;
605: PROCEDURE Get_product_task(
606: P_Api_Version_Number IN NUMBER,
607: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
608: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
609: P_PROD_TASK_Rec IN CSP_product_task_PUB.PROD_TASK_Rec_Type,
610: -- Hint: Add list of bind variables here
611: p_rec_requested IN NUMBER := G_DEFAULT_NUM_REC_FETCH,
612: p_start_rec_prt IN NUMBER := 1,
609: P_PROD_TASK_Rec IN CSP_product_task_PUB.PROD_TASK_Rec_Type,
610: -- Hint: Add list of bind variables here
611: p_rec_requested IN NUMBER := G_DEFAULT_NUM_REC_FETCH,
612: p_start_rec_prt IN NUMBER := 1,
613: p_return_tot_count IN NUMBER := FND_API.G_FALSE,
614: -- Hint: user defined record type
615: p_order_by_rec IN CSP_product_task_PUB.PROD_TASK_sort_rec_type,
616: x_return_status OUT NOCOPY VARCHAR2,
617: x_msg_count OUT NOCOPY NUMBER,
629: BEGIN
630: -- Standard Start of API savepoint
631: SAVEPOINT GET_PRODUCT_TASK_PUB;
632: -- Standard call to check for call compatibility.
633: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
634: p_api_version_number,
635: l_api_name,
636: G_PKG_NAME)
637: THEN
634: p_api_version_number,
635: l_api_name,
636: G_PKG_NAME)
637: THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
640: -- Initialize message list if p_init_msg_list is set to TRUE.
641: IF FND_API.to_Boolean( p_init_msg_list )
642: THEN
637: THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
640: -- Initialize message list if p_init_msg_list is set to TRUE.
641: IF FND_API.to_Boolean( p_init_msg_list )
642: THEN
643: FND_MSG_PUB.initialize;
644: END IF;
645: -- Initialize API return status to SUCCESS
642: THEN
643: FND_MSG_PUB.initialize;
644: END IF;
645: -- Initialize API return status to SUCCESS
646: x_return_status := FND_API.G_RET_STS_SUCCESS;
647: --
648: -- API body
649: --
650: /* CSP_product_task_PVT.Get_product_task(
648: -- API body
649: --
650: /* CSP_product_task_PVT.Get_product_task(
651: P_Api_Version_Number => 1.0,
652: P_Init_Msg_List => FND_API.G_FALSE,
653: p_validation_level => p_validation_level,
654: P_PROD_TASK_Rec => P_PROD_TASK_Rec,
655: p_rec_requested => p_rec_requested,
656: p_start_rec_prt => p_start_rec_prt,
667: -- other optional parameters
668: -- x_tot_rec_amount => x_tot_rec_amount
669: );
670: -- Check return status from the above procedure call
671: IF x_return_status = FND_API.G_RET_STS_ERROR then
672: raise FND_API.G_EXC_ERROR;
673: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
674: raise FND_API.G_EXC_UNEXPECTED_ERROR;
675: END IF;
668: -- x_tot_rec_amount => x_tot_rec_amount
669: );
670: -- Check return status from the above procedure call
671: IF x_return_status = FND_API.G_RET_STS_ERROR then
672: raise FND_API.G_EXC_ERROR;
673: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
674: raise FND_API.G_EXC_UNEXPECTED_ERROR;
675: END IF;
676: */
669: );
670: -- Check return status from the above procedure call
671: IF x_return_status = FND_API.G_RET_STS_ERROR then
672: raise FND_API.G_EXC_ERROR;
673: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
674: raise FND_API.G_EXC_UNEXPECTED_ERROR;
675: END IF;
676: */
677: --
670: -- Check return status from the above procedure call
671: IF x_return_status = FND_API.G_RET_STS_ERROR then
672: raise FND_API.G_EXC_ERROR;
673: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
674: raise FND_API.G_EXC_UNEXPECTED_ERROR;
675: END IF;
676: */
677: --
678: -- End of API body
682: ( p_count => x_msg_count,
683: p_data => x_msg_data
684: );
685: EXCEPTION
686: WHEN FND_API.G_EXC_ERROR THEN
687: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
688: P_API_NAME => L_API_NAME
689: ,P_PKG_NAME => G_PKG_NAME
690: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
691: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
692: ,X_MSG_COUNT => X_MSG_COUNT
693: ,X_MSG_DATA => X_MSG_DATA
694: ,X_RETURN_STATUS => X_RETURN_STATUS);
695: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
696: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
697: P_API_NAME => L_API_NAME
698: ,P_PKG_NAME => G_PKG_NAME
699: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR