36: p_web_portlet VARCHAR2(1000);
37:
38: BEGIN
39:
40: SELECT FND_FORM_FUNCTIONS_S.nextval
41: INTO x_fid
42: FROM sys.dual;
43:
44: p_web_portlet := 'OA.jsp?akRegionCode=BIS_PMF_PORTLET_TABLE_LAYOUT&akRegionApplicationId=191';
44: p_web_portlet := 'OA.jsp?akRegionCode=BIS_PMF_PORTLET_TABLE_LAYOUT&akRegionApplicationId=191';
45:
46:
47:
48: FND_FORM_FUNCTIONS_PKG.INSERT_ROW
49: ( X_ROWID => x_rowid
50: ,X_FUNCTION_ID => x_fid
51: ,X_WEB_HOST_NAME => ''
52: ,X_WEB_AGENT_NAME => ''
93: BEGIN
94:
95: --params := 'pXMLDefinition=' || p_parameters;
96:
97: UPDATE fnd_form_functions
98: SET function_name = p_function_name,
99: parameters = p_parameters
100: WHERE function_id = p_function_id;
101:
99: parameters = p_parameters
100: WHERE function_id = p_function_id;
101:
102:
103: UPDATE fnd_form_functions_tl
104: SET user_function_name = p_user_function_name,
105: description = p_description
106: WHERE function_id = p_function_id;
107:
117: fid NUMBER;
118:
119: BEGIN
120:
121: UPDATE fnd_form_functions_vl
122: SET parameters = p_parameters,
123: user_function_name = p_user_function_name
124: WHERE function_name = p_function_short_name;
125:
124: WHERE function_name = p_function_short_name;
125:
126:
127: SELECT function_id INTO fid
128: FROM fnd_form_functions_vl
129: WHERE function_name = p_function_short_name;
130:
131: UPDATE fnd_form_functions_tl
132: SET user_function_name = p_user_function_name
127: SELECT function_id INTO fid
128: FROM fnd_form_functions_vl
129: WHERE function_name = p_function_short_name;
130:
131: UPDATE fnd_form_functions_tl
132: SET user_function_name = p_user_function_name
133: WHERE function_id = fid;
134:
135:
141: ( p_function_name IN VARCHAR2
142: , x_return_status OUT NOCOPY VARCHAR2
143: )
144: IS
145: l_function_id fnd_form_functions.function_id%TYPE;
146: l_created_by fnd_form_functions.created_by%TYPE;
147: l_seed_user fnd_form_functions.created_by%TYPE;
148:
149: l_menu_id fnd_menu_entries.menu_id%TYPE;
142: , x_return_status OUT NOCOPY VARCHAR2
143: )
144: IS
145: l_function_id fnd_form_functions.function_id%TYPE;
146: l_created_by fnd_form_functions.created_by%TYPE;
147: l_seed_user fnd_form_functions.created_by%TYPE;
148:
149: l_menu_id fnd_menu_entries.menu_id%TYPE;
150: l_entry_sequence fnd_menu_entries.entry_sequence%TYPE;
143: )
144: IS
145: l_function_id fnd_form_functions.function_id%TYPE;
146: l_created_by fnd_form_functions.created_by%TYPE;
147: l_seed_user fnd_form_functions.created_by%TYPE;
148:
149: l_menu_id fnd_menu_entries.menu_id%TYPE;
150: l_entry_sequence fnd_menu_entries.entry_sequence%TYPE;
151:
150: l_entry_sequence fnd_menu_entries.entry_sequence%TYPE;
151:
152: CURSOR function_id_crsr IS
153: SELECT function_id, created_by
154: FROM fnd_form_functions
155: WHERE function_name = p_function_name;
156:
157: CURSOR menu_crsr (p_function_id fnd_menu_entries.function_id%TYPE) IS
158: SELECT menu_id, entry_sequence
174: IF (l_created_by = l_seed_user) THEN /* CRUDE Assumption here that for all seeded data created_by = 1*/
175: --THE FUNCTION WAS SEEDED
176: x_return_status := 'ISSEED';
177: ELSE
178: DELETE FROM fnd_form_functions where function_name = p_function_name;
179: DELETE FROM fnd_form_functions_tl where function_id = l_function_id;
180: END IF;
181:
182: /* Also delete the menu entries corresponding to this function */
175: --THE FUNCTION WAS SEEDED
176: x_return_status := 'ISSEED';
177: ELSE
178: DELETE FROM fnd_form_functions where function_name = p_function_name;
179: DELETE FROM fnd_form_functions_tl where function_id = l_function_id;
180: END IF;
181:
182: /* Also delete the menu entries corresponding to this function */
183: OPEN menu_crsr(l_function_id);