405: insert_error exception;
406: args_insert_error exception;
407: login_insert_error exception;
408: relclass_insert_error exception;
409: dual_no_rows exception;
410: dual_too_many_rows exception;
411: nls_error exception;
412: appl_prog_error exception;
413: start_time_error exception;
406: args_insert_error exception;
407: login_insert_error exception;
408: relclass_insert_error exception;
409: dual_no_rows exception;
410: dual_too_many_rows exception;
411: nls_error exception;
412: appl_prog_error exception;
413: start_time_error exception;
414: already_msg exception;
439: if ( (P_DEFERRED_MODE) OR (P_DEF_REQUEST_ID = 0)) then
440: begin
441: Select Fnd_Concurrent_Requests_S.nextval
442: Into cur_request_id
443: From Sys.Dual;
444: exception
445: when no_data_found then
446: raise dual_no_rows;
447: when too_many_rows then
442: Into cur_request_id
443: From Sys.Dual;
444: exception
445: when no_data_found then
446: raise dual_no_rows;
447: when too_many_rows then
448: raise dual_too_many_rows;
449: when others then
450: raise;
444: exception
445: when no_data_found then
446: raise dual_no_rows;
447: when too_many_rows then
448: raise dual_too_many_rows;
449: when others then
450: raise;
451: end;
452: end if;
770: begin
771: select substr(userenv('LANGUAGE'),1,
772: instr(userenv('LANGUAGE'), '_') -1)
773: into P_LANGUAGE
774: from dual;
775:
776: exception
777: when no_data_found then
778: raise nls_error;
801: instr ( userenv('LANGUAGE') , '_') + 1,
802: (instr ( userenv('LANGUAGE') , '.') - 1 -
803: instr ( userenv('LANGUAGE') , '_') ))
804: into P_TERRITORY
805: from dual;
806:
807: exception
808: when no_data_found then
809: raise nls_error;
1206: -- successful.
1207: begin
1208: Select Fnd_Logins_S.nextval
1209: Into loginid
1210: From Sys.Dual;
1211:
1212: exception
1213: when no_data_found then
1214: raise dual_no_rows;
1210: From Sys.Dual;
1211:
1212: exception
1213: when no_data_found then
1214: raise dual_no_rows;
1215: when too_many_rows then
1216: raise dual_too_many_rows;
1217: when others then
1218: raise;
1212: exception
1213: when no_data_found then
1214: raise dual_no_rows;
1215: when too_many_rows then
1216: raise dual_too_many_rows;
1217: when others then
1218: raise;
1219: end;
1220:
1573: if (P_REL_CLASS_ID is null) and (P_REPEAT_INTERVAL is not null) then
1574: new_class := TRUE;
1575: begin
1576: Select FND_CONC_RELEASE_CLASSES_S.nextval, 0
1577: into P_REL_CLASS_ID, P_REL_CLASS_APP_ID from Sys.dual;
1578: exception
1579: when no_data_found then
1580: raise dual_no_rows;
1581: when too_many_rows then
1576: Select FND_CONC_RELEASE_CLASSES_S.nextval, 0
1577: into P_REL_CLASS_ID, P_REL_CLASS_APP_ID from Sys.dual;
1578: exception
1579: when no_data_found then
1580: raise dual_no_rows;
1581: when too_many_rows then
1582: raise dual_too_many_rows;
1583: when others then
1584: raise;
1578: exception
1579: when no_data_found then
1580: raise dual_no_rows;
1581: when too_many_rows then
1582: raise dual_too_many_rows;
1583: when others then
1584: raise;
1585: end;
1586: end if;
1785: submit.argument95, submit.argument96,
1786: submit.argument97, submit.argument98,
1787: submit.argument99, submit.argument100
1788:
1789: From Sys.Dual;
1790: end if; -- (nargs > 25)
1791:
1792: if (sql%rowcount = 0) then
1793: raise args_insert_error;
2038: fnd_message.set_name ('FND', 'CONC-RelClass insert failed');
2039: fnd_message.set_token ('APPLICATION', P_REL_CLASS_APP_ID, FALSE);
2040: fnd_message.set_token ('CLASS', P_REL_CLASS_ID, FALSE);
2041: return (0);
2042: when dual_no_rows then
2043: fnd_message.set_name ('FND', 'No Rows in Dual');
2044: return (0);
2045: when dual_too_many_rows then
2046: fnd_message.set_name ('FND', 'Too many rows in Dual');
2039: fnd_message.set_token ('APPLICATION', P_REL_CLASS_APP_ID, FALSE);
2040: fnd_message.set_token ('CLASS', P_REL_CLASS_ID, FALSE);
2041: return (0);
2042: when dual_no_rows then
2043: fnd_message.set_name ('FND', 'No Rows in Dual');
2044: return (0);
2045: when dual_too_many_rows then
2046: fnd_message.set_name ('FND', 'Too many rows in Dual');
2047: return (0);
2041: return (0);
2042: when dual_no_rows then
2043: fnd_message.set_name ('FND', 'No Rows in Dual');
2044: return (0);
2045: when dual_too_many_rows then
2046: fnd_message.set_name ('FND', 'Too many rows in Dual');
2047: return (0);
2048: when already_msg then
2049: return (0);
2042: when dual_no_rows then
2043: fnd_message.set_name ('FND', 'No Rows in Dual');
2044: return (0);
2045: when dual_too_many_rows then
2046: fnd_message.set_name ('FND', 'Too many rows in Dual');
2047: return (0);
2048: when already_msg then
2049: return (0);
2050: when pp_plsql_exception then
2244: Select To_Char (fnd_conc_date.string_to_date (
2245: '01-01-0001' || repeat_time),
2246: 'HH24:MI:SS')
2247: Into P_REPEAT_TIME
2248: From Sys.Dual;
2249:
2250: if (increment_dates = 'Y') then
2251: P_INCREMENT_DATES := increment_dates;
2252: else
3611: --
3612: function get_fnd_debug_rules_sequence return number is
3613:
3614: l_sequence number;
3615: dual_no_rows exception;
3616: dual_too_many_rows exception;
3617:
3618: begin
3619:
3612: function get_fnd_debug_rules_sequence return number is
3613:
3614: l_sequence number;
3615: dual_no_rows exception;
3616: dual_too_many_rows exception;
3617:
3618: begin
3619:
3620: begin
3619:
3620: begin
3621: select fnd_debug_rules_s.nextval
3622: into l_sequence
3623: from sys.dual;
3624:
3625: exception
3626: when no_data_found then
3627: raise dual_no_rows;
3623: from sys.dual;
3624:
3625: exception
3626: when no_data_found then
3627: raise dual_no_rows;
3628: when too_many_rows then
3629: raise dual_too_many_rows;
3630: when others then
3631: raise;
3625: exception
3626: when no_data_found then
3627: raise dual_no_rows;
3628: when too_many_rows then
3629: raise dual_too_many_rows;
3630: when others then
3631: raise;
3632: end;
3633:
3800: P_REPEAT_END_DATE := FND_CONC_DATE.STRING_TO_DATE(P_REQUESTED_END_DATE);
3801: end if;
3802:
3803: Select FND_CONC_RELEASE_CLASSES_S.nextval, 0
3804: into P_RELEASE_CLASS_ID, P_RELEASE_CLASS_APP_ID from Sys.dual;
3805:
3806: SELECT (DECODE(P_CLASS_TYPE, 'P', Decode(P_REPEAT_INTERVAL_UNIT, NULL, NULL,
3807: P_REPEAT_INTERVAL||':'||
3808: Decode(P_REPEAT_INTERVAL_UNIT,
3810: 'MONTHS', 'M',
3811: 'HOURS', 'H',
3812: 'DAYS', 'D') || ':' ||
3813: Decode(P_REPEAT_INTERVAL_TYPE,
3814: 'START', 'S', 'C')), NULL)) INTO P_REPEAT_VALUE FROM SYS.DUAL;
3815:
3816: -- Bug 6808926. Consider repeat start date as SYSDATE if null
3817:
3818: INSERT INTO FND_CONC_RELEASE_CLASSES