--справочник сотрудников
create table w_employee
(
 id integer not null,
 empl_name varchar( 55 ) not null,
 birth_yearr integer,  -- понадобится при расчете ЕСН
 sex_id  integer, -- тоже
 ..
  primary key(id)
) 
#
-- сравочник подразделений
create table w_division
(
 id integer not null,
 div_name varchar( 50 ) not null,
 primary key(id)
) 
#

--лицевые счета
--сотрудник может работать в нескольких подразделениях
--по совместительству
create table w_account
(
 id integer not null,
 div_id integer not null, -- ссылается на w_division
 empl_id integer not null, --ссылается на w_employee
 salary decimal( 15 , 2 ), --оклад

 child_count integer, --число иждевенцев
 child_summa decimal( 15 , 2 ), -- сумма на одного иждевенца

 ...
 primary key(id)
) 
#
alter table w_account add constraint fk_account_employee foreign key(empl_id)
references w_employee(id);
#
alter table w_account add constraint fk_account_division foreign key(div_id)
references w_division(id);
#

-- виды оплат и удержаний
-- коды до 100 начисления
-- например код 2 повременная оплата по окладу
-- дальше удержания
-- например код 101 - налог
create table w_kindpay
(
 id integer not null,
 kind_name varchar( 50 ) not null,
 ok_tax integer,
 ...
  primary key(id)
) 
#

--ведомости начислений и удержаний
--бухгалтер знает, кому начислить или удержать дополнительно 
--заводит рукам
--должен быть еще табель, в котором отражено фактически отработанное время,
--календарь планового времени но это опущено
create table w_sheet
(
 id integer not null,
 acc_id integer not null, -- ссылается на w_account
 monthh integer  not null,
 yearr integer   not null,

 kind_id integer not null, -- код начисления или удержания
 summa  decimal( 15 , 2 ), 
 
 primary key(id)
) 
#

alter table w_sheet add constraint fk_sheet_account foreign key(acc_id)
references w_account(id);
#
alter table w_sheet add constraint fk_sheet_kindpay foreign key(kind_id)
references w_kindpay(id);
#


-- результат после расчета
create table w_result
(
 id integer not null,
 acc_id integer not null, 
 monthh integer  not null,
 yearr integer   not null,

 kind_id integer not null,
 summa  decimal( 15 , 2 ), 
 
 primary key(id)
) 
#

alter table w_sheet add constraint fk_sheet_account foreign key(acc_id)
references w_account(id);
#
alter table w_sheet add constraint fk_sheet_kindpay foreign key(kind_id)
references w_kindpay(id);
#


-- процедура расчета зарплаты подразделения за определенный год и месяц
-- упрощенная, без фактически отработанного времени
create procedure w_calc2half(div_id integer,monthh integer,yearr integer)
as

declare variable acc_id integer;
declare variable summa_for_tax decimal( 15 , 2 );

declare variable kind_id integer;
declare variable summa decimal( 15 , 2 );
declare variable ok_tax integer;
begin
-- получаем оклады сотрудников
 for select id,salary 
  from w_account where div_id=:div_id
   into :acc_id,:summa
    do
    begin
      summa_for_tax=summa;
     
     --должен быть табель, но пока нет 
      insert into w_result(monthh,yearr,acc_id,kind_id,summa)
       values (:monthh,:yearr,:acc_id, 2 ,:summa); -- код оплаты 2- по умолчанию для оклада
   
     --обрабатываем ведомости
      for select a.kind_id,a.summa,b.ok_tax
        from w_sheet a,w_kindpay b
         where a.acc_id=:acc_id and a.kind_id=b.id
          into :kind_id,:summa,:ok_tax
           do
           begin
            if(ok_tax= 1 ) then
             summa_for_tax=summa_for_tax+summa; -- накапливаем сумму для налога
           --здесь можно что то дополнительно расчитать
            insert into w_result(monthh,yearr,acc_id,kind_id,summa)
              values (:monthh,:yearr,:acc_id,:kind_id,:salary);
           
           end
   
   --удерживаем налог 13 процентов
   --здесь нужно убрать из облагаемой суммы суммы льгот
   --summa_for_tax=summa_for_tax-summa_privileges
   --...
     insert into w_result(monthh,yearr,acc_id,kind_id,summa_for_tax)
              values (:monthh,:yearr,:acc_id, 101 ,:summa_for_tax* 0 . 13 );

   
   
   end

end
#

--1. Из списка сотрудников выбрать сотрудников, заработная плата которых за последние 3 месяца составляет цифру большую определённой.
select empl_name,sum(a.summa)
  from w_result a,w_account b,w_employee c
   where a.acc_id=b.id and b.empl_id=c.id
   and monthh>= 3  and monthh<= 5   -- последние три месяца
       and yearr= 2008 
      group by empl_name
        having sum(a.summa)> 10000  -- определенная зарплата

--2. Определить за прошедший месяц общую сумму отчислений отдельно по видам отчислений.        
select kind_name,sum(a.summa)
 from w_result a,w_kindpay b
  where a.kind_id=b.id
   and monthh= 5  and yearr= 2008   -- последний месяц
    group by kind_name

--3. Подсчитать количество работников, имеющих иждивенцев и получающих льготы на них.    
select count(*) from w_account
 where child_count<> 0  and and child_summa<> 0 

--4. Отчёт по любому из запросов 
--дальше сами