ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Oracle [игнор отключен] [закрыт для гостей] / Очередность вывода исключений
7 сообщений из 7, страница 1 из 1
Очередность вывода исключений
    #39437558
Bastist29
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Bastist29
Гость
Проблема заключается в том, что у меня есть 2 исключения и на каждое из них есть условие. Но, второе условие не проходит, когда не выполняется первое. Может кто помочь, с чем это связано?
То есть, если минимальный стаж меньше 8, то выводится только то, что указано в первом исключении..а второе он просто не видит.

Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
DECLARE 
  emp_no ZPD_STAG.kod_s%TYPE :=:emp_no;
  INVALID_POV EXCEPTION;
  invalid_prem EXCEPTION; 
  MIN_STAG CONSTANT INTEGER :=8;
  stag_sotr ZPD_STAG.stag%TYPE;
  fam ZPD_STAG.fami%TYPE; 
  premia NUMBER:=250;
  prem NUMBER;
BEGIN 
  SELECT stag,fami INTO stag_sotr, fam 
  FROM ZPD_STAG zs 
  WHERE kod_s = emp_no; 

IF stag_sotr < MIN_STAG THEN RAISE INVALID_POV; 
    ELSE DBMS_OUTPUT.put_line ('Сотрудник под номером ' || to_char(emp_no) || ' имеет право на повышение');   
         DBMS_OUTPUT.put_line (fam || ' отработал в фирме ' || to_char(stag_sotr) || ' месяцев');
    END IF;
prem:=(stag_sotr*250);
if (prem>500) THEN RAISE invalid_prem;
    ELSIF (prem<500) THEN DBMS_OUTPUT.put_line ('Премия 500 руб' );
    ELSE DBMS_OUTPUT.put_line ('Премия '|| TO_CHAR(prem) ||' руб' ); 
    END IF;

	EXCEPTION 
WHEN invalid_prem THEN
  DBMS_OUTPUT.put_line ('Сотрудник под номером ' || to_char(emp_no) || ' имеет право на премию, но она равна ' || TO_CHAR(prem) ||' руб.');
  
WHEN INVALID_POV THEN  
  DBMS_OUTPUT.put_line ('Сотрудник под номером ' || to_char(emp_no) || ' не имеет право на повышение');         
    DBMS_OUTPUT.put_line (fam || ' отработал в фирме ' || to_char(stag_sotr) || ' месяцев '); 
end;
...
Рейтинг: 0 / 0
12.04.2017, 20:39
| Ответить | Цитировать | Написать  
Очередность вывода исключений
    #39437565
stax..
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
stax..
Участник
Bastist29,

Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
DECLARE 
  emp_no ZPD_STAG.kod_s%TYPE :=:emp_no;
  INVALID_POV EXCEPTION;
  invalid_prem EXCEPTION; 
  MIN_STAG CONSTANT INTEGER :=8;
  stag_sotr ZPD_STAG.stag%TYPE;
  fam ZPD_STAG.fami%TYPE; 
  premia NUMBER:=250;
  prem NUMBER;
BEGIN 
  SELECT stag,fami INTO stag_sotr, fam 
  FROM ZPD_STAG zs 
  WHERE kod_s = emp_no; 
BEGIN

IF stag_sotr < MIN_STAG THEN RAISE INVALID_POV; 
    ELSE DBMS_OUTPUT.put_line ('Сотрудник под номером ' || to_char(emp_no) || ' имеет право на повышение');   
         DBMS_OUTPUT.put_line (fam || ' отработал в фирме ' || to_char(stag_sotr) || ' месяцев');
    END IF;
prem:=(stag_sotr*250);

EXCEPTION 
WHEN INVALID_POV THEN  
  DBMS_OUTPUT.put_line ('Сотрудник под номером ' || to_char(emp_no) || ' имеет право на премию, но она равна ' || TO_CHAR(prem) ||' руб.');


END:

BEGIN

if (prem>500) THEN RAISE invalid_prem;
    ELSIF (prem<500) THEN DBMS_OUTPUT.put_line ('Премия 500 руб' );
    ELSE DBMS_OUTPUT.put_line ('Премия '|| TO_CHAR(prem) ||' руб' ); 
    END IF;

