660: srs2_i := upper(allow_disabled_values);
661:
662: SELECT fnd_concurrent_programs_s.NEXTVAL /* get next cp id */
663: INTO concurrent_program_id_i
664: FROM sys.dual;
665:
666: application_id_i := application_id_f(application);
667: appl_short_name := application_short_name_f(application);
668:
768: /* Check printer */
769: if (printer is not null) then
770: BEGIN
771: select 'x' into dummy
772: from sys.dual
773: where printer in
774: (select distinct printer_name
775: from fnd_printer p
776: where (output_print_style_i is not null
1214: RAISE bad_parameter;
1215: end if;
1216:
1217:
1218: select fnd_executables_s.nextval into executable_id from sys.dual;
1219:
1220: insert into FND_EXECUTABLES (
1221: APPLICATION_ID, EXECUTABLE_ID, EXECUTABLE_NAME,
1222: EXECUTION_METHOD_CODE, EXECUTION_FILE_NAME, SUBROUTINE_NAME,
1773:
1774: -- Can't delete an executable if it is in use
1775: BEGIN
1776: select 'x' into dummy
1777: from sys.dual
1778: where not exists
1779: (select 1
1780: from fnd_concurrent_programs
1781: where executable_application_id = exec_application_id