20: AS_DEBUG_ERROR_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_ERROR);
21:
22: PROCEDURE Create_timeframe(
23: P_Api_Version_Number IN NUMBER,
24: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
25: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
27: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
28: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
21:
22: PROCEDURE Create_timeframe(
23: P_Api_Version_Number IN NUMBER,
24: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
25: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
27: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
28: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
29: P_Admin_Group_Id IN NUMBER,
22: PROCEDURE Create_timeframe(
23: P_Api_Version_Number IN NUMBER,
24: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
25: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
27: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
28: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
29: P_Admin_Group_Id IN NUMBER,
30: P_Identity_Salesforce_Id IN NUMBER,
23: P_Api_Version_Number IN NUMBER,
24: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
25: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
27: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
28: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
29: P_Admin_Group_Id IN NUMBER,
30: P_Identity_Salesforce_Id IN NUMBER,
31: P_profile_tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
24: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
25: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
27: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
28: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
29: P_Admin_Group_Id IN NUMBER,
30: P_Identity_Salesforce_Id IN NUMBER,
31: P_profile_tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
32: P_timeframe_Rec IN timeframe_Rec_Type ,
44: -- Standard Start of API savepoint
45: SAVEPOINT CREATE_TIMEFRAME_PUB;
46:
47: -- Standard call to check for call compatibility.
48: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
49: p_api_version_number,
50: l_api_name,
51: G_PKG_NAME)
52: THEN
49: p_api_version_number,
50: l_api_name,
51: G_PKG_NAME)
52: THEN
53: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
54: END IF;
55:
56:
57: -- Initialize message list if p_init_msg_list is set to TRUE.
54: END IF;
55:
56:
57: -- Initialize message list if p_init_msg_list is set to TRUE.
58: IF FND_API.to_Boolean( p_init_msg_list )
59: THEN
60: FND_MSG_PUB.initialize;
61: END IF;
62:
76:
77: END IF;
78:
79: -- Initialize API return status to SUCCESS
80: x_return_status := FND_API.G_RET_STS_SUCCESS;
81:
82: --
83: -- API body
84: --
89: -- Calling Private package: Create_TIMEFRAME
90: -- Hint: Primary key needs to be returned
91: AML_timeframe_PVT.Create_timeframe(
92: P_Api_Version_Number => 2.0,
93: P_Init_Msg_List => FND_API.G_FALSE,
94: P_Commit => FND_API.G_FALSE,
95: P_Validation_Level => P_Validation_Level,
96: P_Check_Access_Flag => P_Check_Access_Flag,
97: P_Admin_Flag => P_Admin_Flag,
90: -- Hint: Primary key needs to be returned
91: AML_timeframe_PVT.Create_timeframe(
92: P_Api_Version_Number => 2.0,
93: P_Init_Msg_List => FND_API.G_FALSE,
94: P_Commit => FND_API.G_FALSE,
95: P_Validation_Level => P_Validation_Level,
96: P_Check_Access_Flag => P_Check_Access_Flag,
97: P_Admin_Flag => P_Admin_Flag,
98: P_Admin_Group_Id => P_Admin_Group_Id,
107:
108:
109:
110: -- Check return status from the above procedure call
111: IF x_return_status = FND_API.G_RET_STS_ERROR then
112: raise FND_API.G_EXC_ERROR;
113: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
114: raise FND_API.G_EXC_UNEXPECTED_ERROR;
115: END IF;
108:
109:
110: -- Check return status from the above procedure call
111: IF x_return_status = FND_API.G_RET_STS_ERROR then
112: raise FND_API.G_EXC_ERROR;
113: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
114: raise FND_API.G_EXC_UNEXPECTED_ERROR;
115: END IF;
116:
109:
110: -- Check return status from the above procedure call
111: IF x_return_status = FND_API.G_RET_STS_ERROR then
112: raise FND_API.G_EXC_ERROR;
113: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
114: raise FND_API.G_EXC_UNEXPECTED_ERROR;
115: END IF;
116:
117: --
110: -- Check return status from the above procedure call
111: IF x_return_status = FND_API.G_RET_STS_ERROR then
112: raise FND_API.G_EXC_ERROR;
113: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
114: raise FND_API.G_EXC_UNEXPECTED_ERROR;
115: END IF;
116:
117: --
118: -- End of API body.
118: -- End of API body.
119: --
120:
121: -- Standard check for p_commit
122: IF FND_API.to_Boolean( p_commit )
123: THEN
124: COMMIT WORK;
125: END IF;
126:
146: p_data => x_msg_data
147: );
148:
149: EXCEPTION
150: WHEN FND_API.G_EXC_ERROR THEN
151: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
152: P_API_NAME => L_API_NAME
153: ,P_PKG_NAME => G_PKG_NAME
154: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
156: ,X_MSG_COUNT => X_MSG_COUNT
157: ,X_MSG_DATA => X_MSG_DATA
158: ,X_RETURN_STATUS => X_RETURN_STATUS);
159:
160: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
161: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
162: P_API_NAME => L_API_NAME
163: ,P_PKG_NAME => G_PKG_NAME
164: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
183:
184: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
185: PROCEDURE Update_timeframe(
186: P_Api_Version_Number IN NUMBER,
187: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
188: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
189: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
190: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
191: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
184: -- Hint: Add corresponding update detail table procedures if it's master-detail relationship.
185: PROCEDURE Update_timeframe(
186: P_Api_Version_Number IN NUMBER,
187: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
188: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
189: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
190: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
191: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
192: P_Admin_Group_Id IN NUMBER,
185: PROCEDURE Update_timeframe(
186: P_Api_Version_Number IN NUMBER,
187: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
188: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
189: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
190: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
191: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
192: P_Admin_Group_Id IN NUMBER,
193: P_Identity_Salesforce_Id IN NUMBER,
186: P_Api_Version_Number IN NUMBER,
187: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
188: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
189: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
190: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
191: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
192: P_Admin_Group_Id IN NUMBER,
193: P_Identity_Salesforce_Id IN NUMBER,
194: P_profile_tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
187: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
188: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
189: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
190: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
191: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
192: P_Admin_Group_Id IN NUMBER,
193: P_Identity_Salesforce_Id IN NUMBER,
194: P_profile_tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
195: P_timeframe_Rec IN timeframe_Rec_Type,
206: -- Standard Start of API savepoint
207: SAVEPOINT UPDATE_TIMEFRAME_PUB;
208:
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:
219: -- Initialize message list if p_init_msg_list is set to TRUE.
216: END IF;
217:
218:
219: -- Initialize message list if p_init_msg_list is set to TRUE.
220: IF FND_API.to_Boolean( p_init_msg_list )
221: THEN
222: FND_MSG_PUB.initialize;
223: END IF;
224:
238:
239: END IF;
240:
241: -- Initialize API return status to SUCCESS
242: x_return_status := FND_API.G_RET_STS_SUCCESS;
243:
244: --
245: -- API body
246: --
248:
249:
250: AML_timeframe_PVT.Update_timeframe(
251: P_Api_Version_Number => 2.0,
252: P_Init_Msg_List => FND_API.G_FALSE,
253: P_Commit => p_commit,
254: P_Validation_Level => P_Validation_Level,
255: P_Check_Access_Flag => P_Check_Access_Flag,
256: P_Admin_Flag => P_Admin_Flag,
264:
265:
266:
267: -- Check return status from the above procedure call
268: IF x_return_status = FND_API.G_RET_STS_ERROR then
269: raise FND_API.G_EXC_ERROR;
270: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
271: raise FND_API.G_EXC_UNEXPECTED_ERROR;
272: END IF;
265:
266:
267: -- Check return status from the above procedure call
268: IF x_return_status = FND_API.G_RET_STS_ERROR then
269: raise FND_API.G_EXC_ERROR;
270: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
271: raise FND_API.G_EXC_UNEXPECTED_ERROR;
272: END IF;
273:
266:
267: -- Check return status from the above procedure call
268: IF x_return_status = FND_API.G_RET_STS_ERROR then
269: raise FND_API.G_EXC_ERROR;
270: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
271: raise FND_API.G_EXC_UNEXPECTED_ERROR;
272: END IF;
273:
274: --
267: -- Check return status from the above procedure call
268: IF x_return_status = FND_API.G_RET_STS_ERROR then
269: raise FND_API.G_EXC_ERROR;
270: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
271: raise FND_API.G_EXC_UNEXPECTED_ERROR;
272: END IF;
273:
274: --
275: -- End of API body
275: -- End of API body
276: --
277:
278: -- Standard check for p_commit
279: IF FND_API.to_Boolean( p_commit )
280: THEN
281: COMMIT WORK;
282: END IF;
283:
310: THEN
311: AS_timeframe_VUHK.Update_timeframe_Post(
312: p_api_version_number => 2.0,
313: p_validation_level => p_validation_level,
314: p_commit => FND_API.G_FALSE,
315: p_profile_tbl => p_profile_tbl,
316: p_check_access_flag => p_check_access_flag,
317: p_admin_flag => p_admin_flag,
318: p_admin_group_id => p_admin_group_id,
321: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
322: x_return_status => x_return_status,
323: x_msg_count => x_msg_count,
324: x_msg_data => x_msg_data);
325: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
326: RAISE fnd_api.g_exc_error;
327: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
328: RAISE fnd_api.g_exc_unexpected_error;
329: END IF;
322: x_return_status => x_return_status,
323: x_msg_count => x_msg_count,
324: x_msg_data => x_msg_data);
325: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
326: RAISE fnd_api.g_exc_error;
327: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
328: RAISE fnd_api.g_exc_unexpected_error;
329: END IF;
330: END IF;
323: x_msg_count => x_msg_count,
324: x_msg_data => x_msg_data);
325: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
326: RAISE fnd_api.g_exc_error;
327: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
328: RAISE fnd_api.g_exc_unexpected_error;
329: END IF;
330: END IF;
331: -- USER HOOKS standard : customer pre-processing section - mandatory
324: x_msg_data => x_msg_data);
325: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
326: RAISE fnd_api.g_exc_error;
327: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
328: RAISE fnd_api.g_exc_unexpected_error;
329: END IF;
330: END IF;
331: -- USER HOOKS standard : customer pre-processing section - mandatory
332: IF(JTF_USR_HKS.Ok_to_execute('AS_timeframe_PUB', 'Update_timeframe','A','C'))
333: THEN
334: AS_timeframe_CUHK.Update_timeframe_Pre(
335: p_api_version_number => 2.0,
336: p_validation_level => p_validation_level,
337: p_commit => FND_API.G_FALSE,
338: p_profile_tbl => p_profile_tbl,
339: p_check_access_flag => p_check_access_flag,
340: p_admin_flag => p_admin_flag,
341: p_admin_group_id => p_admin_group_id,
344: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
345: x_return_status => x_return_status,
346: x_msg_count => x_msg_count,
347: x_msg_data => x_msg_data);
348: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
349: RAISE fnd_api.g_exc_error;
350: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
351: RAISE fnd_api.g_exc_unexpected_error;
352: END IF;
345: x_return_status => x_return_status,
346: x_msg_count => x_msg_count,
347: x_msg_data => x_msg_data);
348: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
349: RAISE fnd_api.g_exc_error;
350: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
351: RAISE fnd_api.g_exc_unexpected_error;
352: END IF;
353: END IF;
346: x_msg_count => x_msg_count,
347: x_msg_data => x_msg_data);
348: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
349: RAISE fnd_api.g_exc_error;
350: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
351: RAISE fnd_api.g_exc_unexpected_error;
352: END IF;
353: END IF;
354: */
347: x_msg_data => x_msg_data);
348: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
349: RAISE fnd_api.g_exc_error;
350: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
351: RAISE fnd_api.g_exc_unexpected_error;
352: END IF;
353: END IF;
354: */
355: EXCEPTION
352: END IF;
353: END IF;
354: */
355: EXCEPTION
356: WHEN FND_API.G_EXC_ERROR THEN
357: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
358: P_API_NAME => L_API_NAME
359: ,P_PKG_NAME => G_PKG_NAME
360: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
362: ,X_MSG_COUNT => X_MSG_COUNT
363: ,X_MSG_DATA => X_MSG_DATA
364: ,X_RETURN_STATUS => X_RETURN_STATUS);
365:
366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
367: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
368: P_API_NAME => L_API_NAME
369: ,P_PKG_NAME => G_PKG_NAME
370: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
390: -- Hint: Add corresponding delete detail table procedures if it's master-detail relationship.
391: -- The Master delete procedure may not be needed depends on different business requirements.
392: PROCEDURE Delete_timeframe(
393: P_Api_Version_Number IN NUMBER,
394: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
395: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
396: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
397: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
398: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
391: -- The Master delete procedure may not be needed depends on different business requirements.
392: PROCEDURE Delete_timeframe(
393: P_Api_Version_Number IN NUMBER,
394: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
395: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
396: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
397: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
398: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
399: P_Admin_Group_Id IN NUMBER,
392: PROCEDURE Delete_timeframe(
393: P_Api_Version_Number IN NUMBER,
394: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
395: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
396: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
397: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
398: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
399: P_Admin_Group_Id IN NUMBER,
400: P_Identity_Salesforce_Id IN NUMBER,
393: P_Api_Version_Number IN NUMBER,
394: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
395: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
396: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
397: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
398: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
399: P_Admin_Group_Id IN NUMBER,
400: P_Identity_Salesforce_Id IN NUMBER,
401: P_Profile_Tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
394: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
395: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
396: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
397: P_Check_Access_Flag IN VARCHAR2 := FND_API.G_FALSE,
398: P_Admin_Flag IN VARCHAR2 := FND_API.G_FALSE,
399: P_Admin_Group_Id IN NUMBER,
400: P_Identity_Salesforce_Id IN NUMBER,
401: P_Profile_Tbl IN AS_UTILITY_PUB.PROFILE_TBL_TYPE,
402: P_timeframe_Rec IN timeframe_Rec_Type,
413: -- Standard Start of API savepoint
414: SAVEPOINT DELETE_TIMEFRAME_PUB;
415:
416: -- Standard call to check for call compatibility.
417: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
418: p_api_version_number,
419: l_api_name,
420: G_PKG_NAME)
421: THEN
418: p_api_version_number,
419: l_api_name,
420: G_PKG_NAME)
421: THEN
422: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
423: END IF;
424:
425:
426: -- Initialize message list if p_init_msg_list is set to TRUE.
423: END IF;
424:
425:
426: -- Initialize message list if p_init_msg_list is set to TRUE.
427: IF FND_API.to_Boolean( p_init_msg_list )
428: THEN
429: FND_MSG_PUB.initialize;
430: END IF;
431:
445:
446: END IF;
447:
448: -- Initialize API return status to SUCCESS
449: x_return_status := FND_API.G_RET_STS_SUCCESS;
450:
451: --
452: -- API body
453: --
455: l_pvt_timeframe_rec := p_timeframe_rec;
456:
457: AML_timeframe_PVT.Delete_timeframe(
458: P_Api_Version_Number => 2.0,
459: P_Init_Msg_List => FND_API.G_FALSE,
460: P_Commit => p_commit,
461: P_Validation_Level => p_Validation_Level,
462: P_Check_Access_Flag => P_Check_Access_Flag,
463: P_Admin_Flag => P_Admin_Flag,
476: THEN
477: AS_timeframe_CUHK.Delete_timeframe_Pre(
478: p_api_version_number => 2.0,
479: p_validation_level => p_validation_level,
480: p_commit => FND_API.G_FALSE,
481: p_profile_tbl => p_profile_tbl,
482: p_check_access_flag => p_check_access_flag,
483: p_admin_flag => p_admin_flag,
484: p_admin_group_id => p_admin_group_id,
487: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
488: x_return_status => x_return_status,
489: x_msg_count => x_msg_count,
490: x_msg_data => x_msg_data);
491: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
492: RAISE fnd_api.g_exc_error;
493: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
494: RAISE fnd_api.g_exc_unexpected_error;
495: END IF;
488: x_return_status => x_return_status,
489: x_msg_count => x_msg_count,
490: x_msg_data => x_msg_data);
491: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
492: RAISE fnd_api.g_exc_error;
493: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
494: RAISE fnd_api.g_exc_unexpected_error;
495: END IF;
496: END IF;
489: x_msg_count => x_msg_count,
490: x_msg_data => x_msg_data);
491: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
492: RAISE fnd_api.g_exc_error;
493: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
494: RAISE fnd_api.g_exc_unexpected_error;
495: END IF;
496: END IF;
497: -- USER HOOKS standard : vertical industry pre-processing section - mandatory
490: x_msg_data => x_msg_data);
491: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
492: RAISE fnd_api.g_exc_error;
493: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
494: RAISE fnd_api.g_exc_unexpected_error;
495: END IF;
496: END IF;
497: -- USER HOOKS standard : vertical industry pre-processing section - mandatory
498: IF(JTF_USR_HKS.Ok_to_execute('AS_timeframe_PUB', 'Delete_timeframe','B','V'))
499: THEN
500: AS_timeframe_VUHK.Delete_timeframe_Pre(
501: p_api_version_number => 2.0,
502: p_validation_level => p_validation_level,
503: p_commit => FND_API.G_FALSE,
504: p_profile_tbl => p_profile_tbl,
505: p_check_access_flag => p_check_access_flag,
506: p_admin_flag => p_admin_flag,
507: p_admin_group_id => p_admin_group_id,
510: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
511: x_return_status => x_return_status,
512: x_msg_count => x_msg_count,
513: x_msg_data => x_msg_data);
514: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
515: RAISE fnd_api.g_exc_error;
516: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
517: RAISE fnd_api.g_exc_unexpected_error;
518: END IF;
511: x_return_status => x_return_status,
512: x_msg_count => x_msg_count,
513: x_msg_data => x_msg_data);
514: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
515: RAISE fnd_api.g_exc_error;
516: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
517: RAISE fnd_api.g_exc_unexpected_error;
518: END IF;
519: */
512: x_msg_count => x_msg_count,
513: x_msg_data => x_msg_data);
514: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
515: RAISE fnd_api.g_exc_error;
516: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
517: RAISE fnd_api.g_exc_unexpected_error;
518: END IF;
519: */
520:
513: x_msg_data => x_msg_data);
514: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
515: RAISE fnd_api.g_exc_error;
516: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
517: RAISE fnd_api.g_exc_unexpected_error;
518: END IF;
519: */
520:
521:
520:
521:
522:
523: -- Check return status from the above procedure call
524: IF x_return_status = FND_API.G_RET_STS_ERROR then
525: raise FND_API.G_EXC_ERROR;
526: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
527: raise FND_API.G_EXC_UNEXPECTED_ERROR;
528: END IF;
521:
522:
523: -- Check return status from the above procedure call
524: IF x_return_status = FND_API.G_RET_STS_ERROR then
525: raise FND_API.G_EXC_ERROR;
526: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
527: raise FND_API.G_EXC_UNEXPECTED_ERROR;
528: END IF;
529:
522:
523: -- Check return status from the above procedure call
524: IF x_return_status = FND_API.G_RET_STS_ERROR then
525: raise FND_API.G_EXC_ERROR;
526: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
527: raise FND_API.G_EXC_UNEXPECTED_ERROR;
528: END IF;
529:
530: --
523: -- Check return status from the above procedure call
524: IF x_return_status = FND_API.G_RET_STS_ERROR then
525: raise FND_API.G_EXC_ERROR;
526: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
527: raise FND_API.G_EXC_UNEXPECTED_ERROR;
528: END IF;
529:
530: --
531: -- End of API body
531: -- End of API body
532: --
533:
534: -- Standard check for p_commit
535: IF FND_API.to_Boolean( p_commit )
536: THEN
537: COMMIT WORK;
538: END IF;
539:
566: THEN
567: AS_timeframe_VUHK.Delete_timeframe_Post(
568: p_api_version_number => 2.0,
569: p_validation_level => p_validation_level,
570: p_commit => FND_API.G_FALSE,
571: p_profile_tbl => p_profile_tbl,
572: p_check_access_flag => p_check_access_flag,
573: p_admin_flag => p_admin_flag,
574: p_admin_group_id => p_admin_group_id,
577: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
578: x_return_status => x_return_status,
579: x_msg_count => x_msg_count,
580: x_msg_data => x_msg_data);
581: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
582: RAISE fnd_api.g_exc_error;
583: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
584: RAISE fnd_api.g_exc_unexpected_error;
585: END IF;
578: x_return_status => x_return_status,
579: x_msg_count => x_msg_count,
580: x_msg_data => x_msg_data);
581: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
582: RAISE fnd_api.g_exc_error;
583: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
584: RAISE fnd_api.g_exc_unexpected_error;
585: END IF;
586: END IF;
579: x_msg_count => x_msg_count,
580: x_msg_data => x_msg_data);
581: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
582: RAISE fnd_api.g_exc_error;
583: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
584: RAISE fnd_api.g_exc_unexpected_error;
585: END IF;
586: END IF;
587: -- USER HOOKS standard : customer pre-processing section - mandatory
580: x_msg_data => x_msg_data);
581: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
582: RAISE fnd_api.g_exc_error;
583: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
584: RAISE fnd_api.g_exc_unexpected_error;
585: END IF;
586: END IF;
587: -- USER HOOKS standard : customer pre-processing section - mandatory
588: IF(JTF_USR_HKS.Ok_to_execute('AS_timeframe_PUB', 'Delete_timeframe','A','C'))
589: THEN
590: AS_timeframe_CUHK.Delete_timeframe_Pre(
591: p_api_version_number => 2.0,
592: p_validation_level => p_validation_level,
593: p_commit => FND_API.G_FALSE,
594: p_profile_tbl => p_profile_tbl,
595: p_check_access_flag => p_check_access_flag,
596: p_admin_flag => p_admin_flag,
597: p_admin_group_id => p_admin_group_id,
600: -- Hint: Add detail tables as parameter lists if it's master-detail relationship.
601: x_return_status => x_return_status,
602: x_msg_count => x_msg_count,
603: x_msg_data => x_msg_data);
604: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
605: RAISE fnd_api.g_exc_error;
606: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
607: RAISE fnd_api.g_exc_unexpected_error;
608: END IF;
601: x_return_status => x_return_status,
602: x_msg_count => x_msg_count,
603: x_msg_data => x_msg_data);
604: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
605: RAISE fnd_api.g_exc_error;
606: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
607: RAISE fnd_api.g_exc_unexpected_error;
608: END IF;
609: END IF;
602: x_msg_count => x_msg_count,
603: x_msg_data => x_msg_data);
604: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
605: RAISE fnd_api.g_exc_error;
606: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
607: RAISE fnd_api.g_exc_unexpected_error;
608: END IF;
609: END IF;
610: */
603: x_msg_data => x_msg_data);
604: IF (x_return_status = fnd_api.g_ret_sts_error) THEN
605: RAISE fnd_api.g_exc_error;
606: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
607: RAISE fnd_api.g_exc_unexpected_error;
608: END IF;
609: END IF;
610: */
611: EXCEPTION
608: END IF;
609: END IF;
610: */
611: EXCEPTION
612: WHEN FND_API.G_EXC_ERROR THEN
613: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
614: P_API_NAME => L_API_NAME
615: ,P_PKG_NAME => G_PKG_NAME
616: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
618: ,X_MSG_COUNT => X_MSG_COUNT
619: ,X_MSG_DATA => X_MSG_DATA
620: ,X_RETURN_STATUS => X_RETURN_STATUS);
621:
622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
623: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
624: P_API_NAME => L_API_NAME
625: ,P_PKG_NAME => G_PKG_NAME
626: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
645:
646: /*
647: PROCEDURE Get_timeframe(
648: P_Api_Version_Number IN NUMBER,
649: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
650: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
651: P_Admin_Group_id IN NUMBER,
652: P_identity_salesforce_id IN NUMBER := NULL,
653: P_timeframe_Rec IN timeframe_Rec_Type,
646: /*
647: PROCEDURE Get_timeframe(
648: P_Api_Version_Number IN NUMBER,
649: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
650: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
651: P_Admin_Group_id IN NUMBER,
652: P_identity_salesforce_id IN NUMBER := NULL,
653: P_timeframe_Rec IN timeframe_Rec_Type,
654: -- Hint: Add list of bind variables here
653: P_timeframe_Rec IN timeframe_Rec_Type,
654: -- Hint: Add list of bind variables here
655: p_rec_requested IN NUMBER := G_DEFAULT_NUM_REC_FETCH,
656: p_start_rec_prt IN NUMBER := 1,
657: p_return_tot_count IN NUMBER := FND_API.G_FALSE,
658: -- Hint: user defined record type
659: p_order_by_rec IN AML_timeframe_PUB.timeframe_sort_rec_type,
660: x_return_status OUT NOCOPY VARCHAR2,
661: x_msg_count OUT NOCOPY NUMBER,
675: -- Standard Start of API savepoint
676: SAVEPOINT GET_TIMEFRAME_PUB;
677:
678: -- Standard call to check for call compatibility.
679: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
680: p_api_version_number,
681: l_api_name,
682: G_PKG_NAME)
683: THEN
680: p_api_version_number,
681: l_api_name,
682: G_PKG_NAME)
683: THEN
684: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
685: END IF;
686:
687:
688: -- Initialize message list if p_init_msg_list is set to TRUE.
685: END IF;
686:
687:
688: -- Initialize message list if p_init_msg_list is set to TRUE.
689: IF FND_API.to_Boolean( p_init_msg_list )
690: THEN
691: FND_MSG_PUB.initialize;
692: END IF;
693:
707:
708: END IF;
709:
710: -- Initialize API return status to SUCCESS
711: x_return_status := FND_API.G_RET_STS_SUCCESS;
712:
713: --
714: -- API body
715: --
720: 'Public API: - Calling PVT.Get_TIMEFRAME');
721: END IF;
722: AML_timeframe_PVT.Get_timeframe(
723: P_Api_Version_Number => 2.0,
724: P_Init_Msg_List => FND_API.G_FALSE,
725: p_validation_level => p_validation_level,
726: P_Identity_Salesforce_id => p_identity_salesforce_id,
727: P_timeframe_Rec => P_timeframe_Rec,
728: p_rec_requested => p_rec_requested,
743:
744:
745:
746: -- Check return status from the above procedure call
747: IF x_return_status = FND_API.G_RET_STS_ERROR then
748: raise FND_API.G_EXC_ERROR;
749: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
750: raise FND_API.G_EXC_UNEXPECTED_ERROR;
751: END IF;
744:
745:
746: -- Check return status from the above procedure call
747: IF x_return_status = FND_API.G_RET_STS_ERROR then
748: raise FND_API.G_EXC_ERROR;
749: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
750: raise FND_API.G_EXC_UNEXPECTED_ERROR;
751: END IF;
752:
745:
746: -- Check return status from the above procedure call
747: IF x_return_status = FND_API.G_RET_STS_ERROR then
748: raise FND_API.G_EXC_ERROR;
749: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
750: raise FND_API.G_EXC_UNEXPECTED_ERROR;
751: END IF;
752:
753: --
746: -- Check return status from the above procedure call
747: IF x_return_status = FND_API.G_RET_STS_ERROR then
748: raise FND_API.G_EXC_ERROR;
749: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
750: raise FND_API.G_EXC_UNEXPECTED_ERROR;
751: END IF;
752:
753: --
754: -- End of API body
775: p_data => x_msg_data
776: );
777:
778: EXCEPTION
779: WHEN FND_API.G_EXC_ERROR THEN
780: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
781: P_API_NAME => L_API_NAME
782: ,P_PKG_NAME => G_PKG_NAME
783: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
785: ,X_MSG_COUNT => X_MSG_COUNT
786: ,X_MSG_DATA => X_MSG_DATA
787: ,X_RETURN_STATUS => X_RETURN_STATUS);
788:
789: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
790: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
791: P_API_NAME => L_API_NAME
792: ,P_PKG_NAME => G_PKG_NAME
793: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR