[Home] [Help]
1: PACKAGE BODY CAC_SR_OBJECT_CAPACITY_PUB AS
2: /* $Header: cacsrocpb.pls 120.1 2005/07/02 02:18:34 appldev noship $ */
3:
4: -- package identification
5: g_pkg_name constant varchar2(30) := 'CAC_SR_OBJECT_CAPACITY_PUB';
1: PACKAGE BODY CAC_SR_OBJECT_CAPACITY_PUB AS
2: /* $Header: cacsrocpb.pls 120.1 2005/07/02 02:18:34 appldev noship $ */
3:
4: -- package identification
5: g_pkg_name constant varchar2(30) := 'CAC_SR_OBJECT_CAPACITY_PUB';
6: g_default_capacity_status constant number := 1;
7:
8: /*******************************************************************************
9: ** Private APIs
12: FUNCTION get_new_object_capacity_id
13: /*******************************************************************************
14: ** get_new_object_capacity_id
15: **
16: ** This API returns the next value of the sequence cac_sr_object_capacity_s
17: **
18: *******************************************************************************/
19: RETURN NUMBER IS
20:
18: *******************************************************************************/
19: RETURN NUMBER IS
20:
21: CURSOR get_object_capacity_id IS
22: SELECT cac_sr_object_capacity_s.nextval
23: FROM dual;
24:
25: l_return NUMBER;
26:
74: ** generate_object_capacity
75: **
76: ** This API calls JTF_CALENDAR_PUB_24HR.Get_Resource_Shifts API and builds the
77: ** pl/sql table with object capacity records. It populates object_capacity_id
78: ** for each record with the sequence cac_sr_object_capacity_s value if the
79: ** parameter p_PopulateID is 'T'.
80: ** It will return a list of tasks also if the p_FetchTasks parameter is set to
81: ** true. This is needed only if you want to fetch all the tasks at one shot as
82: ** it will be more performant than fetching tasks for each object capacity
321: PROCEDURE insert_object_capacity
322: /*******************************************************************************
323: ** insert_object_capacity
324: **
325: ** This API calls table handler to insert data into cac_sr_object_capacity
326: ** using pl/sql table passed. It populates object_capacity_id for each record
327: ** if with the sequence cac_sr_object_capacity_s value if it is NULL in the
328: ** record.
329: ** It updates the task assignment with the corresponding object_capacity_id
323: ** insert_object_capacity
324: **
325: ** This API calls table handler to insert data into cac_sr_object_capacity
326: ** using pl/sql table passed. It populates object_capacity_id for each record
327: ** if with the sequence cac_sr_object_capacity_s value if it is NULL in the
328: ** record.
329: ** It updates the task assignment with the corresponding object_capacity_id
330: ** if the p_Update_Tasks parameter is set to 'T'.
331: **
395: p_Object_Capacity(l_idx).STATUS := g_default_capacity_status;
396: END IF;
397: p_Object_Capacity(l_idx).OBJECT_VERSION_NUMBER := 1;
398: -- call the table handler to insert data
399: CAC_SR_OBJECT_CAPACITY_PKG.INSERT_ROW
400: (
401: X_ROWID => l_rowid,
402: X_OBJECT_CAPACITY_ID => p_Object_Capacity(l_idx).OBJECT_CAPACITY_ID,
403: X_OBJECT_VERSION_NUMBER => p_Object_Capacity(l_idx).OBJECT_VERSION_NUMBER,
496: PROCEDURE update_object_capacity
497: /*******************************************************************************
498: ** update_object_capacity
499: **
500: ** This API calls table handler to update data into cac_sr_object_capacity.
501: ** Only the available hours fields and status can be updated.
502: **
503: *******************************************************************************/
504: ( p_api_version IN NUMBER -- API version you coded against
536: AVAILABLE_HOURS_BEFORE,
537: AVAILABLE_HOURS_AFTER,
538: SCHEDULE_DETAIL_ID,
539: STATUS
540: FROM CAC_SR_OBJECT_CAPACITY
541: WHERE OBJECT_CAPACITY_ID = b_object_capacity_id
542: FOR UPDATE OF OBJECT_CAPACITY_ID NOWAIT;
543:
544: l_api_name constant varchar2(30) := 'UPDATE_OBJECT_CAPACITY';
644: l_user := FND_GLOBAL.USER_ID;
645: l_login := FND_GLOBAL.LOGIN_ID;
646:
647: -- call the table handler to update data
648: CAC_SR_OBJECT_CAPACITY_PKG.UPDATE_ROW
649: (
650: X_OBJECT_CAPACITY_ID => l_Object_Capacity.OBJECT_CAPACITY_ID,
651: X_OBJECT_VERSION_NUMBER => l_Object_Capacity.OBJECT_VERSION_NUMBER,
652: X_OBJECT_TYPE => l_Object_Capacity.OBJECT_TYPE,
703: PROCEDURE delete_object_capacity
704: /*******************************************************************************
705: ** delete_object_capacity
706: **
707: ** This API calls table handler to delete data from cac_sr_object_capacity.
708: ** It will also update the task assignments and remove the object capacity id
709: ** if the p_update_tasks is true
710: **
711: *******************************************************************************/
726: (
727: b_object_capacity_id NUMBER
728: ) IS SELECT
729: OBJECT_VERSION_NUMBER
730: FROM CAC_SR_OBJECT_CAPACITY
731: WHERE OBJECT_CAPACITY_ID = b_object_capacity_id
732: FOR UPDATE OF OBJECT_CAPACITY_ID NOWAIT;
733:
734: CURSOR c_tasks
822: END LOOP;
823: END IF;
824:
825: -- call the table handler to delete data
826: CAC_SR_OBJECT_CAPACITY_PKG.DELETE_ROW
827: (
828: X_OBJECT_CAPACITY_ID => p_object_capacity_id
829: );
830:
944:
945: END build_object_capacity;
946:
947:
948: END CAC_SR_OBJECT_CAPACITY_PUB;