Главная » Файлы » ПФР

Массовое удаление пачек ИС
17.11.2015, 19:02

Операция по списку, списка пачек ИС.

scan @pens0 nocheck
Execute{
if @pens0:[^] == 1
then{
if ( SELECT count(*) FROM pr_pfr_svis WHERE id_pachka_ch = @pens0:id ) > 0 then
            error [\3 Удалить нельзя. \10\3 Пачка включена в сводную ведомость / опись сведений];


        DELETE z_stag_lgot WHERE st_id in (select id from Z_STAG_HIST WHERE id_pachka = @pens0:id);
        DELETE Z_STAG_HIST WHERE id_pachka = @pens0:id;

        DELETE FROM pftb_payout 
            WHERE id_pens in (SELECT id FROM z_rep_pens WHERE id_pachka = @pens0:id);
        DELETE FROM pftb_pay_danger 
            WHERE id_pens in (SELECT id FROM z_rep_pens WHERE id_pachka = @pens0:id);
        DELETE FROM pftb_pay_corr 
            WHERE id_pens in (SELECT id FROM z_rep_pens WHERE id_pachka = @pens0:id);

        DELETE FROM z_rep_pens WHERE id_pachka = @pens0:id;
delete from z_pachka where id = @pens0:id;
   };
};
Msg 2041, @pens0;

Категория: ПФР | Добавил: rebel25
Просмотров: 205 | Загрузок: 0 | Рейтинг: 0.0/0
Всего комментариев: 0
avatar