109: --
110: ------< Validate parameters >------
111: --
112: IF p_view_name IS NULL THEN
113: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
114: fnd_message.raise_error;
115: END IF;
116: --
117: IF p_form_name <> 'LETTER' AND p_form_name <> 'GENERAL' THEN
110: ------< Validate parameters >------
111: --
112: IF p_view_name IS NULL THEN
113: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
114: fnd_message.raise_error;
115: END IF;
116: --
117: IF p_form_name <> 'LETTER' AND p_form_name <> 'GENERAL' THEN
118: --Check Form Name exists
124: p_form_name || '''';
125: FETCH csr_int INTO l_igr_csr_id;
126: IF csr_int%NOTFOUND THEN
127: --invalid form name supplied
128: fnd_message.set_name('PER','PER_289922_INVAL_FM_NAME');
129: fnd_message.raise_error;
130: END IF;
131: END IF;
132: --
125: FETCH csr_int INTO l_igr_csr_id;
126: IF csr_int%NOTFOUND THEN
127: --invalid form name supplied
128: fnd_message.set_name('PER','PER_289922_INVAL_FM_NAME');
129: fnd_message.raise_error;
130: END IF;
131: END IF;
132: --
133: --Check Application ID
139: p_application_id;
140: FETCH csr_int INTO l_igr_csr_id;
141: IF csr_int%NOTFOUND THEN
142: --invalid form name supplied
143: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
144: fnd_message.raise_error;
145: END IF;
146: --
147: --Check integrator_user_name
140: FETCH csr_int INTO l_igr_csr_id;
141: IF csr_int%NOTFOUND THEN
142: --invalid form name supplied
143: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
144: fnd_message.raise_error;
145: END IF;
146: --
147: --Check integrator_user_name
148: l_bne_value := 'bne_integrators_tl';
153: p_integrator_user_name ||'''';
154: FETCH csr_int INTO l_igr_csr_id;
155: IF csr_int%FOUND THEN
156: --invalid form name supplied
157: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
158: fnd_message.raise_error;
159: END IF;
160: --
161: ---------< Create MetaData >-------
154: FETCH csr_int INTO l_igr_csr_id;
155: IF csr_int%FOUND THEN
156: --invalid form name supplied
157: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
158: fnd_message.raise_error;
159: END IF;
160: --
161: ---------< Create MetaData >-------
162: --
186: --
187: FETCH csr_int INTO l_igr_csr_id;
188: IF csr_int%FOUND THEN
189: CLOSE csr_int;
190: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
191: fnd_message.raise_error;
192: END IF;
193: CLOSE csr_int;
194: --
187: FETCH csr_int INTO l_igr_csr_id;
188: IF csr_int%FOUND THEN
189: CLOSE csr_int;
190: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
191: fnd_message.raise_error;
192: END IF;
193: CLOSE csr_int;
194: --
195: l_bne_value := 'bne_integrator_utils.create_integrator_no_content';
219: --
220: FETCH csr_int INTO l_igr_csr_id;
221: IF csr_int%NOTFOUND THEN
222: CLOSE csr_int;
223: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
224: fnd_message.raise_error;
225: /*ELSE
226: set_new_session_flag
227: (p_application_id => p_application_id
220: FETCH csr_int INTO l_igr_csr_id;
221: IF csr_int%NOTFOUND THEN
222: CLOSE csr_int;
223: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
224: fnd_message.raise_error;
225: /*ELSE
226: set_new_session_flag
227: (p_application_id => p_application_id
228: ,p_integrator_code => l_integrator_code);*/
259:
260: FETCH csr_int INTO l_igr_csr_id;
261: IF csr_int%NOTFOUND THEN
262: CLOSE csr_int;
263: fnd_message.set_name('PER','PER_289865_ADI_CONTENT_FAIL');
264: fnd_message.raise_error;
265: END IF;
266: CLOSE csr_int;
267: --
260: FETCH csr_int INTO l_igr_csr_id;
261: IF csr_int%NOTFOUND THEN
262: CLOSE csr_int;
263: fnd_message.set_name('PER','PER_289865_ADI_CONTENT_FAIL');
264: fnd_message.raise_error;
265: END IF;
266: CLOSE csr_int;
267: --
268: -- STEP 3. Create Content Columns
290: ' application_id = '|| p_application_id;
291: FETCH csr_int INTO l_num_columns;
292: IF l_num_columns <1 THEN
293: CLOSE csr_int;
294: fnd_message.set_name('PER','PER_289866_ADI_CONT_COL_FAIL');
295: fnd_message.raise_error;
296: END IF;
297: CLOSE csr_int;
298: --
291: FETCH csr_int INTO l_num_columns;
292: IF l_num_columns <1 THEN
293: CLOSE csr_int;
294: fnd_message.set_name('PER','PER_289866_ADI_CONT_COL_FAIL');
295: fnd_message.raise_error;
296: END IF;
297: CLOSE csr_int;
298: --
299: -- Step 4. Enable content for reporting
329: p_application_id || ')';
330: FETCH csr_int INTO l_num_content;
331: IF l_num_content <> l_num_columns THEN
332: CLOSE csr_int;
333: fnd_message.set_name('PER','PER_289867_ADI_CONT_ENABL_FAIL');
334: fnd_message.raise_error;
335: END IF;
336: CLOSE csr_int;
337:
330: FETCH csr_int INTO l_num_content;
331: IF l_num_content <> l_num_columns THEN
332: CLOSE csr_int;
333: fnd_message.set_name('PER','PER_289867_ADI_CONT_ENABL_FAIL');
334: fnd_message.raise_error;
335: END IF;
336: CLOSE csr_int;
337:
338: --Beginning of Bug# 10348813
375: p_application_id;
376: FETCH csr_int INTO l_igr_csr_id;
377: IF csr_int%NOTFOUND THEN
378: CLOSE csr_int;
379: fnd_message.set_name('PER','PER_289868_ADI_CONT_MAP_FAIL');
380: fnd_message.raise_error;
381: END IF;
382: CLOSE csr_int;
383: --
376: FETCH csr_int INTO l_igr_csr_id;
377: IF csr_int%NOTFOUND THEN
378: CLOSE csr_int;
379: fnd_message.set_name('PER','PER_289868_ADI_CONT_MAP_FAIL');
380: fnd_message.raise_error;
381: END IF;
382: CLOSE csr_int;
383: --
384: -- Step 5. Add HR Param list to content
405:
406: FETCH csr_int INTO l_param_list_code;
407: IF l_param_list_code IS NULL THEN
408: CLOSE csr_int;
409: fnd_message.set_name('PER','PER_289869_ADI_ADD_PARAM_FAIL');
410: fnd_message.raise_error;
411: END IF;
412: CLOSE csr_int;
413: --
406: FETCH csr_int INTO l_param_list_code;
407: IF l_param_list_code IS NULL THEN
408: CLOSE csr_int;
409: fnd_message.set_name('PER','PER_289869_ADI_ADD_PARAM_FAIL');
410: fnd_message.raise_error;
411: END IF;
412: CLOSE csr_int;
413: --
414: -- Step 6. Add Integrator to LETTER group
470: BEGIN
471: --
472: --------< validate parameters >---------------
473: IF p_api_package_name IS NULL THEN
474: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
475: fnd_message.raise_error;
476: ELSIF p_api_procedure_name IS NULL THEN
477: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
478: fnd_message.raise_error;
471: --
472: --------< validate parameters >---------------
473: IF p_api_package_name IS NULL THEN
474: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
475: fnd_message.raise_error;
476: ELSIF p_api_procedure_name IS NULL THEN
477: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
478: fnd_message.raise_error;
479: ELSIF p_interface_user_name IS NULL THEN
473: IF p_api_package_name IS NULL THEN
474: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
475: fnd_message.raise_error;
476: ELSIF p_api_procedure_name IS NULL THEN
477: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
478: fnd_message.raise_error;
479: ELSIF p_interface_user_name IS NULL THEN
480: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
481: fnd_message.raise_error;
474: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
475: fnd_message.raise_error;
476: ELSIF p_api_procedure_name IS NULL THEN
477: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
478: fnd_message.raise_error;
479: ELSIF p_interface_user_name IS NULL THEN
480: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
481: fnd_message.raise_error;
482: ELSIF p_interface_param_name IS NULL THEN
476: ELSIF p_api_procedure_name IS NULL THEN
477: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
478: fnd_message.raise_error;
479: ELSIF p_interface_user_name IS NULL THEN
480: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
481: fnd_message.raise_error;
482: ELSIF p_interface_param_name IS NULL THEN
483: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
484: fnd_message.raise_error;
477: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
478: fnd_message.raise_error;
479: ELSIF p_interface_user_name IS NULL THEN
480: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
481: fnd_message.raise_error;
482: ELSIF p_interface_param_name IS NULL THEN
483: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
484: fnd_message.raise_error;
485: ELSIF p_api_type IS NULL THEN
479: ELSIF p_interface_user_name IS NULL THEN
480: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
481: fnd_message.raise_error;
482: ELSIF p_interface_param_name IS NULL THEN
483: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
484: fnd_message.raise_error;
485: ELSIF p_api_type IS NULL THEN
486: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
487: fnd_message.raise_error;
480: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
481: fnd_message.raise_error;
482: ELSIF p_interface_param_name IS NULL THEN
483: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
484: fnd_message.raise_error;
485: ELSIF p_api_type IS NULL THEN
486: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
487: fnd_message.raise_error;
488: END IF;
482: ELSIF p_interface_param_name IS NULL THEN
483: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
484: fnd_message.raise_error;
485: ELSIF p_api_type IS NULL THEN
486: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
487: fnd_message.raise_error;
488: END IF;
489: --Check Application ID
490: l_bne_value := 'FND_APPLICATION';
483: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
484: fnd_message.raise_error;
485: ELSIF p_api_type IS NULL THEN
486: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
487: fnd_message.raise_error;
488: END IF;
489: --Check Application ID
490: l_bne_value := 'FND_APPLICATION';
491: OPEN csr_int FOR
495: p_application_id;
496: FETCH csr_int INTO l_igr_csr_id;
497: IF csr_int%NOTFOUND THEN
498: --invalid form name supplied
499: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
500: fnd_message.raise_error;
501: END IF;
502: --Check integrator_user_name
503: l_bne_value := 'bne_integrators_tl';
496: FETCH csr_int INTO l_igr_csr_id;
497: IF csr_int%NOTFOUND THEN
498: --invalid form name supplied
499: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
500: fnd_message.raise_error;
501: END IF;
502: --Check integrator_user_name
503: l_bne_value := 'bne_integrators_tl';
504: OPEN csr_int FOR
508: p_integrator_user_name ||'''';
509: FETCH csr_int INTO l_igr_csr_id;
510: IF csr_int%FOUND THEN
511: --invalid form name supplied
512: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
513: fnd_message.raise_error;
514: END IF;
515: --
516: --Check package and procedure name
509: FETCH csr_int INTO l_igr_csr_id;
510: IF csr_int%FOUND THEN
511: --invalid form name supplied
512: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
513: fnd_message.raise_error;
514: END IF;
515: --
516: --Check package and procedure name
517: l_bne_value := 'SYS.ARGUMENT$ A, DBA_OBJECTS B';
523: ''' AND A.PROCEDURE$ = ''' ||P_API_PROCEDURE_NAME || '''';
524: FETCH csr_int INTO l_igr_csr_id;
525: IF csr_int%NOTFOUND THEN
526: --invalid package/procedure name supplied
527: fnd_message.set_name('PER','PER_289931_API_NOT_EXIST');
528: fnd_message.raise_error;
529: END IF;
530: --
531: -------< Create MetaData >---------
524: FETCH csr_int INTO l_igr_csr_id;
525: IF csr_int%NOTFOUND THEN
526: --invalid package/procedure name supplied
527: fnd_message.set_name('PER','PER_289931_API_NOT_EXIST');
528: fnd_message.raise_error;
529: END IF;
530: --
531: -------< Create MetaData >---------
532: --
550: --
551: FETCH csr_int INTO l_igr_csr_id;
552: IF csr_int%FOUND THEN
553: CLOSE csr_int;
554: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
555: fnd_message.raise_error;
556: END IF;
557: CLOSE csr_int;
558: --
551: FETCH csr_int INTO l_igr_csr_id;
552: IF csr_int%FOUND THEN
553: CLOSE csr_int;
554: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
555: fnd_message.raise_error;
556: END IF;
557: CLOSE csr_int;
558: --
559: l_bne_value := 'bne_integrator_utils.create_integrator';
589:
590: FETCH csr_int INTO l_igr_csr_id;
591: IF csr_int%NOTFOUND THEN
592: CLOSE csr_int;
593: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
594: fnd_message.raise_error;
595: /*ELSE
596: set_new_session_flag
597: (p_application_id => p_application_id
590: FETCH csr_int INTO l_igr_csr_id;
591: IF csr_int%NOTFOUND THEN
592: CLOSE csr_int;
593: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
594: fnd_message.raise_error;
595: /*ELSE
596: set_new_session_flag
597: (p_application_id => p_application_id
598: ,p_integrator_code => l_integrator_code);*/
641: p_application_id;
642: FETCH csr_int INTO l_igr_csr_id;
643: IF csr_int%NOTFOUND THEN
644: CLOSE csr_int;
645: fnd_message.set_name('PER','PER_289870_ADI_IFACE_FAIL');
646: fnd_message.raise_error;
647: END IF;
648: CLOSE csr_int;
649: --
642: FETCH csr_int INTO l_igr_csr_id;
643: IF csr_int%NOTFOUND THEN
644: CLOSE csr_int;
645: fnd_message.set_name('PER','PER_289870_ADI_IFACE_FAIL');
646: fnd_message.raise_error;
647: END IF;
648: CLOSE csr_int;
649: --
650: -- Step 3. Set upload param list for integrator
694: p_application_id;
695: FETCH csr_int INTO l_igr_csr_id;
696: IF csr_int%NOTFOUND THEN
697: CLOSE csr_int;
698: fnd_message.set_name('PER','PER_289871_CREATE_TEXT_FAIL');
699: fnd_message.raise_error;
700: END IF;
701: CLOSE csr_int;
702: --
695: FETCH csr_int INTO l_igr_csr_id;
696: IF csr_int%NOTFOUND THEN
697: CLOSE csr_int;
698: fnd_message.set_name('PER','PER_289871_CREATE_TEXT_FAIL');
699: fnd_message.raise_error;
700: END IF;
701: CLOSE csr_int;
702: --
703: --
747: BEGIN
748: --
749: --------< Validate Parameters >--------------
750: IF p_view_name IS NULL THEN
751: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
752: fnd_message.raise_error;
753: ELSIF p_api_package_name IS NULL THEN
754: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
755: fnd_message.raise_error;
748: --
749: --------< Validate Parameters >--------------
750: IF p_view_name IS NULL THEN
751: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
752: fnd_message.raise_error;
753: ELSIF p_api_package_name IS NULL THEN
754: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
755: fnd_message.raise_error;
756: ELSIF p_api_procedure_name IS NULL THEN
750: IF p_view_name IS NULL THEN
751: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
752: fnd_message.raise_error;
753: ELSIF p_api_package_name IS NULL THEN
754: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
755: fnd_message.raise_error;
756: ELSIF p_api_procedure_name IS NULL THEN
757: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
758: fnd_message.raise_error;
751: fnd_message.set_name('PER','PER_289873_INVALID_VIEW_NAME');
752: fnd_message.raise_error;
753: ELSIF p_api_package_name IS NULL THEN
754: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
755: fnd_message.raise_error;
756: ELSIF p_api_procedure_name IS NULL THEN
757: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
758: fnd_message.raise_error;
759: ELSIF p_interface_user_name IS NULL THEN
753: ELSIF p_api_package_name IS NULL THEN
754: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
755: fnd_message.raise_error;
756: ELSIF p_api_procedure_name IS NULL THEN
757: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
758: fnd_message.raise_error;
759: ELSIF p_interface_user_name IS NULL THEN
760: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
761: fnd_message.raise_error;
754: fnd_message.set_name('PER','PER_289874_INVAL_PGK_NAME');
755: fnd_message.raise_error;
756: ELSIF p_api_procedure_name IS NULL THEN
757: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
758: fnd_message.raise_error;
759: ELSIF p_interface_user_name IS NULL THEN
760: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
761: fnd_message.raise_error;
762: ELSIF p_interface_param_name IS NULL THEN
756: ELSIF p_api_procedure_name IS NULL THEN
757: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
758: fnd_message.raise_error;
759: ELSIF p_interface_user_name IS NULL THEN
760: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
761: fnd_message.raise_error;
762: ELSIF p_interface_param_name IS NULL THEN
763: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
764: fnd_message.raise_error;
757: fnd_message.set_name('PER','PER_289875_INVAL_PROC_NAME');
758: fnd_message.raise_error;
759: ELSIF p_interface_user_name IS NULL THEN
760: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
761: fnd_message.raise_error;
762: ELSIF p_interface_param_name IS NULL THEN
763: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
764: fnd_message.raise_error;
765: ELSIF p_api_type IS NULL THEN
759: ELSIF p_interface_user_name IS NULL THEN
760: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
761: fnd_message.raise_error;
762: ELSIF p_interface_param_name IS NULL THEN
763: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
764: fnd_message.raise_error;
765: ELSIF p_api_type IS NULL THEN
766: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
767: fnd_message.raise_error;
760: fnd_message.set_name('PER','PER_289876_INVAL_IFACE_NAME');
761: fnd_message.raise_error;
762: ELSIF p_interface_param_name IS NULL THEN
763: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
764: fnd_message.raise_error;
765: ELSIF p_api_type IS NULL THEN
766: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
767: fnd_message.raise_error;
768: END IF;
762: ELSIF p_interface_param_name IS NULL THEN
763: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
764: fnd_message.raise_error;
765: ELSIF p_api_type IS NULL THEN
766: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
767: fnd_message.raise_error;
768: END IF;
769: --Check Application ID
770: l_bne_value := 'FND_APPLICATION';
763: fnd_message.set_name('PER','PER_289877_INVAL_PARAM_LIST');
764: fnd_message.raise_error;
765: ELSIF p_api_type IS NULL THEN
766: fnd_message.set_name('PER','PER_289878_INVAL_API_TYPE');
767: fnd_message.raise_error;
768: END IF;
769: --Check Application ID
770: l_bne_value := 'FND_APPLICATION';
771: OPEN csr_int FOR
775: p_application_id;
776: FETCH csr_int INTO l_igr_csr_id;
777: IF csr_int%NOTFOUND THEN
778: --invalid form name supplied
779: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
780: fnd_message.raise_error;
781: END IF;
782: IF p_form_name <> 'LETTER' AND p_form_name <> 'GENERAL' THEN
783: --Check Form Name exists
776: FETCH csr_int INTO l_igr_csr_id;
777: IF csr_int%NOTFOUND THEN
778: --invalid form name supplied
779: fnd_message.set_name('PER','PER_289921_INVAL_APP_ID');
780: fnd_message.raise_error;
781: END IF;
782: IF p_form_name <> 'LETTER' AND p_form_name <> 'GENERAL' THEN
783: --Check Form Name exists
784: l_bne_value := 'FND_FORM_VL';
789: p_form_name || '''';
790: FETCH csr_int INTO l_igr_csr_id;
791: IF csr_int%NOTFOUND THEN
792: --invalid form name supplied
793: fnd_message.set_name('PER','PER_289922_INVAL_FM_NAME');
794: fnd_message.raise_error;
795: END IF;
796: END IF;
797: --
790: FETCH csr_int INTO l_igr_csr_id;
791: IF csr_int%NOTFOUND THEN
792: --invalid form name supplied
793: fnd_message.set_name('PER','PER_289922_INVAL_FM_NAME');
794: fnd_message.raise_error;
795: END IF;
796: END IF;
797: --
798: --Check integrator_user_name
804: p_integrator_user_name ||'''';
805: FETCH csr_int INTO l_igr_csr_id;
806: IF csr_int%FOUND THEN
807: --invalid form name supplied
808: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
809: fnd_message.raise_error;
810: END IF;
811: --
812: --Check package and procedure name
805: FETCH csr_int INTO l_igr_csr_id;
806: IF csr_int%FOUND THEN
807: --invalid form name supplied
808: fnd_message.set_name('PER','PER_289923_USER_NAME_EXISTS');
809: fnd_message.raise_error;
810: END IF;
811: --
812: --Check package and procedure name
813: l_bne_value := 'SYS.ARGUMENT$ A, DBA_OBJECTS B';
819: ''' AND A.PROCEDURE$ = ''' ||P_API_PROCEDURE_NAME ||'''';
820: FETCH csr_int INTO l_igr_csr_id;
821: IF csr_int%NOTFOUND THEN
822: --invalid package/procedure name supplied
823: fnd_message.set_name('PER','PER_289931_API_NOT_EXIST');
824: fnd_message.raise_error;
825: END IF;
826: --
827: ---------< Create MetaData >----------
820: FETCH csr_int INTO l_igr_csr_id;
821: IF csr_int%NOTFOUND THEN
822: --invalid package/procedure name supplied
823: fnd_message.set_name('PER','PER_289931_API_NOT_EXIST');
824: fnd_message.raise_error;
825: END IF;
826: --
827: ---------< Create MetaData >----------
828: --
852: --
853: FETCH csr_int INTO l_igr_csr_id;
854: IF csr_int%FOUND THEN
855: CLOSE csr_int;
856: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
857: fnd_message.raise_error;
858: END IF;
859: CLOSE csr_int;
860: --
853: FETCH csr_int INTO l_igr_csr_id;
854: IF csr_int%FOUND THEN
855: CLOSE csr_int;
856: fnd_message.set_name('PER','PER_289872_ADI_INTGR_EXISTS');
857: fnd_message.raise_error;
858: END IF;
859: CLOSE csr_int;
860: --
861: l_bne_value := 'bne_integrator_utils.create_integrator_no_content';
885: --
886: FETCH csr_int INTO l_igr_csr_id;
887: IF csr_int%NOTFOUND THEN
888: CLOSE csr_int;
889: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
890: fnd_message.raise_error;
891: /*ELSE
892: set_new_session_flag
893: (p_application_id => p_application_id
886: FETCH csr_int INTO l_igr_csr_id;
887: IF csr_int%NOTFOUND THEN
888: CLOSE csr_int;
889: fnd_message.set_name('PER','PER_289864_ADI_INTGR_INVAL');
890: fnd_message.raise_error;
891: /*ELSE
892: set_new_session_flag
893: (p_application_id => p_application_id
894: ,p_integrator_code => l_integrator_code);*/
925:
926: FETCH csr_int INTO l_igr_csr_id;
927: IF csr_int%NOTFOUND THEN
928: CLOSE csr_int;
929: fnd_message.set_name('PER','PER_289865_ADI_CONTENT_FAIL');
930: fnd_message.raise_error;
931: END IF;
932: CLOSE csr_int;
933: --
926: FETCH csr_int INTO l_igr_csr_id;
927: IF csr_int%NOTFOUND THEN
928: CLOSE csr_int;
929: fnd_message.set_name('PER','PER_289865_ADI_CONTENT_FAIL');
930: fnd_message.raise_error;
931: END IF;
932: CLOSE csr_int;
933: --
934: -- STEP 3. Create Content Columns
956: ' application_id = '|| p_application_id;
957: FETCH csr_int INTO l_num_columns;
958: IF l_num_columns <1 THEN
959: CLOSE csr_int;
960: fnd_message.set_name('PER','PER_289866_ADI_CONT_COL_FAIL');
961: fnd_message.raise_error;
962: END IF;
963: CLOSE csr_int;
964: --
957: FETCH csr_int INTO l_num_columns;
958: IF l_num_columns <1 THEN
959: CLOSE csr_int;
960: fnd_message.set_name('PER','PER_289866_ADI_CONT_COL_FAIL');
961: fnd_message.raise_error;
962: END IF;
963: CLOSE csr_int;
964: --
965: -- Step 4. Add HR Param List to content
985: --
986: FETCH csr_int INTO l_param_list_code;
987: IF l_param_list_code IS NULL THEN
988: CLOSE csr_int;
989: fnd_message.set_name('PER','PER_289869_ADI_ADD_PARAM_FAIL');
990: fnd_message.raise_error;
991: END IF;
992: CLOSE csr_int;
993: --
986: FETCH csr_int INTO l_param_list_code;
987: IF l_param_list_code IS NULL THEN
988: CLOSE csr_int;
989: fnd_message.set_name('PER','PER_289869_ADI_ADD_PARAM_FAIL');
990: fnd_message.raise_error;
991: END IF;
992: CLOSE csr_int;
993: --
994: -- STEP 5. Create Interface for API
1036: p_application_id;
1037: FETCH csr_int INTO l_igr_csr_id;
1038: IF csr_int%NOTFOUND THEN
1039: CLOSE csr_int;
1040: fnd_message.set_name('PER','PER_289870_ADI_IFACE_FAIL');
1041: fnd_message.raise_error;
1042: END IF;
1043: CLOSE csr_int;
1044: --
1037: FETCH csr_int INTO l_igr_csr_id;
1038: IF csr_int%NOTFOUND THEN
1039: CLOSE csr_int;
1040: fnd_message.set_name('PER','PER_289870_ADI_IFACE_FAIL');
1041: fnd_message.raise_error;
1042: END IF;
1043: CLOSE csr_int;
1044: --
1045: -- Step 6. Set upload param list for integrator
1126: END IF;
1127: --Validate return type if api type is function
1128: IF l_api_type ='FUNCTION' THEN
1129: IF p_api_return_type IS NULL THEN
1130: fnd_message.set_name('PER','PER_289928_INVAL_RET_TYPE');
1131: fnd_message.raise_error;
1132: END IF;
1133: END IF;
1134: --
1127: --Validate return type if api type is function
1128: IF l_api_type ='FUNCTION' THEN
1129: IF p_api_return_type IS NULL THEN
1130: fnd_message.set_name('PER','PER_289928_INVAL_RET_TYPE');
1131: fnd_message.raise_error;
1132: END IF;
1133: END IF;
1134: --
1135: IF (UPPER(p_metadata_type) = 'DOWNLOAD')
1171: ,p_form_name => l_form_name
1172: ,p_language => l_language
1173: ,p_user_id => l_user_id);
1174: ELSE
1175: fnd_message.set_name('PER','PER_289879_INVAL_META_TYPE');
1176: fnd_message.raise_error;
1177: END IF;
1178: END create_metadata;
1179: --
1172: ,p_language => l_language
1173: ,p_user_id => l_user_id);
1174: ELSE
1175: fnd_message.set_name('PER','PER_289879_INVAL_META_TYPE');
1176: fnd_message.raise_error;
1177: END IF;
1178: END create_metadata;
1179: --
1180: --
1212: IF ((p_param1_name IS NOT NULL) and
1213: (instr(p_sql,l_param_identifier||p_param1_name) = 0)) THEN
1214: --
1215: -- Param 1 does not appear in WHERE clause
1216: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1217: fnd_message.raise_error;
1218: --
1219: ELSIF ((p_param2_name IS NOT NULL) and
1220: (instr(p_sql,l_param_identifier||p_param2_name) = 0)) THEN
1213: (instr(p_sql,l_param_identifier||p_param1_name) = 0)) THEN
1214: --
1215: -- Param 1 does not appear in WHERE clause
1216: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1217: fnd_message.raise_error;
1218: --
1219: ELSIF ((p_param2_name IS NOT NULL) and
1220: (instr(p_sql,l_param_identifier||p_param2_name) = 0)) THEN
1221: --
1219: ELSIF ((p_param2_name IS NOT NULL) and
1220: (instr(p_sql,l_param_identifier||p_param2_name) = 0)) THEN
1221: --
1222: -- Param 2 does not appear in WHERE clause
1223: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1224: fnd_message.raise_error;
1225: --
1226: ELSIF ((p_param3_name IS NOT NULL) and
1227: (instr(p_sql,l_param_identifier||p_param3_name) = 0)) THEN
1220: (instr(p_sql,l_param_identifier||p_param2_name) = 0)) THEN
1221: --
1222: -- Param 2 does not appear in WHERE clause
1223: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1224: fnd_message.raise_error;
1225: --
1226: ELSIF ((p_param3_name IS NOT NULL) and
1227: (instr(p_sql,l_param_identifier||p_param3_name) = 0)) THEN
1228: --
1226: ELSIF ((p_param3_name IS NOT NULL) and
1227: (instr(p_sql,l_param_identifier||p_param3_name) = 0)) THEN
1228: --
1229: -- Param 3 does not appear in WHERE clause
1230: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1231: fnd_message.raise_error;
1232: --
1233: ELSIF ((p_param4_name IS NOT NULL) and
1234: (instr(p_sql,l_param_identifier||p_param4_name) = 0)) THEN
1227: (instr(p_sql,l_param_identifier||p_param3_name) = 0)) THEN
1228: --
1229: -- Param 3 does not appear in WHERE clause
1230: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1231: fnd_message.raise_error;
1232: --
1233: ELSIF ((p_param4_name IS NOT NULL) and
1234: (instr(p_sql,l_param_identifier||p_param4_name) = 0)) THEN
1235: --
1233: ELSIF ((p_param4_name IS NOT NULL) and
1234: (instr(p_sql,l_param_identifier||p_param4_name) = 0)) THEN
1235: --
1236: -- Param 4 does not appear in WHERE clause
1237: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1238: fnd_message.raise_error;
1239: --
1240: ELSIF ((p_param5_name IS NOT NULL) and
1241: (instr(p_sql,l_param_identifier||p_param5_name) = 0)) THEN
1234: (instr(p_sql,l_param_identifier||p_param4_name) = 0)) THEN
1235: --
1236: -- Param 4 does not appear in WHERE clause
1237: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1238: fnd_message.raise_error;
1239: --
1240: ELSIF ((p_param5_name IS NOT NULL) and
1241: (instr(p_sql,l_param_identifier||p_param5_name) = 0)) THEN
1242: --
1240: ELSIF ((p_param5_name IS NOT NULL) and
1241: (instr(p_sql,l_param_identifier||p_param5_name) = 0)) THEN
1242: --
1243: -- Param 5 does not appear in WHERE clause
1244: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1245: fnd_message.raise_error;
1246: --
1247: ELSE
1248: hr_integration_utils.add_sql_to_content
1241: (instr(p_sql,l_param_identifier||p_param5_name) = 0)) THEN
1242: --
1243: -- Param 5 does not appear in WHERE clause
1244: fnd_message.set_name('PER','PER_289713_ADI_INVALID_PARAM');
1245: fnd_message.raise_error;
1246: --
1247: ELSE
1248: hr_integration_utils.add_sql_to_content
1249: (p_application_id => p_application_id
1323: --
1324: IF csr_int%NOTFOUND THEN
1325: --
1326: CLOSE csr_int;
1327: fnd_message.set_name('PER','PER_289428_ADI_INTG_NOT_EXIST');
1328: fnd_message.raise_error;
1329: --
1330: END IF;
1331: CLOSE csr_int;
1324: IF csr_int%NOTFOUND THEN
1325: --
1326: CLOSE csr_int;
1327: fnd_message.set_name('PER','PER_289428_ADI_INTG_NOT_EXIST');
1328: fnd_message.raise_error;
1329: --
1330: END IF;
1331: CLOSE csr_int;
1332: --