1: PACKAGE BODY fnd_appfldr AS
2: /* $Header: AFFLDRB.pls 120.1 2005/07/02 04:06:47 appldev ship $ */
3:
4:
5: FUNCTION insert_fnd_folders (l_object VARCHAR2,
6: l_name VARCHAR2,
7: l_language VARCHAR2,
8: l_window_width NUMBER,
9: l_public_flag VARCHAR2,
15: PRAGMA AUTONOMOUS_TRANSACTION;
16:
17: l_folder_id number;
18: cursor next_folder_id is
19: select fnd_folders_s.nextval
20: from dual;
21:
22: BEGIN
23: --
26: open next_folder_id;
27: fetch next_folder_id into l_folder_id;
28: close next_folder_id;
29: --
30: insert into fnd_folders(
31: folder_id,
32: object,
33: name,
34: language,
59: l_order_by);
60:
61: COMMIT;
62: return l_folder_id;
63: END insert_fnd_folders;
64:
65:
66: PROCEDURE insert_fnd_folder_columns (l_folder_id NUMBER,
67: l_display_mode VARCHAR2,
137: COMMIT;
138: END insert_fnd_default_folders;
139:
140:
141: PROCEDURE update_fnd_folders (l_folder_id NUMBER,
142: l_name VARCHAR2,
143: l_window_width NUMBER,
144: l_public_flag VARCHAR2,
145: l_autoquery_flag VARCHAR2,
148: l_where_clause VARCHAR2,
149: l_order_by VARCHAR2) IS
150: PRAGMA AUTONOMOUS_TRANSACTION;
151: BEGIN
152: update fnd_folders
153: set
154: name = l_name,
155: window_width = l_window_width,
156: public_flag = l_public_flag,
165: where
166: folder_id = l_folder_id;
167:
168: COMMIT;
169: END update_fnd_folders;
170:
171:
172: PROCEDURE delete_fnd_default_folders(l_object VARCHAR2,
173: l_user_id NUMBER,
177: DELETE from fnd_default_folders fdf
178: WHERE object = l_object
179: and user_id = l_user_id
180: and exists (select null
181: from fnd_folders ff
182: where fdf.folder_id = ff.folder_id
183: and ff.language = l_language);
184:
185: commit;
205: commit;
206: END delete_fnd_folder_columns;
207:
208:
209: PROCEDURE delete_fnd_folders (l_folder_id NUMBER) is
210: PRAGMA AUTONOMOUS_TRANSACTION;
211: BEGIN
212: DELETE from fnd_folders
213: WHERE folder_id = l_folder_id;
208:
209: PROCEDURE delete_fnd_folders (l_folder_id NUMBER) is
210: PRAGMA AUTONOMOUS_TRANSACTION;
211: BEGIN
212: DELETE from fnd_folders
213: WHERE folder_id = l_folder_id;
214:
215: commit;
216: END delete_fnd_folders;
212: DELETE from fnd_folders
213: WHERE folder_id = l_folder_id;
214:
215: commit;
216: END delete_fnd_folders;
217:
218: END fnd_appfldr;