104: --
105: ------< Validate parameters >------
106: --
107: IF p_view_name IS NULL THEN
108: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
109: fnd_message.raise_error;
110: END IF;
111: --
112: IF p_form_name <> 'LETTER' AND p_form_name <> 'GENERAL' THEN
105: ------< Validate parameters >------
106: --
107: IF p_view_name IS NULL THEN
108: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
109: fnd_message.raise_error;
110: END IF;
111: --
112: IF p_form_name <> 'LETTER' AND p_form_name <> 'GENERAL' THEN
113: --Check Form Name exists
119: p_form_name || '''';
120: FETCH csr_int INTO l_igr_csr_id;
121: IF csr_int%NOTFOUND THEN
122: --invalid form name supplied
123: fnd_message.set_name('PER','PER_289922_INVAL_FM_NAME');
124: fnd_message.raise_error;
125: END IF;
126: END IF;
127: --
120: FETCH csr_int INTO l_igr_csr_id;
121: IF csr_int%NOTFOUND THEN
122: --invalid form name supplied
123: fnd_message.set_name('PER','PER_289922_INVAL_FM_NAME');
124: fnd_message.raise_error;
125: END IF;
126: END IF;
127: --
128: --Check Application ID
134: p_application_id;
135: FETCH csr_int INTO l_igr_csr_id;
136: IF csr_int%NOTFOUND THEN
137: --invalid form name supplied
138: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
139: fnd_message.raise_error;
140: END IF;
141: --
142: --Check integrator_user_name
135: FETCH csr_int INTO l_igr_csr_id;
136: IF csr_int%NOTFOUND THEN
137: --invalid form name supplied
138: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
139: fnd_message.raise_error;
140: END IF;
141: --
142: --Check integrator_user_name
143: l_bne_value := 'bne_integrators_tl';
148: p_integrator_user_name ||'''';
149: FETCH csr_int INTO l_igr_csr_id;
150: IF csr_int%FOUND THEN
151: --invalid form name supplied
152: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
153: fnd_message.raise_error;
154: END IF;
155: --
156: ---------< Create MetaData >-------
149: FETCH csr_int INTO l_igr_csr_id;
150: IF csr_int%FOUND THEN
151: --invalid form name supplied
152: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
153: fnd_message.raise_error;
154: END IF;
155: --
156: ---------< Create MetaData >-------
157: --
181: --
182: FETCH csr_int INTO l_igr_csr_id;
183: IF csr_int%FOUND THEN
184: CLOSE csr_int;
185: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
186: fnd_message.raise_error;
187: END IF;
188: CLOSE csr_int;
189: --
182: FETCH csr_int INTO l_igr_csr_id;
183: IF csr_int%FOUND THEN
184: CLOSE csr_int;
185: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
186: fnd_message.raise_error;
187: END IF;
188: CLOSE csr_int;
189: --
190: l_bne_value := 'bne_integrator_utils.create_integrator_no_content';
214: --
215: FETCH csr_int INTO l_igr_csr_id;
216: IF csr_int%NOTFOUND THEN
217: CLOSE csr_int;
218: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
219: fnd_message.raise_error;
220: /*ELSE
221: set_new_session_flag
222: (p_application_id => p_application_id
215: FETCH csr_int INTO l_igr_csr_id;
216: IF csr_int%NOTFOUND THEN
217: CLOSE csr_int;
218: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
219: fnd_message.raise_error;
220: /*ELSE
221: set_new_session_flag
222: (p_application_id => p_application_id
223: ,p_integrator_code => l_integrator_code);*/
254:
255: FETCH csr_int INTO l_igr_csr_id;
256: IF csr_int%NOTFOUND THEN
257: CLOSE csr_int;
258: fnd_message.set_name('PER','PER_289865_ADI_CONTENT_FAIL');
259: fnd_message.raise_error;
260: END IF;
261: CLOSE csr_int;
262: --
255: FETCH csr_int INTO l_igr_csr_id;
256: IF csr_int%NOTFOUND THEN
257: CLOSE csr_int;
258: fnd_message.set_name('PER','PER_289865_ADI_CONTENT_FAIL');
259: fnd_message.raise_error;
260: END IF;
261: CLOSE csr_int;
262: --
263: -- STEP 3. Create Content Columns
285: ' application_id = '|| p_application_id;
286: FETCH csr_int INTO l_num_columns;
287: IF l_num_columns <1 THEN
288: CLOSE csr_int;
289: fnd_message.set_name('PER','PER_289866_ADI_CONT_COL_FAIL');
290: fnd_message.raise_error;
291: END IF;
292: CLOSE csr_int;
293: --
286: FETCH csr_int INTO l_num_columns;
287: IF l_num_columns <1 THEN
288: CLOSE csr_int;
289: fnd_message.set_name('PER','PER_289866_ADI_CONT_COL_FAIL');
290: fnd_message.raise_error;
291: END IF;
292: CLOSE csr_int;
293: --
294: -- Step 4. Enable content for reporting
324: p_application_id || ')';
325: FETCH csr_int INTO l_num_content;
326: IF l_num_content <> l_num_columns THEN
327: CLOSE csr_int;
328: fnd_message.set_name('PER','PER_289867_ADI_CONT_ENABL_FAIL');
329: fnd_message.raise_error;
330: END IF;
331: CLOSE csr_int;
332: --check mapping code
325: FETCH csr_int INTO l_num_content;
326: IF l_num_content <> l_num_columns THEN
327: CLOSE csr_int;
328: fnd_message.set_name('PER','PER_289867_ADI_CONT_ENABL_FAIL');
329: fnd_message.raise_error;
330: END IF;
331: CLOSE csr_int;
332: --check mapping code
333: l_bne_value := 'bne_mappings_b';
340: p_application_id;
341: FETCH csr_int INTO l_igr_csr_id;
342: IF csr_int%NOTFOUND THEN
343: CLOSE csr_int;
344: fnd_message.set_name('PER','PER_289868_ADI_CONT_MAP_FAIL');
345: fnd_message.raise_error;
346: END IF;
347: CLOSE csr_int;
348: --
341: FETCH csr_int INTO l_igr_csr_id;
342: IF csr_int%NOTFOUND THEN
343: CLOSE csr_int;
344: fnd_message.set_name('PER','PER_289868_ADI_CONT_MAP_FAIL');
345: fnd_message.raise_error;
346: END IF;
347: CLOSE csr_int;
348: --
349: -- Step 5. Add HR Param list to content
370:
371: FETCH csr_int INTO l_param_list_code;
372: IF l_param_list_code IS NULL THEN
373: CLOSE csr_int;
374: fnd_message.set_name('PER','PER_289869_ADI_ADD_PARAM_FAIL');
375: fnd_message.raise_error;
376: END IF;
377: CLOSE csr_int;
378: --
371: FETCH csr_int INTO l_param_list_code;
372: IF l_param_list_code IS NULL THEN
373: CLOSE csr_int;
374: fnd_message.set_name('PER','PER_289869_ADI_ADD_PARAM_FAIL');
375: fnd_message.raise_error;
376: END IF;
377: CLOSE csr_int;
378: --
379: -- Step 6. Add Integrator to LETTER group
435: BEGIN
436: --
437: --------< validate parameters >---------------
438: IF p_api_package_name IS NULL THEN
439: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
440: fnd_message.raise_error;
441: ELSIF p_api_procedure_name IS NULL THEN
442: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
443: fnd_message.raise_error;
436: --
437: --------< validate parameters >---------------
438: IF p_api_package_name IS NULL THEN
439: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
440: fnd_message.raise_error;
441: ELSIF p_api_procedure_name IS NULL THEN
442: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
443: fnd_message.raise_error;
444: ELSIF p_interface_user_name IS NULL THEN
438: IF p_api_package_name IS NULL THEN
439: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
440: fnd_message.raise_error;
441: ELSIF p_api_procedure_name IS NULL THEN
442: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
443: fnd_message.raise_error;
444: ELSIF p_interface_user_name IS NULL THEN
445: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
446: fnd_message.raise_error;
439: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
440: fnd_message.raise_error;
441: ELSIF p_api_procedure_name IS NULL THEN
442: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
443: fnd_message.raise_error;
444: ELSIF p_interface_user_name IS NULL THEN
445: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
446: fnd_message.raise_error;
447: ELSIF p_interface_param_name IS NULL THEN
441: ELSIF p_api_procedure_name IS NULL THEN
442: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
443: fnd_message.raise_error;
444: ELSIF p_interface_user_name IS NULL THEN
445: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
446: fnd_message.raise_error;
447: ELSIF p_interface_param_name IS NULL THEN
448: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
449: fnd_message.raise_error;
442: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
443: fnd_message.raise_error;
444: ELSIF p_interface_user_name IS NULL THEN
445: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
446: fnd_message.raise_error;
447: ELSIF p_interface_param_name IS NULL THEN
448: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
449: fnd_message.raise_error;
450: ELSIF p_api_type IS NULL THEN
444: ELSIF p_interface_user_name IS NULL THEN
445: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
446: fnd_message.raise_error;
447: ELSIF p_interface_param_name IS NULL THEN
448: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
449: fnd_message.raise_error;
450: ELSIF p_api_type IS NULL THEN
451: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
452: fnd_message.raise_error;
445: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
446: fnd_message.raise_error;
447: ELSIF p_interface_param_name IS NULL THEN
448: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
449: fnd_message.raise_error;
450: ELSIF p_api_type IS NULL THEN
451: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
452: fnd_message.raise_error;
453: END IF;
447: ELSIF p_interface_param_name IS NULL THEN
448: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
449: fnd_message.raise_error;
450: ELSIF p_api_type IS NULL THEN
451: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
452: fnd_message.raise_error;
453: END IF;
454: --Check Application ID
455: l_bne_value := 'FND_APPLICATION';
448: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
449: fnd_message.raise_error;
450: ELSIF p_api_type IS NULL THEN
451: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
452: fnd_message.raise_error;
453: END IF;
454: --Check Application ID
455: l_bne_value := 'FND_APPLICATION';
456: OPEN csr_int FOR
460: p_application_id;
461: FETCH csr_int INTO l_igr_csr_id;
462: IF csr_int%NOTFOUND THEN
463: --invalid form name supplied
464: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
465: fnd_message.raise_error;
466: END IF;
467: --Check integrator_user_name
468: l_bne_value := 'bne_integrators_tl';
461: FETCH csr_int INTO l_igr_csr_id;
462: IF csr_int%NOTFOUND THEN
463: --invalid form name supplied
464: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
465: fnd_message.raise_error;
466: END IF;
467: --Check integrator_user_name
468: l_bne_value := 'bne_integrators_tl';
469: OPEN csr_int FOR
473: p_integrator_user_name ||'''';
474: FETCH csr_int INTO l_igr_csr_id;
475: IF csr_int%FOUND THEN
476: --invalid form name supplied
477: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
478: fnd_message.raise_error;
479: END IF;
480: --
481: --Check package and procedure name
474: FETCH csr_int INTO l_igr_csr_id;
475: IF csr_int%FOUND THEN
476: --invalid form name supplied
477: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
478: fnd_message.raise_error;
479: END IF;
480: --
481: --Check package and procedure name
482: l_bne_value := 'SYS.ARGUMENT$ A, DBA_OBJECTS B';
488: ''' AND A.PROCEDURE$ = ''' ||P_API_PROCEDURE_NAME || '''';
489: FETCH csr_int INTO l_igr_csr_id;
490: IF csr_int%NOTFOUND THEN
491: --invalid package/procedure name supplied
492: fnd_message.set_name('PER','PER_289931_API_NOT_EXIST');
493: fnd_message.raise_error;
494: END IF;
495: --
496: -------< Create MetaData >---------
489: FETCH csr_int INTO l_igr_csr_id;
490: IF csr_int%NOTFOUND THEN
491: --invalid package/procedure name supplied
492: fnd_message.set_name('PER','PER_289931_API_NOT_EXIST');
493: fnd_message.raise_error;
494: END IF;
495: --
496: -------< Create MetaData >---------
497: --
515: --
516: FETCH csr_int INTO l_igr_csr_id;
517: IF csr_int%FOUND THEN
518: CLOSE csr_int;
519: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
520: fnd_message.raise_error;
521: END IF;
522: CLOSE csr_int;
523: --
516: FETCH csr_int INTO l_igr_csr_id;
517: IF csr_int%FOUND THEN
518: CLOSE csr_int;
519: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
520: fnd_message.raise_error;
521: END IF;
522: CLOSE csr_int;
523: --
524: l_bne_value := 'bne_integrator_utils.create_integrator';
554:
555: FETCH csr_int INTO l_igr_csr_id;
556: IF csr_int%NOTFOUND THEN
557: CLOSE csr_int;
558: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
559: fnd_message.raise_error;
560: /*ELSE
561: set_new_session_flag
562: (p_application_id => p_application_id
555: FETCH csr_int INTO l_igr_csr_id;
556: IF csr_int%NOTFOUND THEN
557: CLOSE csr_int;
558: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
559: fnd_message.raise_error;
560: /*ELSE
561: set_new_session_flag
562: (p_application_id => p_application_id
563: ,p_integrator_code => l_integrator_code);*/
606: p_application_id;
607: FETCH csr_int INTO l_igr_csr_id;
608: IF csr_int%NOTFOUND THEN
609: CLOSE csr_int;
610: fnd_message.set_name('PER','PER_289870_ADI_IFACE_FAIL');
611: fnd_message.raise_error;
612: END IF;
613: CLOSE csr_int;
614: --
607: FETCH csr_int INTO l_igr_csr_id;
608: IF csr_int%NOTFOUND THEN
609: CLOSE csr_int;
610: fnd_message.set_name('PER','PER_289870_ADI_IFACE_FAIL');
611: fnd_message.raise_error;
612: END IF;
613: CLOSE csr_int;
614: --
615: -- Step 3. Set upload param list for integrator
659: p_application_id;
660: FETCH csr_int INTO l_igr_csr_id;
661: IF csr_int%NOTFOUND THEN
662: CLOSE csr_int;
663: fnd_message.set_name('PER','PER_289871_CREATE_TEXT_FAIL');
664: fnd_message.raise_error;
665: END IF;
666: CLOSE csr_int;
667: --
660: FETCH csr_int INTO l_igr_csr_id;
661: IF csr_int%NOTFOUND THEN
662: CLOSE csr_int;
663: fnd_message.set_name('PER','PER_289871_CREATE_TEXT_FAIL');
664: fnd_message.raise_error;
665: END IF;
666: CLOSE csr_int;
667: --
668: --
712: BEGIN
713: --
714: --------< Validate Parameters >--------------
715: IF p_view_name IS NULL THEN
716: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
717: fnd_message.raise_error;
718: ELSIF p_api_package_name IS NULL THEN
719: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
720: fnd_message.raise_error;
713: --
714: --------< Validate Parameters >--------------
715: IF p_view_name IS NULL THEN
716: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
717: fnd_message.raise_error;
718: ELSIF p_api_package_name IS NULL THEN
719: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
720: fnd_message.raise_error;
721: ELSIF p_api_procedure_name IS NULL THEN
715: IF p_view_name IS NULL THEN
716: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
717: fnd_message.raise_error;
718: ELSIF p_api_package_name IS NULL THEN
719: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
720: fnd_message.raise_error;
721: ELSIF p_api_procedure_name IS NULL THEN
722: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
723: fnd_message.raise_error;
716: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
717: fnd_message.raise_error;
718: ELSIF p_api_package_name IS NULL THEN
719: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
720: fnd_message.raise_error;
721: ELSIF p_api_procedure_name IS NULL THEN
722: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
723: fnd_message.raise_error;
724: ELSIF p_interface_user_name IS NULL THEN
718: ELSIF p_api_package_name IS NULL THEN
719: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
720: fnd_message.raise_error;
721: ELSIF p_api_procedure_name IS NULL THEN
722: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
723: fnd_message.raise_error;
724: ELSIF p_interface_user_name IS NULL THEN
725: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
726: fnd_message.raise_error;
719: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
720: fnd_message.raise_error;
721: ELSIF p_api_procedure_name IS NULL THEN
722: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
723: fnd_message.raise_error;
724: ELSIF p_interface_user_name IS NULL THEN
725: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
726: fnd_message.raise_error;
727: ELSIF p_interface_param_name IS NULL THEN
721: ELSIF p_api_procedure_name IS NULL THEN
722: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
723: fnd_message.raise_error;
724: ELSIF p_interface_user_name IS NULL THEN
725: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
726: fnd_message.raise_error;
727: ELSIF p_interface_param_name IS NULL THEN
728: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
729: fnd_message.raise_error;
722: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
723: fnd_message.raise_error;
724: ELSIF p_interface_user_name IS NULL THEN
725: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
726: fnd_message.raise_error;
727: ELSIF p_interface_param_name IS NULL THEN
728: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
729: fnd_message.raise_error;
730: ELSIF p_api_type IS NULL THEN
724: ELSIF p_interface_user_name IS NULL THEN
725: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
726: fnd_message.raise_error;
727: ELSIF p_interface_param_name IS NULL THEN
728: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
729: fnd_message.raise_error;
730: ELSIF p_api_type IS NULL THEN
731: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
732: fnd_message.raise_error;
725: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
726: fnd_message.raise_error;
727: ELSIF p_interface_param_name IS NULL THEN
728: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
729: fnd_message.raise_error;
730: ELSIF p_api_type IS NULL THEN
731: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
732: fnd_message.raise_error;
733: END IF;
727: ELSIF p_interface_param_name IS NULL THEN
728: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
729: fnd_message.raise_error;
730: ELSIF p_api_type IS NULL THEN
731: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
732: fnd_message.raise_error;
733: END IF;
734: --Check Application ID
735: l_bne_value := 'FND_APPLICATION';
728: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
729: fnd_message.raise_error;
730: ELSIF p_api_type IS NULL THEN
731: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
732: fnd_message.raise_error;
733: END IF;
734: --Check Application ID
735: l_bne_value := 'FND_APPLICATION';
736: OPEN csr_int FOR
740: p_application_id;
741: FETCH csr_int INTO l_igr_csr_id;
742: IF csr_int%NOTFOUND THEN
743: --invalid form name supplied
744: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
745: fnd_message.raise_error;
746: END IF;
747: IF p_form_name <> 'LETTER' AND p_form_name <> 'GENERAL' THEN
748: --Check Form Name exists
741: FETCH csr_int INTO l_igr_csr_id;
742: IF csr_int%NOTFOUND THEN
743: --invalid form name supplied
744: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
745: fnd_message.raise_error;
746: END IF;
747: IF p_form_name <> 'LETTER' AND p_form_name <> 'GENERAL' THEN
748: --Check Form Name exists
749: l_bne_value := 'FND_FORM_VL';
754: p_form_name || '''';
755: FETCH csr_int INTO l_igr_csr_id;
756: IF csr_int%NOTFOUND THEN
757: --invalid form name supplied
758: fnd_message.set_name('PER','PER_289922_INVAL_FM_NAME');
759: fnd_message.raise_error;
760: END IF;
761: END IF;
762: --
755: FETCH csr_int INTO l_igr_csr_id;
756: IF csr_int%NOTFOUND THEN
757: --invalid form name supplied
758: fnd_message.set_name('PER','PER_289922_INVAL_FM_NAME');
759: fnd_message.raise_error;
760: END IF;
761: END IF;
762: --
763: --Check integrator_user_name
769: p_integrator_user_name ||'''';
770: FETCH csr_int INTO l_igr_csr_id;
771: IF csr_int%FOUND THEN
772: --invalid form name supplied
773: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
774: fnd_message.raise_error;
775: END IF;
776: --
777: --Check package and procedure name
770: FETCH csr_int INTO l_igr_csr_id;
771: IF csr_int%FOUND THEN
772: --invalid form name supplied
773: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
774: fnd_message.raise_error;
775: END IF;
776: --
777: --Check package and procedure name
778: l_bne_value := 'SYS.ARGUMENT$ A, DBA_OBJECTS B';
784: ''' AND A.PROCEDURE$ = ''' ||P_API_PROCEDURE_NAME ||'''';
785: FETCH csr_int INTO l_igr_csr_id;
786: IF csr_int%NOTFOUND THEN
787: --invalid package/procedure name supplied
788: fnd_message.set_name('PER','PER_289931_API_NOT_EXIST');
789: fnd_message.raise_error;
790: END IF;
791: --
792: ---------< Create MetaData >----------
785: FETCH csr_int INTO l_igr_csr_id;
786: IF csr_int%NOTFOUND THEN
787: --invalid package/procedure name supplied
788: fnd_message.set_name('PER','PER_289931_API_NOT_EXIST');
789: fnd_message.raise_error;
790: END IF;
791: --
792: ---------< Create MetaData >----------
793: --
817: --
818: FETCH csr_int INTO l_igr_csr_id;
819: IF csr_int%FOUND THEN
820: CLOSE csr_int;
821: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
822: fnd_message.raise_error;
823: END IF;
824: CLOSE csr_int;
825: --
818: FETCH csr_int INTO l_igr_csr_id;
819: IF csr_int%FOUND THEN
820: CLOSE csr_int;
821: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
822: fnd_message.raise_error;
823: END IF;
824: CLOSE csr_int;
825: --
826: l_bne_value := 'bne_integrator_utils.create_integrator_no_content';
850: --
851: FETCH csr_int INTO l_igr_csr_id;
852: IF csr_int%NOTFOUND THEN
853: CLOSE csr_int;
854: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
855: fnd_message.raise_error;
856: /*ELSE
857: set_new_session_flag
858: (p_application_id => p_application_id
851: FETCH csr_int INTO l_igr_csr_id;
852: IF csr_int%NOTFOUND THEN
853: CLOSE csr_int;
854: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
855: fnd_message.raise_error;
856: /*ELSE
857: set_new_session_flag
858: (p_application_id => p_application_id
859: ,p_integrator_code => l_integrator_code);*/
890:
891: FETCH csr_int INTO l_igr_csr_id;
892: IF csr_int%NOTFOUND THEN
893: CLOSE csr_int;
894: fnd_message.set_name('PER','PER_289865_ADI_CONTENT_FAIL');
895: fnd_message.raise_error;
896: END IF;
897: CLOSE csr_int;
898: --
891: FETCH csr_int INTO l_igr_csr_id;
892: IF csr_int%NOTFOUND THEN
893: CLOSE csr_int;
894: fnd_message.set_name('PER','PER_289865_ADI_CONTENT_FAIL');
895: fnd_message.raise_error;
896: END IF;
897: CLOSE csr_int;
898: --
899: -- STEP 3. Create Content Columns
921: ' application_id = '|| p_application_id;
922: FETCH csr_int INTO l_num_columns;
923: IF l_num_columns <1 THEN
924: CLOSE csr_int;
925: fnd_message.set_name('PER','PER_289866_ADI_CONT_COL_FAIL');
926: fnd_message.raise_error;
927: END IF;
928: CLOSE csr_int;
929: --
922: FETCH csr_int INTO l_num_columns;
923: IF l_num_columns <1 THEN
924: CLOSE csr_int;
925: fnd_message.set_name('PER','PER_289866_ADI_CONT_COL_FAIL');
926: fnd_message.raise_error;
927: END IF;
928: CLOSE csr_int;
929: --
930: -- Step 4. Add HR Param List to content
950: --
951: FETCH csr_int INTO l_param_list_code;
952: IF l_param_list_code IS NULL THEN
953: CLOSE csr_int;
954: fnd_message.set_name('PER','PER_289869_ADI_ADD_PARAM_FAIL');
955: fnd_message.raise_error;
956: END IF;
957: CLOSE csr_int;
958: --
951: FETCH csr_int INTO l_param_list_code;
952: IF l_param_list_code IS NULL THEN
953: CLOSE csr_int;
954: fnd_message.set_name('PER','PER_289869_ADI_ADD_PARAM_FAIL');
955: fnd_message.raise_error;
956: END IF;
957: CLOSE csr_int;
958: --
959: -- STEP 5. Create Interface for API
1001: p_application_id;
1002: FETCH csr_int INTO l_igr_csr_id;
1003: IF csr_int%NOTFOUND THEN
1004: CLOSE csr_int;
1005: fnd_message.set_name('PER','PER_289870_ADI_IFACE_FAIL');
1006: fnd_message.raise_error;
1007: END IF;
1008: CLOSE csr_int;
1009: --
1002: FETCH csr_int INTO l_igr_csr_id;
1003: IF csr_int%NOTFOUND THEN
1004: CLOSE csr_int;
1005: fnd_message.set_name('PER','PER_289870_ADI_IFACE_FAIL');
1006: fnd_message.raise_error;
1007: END IF;
1008: CLOSE csr_int;
1009: --
1010: -- Step 6. Set upload param list for integrator
1091: END IF;
1092: --Validate return type if api type is function
1093: IF l_api_type ='FUNCTION' THEN
1094: IF p_api_return_type IS NULL THEN
1095: fnd_message.set_name('PER','PER_289928_INVAL_RET_TYPE');
1096: fnd_message.raise_error;
1097: END IF;
1098: END IF;
1099: --
1092: --Validate return type if api type is function
1093: IF l_api_type ='FUNCTION' THEN
1094: IF p_api_return_type IS NULL THEN
1095: fnd_message.set_name('PER','PER_289928_INVAL_RET_TYPE');
1096: fnd_message.raise_error;
1097: END IF;
1098: END IF;
1099: --
1100: IF (UPPER(p_metadata_type) = 'DOWNLOAD')
1136: ,p_form_name => l_form_name
1137: ,p_language => l_language
1138: ,p_user_id => l_user_id);
1139: ELSE
1140: fnd_message.set_name('PER','PER_289879_INVAL_META_TYPE');
1141: fnd_message.raise_error;
1142: END IF;
1143: END create_metadata;
1144: --
1137: ,p_language => l_language
1138: ,p_user_id => l_user_id);
1139: ELSE
1140: fnd_message.set_name('PER','PER_289879_INVAL_META_TYPE');
1141: fnd_message.raise_error;
1142: END IF;
1143: END create_metadata;
1144: --
1145: --
1177: IF ((p_param1_name IS NOT NULL) and
1178: (instr(p_sql,l_param_identifier||p_param1_name) = 0)) THEN
1179: --
1180: -- Param 1 does not appear in WHERE clause
1181: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1182: fnd_message.raise_error;
1183: --
1184: ELSIF ((p_param2_name IS NOT NULL) and
1185: (instr(p_sql,l_param_identifier||p_param2_name) = 0)) THEN
1178: (instr(p_sql,l_param_identifier||p_param1_name) = 0)) THEN
1179: --
1180: -- Param 1 does not appear in WHERE clause
1181: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1182: fnd_message.raise_error;
1183: --
1184: ELSIF ((p_param2_name IS NOT NULL) and
1185: (instr(p_sql,l_param_identifier||p_param2_name) = 0)) THEN
1186: --
1184: ELSIF ((p_param2_name IS NOT NULL) and
1185: (instr(p_sql,l_param_identifier||p_param2_name) = 0)) THEN
1186: --
1187: -- Param 2 does not appear in WHERE clause
1188: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1189: fnd_message.raise_error;
1190: --
1191: ELSIF ((p_param3_name IS NOT NULL) and
1192: (instr(p_sql,l_param_identifier||p_param3_name) = 0)) THEN
1185: (instr(p_sql,l_param_identifier||p_param2_name) = 0)) THEN
1186: --
1187: -- Param 2 does not appear in WHERE clause
1188: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1189: fnd_message.raise_error;
1190: --
1191: ELSIF ((p_param3_name IS NOT NULL) and
1192: (instr(p_sql,l_param_identifier||p_param3_name) = 0)) THEN
1193: --
1191: ELSIF ((p_param3_name IS NOT NULL) and
1192: (instr(p_sql,l_param_identifier||p_param3_name) = 0)) THEN
1193: --
1194: -- Param 3 does not appear in WHERE clause
1195: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1196: fnd_message.raise_error;
1197: --
1198: ELSIF ((p_param4_name IS NOT NULL) and
1199: (instr(p_sql,l_param_identifier||p_param4_name) = 0)) THEN
1192: (instr(p_sql,l_param_identifier||p_param3_name) = 0)) THEN
1193: --
1194: -- Param 3 does not appear in WHERE clause
1195: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1196: fnd_message.raise_error;
1197: --
1198: ELSIF ((p_param4_name IS NOT NULL) and
1199: (instr(p_sql,l_param_identifier||p_param4_name) = 0)) THEN
1200: --
1198: ELSIF ((p_param4_name IS NOT NULL) and
1199: (instr(p_sql,l_param_identifier||p_param4_name) = 0)) THEN
1200: --
1201: -- Param 4 does not appear in WHERE clause
1202: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1203: fnd_message.raise_error;
1204: --
1205: ELSIF ((p_param5_name IS NOT NULL) and
1206: (instr(p_sql,l_param_identifier||p_param5_name) = 0)) THEN
1199: (instr(p_sql,l_param_identifier||p_param4_name) = 0)) THEN
1200: --
1201: -- Param 4 does not appear in WHERE clause
1202: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1203: fnd_message.raise_error;
1204: --
1205: ELSIF ((p_param5_name IS NOT NULL) and
1206: (instr(p_sql,l_param_identifier||p_param5_name) = 0)) THEN
1207: --
1205: ELSIF ((p_param5_name IS NOT NULL) and
1206: (instr(p_sql,l_param_identifier||p_param5_name) = 0)) THEN
1207: --
1208: -- Param 5 does not appear in WHERE clause
1209: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1210: fnd_message.raise_error;
1211: --
1212: ELSE
1213: hr_integration_utils.add_sql_to_content
1206: (instr(p_sql,l_param_identifier||p_param5_name) = 0)) THEN
1207: --
1208: -- Param 5 does not appear in WHERE clause
1209: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1210: fnd_message.raise_error;
1211: --
1212: ELSE
1213: hr_integration_utils.add_sql_to_content
1214: (p_application_id => p_application_id
1288: --
1289: IF csr_int%NOTFOUND THEN
1290: --
1291: CLOSE csr_int;
1292: fnd_message.set_name('PER','PER_289428_ADI_INTG_NOT_EXIST');
1293: fnd_message.raise_error;
1294: --
1295: END IF;
1296: CLOSE csr_int;
1289: IF csr_int%NOTFOUND THEN
1290: --
1291: CLOSE csr_int;
1292: fnd_message.set_name('PER','PER_289428_ADI_INTG_NOT_EXIST');
1293: fnd_message.raise_error;
1294: --
1295: END IF;
1296: CLOSE csr_int;
1297: --