7: | PROCEDURE freeze_worksheet
8: |
9: | DESCRIPTION
10: | Procedure freezes the worksheet with the specified object_id in
11: | ZPB_DC_OBJECTS table.
12: |
13: | NOTE: FND context has to be initialized before calling this API.
14: |
15: +=========================================================================*/
21: )
22: IS
23: l_api_name CONSTANT VARCHAR2(30) := 'freeze_worksheet';
24: l_return_status VARCHAR2(1) ;
25: l_prior_lock_status ZPB_DC_OBJECTS.STATUS%type ;
26:
27: BEGIN
28:
29: -- get the status of the worksheet
28:
29: -- get the status of the worksheet
30: SELECT status
31: INTO l_prior_lock_status
32: FROM ZPB_DC_OBJECTS
33: WHERE object_id = p_object_id;
34:
35: UPDATE ZPB_DC_OBJECTS
36: SET status = 'LOCKED',
31: INTO l_prior_lock_status
32: FROM ZPB_DC_OBJECTS
33: WHERE object_id = p_object_id;
34:
35: UPDATE ZPB_DC_OBJECTS
36: SET status = 'LOCKED',
37: prior_lock_status = l_prior_lock_status,
38: freeze_flag = 'Y',
39: --who columns
70: | PROCEDURE unfreeze_worksheet
71: |
72: | DESCRIPTION
73: | Procedure unfreezes the worksheet with the specified object_id in
74: | ZPB_DC_OBJECTS table.
75: |
76: | NOTE: FND context has to be initialized before calling this API
77: |
78: +=========================================================================*/
85: )
86: IS
87: l_api_name CONSTANT VARCHAR2(30) := 'unfreeze_worksheet';
88: l_return_status VARCHAR2(1) ;
89: l_prior_lock_status ZPB_DC_OBJECTS.PRIOR_LOCK_STATUS%type ;
90:
91: BEGIN
92:
93: -- get the previous status of the the worksheet
92:
93: -- get the previous status of the the worksheet
94: SELECT prior_lock_status
95: INTO l_prior_lock_status
96: FROM ZPB_DC_OBJECTS
97: WHERE object_id = p_object_id;
98:
99: UPDATE ZPB_DC_OBJECTS
100: SET status = l_prior_lock_status,
95: INTO l_prior_lock_status
96: FROM ZPB_DC_OBJECTS
97: WHERE object_id = p_object_id;
98:
99: UPDATE ZPB_DC_OBJECTS
100: SET status = l_prior_lock_status,
101: freeze_flag = 'N',
102: --who columns
103: last_updated_by = fnd_global.USER_ID,
133: | PROCEDURE refresh_worksheet
134: |
135: | DESCRIPTION
136: | Procedure set the worksheet with the specified object_id
137: | for refresh from shared in ZPB_DC_OBJECTS table.
138: |
139: | NOTE: FND context has to be initialized before calling this API
140: |
141: +=========================================================================*/
153:
154:
155: BEGIN
156:
157: UPDATE ZPB_DC_OBJECTS
158: SET status = 'DISTRIBUTION_PENDING',
159: freeze_flag = 'N',
160: distributor_user_id = -100,
161: --who columns