Nedávno mi psal do komentáře David, že by jej potěšil článek o kurzorech (Chybí vám tu nějaký článek? Napiště si o něj). Kurzor (loop nebo cyklus) je kus kódu, který se souští stále dokola s jinými parametry. Točí se tak dlouho pokud mu vstupní parametry nedojdou. Pokud cyklus neuzavřeme tak pojede donekonečna. Je to obecně celkem pomalá operace a měly by se používat zřídka – pokud existuje jiná možnost. Často jde úloha řešit bez kurzoru (rekurzivním dotazem, cross joinempomocnou tabulku, computed columns atp).

Skript s kurzorem má tyto části

  1. Deklarujeme proměnnou (nebo proměnné), které se budou v rámci kurzoru měnit
  2. Deklarujeme kurzor a přiřadíme kurzor typicky nějakému sloupci v tabulce
  3. Otevřeme kurzor – přes příkaz OPEN <název kursoru>
  4. Přiřazení hodnot z kurzoru – přes příkaz FETCH NEXT FROM <název kursoru> INTO <proměnné z bodu 1> přiřadíme proměnným z bodu 1 hodnoty z kurzoru
  5. Zpracování SQL příkazu s využitím hodnoty (viz 4) v cyklu (loopujeme pořád dokola dokud není co kurzoru přiřadit
  6. Zavření kurzoru – přes příkaz CLOSE <název kursoru>
  7. Vymažeme kurzor – přes příkaz DEALLOCATE <název kursoru>

Celý skript s sql kurzorem pak může vypadat takto

Cílem je vypsat všechny zaměstnance z tabulky [AdventureworksDW2016CTP3].[dbo].[DimEmployee] (sample databáze Microsoft) – poznámky do kódu

USE AdventureworksDW2016CTP3

/* (1) Deklarujeme proměnné, které budeme chtít zobrazovat (ID zaměstnance a jeho jméno a příjmení */
DECLARE @Zamestnanec_ID INT ,@Zamestnanec_JmenoPrijmeni VARCHAR(255);

PRINT '===> SEZNAM ZAMESTNANCU <===';

/* (2) Deklarujeme kurzor a přiřadíme jej */
DECLARE muj_cursor CURSOR FOR
SELECT [EmployeeKey],CONCAT([FirstName],' ', [LastName])
FROM [AdventureworksDW2016CTP3].[dbo].[DimEmployee]
ORDER BY [EmployeeKey];

/* (3) Otevřeme kurzor */
OPEN muj_cursor

/* (4) Přiřadíme zpracovávaným proměnným hodnoty z kurzoru */
FETCH NEXT FROM muj_cursor
INTO @Zamestnanec_ID,@Zamestnanec_JmenoPrijmeni

PRINT 'Zamestnanec_ID Zamestnanec_JmenoPrijmeni'

/* (5) Zpracujeme SQL příkaz. V našem případě necháme přes přes PRINT vypsat hodnoty. Přes WHILE necháme cyklus proběhnout tolikrát, kolikrát ještě existuje další řádek v tabulce [AdventureworksDW2016CTP3].[dbo].[DimEmployee]. To zjišťujeme přes funkci @@FETCH_STATUS. Jak můžete vidět, tak loop proběhne pouze tehdy, pokud je hodnota funkce @@FETCH_STATUS = 0. Hodnota 0 znamená, že  “FETCH NEXT FROM muj_cursor” proběhlo úspěšně => je co zpracovat. Pokud kurzor dorazí na poslední řádek v tabulce a pokusíme se přiřadit další hodnotu, tak @@FETCH_STATUS by byla -1 a cyklus tím končí.*/

WHILE @@FETCH_STATUS = 0
BEGIN
PRINT ' -' + CAST(@Zamestnanec_ID as VARCHAR(10)) +'- '+ CAST(@Zamestnanec_JmenoPrijmeni as VARCHAR(20))

FETCH NEXT FROM muj_cursor
INTO @Zamestnanec_ID,@Zamestnanec_JmenoPrijmeni

END

/* (6) Zavření kurzoru */
CLOSE muj_cursor;

/* (7) Vymazání kurzoru */
DEALLOCATE muj_cursor;

SQL Kurzor - výsledek příkladu

Syntaxe deklarování SQL Cursor

DECLARE cursor_name CURSOR [ LOCAL | GLOBAL ]
[ FORWARD_ONLY | SCROLL ]
[ STATIC | KEYSET | DYNAMIC | FAST_FORWARD ]
[ READ_ONLY | SCROLL_LOCKS | OPTIMISTIC ]
[ TYPE_WARNING ] FOR select_statement
[ FOR UPDATE [ OF column_name [ ,…n ] ] ] [;]

Více o kurzoru a speciálních nastaveních na webu microsoft – https://docs.microsoft.com/en-us/sql/t-sql/language-elements/declare-cursor-transact-sql?view=sql-server-2017

5/5 - (2 votes)

Jan Zedníček - Data & Finance

Jmenuji se Honza Zedníček a působím jako freelancer. Tuto práci dělám pro různé firmy již přes 10 let. Před tím jsem dlouhou dobu pracoval také jako BI developer, finanční controller, analytik a krátce jako finanční manažer. Vše pro společnosti z oblasti IT, bankovnictví a výroby. Po práci si rád zahraju tenis, volejbal, šachy, zajdu do posilovny a rád ochutnávám dobré rumy. Svoje znalosti a názory se snažím už několik let zapisovat na tento web, aby sloužily i někomu dalšímu - zejména studentům a zájemcům o informace z oblastí Business intelligence, korporátních financí a reportingu.

=> Přihlašte se do naší Excel facebook skupiny (1.4k+ členů), kde si pomáháme Excel CZ/SK diskuse »
=> Pokud vám článek pomohl, sdílejte ho nebo mě uveďte na vašich webových stránkách jako užitečný zdroj informací.

Leave a Reply

Your email address will not be published. Required fields are marked *