[Home] [Help]
38:
39: p_result := 0;
40:
41:
42: insert into pon_forms_sections_tl(FORM_ID,
43: FORM_NAME,
44: FORM_DESCRIPTION ,
45: TIP_TEXT,
46: CUSTOMIZED_FLAG ,
112: ', p_language = ' || p_language);
113:
114: p_result := 0;
115:
116: update pon_forms_sections_tl
117: set
118: form_name = p_name,
119: form_description = p_description,
120: tip_text = p_tip_text,
146: 2. p_result - 0-> success 1-> failure
147: 3. p_err_code - The error code if applicable
148: 4. p_err_msg - The error message if applicable
149: COMMENT : This procedure will delete all the rows in the
150: PON_FORMS_SECTIONS_TL table corresponding to the
151: form with the id as p_form_id
152: ======================================================================*/
153: PROCEDURE delete_forms_sections(p_form_id IN NUMBER,
154: p_result OUT NOCOPY NUMBER,
162: PON_FORMS_UTIL_PVT.print_debug_log (l_api_name, 'BEGIN: p_form_id = ' || p_form_id);
163:
164: p_result := 0;
165:
166: delete from pon_forms_sections_tl where form_id=p_form_id;
167:
168: PON_FORMS_UTIL_PVT.print_debug_log (l_api_name, 'END');
169:
170: EXCEPTION
186: PROCEDURE add_language IS
187:
188: begin
189:
190: INSERT INTO PON_FORMS_SECTIONS_TL (
191: FORM_ID,
192: FORM_NAME,
193: FORM_DESCRIPTION,
194: CUSTOMIZED_FLAG,
213: sysdate,
214: pfs.LAST_UPDATED_BY,
215: sysdate,
216: pfs.LAST_UPDATE_LOGIN
217: FROM PON_FORMS_SECTIONS_TL pfs, FND_LANGUAGES lang
218: WHERE pfs.language = USERENV('LANG')
219: AND lang.INSTALLED_FLAG in ('I','B')
220: AND NOT EXISTS (SELECT 'x' FROM PON_FORMS_SECTIONS_TL pfs2
221: WHERE pfs2.FORM_ID = pfs.FORM_ID
216: pfs.LAST_UPDATE_LOGIN
217: FROM PON_FORMS_SECTIONS_TL pfs, FND_LANGUAGES lang
218: WHERE pfs.language = USERENV('LANG')
219: AND lang.INSTALLED_FLAG in ('I','B')
220: AND NOT EXISTS (SELECT 'x' FROM PON_FORMS_SECTIONS_TL pfs2
221: WHERE pfs2.FORM_ID = pfs.FORM_ID
222: AND pfs2.language = lang.language_code);
223:
224: