Dias uteis entre duas datas

 

declare
  d1 date := to_date(´01012005´,´ddmmyyyy´);
  d2 date := trunc(sysdate);
  da date;
  n  number := 0;
begin
  da := d2;
  while da >= d1 do
  loop
    da:= da -1;
    if to_char(da,´day´) in (´SUNDAY´,´SATURDAY´) then
      null;
    else
      n := n+1;
    end if;
  end loop;
end;