VPF::ошибка при написании пакета - Форум программистов

s_a_s_h_a

Дата 19.3.2008, 15:39 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 261
Регистрация: 20.7.2004
Где: Петрозаводск

Репутация: нет
Всего: 1

написал такой пакет

Код


create or replace package body dd_refusal_at_request_folders as
 function dd_refuse (id_folder in number, id_user_l in number, refuse_comment in varchar2) return number
 is
      id_last_history number;
 begin
       update DD_HISTORY set R_DATE = sysdate, R_COMMENT = refuse_comment, STATUS = 'H', TYPE_REC = 'R'  
                       where ID_FOLDER = id_folder and STATUS = 'A';
      
       insert into DD_HISTORY (ID,ID_FOLDER,ID_USER_L,L_DATE,STATUS) 
                     values (SEQ_DD_HISTORY.NEXTVAL, id_folder, id_user_l, sysdate, 'A');

           select SEQ_DD_HISTORY.CURRVAL into id_last_history from dual;

       update DD_FOLDERS set ID_LAST_HISTORY = id_last_history, STATUS = 1 
                       where ID = id_folder;
      commit;
      
      return(1);
    
  exception 
     when others then
            rollback;
            return(-1);                  
         
 end dd_refuse; 
 
end dd_refusal_at_request_folders;

в приложении вызываю один раз функцию из этого пакета. Первый запрос обновляет ВСЕ записи в таблице, а все остальные запросы выполняется по одному разу. В чем ошибка?

Sqlninja

Дата 19.3.2008, 16:20 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 353
Регистрация: 15.5.2006
Где: San Francisco, CA

Репутация: 13
Всего: 13

Ошибки нет.

--------------------

It's better to burn out than to fade away.

LSD

Дата 19.3.2008, 16:33 (ссылка)

(нет голосов)

Загрузка ...

Leprechaun Software Developer

Профиль
Группа: Модератор
Сообщений: 15718
Регистрация: 24.3.2004
Где: Dublin

Репутация: 18
Всего: 538

Проблема в ID_FOLDER = id_folder это условие всегда true. От того что ты написал один литерал большими буквами, ничего не изменится, это эквивалентно id_folder = id_folder.
Надо писать так:

Код


update DD_HISTORY h set h.R_DATE = sysdate, h.R_COMMENT = refuse_comment, h.STATUS = 'H', h.TYPE_REC = 'R'  
 where h.ID_FOLDER = id_folder and h.STATUS = 'A';

--------------------

Disclaimer: this post contains explicit depictions of personal opinion. So, if it sounds sarcastic, don't take it seriously. If it sounds dangerous, do not try this at home or at all. And if it offends you, just don't read it.

Sqlninja

Дата 19.3.2008, 16:38 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 353
Регистрация: 15.5.2006
Где: San Francisco, CA

Репутация: 13
Всего: 13

Нуу, так не интересно, нужно было чтоб он сам догадался )

--------------------

It's better to burn out than to fade away.

s_a_s_h_a

Дата 19.3.2008, 16:44 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 261
Регистрация: 20.7.2004
Где: Петрозаводск

Репутация: нет
Всего: 1

Спасибо, LSD.
правда, решил, что лучше будет переименовать параметры и переменные (добавить суффиксы)

догадался... дело не в моей тупости, а в невнимательности... с этим сложнее бороться smile

Это сообщение отредактировал(а) s_a_s_h_a - 19.3.2008, 16:45

Sqlninja

Дата 19.3.2008, 17:16 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 353
Регистрация: 15.5.2006
Где: San Francisco, CA

Репутация: 13
Всего: 13

Если придерживаться стиля или соглашений по именованию (code conventions), что есть атрибут кода любого профи-программера, таких ошибок возникать не будет. Затраченное на выработку стиля время с лихвой окупается при разработке сложной логики.

--------------------

It's better to burn out than to fade away.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Oracle \| Следующая тема »