Open_sql_cursor

Internφ programovacφ jazyk

function Open_sql_cursor(var curs : cursor; var query : string) : Boolean;

Parametry

curs prom∞nnß typu kurzor (neboli prom∞nn² kurzor) - viz podrobnosti
query dotazov² v²raz SELECT v jazyce SQL

Popis

Funkce otev°e prom∞nn² kurzor, kter² je odpov∞dφ na zadan² dotaz query v jazyce SQL. Dotaz se zadß v souladu se syntaxφ dotazovΘho v²razu SELECT.

V externφch jazycφch slou₧φ ke stejnΘmu ·Φelu funkce Open_cursor_direct.

Nenφ-li kurzor po pou₧itφ uzav°en, zabφrß mφsto v operaΦnφ pam∞ti. Po ukonΦenφ b∞hu programu jsou vÜechny explicitn∞ neuzav°enΘ kurzory uzav°eny, p°edtφm je vÜak vydßna hlßÜka Program neuzav°el vÜechny kurzory.

Hodnota funkce

Funkce vracφ hodnotu FALSE, pokud se akci poda°ilo ·sp∞Ün∞ provΘst. V opaΦnΘm p°φpad∞ vracφ TRUE a povahu chyby lze zjistit volßnφm funkce Signalize. Nejb∞₧n∞jÜφ p°φΦinou chyby je nesprßvnß syntaxe dotazu. DoporuΦujeme v₧dy testovat v²sledek tΘto funkce.

P°φklad 1

zjistit poΦet nesmazan²ch zßznam∙ v tabulce TAB1

if not Open_sql_cursor(cur,"select * from TAB1") then 
 Rec_cnt(cur, pom);

P°φklad 2

kod := "00-10";
podm := "SELECT * FROM Knihy WHERE (vyrazena = false) AND (kod="""+kod+""")";
if Open_sql_cursor(cur,podm) then Exit;

Viz