-- ukázka použití objektu cursor


declare mer_cursor cursor FORWARD_ONLY 
    for select mereni_id, mereni_zmena, mereni_datum
       from MERENI_2011
	    where mereni_datum >= @datum_prep
              order by mereni_datum ASC
                 for READ ONLY
    
delete from DISPECINK_2011
  where mereni_datum > @datum_prep 

open mer_cursor

fetch  from mer_cursor into @mereni_id, @mereni_zmena, @mereni_datum

while (@@fetch_status = 0)
begin
	print @mereni_id
	exec R_Vypocet_dispecink_2011 @mereni_id
   	fetch next from mer_cursor into @mereni_id, @mereni_zmena, @mereni_datum
 end

close mer_cursor
deallocate mer_cursor