EXCEPTION 
WHEN invalid_prem THEN
  DBMS_OUTPUT.put_line ('Сотрудник под номером ' || to_char(emp_no) || ' не имеет право на повышение');         
    DBMS_OUTPUT.put_line (fam || ' отработал в фирме ' || to_char(stag_sotr) || ' месяцев '); 

END:

end;


.....
stax
...
Рейтинг: 0 / 0
12.04.2017, 21:05
| Ответить | Цитировать | Написать  
Очередность вывода исключений
    #39437571
stax..
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
stax..
Участник
stax..,
ой

prem:=(stag_sotr*250);
переставить в второй блок


.....
stax
...
Рейтинг: 0 / 0
12.04.2017, 21:24
| Ответить | Цитировать | Написать  
Очередность вывода исключений
    #39437573
Bastist29
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Bastist29
Гость
stax..,

то есть exception можно ставить даже в подблоке begin end; ?
...
Рейтинг: 0 / 0
12.04.2017, 21:28
| Ответить | Цитировать | Написать  
Очередность вывода исключений
    #39437577
stax..
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
stax..
Участник
Bastist29,

да, исключение относится к блоку

declare
begin
exception
end;

есть нюансы (фичи/баги)
напр
исключение в секции declare,
в автономках (недавно гутарили)

.....
stax
...
Рейтинг: 0 / 0
12.04.2017, 21:32
| Ответить | Цитировать | Написать  
Очередность вывода исключений
    #39437578
Bastist29
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Bastist29
Гость
stax..,

оу, большое спасибо) А то маюсь с этим 3-ий день..
...
Рейтинг: 0 / 0
12.04.2017, 21:33
| Ответить | Цитировать | Написать  
Очередность вывода исключений
    #39437583
Фотография SY
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SY
Участник
Bastist29,

Начнем с того что твой работодатель xочет и рыбу сьесть и ... Если стаж < 8 нет премии. Если стаж >= 8, то стаж * 250 естественно > 500 и опять нет премии . А в остальном все работает как надо:

Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
SQL> set serveroutput on
SQL> DECLARE 
  2      INVALID_POV EXCEPTION;
  3      invalid_prem EXCEPTION; 
  4      MIN_STAG CONSTANT INTEGER := 1;
  5      stag_sotr number;
  6      prem NUMBER;
  7  BEGIN
  8      stag_sotr := 0; 
  9      IF stag_sotr < MIN_STAG
 10        THEN RAISE INVALID_POV; 
 11      END IF;
 12      prem:=(stag_sotr*250);
 13      if (prem>500)
 14        THEN RAISE invalid_prem;
 15      END IF;
 16    EXCEPTION 
 17      WHEN invalid_prem
 18       THEN
 19        DBMS_OUTPUT.put_line ('invalid_prem');
 20      WHEN INVALID_POV
 21       THEN  
 22        DBMS_OUTPUT.put_line ('INVALID_POV'); 
 23  end;
 24  /
INVALID_POV

PL/SQL procedure successfully completed.

SQL> DECLARE 
  2      INVALID_POV EXCEPTION;
  3      invalid_prem EXCEPTION; 
  4      MIN_STAG CONSTANT INTEGER := 1;
  5      stag_sotr number;
  6      prem NUMBER;
  7  BEGIN
  8      stag_sotr := 3; 
  9      IF stag_sotr < MIN_STAG
 10        THEN RAISE INVALID_POV; 
 11      END IF;
 12      prem:=(stag_sotr*250);
 13      if (prem>500)
 14        THEN RAISE invalid_prem;
 15      END IF;
 16    EXCEPTION 
 17      WHEN invalid_prem
 18       THEN
 19        DBMS_OUTPUT.put_line ('invalid_prem');
 20      WHEN INVALID_POV
 21       THEN  
 22        DBMS_OUTPUT.put_line ('INVALID_POV'); 
 23  end;
 24  /
invalid_prem

PL/SQL procedure successfully completed.

SQL>



SY.
...
Рейтинг: 0 / 0
12.04.2017, 21:54
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Oracle [игнор отключен] [закрыт для гостей] / Очередность вывода исключений
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=52&fpage=167&tid=1886110]:
 0ms
get settings:
 11ms
get forum list:
 17ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 71ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 45ms
get tp. blocked users:
 2ms
others: 249ms
total:  417ms
созд. / загр.: 417ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]