Informix Magazine Russian Edition яЕМРЪАПЭ 1998Ц.

цПЮВЕБ юМДПЕИ чПЭЕБХВ
ЙНМЯСКЭРЮМР, Informix лНЯЙБЮ,
РЕК. (095) 755-87-00
email: andreyg@informix.com

нР ПЕДЮЙЖХХ Informix Magazine/RE: ОНЯРНЪММШИ ЮБРНП МЮЬЕЦН ФСПМЮКЮ, ЯНРПСДМХЙ ЛНЯЙНБЯЙНЦН НТХЯЮ Informix, юМДПЕИ цПЮВЕБ ГЮЙЮМВХБЮЕР ЙМХЦС "бБЕДЕМХЕ Б Informix". б ЩРНИ ЙМХЦЕ ПЮЯЯЛНРПЕМШ ЮПУХРЕЙРСПШ - ТЮИК-ЯЕПБЕПМЮЪ, УНЯР-РЕПЛХМЮК, ЙКХЕМР-ЯЕПБЕП, РПЕУГБЕММЮЪ Я ЯЕПБЕПНЛ ОПХКНФЕМХИ; ЛНДЕКХ ДЮММШУ - ХЕПЮПУХВЕЯЙЮЪ, ЯЕРЕБЮЪ, ПЕКЪЖХНММЮЪ, НАЗЕЙРМН-ПЕКЪЖХНММЮЪ; НЯМНБМШЕ ОНМЪРХЪ ПЕКЪЖХНММШУ ясад, ПЕКЪЖХНММШЕ ЮКЦЕАПЮ Х ХЯВХЯКЕМХЕ, МНПЛЮКХГЮЖХЪ; ЪГШЙ SQL Х ЕЦН ХЯОНКЭГНБЮМХЕ; НАГНП ОПНДСЙРНБ Informix Х ОПНАКЕЛ ОНЯРПНЕМХЪ ХМТНПЛЮЖХНММШУ ЯХЯРЕЛ МЮ ХУ НЯМНБЕ.

цКЮБС ХГ ЩРНИ ЙМХЦХ, ОНЯБЪЫЕММСЧ ПЮГПЮАНРЙЕ ЯЕПБЕПМНИ ВЮЯРХ ОПХКНФЕМХЪ, ЛШ ОПЕДКЮЦЮЕЛ бЮЬЕЛС БМХЛЮМХЧ.

дЮММЮЪ ЦКЮБЮ ОНЯБЪЫЕМЮ ОПНЦПЮЛЛХПНБЮМХЧ ЯЕПБЕПЮ АЮГШ ДЮММШУ, РН ЕЯРЭ ЯНГДЮМХЧ ЙНМЯРПСЙЖХИ, ЙНРНПШЕ УПЮМЪРЯЪ Х ХЯОНКМЪЧРЯЪ МЕОНЯПЕДЯРБЕММН МЮ SQL-ЯЕПБЕПЕ. б ВЮЯРМНЯРХ, ПЮЯЯЙЮГШБЮЕРЯЪ Н УПЮМХЛШУ ОПНЖЕДСПЮУ, РПХЦЦЕПЮУ, НОХЯЮМХХ ЖЕКНЯРМНЯРХ АЮГШ ДЮММШУ Х Р.Д.

йНЦДЮ ЛШ ЦНБНПХКХ Н ЯУЕЛЕ АЮГШ ДЮММШУ, РН НОПЕДЕКЪКХ ЕЕ ЙЮЙ "МЮАНП РЮАКХЖ Х КНЦХВЕЯЙХЕ ЯБЪГХ ЛЕФДС МХЛХ". мН Б ЯУЕЛС ЛНЦСР АШРЭ БЙКЧВЕМШ Х СОПЮБКЪЧЫХЕ ЙНМЯРПСЙЖХХ, Б ВЮЯРМНЯРХ, ОПНЖЕДСПШ. гЮВЕЛ ЩРН МСФМН, ЙЮЙХЕ ОПЕХЛСЫЕЯРБЮ ДЮЕР РЮЙНИ ОНДУНД, Ю РЮЙФЕ НОХЯЮМХЕ ЙНМЙПЕРМШУ ЛЕУЮМХГЛНБ - БЯЕ ЩРН ЛШ Х ПЮЯЯЛНРПХЛ ДЮКЕЕ.

дХМЮЛХВЕЯЙХИ SQL

хМНЦДЮ МЮ ЩРЮОЕ МЮОХЯЮМХЪ ОПНЦПЮЛЛШ БШ ЕЫЕ МЕ ГМЮЕРЕ, ЙЮЙНИ ХЛЕММН ГЮОПНЯ ДНКФЕМ АШРЭ НРПЮАНРЮМ ЯЕПБЕПНЛ. оПНЯРЕИЬХИ ОПХЛЕП - ЩРН ОНПЪДНЙ ЯНПРХПНБЙХ. б БЮЬЕЛ ОПХКНФЕМХХ, ОПЕДМЮГМЮВЕММНЛ ДКЪ НРДЕКЮ ЙЮДПНБ, ДНКФМЮ АШРЭ БНГЛНФМНЯРЭ НРЯНПРХПНБЮРЭ НРВЕР ОН ТЮЛХКХХ, ДНУНДС, ЯРЮФС ПЮАНРШ ХКХ ВХЯКС ОПНЦСКНБ. оПХВЕЛ ДНКФМШ АШРЭ ОПЕДСЯЛНРПЕМШ БЯЕ БНГЛНФМШЕ ЙНЛАХМЮЖХХ ЩРХУ ЯНПРХПНБНЙ - ОН ДНУНДС Х ВХЯКС ОПНЦСКНБ, ОН ТЮЛХКХХ Х ЯРЮФС Б НАПЮРМНЛ ОНПЪДЙЕ Х Р.Д. оПНЯРЕИЬХИ ОНДЯВЕР ОНЙЮГШБЮЕР - БЮПХЮМРНБ ПЮГДЕКЮ ORDER BY НОЕПЮРНПЮ SELECT АСДЕР 81 (БЯЕЦН 4 ОНКЪ, ЙЮФДНЕ ОНКЕ ДНОСЯЙЮЕР РПХ ПЮГМШУ ЯОНЯНАЮ ХЯОНКЭГНБЮМХЪ ОПХ ЯНРПХПНБЙЕ - ЯНПРХПНБЮРЭ Б ОНПЪДЙЕ БНГПЮЯРЮМХЪ, САШБЮМХЪ, БННАЫЕ МЕ ЯНПРХПНБЮРЭ - РПХ Б ВЕРБЕПРНИ ЯРЕОЕМХ Х ЕЯРЭ 81). яНЦКЮЯХРЕЯЭ, ВРН БЕЯЭЛЮ СРНЛХРЕКЭМН СЙЮГШБЮРЭ БЯЕ 81 БЮПХЮМРНБ НОЕПЮРНПЮ SELECT Б ОПНЦПЮЛЛЕ.

б ЯХЯРЕЛЮУ ПЮГПЮАНРЙХ ОПХКНФЕМХИ (ESQL/C, NewEra, 4GL Х Р.Д.) ХЛЕЕРЯЪ БНГЛНФМНЯРЭ ТНПЛХПНБЮРЭ Х ХЯОНКМЪРЭ SQL-ГЮОПНЯШ Б ОПНЖЕЯЯЕ ПЮАНРШ ОПХЙКЮДМНИ ОПНЦПЮЛЛШ, Б ДХМЮЛХЙЕ ЕЕ ХЯОНКМЕМХЪ. нРЯЧДЮ Х МЮГБЮМХЕ - "ДХМЮЛХВЕЯЙХИ SQL" (БОПНВЕЛ, ЮБРНП МЕ ЯВХРЮЕР ЩРН МЮГБЮМХЕ НВЕМЭ СДЮВМШЛ). тЮЙРХВЕЯЙХ, ЩРН РНР ФЕ ЯЮЛШИ ЪГШЙ - SQL, МН SQL-НОЕПЮРНП МЕ ОНДБЕПЦЮЕРЯЪ ЯХМРЮЙЯХВЕЯЙНЛС ПЮГАНПС МЮ ЩРЮОЕ ЙНЛОХКЪЖХХ ОПХЙКЮДМНИ ОПНЦПЮЛЛШ, Ю Б РЕЙЯРНБНЛ БХДЕ ОЕПЕДЮЕРЯЪ МЕОНЯПЕДЯРБЕММН ЯЕПБЕПС АЮГС ДЮММШУ.

дКЪ ПЮАНРШ Я ДХМЮЛХВЕЯЙХЛ SQL ОПЕДКЮЦЮЧРЯЪ ЯКЕДСЧЫХЕ НОЕПЮРНПШ:

PREPARE <ХЛЪ НОЕПЮРНПЮ> FROM <РЕЙЯРНБЮЪ ЯРПНЙЮ>

EXECUTE <ХЛЪ НОЕПЮРНПЮ>

FREE <ХЛЪ НОЕПЮРНПЮ>

нОЕПЮРНП PREPARE "ОНДЦНРЮБКХБЮЕР" SQL-НОЕПЮРНП ДКЪ ХЯОНКМЕМХЪ. яЮЛ SQL-НОЕПЮРНП СЙЮГШБЮЕРЯЪ КХАН ЪБМН Б БХДЕ РЕЙЯРНБНИ ЯРПНЙХ, КХАН ВЕПЕГ ГМЮВЕМХЕ РЕЙЯРНБНИ ОЕПЕЛЕММНИ. нОЕПЮРНП PREPARE "ЯБЪГШБЮЕР" Я SQL-НОЕПЮРНПНЛ ХЛЪ. щРН ХЛЪ - ЯЮЛНЕ НАШВМНЕ ХЛЪ Б ЯПЕДЕ ПЮГПЮАНРЙХ. оПХЛЕПШ (Informix-4GL):

PREPARE sel1 FROM "select name from items where price < 1.50"

PREPARE empty_comp FROM
"INSERT INTO companies(name) VALUES ('undef')"

нОЕПЮРНП PREPARE ОНЯШКЮЕР ОЕПЕДЮММШИ ЕЛС РЕЙЯР SQL-ЯЕПБЕПС. яЕПБЕП ЮМЮКХГХПСЕР ОЕПЕДЮММШЕ ЕЛС SQL-НОЕПЮРНПШ Х, ЕЯКХ МЕР НЬХАНЙ, ОЕПЕБНДХР ХУ БН БМСРПЕММЕЕ ОПЕДЯРЮБКЕМХЕ.

оНЯКЕ РНЦН, ЙЮЙ НОЕПЮРНП ОНДЦНРНБКЕМ, НМ ЛНФЕР АШРЭ ХЯОНКМЕМ НОЕПЮРНПНЛ EXECUTE. гДЕЯЭ-РН Х МЮДН СЙЮГШБЮРЭ ХЛЪ, ДЮММНЕ ОНДЦНРНБКЕММНЛС НОЕПЮРНПС:

EXECUTE sel1
EXECUTE empty_comp

нДХМ Х РНР ФЕ ОНДЦНРНБКЕММШИ НОЕПЮРНП ЛНФМН ХЯОНКМЪРЭ ЛМНЦНЙПЮРМН. нОЕПЮРНП FREE НЯБНАНФДЮЕР БЯЕ ПЕЯСПЯШ (ОЮЛЪРЭ), ЯБЪГЮММШЕ Я ОНДЦНРНБКЕММШЛ НОЕПЮРНПНЛ. бШОНКМЪРЭ НОЕПЮРНП FREE ЯКЕДСЕР РНЦДЮ, ЙНЦДЮ ОНДЦНРНБКЕММШИ НОЕПЮРНП ГЮБЕДНЛН АНКЭЬЕ МЕ ОНРПЕАСЕРЯЪ:

FREE sel1

еЯКХ МЕ БШОНКМХРЭ НОЕПЮРНП FREE МХВЕЦН ЯРПЮЬМНЦН МЕ ОПНХГНИДЕР, МН БШДЕКЕММЮЪ ДКЪ НОЕПЮРНПЮ ОЮЛЪРЭ АСДЕР БХЯЕРЭ ЛЕПРБШЛ ЦПСГНЛ.

еЯКХ МЮ ЛНЛЕМР ОНДЦНРНБЙХ SQL-НОЕПЮРНПЮ МЕ БЯЕ ЙНМЙПЕРМШЕ ГМЮВЕМХЪ ХГБЕЯРМШ, РН ХЛЕЕРЯЪ БНГЛНФМНЯРЭ ОНДЯРЮБКЪРЭ ЩРХ ГМЮВЕМХЪ Б ЛНЛЕМР ХЯОНКМЕМХЪ. дКЪ ЩРНЦН SQL-НОЕПЮРНП, ОНДЦНРНБКЕММШИ Я ОНЛНЫЭЧ PREPARE, ДНКФЕМ АШРЭ ЯМЮАФЕМ ОЮПЮЛЕРПЮЛХ. оЮПЮЛЕРПШ, ГМЮВЕМХЪ ЙНРНПШУ АСДСР НОПЕДЕКЪРЭЯЪ Б ЛНЛЕМР ХЯОНКМЕМХЪ, ГЮДЮЧРЯЪ ЯХЛБНКНЛ "?":

PREPARE select2 FROM "SELECT price FROM items WHERE name = ?"
PREPARE new_comp FROM
"INSERT INTO companies(name, address) VALUES (?,?)"

дКЪ ГЮДЮМХЪ ТЮЙРХВЕЯЙХУ ОЮПЮЛЕРПНБ Б НОЕПЮРНП EXECUTE МЮДН ДНАЮБХРЭ ПЮГДЕК USING:

EXECUTE new_comp USING "йННОЕПЮРХБ 'щУ, СУМЕЛ'", "лНЯЙБЮ, юПАЮР, 21"
EXECUTE new_comp USING "хво 'аСЛЕПЮМЦ'", "лЮЦЮДЮМ, О/Ъ 777"

оЮПЮЛЕРПШ Б НОЕПЮРНПЮУ PREPARE/EXECUTE ЪБКЪЧРЯЪ ОНГХЖХНММШЛХ. рН ЕЯРЭ, ОПХ ХЯОНКМЕМХХ МЮ ЛЕЯРН ОЕПБНЦН БНОПНЯХРЕКЭМНЦН ГМЮЙЮ ОНДЯРЮБКЪЕРЯЪ ОЕПБНЕ ГМЮВЕМХЕ Б ПЮГДЕКЕ USING, МЮ ЛЕЯРН БРНПНЦН БНОПНЯХРЕКЭМНЦН ГМЮЙЮ - БРНПНЕ ГМЮВЕМХЕ ХГ ПЮГДЕКЮ USING Х Р.Д.

оНДЦНРНБКЕММШИ НОЕПЮРНП ЛНФЕР ХЯОНКЭГНБЮРЭЯЪ ОПХ НОХЯЮМХХ ЙСПЯНПЮ. мЮОПХЛЕП, ЕЯКХ Б ГЮБХЯХЛНЯРХ НР ФЕКЮМХЪ ОНКЭГНБЮРЕКЪ МЮЛ МЮДН БШОНКМХРЭ ЯНПРХПНБЙС РНБЮПЮ КХАН ОН МЮГБЮМХЧ, КХАН ОН ЖЕМЕ, РН ЩРН МЮ Informix-4GL ПЕЮКХГСЕРЯЪ ЯКЕДСЧЫХЛ НАПЮГНЛ:

DEFINE string1 CHAR(60)
..........
IF flag
THEN { ЯНПРХПСЕЛ ОН МЮГБЮМХЧ }
LET string1 = "SELECT name, price FROM items ORDER BY name"
ELSE { ЯНПРХПСЕЛ ОН ЖЕМЕ }
LET string1 = "SELECT name, price FROM items ORDER BY price"
END IF
PREPARE select_st FROM string1
DECLARE my_cursor CURSOR FOR select_st
..........

нВЕБХДМН, ЛНФМН ЕЫЕ ЯНЙПЮРХРЭ ОПХБЕДЕММШИ БШЬЕ ТПЮЦЛЕМР, ЕЯКХ ХЯОНКЭГНБЮРЭ НОЕПЮРНП ЙНМЙЮРЕМЮЖХХ ЯРПНЙ.

оНЛХЛН БНГЛНФМНЯРХ ТНПЛХПНБЮРЭ ГЮОПНЯШ МЕ МЮ ЩРЮОЕ МЮОХЯЮМХЪ ОПНЦПЮЛЛШ, Ю МЮ ЩРЮОЕ ЕЕ ХcОНКМЕМХЪ, НОЕПЮРНПШ PREPARE/EXECUTE/FREE ЛНЦСР АШРЭ ОНКЕГМШ ЕЫЕ, ЙЮЙ ЛХМХЛСЛ, Б ДБСУ ЯКСВЮЪУ: ДКЪ ОНБШЬЕМХЪ ЩТТЕЙРХБМНЯРХ ОПНЦПЮЛЛШ Х ДКЪ ХЯОНКМЕМХЪ SQL-НОЕПЮРНПНБ, ЙНРНПШУ "МЕР" Б ЯПЕДЕ ПЮГПЮАНРЙХ.

дКЪ РНЦН, ВРНАШ ОНМЪРЭ ГЮ ЯВЕР ВЕЦН ОНДЦНРНБКЕММШЕ НОЕПЮРНПШ ЛНЦСР ОНБШЯХРЭ ЩТТЕЙРХБМНЯРЭ, ПЮЯЯЛНРПХЛ ЙЮЙ НРПЮАЮРШБЮЧРЯЪ SQL-ГЮОПНЯШ. йНЦДЮ Б ПЮАНРЕ ОПХКНФЕМХЪ СОПЮБКЕМХЕ ОЕПЕДЮЕРЯЪ МЮ SQL-НОЕПЮРНП, РН ОПНХЯУНДХР ЯКЕДСЧЫЕЕ. щРНР SQL-НОЕПЮРНП ОНЯШКЮЕР ЯЕПБЕПС ГЮОПНЯ МЮ ХЯОНКМЕМХЕ. SQL-ЯЕПБЕП ХЯОНКМЪЕР ГЮОПНЯ Б ВЕРШПЕ ЩРЮОЮ: (1) ЮМЮКХГХПСЕР ОПХЬЕДЬХИ ГЮОПНЯ, (2) БШАХПЮЕР НОРХЛЮКЭМШИ ЯОНЯНА ЕЦН ХЯОНКМЕМХЪ, (3) ХЯОНКМЪЕР Х (4) НРЯШКЮЕР ПЕГСКЭРЮРШ ОПХКНФЕМХЧ. еЯКХ БШОНКМЪРЭ МЕЯЙНКЭЙН НДХМЮЙНБШУ ГЮОПНЯНБ, РН ДКЪ ЙЮФДНЦН ГЮОПНЯЮ АСДСР ХЯОНКМЪРЭЯЪ БЯЕ ЩРХ ЩРЮОШ. еЯКХ ФЕ ЛШ ОНДЦНРЮБКХБЮЕЛ ГЮОПНЯ Я ОНЛНЫЭЧ НОЕПЮРНПЮ PREPARE, Ю ГЮРЕЛ МЕЯЙНКЭЙН ПЮГ ХЯОНКМЪЕЛ ЕЦН НОЕПЮРНПНЛ EXECUTE, РН ЮМЮКХГ ГЮОПНЯЮ Х ОНХЯЙ НОРХЛЮКЭМНЦН ЯОНЯНАЮ ХЯОНКМЕМХЪ АСДЕР БШОНКМЪРЭЯЪ РНКЭЙН ПЮГ - ОПХ БШОНКМЕМХХ НОЕПЮРНПЮ PREPARE. ю МЮ ЙЮФДНЕ ХЯОНКМЕМХЕ ГЮОПНЯЮ НОЕПЮРНПНЛ EXECUTE РПЕАСЕРЯЪ РНКЭЙН ДБЮ ОНЯКЕДМХУ ЩРЮОЮ - МЕОНЯПЕДЯРБЕММНЕ ХЯОНКМЕМХЕ Х НРЯШКЙЮ ПЕГСКЭРЮРНБ.

дПСЦНЕ ОНКЕГМНЕ ЯБНИЯРБН ОНДЦНРЮБКХБЮЕЛШУ НОЕПЮРНПНБ - ЩРН ПЮЯЬХПЕМХЕ БНГЛНФМНЯРЕИ ЯПЕДШ ПЮГПЮАНРЙХ. оНДЦНРЮБКХБЮЕЛШИ НОЕПЮРНП ДКЪ ОПХКНФЕМХЪ ЯСЫЕЯРБСЕР РНКЭЙН ЙЮЙ РЕЙЯРНБЮЪ ЯРПНЙЮ. еЦН ХЯОНКМЕМХЕ Х ЯХМРЮЙЯХВЕЯЙХИ ПЮГАНП БНГКНФЕМ МЮ SQL-ЯЕПБЕП. оНЩРНЛС Я ОНЛНЫЭЧ НОЕПЮРНПНБ PREPARE/EXECUTE ЛНФМН БШОНКМХРЭ SQL-ГЮОПНЯ, МЕ ОПЕДСЯЛНРПЕММШИ Б ЯХМРЮЙЯХЯЕ ЯПЕДШ ПЮГПЮАНРЙХ.

мЮОПХЛЕП, бШ ХЯОНКЭГСЕРЕ ЯПЕДС ПЮГПЮАНРЙХ Informix-4GL ЯРЮПНИ БЕПЯХХ (ОПЕДОНКНФХЛ, 4-И). нМЮ БЮЯ БОНКМЕ СЯРПЮХБЮЕР. мН Б ЙЮВЕЯРБЕ SQL-ЯЕПБЕПЮ ХЯОНКЭГСЕРЯЪ 7-Ъ БЕПЯХЪ Informix OnLine Dynamic Scalable Architecture. щРНР ЯЕПБЕП "ОНМХЛЮЕР" СФЕ ГМЮВХРЕКЭМН АНКЕЕ ЬХПНЙХИ МЮАНП SQL-НОЕПЮРНПНБ ОН ЯПЮБМЕМХЧ Я 4-И БЕПЯХЕИ Informix-4GL. б ВЮЯРМНЯРХ, НОЕПЮРНП ЯНГДЮМХЪ РПХЦЦЕПНБ CREATE TRIGGER (Н РНЛ, ВРН ЩРН РЮЙНЕ, АСДЕР ЯЙЮГЮМН МХФЕ) ЛНФЕР АШРЭ ХЯОНКМЕМ ЯЕПБЕПНЛ, МН НРЯСРЯРБСЕР Б Informix-4GL БЕПЯХХ 4.10. хЯОНКЭГСЪ НОЕПЮРНПШ PREPARE/EXECUTE, ЩРНР РПХЦЦЕП ЛНФМН ЯНГДЮРЭ РЮЙ:

PREPARE cr_trig FROM "CREATE TRIGGER trig1 ..."
EXECUTE cr_trig
FREE cr_trig

оНДЦНРНБКЕММШЕ Я ОНЛНЫЭЧ НОЕПЮРНПЮ PREPARE SQL-ГЮОПНЯШ ДНЯРСОМШ (БХДХЛШ) РНКЭЙН Б ДЮММНЛ ОПХКНФЕМХХ, Ю ХЛЕММН ЛЕФДС НОЕПЮРНПЮЛХ DATABASE ... CLOSE DATABASE. рН ЕЯРЭ, ЕЯКХ БШ ГЮБЕПЬХКХ ПЮАНРС (Ю РНВМЕЕ, ГЮЙПШКХ АЮГС ДЮММШУ НОЕПЮРНПНЛ CLOSE DATABASE), РН ОНДЦНРНБКЕММШЕ ГЮОПНЯШ ОПНОЮДЮЧР. хКХ, ЕЯКХ БШ ОНДЦНРНБХКХ SQL-ГЮОПНЯ, РН ДПСЦНИ ОНКЭГНБЮРЕКЭ ГЮ ДПСЦХЛ ЙНЛОЭЧРЕПНЛ МЕ ЛНФЕР БШОНКМХРЭ ОНДЦНРНБКЕММШИ БЮЛХ ГЮОПНЯ (ЩРНР ДПСЦНИ ОНКЭГНБЮРЕКЭ, ЙНМЕВМН, ЛНФЕР БШОНКМХРЭ РС ФЕ ЯЮЛСЧ ОНЯКЕДНБЮРЕКЭМНЯРЭ PREPARE/EXECUTE/FREE, МН ЩРН АСДЕР СФЕ ДПСЦНИ SQL-ГЮОПНЯ). нДМЮЙН, ЯСЫЕЯРБСЕР БНГЛНФМНЯРЭ ОНДЦНРНБХРЭ ДКЪ ХЯОНКМЕМХЪ SQL-ГЮОПНЯШ РЮЙ, ВРН ЩРХ ГЮОПНЯШ АСДСР ДНЯРСОМШ ЛМНЦХЛ ОНКЭГНБЮРЕКЪЛ. мН ДКЪ ЩРНЦН ХЯОНКЭГСЕРЯЪ СФЕ ДПСЦНИ ЛЕУЮМХГЛ - УПЮМХЛШЕ ОПНЖЕДСПШ.

уПЮМХЛШЕ ОПНЖЕДСПШ

уПЮМХЛЮЪ ОПНЖЕДСПЮ ОПЕДЯРЮБКЪЕР ЯНАНИ НДХМ ХГ БЮПХЮМРНБ ОПНЦПЮЛЛМНЦН МЮОНКМЕМХЪ АЮГШ ДЮММШУ. тЮЙРХВЕЯЙХ, ЩРН МЕЙНРНПЮЪ ОПНЖЕДСПЮ, ДНЯРСОМЮЪ ОНКЭГНБЮРЕКЪЛ. оНКЭГНБЮРЕКЭ (Б ЯННРБЕРЯРБХХ ЯН ЯБНХЛХ ОПЮБЮЛХ, ЕЯРЕЯРБЕММН) ЛНФЕР ЯНГДЮРЭ, СДЮКХРЭ ХКХ БШОНКМХРЭ УПЮМХЛСЧ ОПНЖЕДСПС.

нЯМНБМНЕ МЮГМЮВЕМХЕ УПЮМХЛШУ ОПНЖЕДСП - ЩРН ТСМЙЖХНМЮКЭМНЕ ПЮЯЬХПЕМХЕ ЯУЕЛШ АЮГШ ДЮММШУ. уПЮМХЛЮЪ ОПНЖЕДСПЮ ЛНФЕР ЯНДЕПФЮРЭ МЕЙНРНПШИ МЕРПХБХЮКЭМШИ МЮАНП НОЕПЮРНПНБ, ПЕЮКХГСЧЫХИ РН ХКХ ХМНЕ КНЦХВЕЯЙНЕ ДЕИЯРБХЕ. мЮОПХЛЕП, ЮДЛХМХЯРПЮРНП АЮМЙНБЯЙНИ ЯХЯРЕЛШ ПЮГПЮАНРЮК УПЮМХЛСЧ ОПНЖЕДСПС, ЙНРНПЮЪ ПЕЮКХГСЕР ТСМЙЖХЧ "ГЮМЕЯРХ МЮ ЯВЕР МНЛЕП X ЯСЛЛС Y". оПНЦПЮЛЛХЯР, ПЮГПЮАЮРШБЮЧЫХИ ОПХКНФЕМХЕ ОНКЭГСЕРЯЪ ЩРНИ ОПНЖЕДСПНИ, МН МЕ ГМЮЕР йюй ХЛЕММН НМЮ БШОНКМЪЕРЯЪ. б ПЕГСКЭРЮРЕ:

• ЙНЦДЮ ЛЕМЪЕРЯЪ ЮКЦНПХРЛ ДЮММНЦН ДЕИЯРБХЪ (МЮОПХЛЕП, АШКН ОПХМЪРН ПЕЬЕМХЕ ЯПЮГС ЯОХЯШБЮРЭ МЮКНЦ), РН ЮДЛХМХЯРПЮРНП ЛЕМЪЕР РНКЭЙН ЩРС УПЮМХЛСЧ ОПНЖЕДСПС, Х БЯЕ ОПХКНФЕМХЧ ЯПЮГС МЮВХМЮЧР ПЮАНРЮРЭ ОН-МНБНЛС;

• МХЙРН, ЙПНЛЕ ЮДЛХМХЯРПЮРНПЮ, МЕ ГМЮЕР Н РНЛ, ЙЮЙ СЯРПНЕМЮ ЯУЕЛЮ АЮГШ ДЮММШУ, Х ЛЕМЭЬЕ ЬЮМЯНБ, ВРН ЙРН-РН ХЯОНКЭГСЕР ЩРХ ГМЮМХЪ Б ЙНПШЯРМШУ ЖЕКЪУ;

• МЕГЮБХЯХЛН НР РХОЮ ПЮАНВЕЦН ЛЕЯРЮ НДМН Х РНФЕ ДЕИЯРБХЕ БШОНКМЪЕРЯЪ ЦЮПЮМРХПНБЮММН НДМХЛХ Х РЕЛХ ФЕ НОЕПЮРНПЮЛХ - БШЬЕ МЮДЕФМНЯРЭ ПЮГПЮАНРЮММНИ ЯХЯРЕЛШ;

• РЮЙ ЙЮЙ УПЮМХЛЮЪ ОПНЖЕДСПЮ ОХЬЕРЯЪ НДМХЛ ВЕКНБЕЙНЛ, Ю ХЯОНКЭГСЕРЯЪ ЛМНЦХЛХ, РН ЛНФМН НФХДЮРЭ ОНБШЬЕМХЕ РЕЛОНБ ПЮГПЮАНРЙХ ОПХКНФЕМХЪ.

х, ЕЯРЕЯРБЕММН, МЕКЭГЪ ЯАПЮЯШБЮРЭ ЯН ЯВЕРНБ СБЕКХВЕМХЕ ЯЙНПНЯРХ НАПЮАНРЙХ ГЮОПНЯНБ ОНКЭГНБЮРЕКЕИ. бЕДЭ, ЙЮЙ Х Б ЯКСВЮЕ Я ОНДЦНРЮБКХБЮЕЛШЛХ НОЕПЮРНПЮЛХ, ДЕИЯРБХЪ ОН ЮМЮКХГС УПЮМХЛНИ ОПНЖЕДСПШ БШОНКМЪЧРЯЪ ЕДХМНФДШ ОПХ НОПЕДЕКЕМХХ ЩРНИ ОПНЖЕДСПШ.

дКЪ МЮОХЯЮМХЪ УПЮМХЛШУ ОПНЖЕДСП ХЯОНКЭГСЕРЯЪ ПЮЯЬХПЕММШИ SQL. оПХВЕЛ, ЩРН ПЮЯЬХПЕМХЕ ЯКЕКЮМН МЕ ГЮ ЯВЕР СБЕКХВЕМХЪ ВХЯКЮ НОЕПЮРНПНБ ЛЮМХОСКХПНБЮМХЪ ДЮММШЛХ, Ю ГЮ ЯВЕР СОПЮБКЪЧЫХУ ЯРПСЙРСП - БЕДЭ Б SQL МЕР МХ НОЕПЮРНПЮ ОПХЯБЮХБЮМХЪ, МХ ЖХЙКНБ, МХ ОПНЖЕДСП. тНПЛЮКЭМН МЕ НВЕМЭ ОНМЪРМН, ЛНФМН КХ ЯВХРЮРЭ ЪГШЙ МЮОХЯЮМХЪ УПЮМХЛШУ ОПНЖЕДСП ВЮЯРЭЧ SQL ХКХ МЕР. яЙНПЕЕ МЕР, ЩРН ЯЮЛНЯРНЪРЕКЭМШИ ЪГШЙ, МН ЩРХ ДБЮ ЪГШЙЮ МЮЯРНКЭЙН РЕЯМН ЯБЪГЮМШ, ВРН ПЮЯЯЛЮРПХБЮРЭ ХУ ОН НРДЕКЭМНЯРХ АЕЯЯЛШЯКЕММН.

ъГШЙХ МЮОХЯЮМХЪ УПЮМХЛШУ ОПНЖЕДСП Б МЮЯРНЪЫЕЕ БПЕЛЪ ГМЮВХРЕКЭМН ПЮГКХВЮЧРЯЪ С ПЮГМШУ ОПНХГБНДХРЕКЕИ. дКЪ ЯЕПБЕПНБ Informix ЪГШЙ ДКЪ ЯНГДЮМХЪ УПЮМХЛШУ ОПНЖЕДСП МНЯХР МЮГБЮМХЕ SPL - Stored Procedure Languages. хЛЕММН ЕЦН (РНВМЕЕ, ЕЦН ОНДЛМНФЕЯРБН), ЛШ Х ПЮЯЯЛНРПХЛ.

уПЮМХЛЮЪ ОПНЖЕДСПЮ ЯНГДЮЕРЯЪ НОЕПЮРНПНЛ

CREATE PROCEDURE <ХЛЪ ОПНЖЕДСПШ> (<ТНПЛЮКЭМШЕ ОЮПЮЛЕРПШ>)
<РЕКН УПЮМХЛНИ ОПНЖЕДСПШ>
END PROCEDURE

еЯКХ УПЮМХЛЮЪ ОПНЖЕДСПЮ АСДЕР БНГБПЮЫЮРЭ ЙЮЙХЕ-РН ГМЮВЕМХЪ, РН ДНАЮБКЪЕРЯЪ ПЮГДЕК RETURNING, Б ЙНРНПНЛ ОЕПЕВХЯКЕМШ РХОШ БНГБПЮЫЮЕЛШУ ГМЮВЕМХИ:

CREATE PROCEDURE <ХЛЪ ОПНЖЕДСПШ> (<ТНПЛЮКЭМШЕ ОЮПЮЛЕРПШ>)
RETURNING <РХО 1>, <РХО 2> ...
<РЕКН УПЮМХЛНИ ОПНЖЕДСПШ>
END PROCEDURE

уПЮМХЛЮЪ ОПНЖЕДСПЮ ЛНФЕР ОНКСВЮРЭ Х БНГБПЮЫЮРЭ ОПНХГБНКЭМНЕ ВХЯКН ГМЮВЕМХИ ПЮГМШУ РХОНБ. рХОШ БУНДМШУ ОЮПЮЛЕРПНБ Х БШУНДМШУ ГМЮВЕМХИ ЛНЦСР АШРЭ КЧАШЛХ, ДНЯРСОМШЛХ Б SQL, ГЮ ХЯЙКЧВЕМХЕЛ SERIAL, BYTE Х TEXT. бЛЕЯРН РХОЮ SERIAL МЮДН СЙЮГШБЮРЭ РХО INTEGER.

оПХЛЕПШ НОХЯЮМХИ УПЮМХЛШУ ОПНЖЕДСП:

CREATE PROCEDURE incr_account (account_no INTEGER,
quantity MONEY(20,2))
.....
END PROCEDURE

CREATE PROCEDURE add_new_user (name CHAR(20) default NULL)
RETURNING INTEGER {ЯЕПХИМШИ МНЛЕП МНБНЦН ОНКЭГНБЮРЕКЪ}
.....
END PROCEDURE

ъГШЙ УПЮМХЛШУ ОПНЖЕДСП АСДЕР ПЮЯЯЛНРПЕМ Б НРДЕКЭМНЛ ОСМЙРЕ МХФЕ.

дКЪ СДЮКЕМХЪ УПЮМХЛНИ ОПНЖЕДСПШ, ЙНРНПЮЪ АНКЭЬЕ МЕ МСФМЮ, ХЯОНКЭГСЕРЯЪ НОЕПЮРНП:

DROP PROCEDURE <ХЛЪ УПЮМХЛНИ ОПНЖЕДСПШ>

мЮОПХЛЕП:

DROP PROCEDURE add_new_user

дКЪ ХЯОНКМЕМХЪ УПЮМХЛНИ ОПНЖЕДСПШ ХЯОНКЭГСЕРЯЪ НОЕПЮРНП

EXECUTE PROCEDURE <ХЛЪ ОПНЖЕДСПШ> (<ТЮЙРХВЕЯЙХЕ ОЮПЮЛЕРПШ>)

мЮОПХЛЕП:

EXECUTE PROCEDURE incr_account (213917008, 23000000.00)

еЯКХ УПЮМХЛЮЪ ОПНЖЕДСПЮ БНГБПЮЫЮЕР ЙЮЙХЕ-РН ГМЮВЕМХЪ (РН ЕЯРЭ Б ЕЕ НОХЯЮМХХ ЕЯРЭ ПЮГДЕК RETURNING), РН ОПХ ХЯОНКМЕМХХ ЩРНИ ОПНЖЕДСПШ Б НОЕПЮРНП EXECUTE PROCEDURE МЮДН ДНАЮБХРЭ ПЮГДЕК INTO Я ОЕПЕВХЯКЕМХЕЛ ХЛЕМ ОЕПЕЛЕММШУ (ХМНЦДЮ БЛЕЯРН INTO ХЯОНКЭГСЕРЯЪ ЯКНБН RETURNING):

EXECUTE PROCEDURE <ХЛЪ ОПНЖЕДСПШ> (<ТЮЙРХВЕЯЙХЕ ОЮПЮЛЕРПШ>)
INTO <ХЛЪ ОЕПЕЛЕММНИ>, ...

мЮОПХЛЕП:

EXECUTE PROCEDURE add_new_user ("оПСРЙНБ") INTO user_id

тЮЙРХВЕЯЙХЕ ОЮПЮЛЕРПШ ЛНЦСР СЙЮГШБЮРЭЯЪ ЙЮЙ ОНГХЖХНММН (ОЕПБШИ ТЮЙРХВЕЯЙХИ ЯННРБЕРЯРБСЕР ОЕПБНЛС ТНПЛЮКЭМНЛС, БРНПНИ - БРНПНЛС Х Р.Д.), РЮЙ Х ОНХЛЕММН, ЙНЦДЮ ДКЪ ХЛЕМХ ТНПЛЮКЭМНЦН ОЮПЮЛЕРПЮ СЙЮГШБЮЕРЯЪ ЕЦН ТЮЙРХВЕЯЙНЕ ГМЮВЕМХЕ. б ЯКСВЮЕ ОНХЛЕММНЦН ГЮДЮМХЪ ТЮЙРХВЕЯЙХУ ОЮПЮЛЕРПНБ ХУ ОНПЪДНЙ, ЕЯРЕЯРБЕММН, ПНКХ МЕ ХЦПЮЕР. йЮЙНИ ЯОНЯНА СЙЮГЮМХЪ ОЮПЮЛЕРПНБ ХЯОНКЭГНБЮРЭ Б ЙЮФДНЛ ЙНМЙПЕРМНЛ ЯКСВЮЕ - ДЕКН БЙСЯЮ Х ОПХБШВЕЙ, ЩРХ ДБЮ ЯОНЯНАЮ ПЮБМНЖЕММШ. мЮОПХЛЕП, ЯКЕДСЧЫХЕ РПХ БШГНБЮ УПЮМХЛНИ ОПНЖЕДСПШ ОНКМНЯРЭЧ ЩЙБХБЮКЕМРМШ:

EXECUTE PROCEDURE incr_account (123456789, 1500000.00)
EXECUTE PROCEDURE incr_account
(account_no=123456789, quantity=1500000.00)
EXECUTE PROCEDURE incr_account
(quantity=1500000.00, account_no=123456789)

еЯКХ ОПХ ХЯОНКМЕМХХ УПЮМХЛНИ ОПНЖЕДСПШ ГМЮВЕМХЪ ЙЮЙХУ-КХАН ТЮЙРХВЕЯЙХУ ОЮПЮЛЕРПНБ МЕ СЙЮГЮМШ, РН ХЯОНКЭГСЧРЯЪ ГМЮВЕМХЪ ОН СЛНКВЮМХЧ. гМЮВЕМХЪ ОН СЛНКВЮМХЧ ГЮДЮЧРЯЪ ОПХ НОХЯЮМХХ УПЮМХЛНИ ОПНЖЕДСПШ Я ОНЛНЫЭЧ ЙКЧВЕБНЦН ЯКНБЮ DEFAULT. мЮОПХЛЕП, Б НОХЯЮММНИ БШЬЕ ОПНЖЕДСПЕ add_new_user ДКЪ ОЮПЮЛЕРПЮ name ГЮДЮМН ГМЮВЕМХЕ ОН СЛНКВЮМХЧ - NULL.

ъГШЙ УПЮМХЛШУ ОПНЖЕДСП

пЮЯЯЛНРПХЛ ОНДПНАМН ЪГШЙ УПЮМХЛШУ ОПНЖЕДСП Informix - SPL. хЛЕММН ХГ НОЕПЮРНПНБ ЩРНЦН ЪГШЙЮ ЙНМЯРПСХПСЕРЯЪ РЕКН УПЮМХЛНИ ОПНЖЕДСПШ. рЕКН УПЮМХЛНИ ОПНЖЕДСПШ ОПЕДЯРЮБКЪЕР ЯНАНИ АКНЙ НОЕПЮРНПНБ. аКНЙ НОЕПЮРНПНБ ЯНЯРНХР ХГ ПЮГДЕКЮ НОХЯЮМХИ, ПЮГДЕКЮ ПЕЮЙЖХИ МЮ ХЯЙКЧВХРЕКЭМШЕ ЯХРСЮЖХХ Х ПЮГДЕКЮ ХЯОНКМЪЕЛШУ НОЕПЮРНПНБ. йЮФДШИ ХГ ЩРХУ ПЮГДЕКНБ ЛНФЕР АШРЭ ОСЯРШЛ. нОЕПЮРНПШ ПЮГДЕКЪЧРЯЪ РНВЙНИ Я ГЮОЪРНИ. йНЛЛЕМРЮПХХ ОНЛЕЫЮЧРЯЪ Б ТХЦСПМШУ ЯЙНАЙЮУ ХКХ МЮВХМЮЧРЯЪ Я ДБСУ ЯХЛБНКНБ ЛХМСЯ Х ОПНДНКФЮЧРЯЪ ДН ЙНМЖЮ ЯРПНЙХ.

б ПЮГДЕКЕ НОХЯЮМХИ НОХЯШБЮЧРЯЪ БМСРПЕММХЕ ОЕПЕЛЕММШЕ. йЮФДНЕ НОХЯЮМХЕ МЮВХМЮЕРЯЪ ЯН ЯКСФЕАМНЦН ЯКНБЮ DEFINE, ОНЯКЕ ЙНРНПНЦН ХДЕР ХЛЪ ОЕПЕЛЕММНИ Х ЕЕ РХО.

пЮГДЕК ПЕЮЙЖХИ МЮ ХЯЙКЧВХРЕКЭМШЕ ЯХРСЮЖХХ ЯКСФХР ДКЪ ГЮДЮМХЪ РНЦН, ЙЮЙ УПЮМХЛЮЪ ОПНЖЕДСПЮ АСДЕР ПЕЮЦХПНБЮРЭ МЮ БНГМХЙМНБЕМХЕ НЬХАНЙ Б ОПНЖЕЯЯЕ ЕЕ ХЯОНКМЕМХЪ. йЮФДЮЪ ПЕЮЙЖХЪ НОХЯШБЮЕРЯЪ Я ОНЛНЫЭЧ ЙКЧВЕБШУ ЯКНБ ON EXCEPTION, ОНЯКЕ ЙНРНПНИ ХДЕР ХДЕМРХТХЙЮРНП НЬХАЙХ Х НОЕПЮРНПШ, ЙНРНПШЕ АСДСР БШОНКМЕМШ Б ЯКСВЮЕ БНГМХЙМНБЕМХЪ ЩРНИ НЬХАЙХ. аНКЕЕ ОНДПНАМН ПЕЮЙЖХХ МЮ ХЯЙКЧВХРЕКЭМШЕ ЯХРСЮЖХХ ГДЕЯЭ ПЮЯЯЛЮРПХБЮРЭЯЪ МЕ АСДСР.

б ПЮГДЕКЕ ХЯОНКМЪЕЛШУ НОЕПЮРНПНБ ЛНЦСР ХЯОНКЭГНБЮРЭЯЪ КЧАШЕ НОЕПЮРНПШ ХГ РЮАКХЖШ 1, Ю РЮЙФЕ КЧАНИ ХГ SQL-НОЕПЮРНПНБ, ГЮ ХЯЙКЧВЕМХЕЛ РЕУ, ЙНРНПШЕ ЯНГДЮЧР, СДЮКЪЧР, НРЙПШБЮЧР ХКХ ГЮЙПШБЮЧР АЮГС ДЮММШУ. оПХ НАПЮЫЕМХХ Й УПЮМХЛНИ ОПНЖЕДСПЕ СОПЮБКЕМХЕ ОЕПЕДЮЕРЯЪ ОЕПБНЛС НОЕПЮРНПС Б ЕЕ РЕКЕ. хЯОНКМЕМХЕ НОЕПЮРНПЮ RETURN ГЮБЕПЬЮЕР УПЮМХЛСЧ ОПНЖЕДСПС Х БНГБПЮЫЮЕР ХЯОНКМЕМХЕ Б РН ЛЕЯРН, НРЙСДЮ УПЮМХЛЮЪ ОПНЖЕДСПЮ АШКЮ БШГБЮМЮ. уПЮМХЛЮЪ ОПНЖЕДСПЮ ГЮБЕПЬЮЕРЯЪ РЮЙФЕ Х ОПХ ДНЯРХФЕМХХ НОЕПЮРНПЮ END PROCEDURE. оПХ ЩРНЛ МХЙЮЙХУ ГМЮВЕМХИ Б БШГШБЮЧЫСЧ ОПНЦПЮЛЛС МЕ БНГБПЮЫЮЕРЯЪ.

б ЙЮВЕЯРБЕ ОПХЛЕПЮ ПЮЯЯЛНРПХЛ ПЕЮКХГЮЖХЧ УПЮМХЛШУ ОПНЖЕДСП, ОПХБЕДЕММШУ ОПХ ПЮЯЯЛНРПЕМХХ НОЕПЮРНПЮ CREATE PROCEDURE:

CREATE PROCEDURE incr_account (account_no INTEGER, quantity MONEY(20,2))
UPDATE accounts SET value = value + quantity
WHERE account_id = account_no
END PROCEDURE

уПЮМХЛЮЪ ОПНЖЕДСПЮ ЛНФЕР ЯНДЕПФЮРЭ МЕ РНКЭЙН SQL НОЕПЮРНПШ, МН Х НОЕПЮРНПШ, НАШВМШЕ ДКЪ СМХБЕПЯЮКЭМШУ ЪГШЙНБ ОПНЦПЮЛЛХПНБЮМХЪ. мЮОПХЛЕП:

CREATE PROCEDURE add_new_user (name CHAR(20) default NULL)
RETURNING INTEGER {ЯЕПХИМШИ МНЛЕП МНБНЦН ОНКЭГНБЮРЕКЪ}
DEFINE user_id INTEGER;
INSERT INTO users(lname) VALUES (name);
LET user_id = SQLCA.SQLERR[2];
RETURN user_id
END PROCEDURE

пЮЯЯЛНРПХЛ НЯМНБМШЕ НОЕПЮРНПШ SPL:

CALL - РН ФЕ ЯЮЛНЕ, ВРН Х EXECUTE PROCEDURE.

CONTINUE - ОПНДНКФХРЭ БШОНКМЕМХЕ ЖХЙКЮ. оНЯКЕ ЩРНЦН ЯКНБЮ МЮДН СЙЮГЮРЭ ЙЮЙНИ ХЛЕММН ЖХЙК МЮДН ОПНДНКФХРЭ БШОНКМЪРЭ -FOR/WHILE/FOREACH. оПХЛЕПШ:

CONTINUE FOR
....
CONTINUE FOREACH

DEFINE - НОПЕДЕКХРЭ БМСРПЕММЧЧ ОЕПЕЛЕММСЧ. дКЪ ЙЮФДНИ ОЕПЕЛЕММНИ МЮДН ГЮДЮРЭ ЕЕ ХЛЪ Х ЕЕ РХО:

DEFINE <ХЛЪ ОЕПЕЛЕММНИ> <РХО>

оПХЛЕПШ:

DEFINE user_id INTEGER
DEFINE comp_name CHAR(40)

EXIT - ОПЕЙПЮРХРЭ БШОНКМЕМХЕ ЖХЙКЮ. оНЯКЕ ЩРНЦН ЯКНБЮ МЮДН СЙЮГЮРЭ ЙЮЙНИ ХЛЕММН ЖХЙК МЮДН ОПЕЙПЮРХРЭ БШОНКМЪРЭ - FOR/WHILE/FOREACH. оПХЛЕПШ:

EXIT WHILE
....
EXIT FOR

FOR - ЖХЙК ЯН ЯВЕРВХЙНЛ. юМЮКНЦХВЕМ НОЕПЮРНПС ЖХЙКЮ ЯН ЯВЕРВХЙНЛ Б ДПСЦХУ ЪГШЙЮУ ОПНЦПЮЛЛХПНБЮМХЪ. гМЮВЕМХЪ ЬЮЦЮ, МЮВЮКЭМНЦН Х ЙНМЕВМНЦН ГМЮВЕМХИ БШВХЯКЪЧРЯЪ ГЮПЮМЕЕ, ДН МЮВЮКЮ БШОНКМЕМХЪ НОЕПЮРНПНБ РЕКЮ ЖХЙКЮ:

FOR <ОЕПЕЛЕММЮЪ> = <ЖЕКНЕ> TO <ЖЕКНЕ> STEP <ЖЕКНЕ>
<НОЕПЮРНПШ>
END FOR

еЯКХ ЬЮЦ (STEP) МЕ СЙЮГЮМ, РН НМ ОПХМХЛЮЕРЯЪ ПЮБМШЛ 1 ЕЯКХ МЮВЮКЭМНЕ ГМЮВЕМХЕ ЛЕМЭЬЕ ЙНМЕВМНЦН, Х -1, ЕЯКХ МЕР. оПХЛЕП:

FOR i = 1 TO 14
....
END FOR

IF - СЯКНБМШИ НОЕПЮРНП. оПНБЕПЪЕР СЯКНБХЕ Х, ЕЯКХ НМН БЕПМН, БШОНКМЪЕР НОЕПЮРНПШ ОНЯКЕ ЯКНБЮ THEN. еЯКХ МЕ БЕПМН, Х ОПХЯСРЯРБСЕР ПЮГДЕК ELSE - РН БШОНКМЪЧРЯЪ НОЕПЮРНПШ ОНЯКЕ ЯКНБЮ ELSE:

IF <СЯКНБХЕ> THEN <НОЕПЮРНПШ> END IF
IF <СЯКНБХЕ>
THEN <НОЕПЮРНПШ>
ELSE <НОЕПЮРНПШ>
END IF

еЯКХ ОНЯКЕ ЯКНБЮ ELSE ОН КНЦХЙЕ ДНКФЕМ ЯКЕДНБЮРЭ ДПСЦНИ НОЕПЮРНП IF, РН РЮЙНЕ ЯНВЕРЮМХЕ ELSE IF ... END IF END IF ЛНФМН ГЮОХЯШБЮРЭ АНКЕЕ ЙНЛОЮЙРМН: ELIF ... END IF. оПХЛЕП:

IF j > 20
THEN RETURN j
ELIF j > 10
THEN RETURN 10
ELSE RETURN 0
END IF

LET - НОЕПЮРНП ОПХЯБЮХБЮМХЪ. бШВХЯКЪЕР БШПЮФЕМХЕ Х ОПХЯБЮХБЮЕР ЕЦН ГМЮВЕМХЕ СЙЮГЮММНИ ОЕПЕЛЕММН:

LET <ХЛЪ ОЕПЕЛЕММНИ> = <БШПЮФЕМХЕ>

бШПЮФЕМХЕ, ЙНРНПНЕ ЛНФЕР АШРЭ ГДЕЯЭ ХЯОНКЭГНБЮМН, НВЕМЭ ОНУНФЕ МЮ БШПЮФЕМХЕ, ЙНРНПНЕ ЛНФЕР ХЯОНКЭГНБЮРЭЯЪ Б НОЕПЮРНПЕ SELECT. оПХЛЕПШ:

LET i = 0
LET str1 = "ЮАБЦДЕФГ"

RAISE EXCEPTION - БНГАСДХРЭ НЬХАЙС. еЯКХ МЮ ДЮММСЧ НЬХАЙС МЕ ЯРНХР ПЕЮЙЖХЪ (МЕР ЯННРБЕРЯРБСЧЫЕЦН НОЕПЮРНПЮ ON EXCEPTION), РН ХЯОНКМЕМХЕ УПЮМХЛНИ ОПНЖЕДСПШ ГЮБЕПЬЮЕРЯЪ Х Б БШГБЮБЬСЧ ОПНЦПЮЛЛС "ОЕПЕДЮЕРЯЪ" ДЮММЮЪ НЬХАЙЮ:

RAISE EXCEPTION <МНЛЕП НЬХАЙХ>

лНФМН Б ЙЮВЕЯРБЕ МНЛЕПЮ НЬХАЙХ ХЯОНКЭГНБЮРЭ ЙЮЙ ОПЕДНОПЕДЕКЕММШЕ, ЯРЮМДЮПРМШЕ МНЛЕПЮ, РЮЙ Х ЯБНХ ЯНАЯРБЕММШЕ.

RETURN - ГЮБЕПЬЮЕР ХЯОНКЕМХЕ УПЮМХЛНИ ОПНЖЕДСПШ. сОПЮБКЕМХЕ ОЕПЕДЮЕРЯЪ Б БШГБЮБЬСЧ ОПНЦПЮЛЛС. оНЯКЕ ЯКНБЮ RETURN МЮДН СЙЮГШБЮРЭ БНГБПЮЫЮЕЛШЕ ГМЮВЕМХЪ, ЕЯКХ ОПНЖЕДСПЮ ДНКФМЮ БНГБПЮЫЮРЭ ГМЮВЕМХЪ:

RETURN <БШПЮФЕМХЕ 1>, ....

SYSTEM - ОНГБНКЪЕР БШОНКМХРЭ БМЕЬМЧЧ ЙНЛЮМДС. хЛЪ ЩРНИ БМЕЬМЕИ ЙНЛЮМДШ ОЕПЕДЮЕРЯЪ НОЕПЮЖХНММНИ ЯХЯРЕЛЕ, РН ЕЯРЭ ЩРН ЛНФЕР АШРЭ ХКХ БЯРПНЕММЮЪ ЙНЛЮМДЮ ня, ХКХ ХЯОНКМХЛШИ ТЮИК:

SYSTEM <ЯХЛБНКЭМЮЪ ЯРПНЙЮ>
SYSTEM <ХЛЪ ЯХЛБНКЭМНИ ОЕПЕЛЕММНИ>

мЮОПХЛЕП, ЛНФМН БШОНКМХРЭ ЙНЛЮМДМШИ ТЮИК my_cmd:

SYSTEM "/usr/local/bin/my_cmd"

WHILE - ЖХЙК Я ГЮБЕПЬЕМХЕЛ ОН СЯКНБХЧ. юМЮКНЦХВЕМ ЖХЙКС WHILE Б ДПСЦХУ ЪГШЙЮУ ОПНЦПЮЛЛХПНБЮМХЪ:

WHILE <СЯКНБХЕ>
<НОЕПЮРНПШ>
END WHILE

оПХЛЕП:

LET i = 1
WHILE i = 1
EXECUTE PROCEDURE my_proc RETURNING I
END WHILE

BEGIN ... END - АКНЙ НОЕПЮРНПНБ. б АКНЙЕ НОЕПЮРНПНБ ЛНФМН НОПЕДЕКЪРЭ Х ХЯОНКЭГНБЮРЭ КНЙЮКЭМШЕ ОЕПЕЛЕММШЕ. дНОСЯРХЛШЕ КЧАШЕ ДПСЦХЕ НОЕПЮРНПШ SPL. оПХЛЕП:

BEGIN
DEFINE i CHAR(20)
LET i = "мС, ОНЦНДХ!"
IF ... THEN
BEGIN
DEFINE i INTEGER
LET i = 0
....
END
END IF
END

рПХЦЦЕПШ

хДЕЪ РПХЦЦЕПНБ

хМНЦДЮ ЯСЫЕЯРБСЧР ЙЮЙХЕ-РН ДЕИЯРБХЪ, ЙНРНПШЕ МЮДН БШОНКМЪРЭ БЯЕЦДЮ ОПХ ЛНДХТХЙЮЖХХ РНИ ХКХ ХМНИ РЮАКХЖШ. мЮОПХЛЕП, ЕЯРЭ РЮАКХЖЮ Я БЮФМШЛХ ДЮММШЛХ Х КЧАНЕ ХГЛЕМЕМХЕ МЮДН ТХЙЯХПНБЮРЭ - ГЮМНЯХРЭ Б ОПНРНЙНК ЙРН, ВРН Х ЙНЦДЮ ЛНДХТХЖХПНБЮК Б ДЮММНИ РЮАКХЖЕ. хКХ, МЮОПХЛЕП, ОНДДЕПФЮМХЕ ЖЕКНЯРМНЯРХ АЮГШ ДЮММШУ - ОПХ СДЮКЕМХХ ХГ АЮГШ ДЮММШУ ХМТНПЛЮЖХХ Н МЕЙНРНПНИ ТХПЛЕ, МЮДН СДЮКХРЭ Х ХМТНПЛЮЖХЧ Н ПЮАНРЮЧЫХУ Б МЕИ КЧДЪУ.

дКЪ ОНДНАМШУ ГЮДЮВ Б SQL ББЕДЕМН ОНМЪРХЕ РПХЦЦЕПЮ, рПХЦЦЕП - ЩРН ЛЕУЮМХГЛ, ЙНРНПШИ ЮБРНЛЮРХВЕЯЙХ БШОНКМЪЕР МЕЙНРНПШИ МЮАНП SQL-НОЕПЮРНПНБ ЙНЦДЮ ОПНХЯУНДХР МЕЙНРНПНЕ ЯНАШРХЕ. рН ЕЯРЭ РПХЦЦЕП ГЮДЮЕРЯЪ ОЮПНИ "ЯНАШРХЕ-ДЕИЯРБХЕ". яНАШРХЪЛХ, МЮ ЙНРНПШЕ ЛНФМН СЯРЮМНБХРЭ РПХЦЦЕП, ЪБКЪЧРЯЪ ЛНДХТХЙЮЖХХ ДЮММШУ, РН ЕЯРЭ НОЕПЮРНПШ DELETE, INSERT, UPDATE. оПХВЕЛ, РПХЦЦЕП ЯБЪГЮМ Я ЙНМЙПЕРМНИ РЮАКХЖЕИ. рН ЕЯРЭ ЯНАШРХЕЛ, БШГШБЮЧЫХЛ РПХЦЦЕП (РПХЦЦЕПМШЛ ЯНАШРХЕЛ) ЪБКЪЕРЯЪ БШОНКМЕМХЕ НОЕПЮРНПНБ СДЮКЕМХЪ, БЯРЮБЙХ ХКХ ЛНДХТХЙЮЖХХ ЙНМЙПЕРМНИ РЮАКХЖШ.

рПХЦЦЕП УПЮМХРЯЪ ЙЮЙ НАЗЕЙР Б АЮГЕ ДЮММШУ, РН ЕЯРЭ ОПХМЮДКЕФХР ЯУЕЛЕ АЮГШ ДЮММШУ. )

яНГДЮМХЕ Х СДЮКЕМХЕ РПХЦЦЕПЮ

дКЪ ЯНГДЮМХЪ Х СДЮКЕМХЪ РПХЦЦЕПНБ, ЙЮЙ Х ДКЪ РЮАКХЖ, Х ДКЪ УПЮМХЛШУ ОПНЖЕДСП, ХЯОНКЭГСЧРЯЪ НОЕПЮРНПШ CREATE Х DROP.

CREATE TRIGGER <ХЛЪ> <ЯНАШРХЕ> <ДЕИЯРБХЕ>
DROP TRIGGER <ХЛЪ>

хЛЪ РПХЦЦЕПЮ - НАШВМНЕ ХЛЪ Б SQL. цКЮБМНЕ, ВРН АШ НМН АШКН СМХЙЮКЭМШЛ. яНАШРХЕ СЙЮГШБЮЕР ЛНЛЕМР, ЙНЦДЮ РПХЦЦЕП ЯПЮАЮРШБЮЕР. рПХЦЦЕПШ АШБЮЧР РПЕУ РХОНБ - МЮ БЯРЮБЙС МНБНЦН ПЪДЮ Б РЮАКХЖС, СДЮКЕМХЕ ПЪДЮ Х ЛНДХТХЙЮЖХЧ ЙЮЙХУ-КХАН ОНКЕИ. дКЪ ЙЮФДНИ РЮАКХЖШ ЛНЦСР ЯСЫЕЯРБНБЮРЭ БЯЕ РПХ РХОЮ РПХЦЦЕПНБ, ЙЮЙ, БОПНВЕЛ, Х МЕ ЯСЫЕЯРБНБЮРЭ МХ НДМНЦН. оПХ ЩРНЛ, ЕЯКХ ДКЪ ЙЮФДНИ РЮАКХЖШ ЛНФМН ГЮДЮРЭ РНКЭЙН ОН НДМНЛС РПХЦЦЕПС МЮ БЯРЮБЙС Х СДЮКЕМХЕ, РН РПХЦЦЕПНБ МЮ НАМНБКЕМХЕ ЛНФЕР АШРЭ МЕЯЙНКЭЙН Б ГЮБХЯХЛНЯРХ НР РНЦН, ЙЮЙХЕ ОНКЪ НАМНБКЪЧРЯЪ (МН МЕ ЛНФЕР АШРЭ ДБСУ РПХЦЦЕПНБ МЮ НАМНБКЕМХЕ НДМНЦН Х РНЦН ФЕ ОНКЪ).

яННРБЕРЯРБЕММН, ЯХМРЮЙЯХЯ МЮ ПЮГДЕК "ЯНАШРХЕ" ОПХ ЯНГДЮМХХ РПХЦЦЕПЮ АСДЕР ЯКЕДСЧЫХЛ:

INSERT ON <ХЛЪ РЮАКХЖШ>
DELETE ON <ХЛЪ РЮАКХЖШ>
UPDATE ON <ХЛЪ РЮАКХЖШ>
UPDATE OF <ОНКЕ>, <ОНКЕ>, ... ON <ХЛЪ РЮАКХЖШ>

яНАШРХЕЛ ДКЪ РПХЦЦЕПЮ ЪБКЪЕРЯЪ ЯЮЛ ТЮЙР БШОНКМЕМХЪ НОЕПЮРНПЮ БЯРЮБЙХ, СДЮКЕМХЪ ХКХ ЛНДХТХЙЮЖХХ. рН ЕЯРЭ, ЕЯКХ ДЮФЕ НОЕПЮРНП СДЮКЕМХЪ МЕ СДЮКХК МХ НДМНИ ГЮОХЯХ (МХ НДМЮ ГЮОХЯЭ МЕ СДНБКЕРБНПХКЮ СЯКНБХЧ), БЯЕ ПЮБМН РПХЦЦЕП МЮ СДЮКЕМХЕ ЯПЮАНРЮЕР. оПХЛЕПШ НОЕПЮРНПНБ ЯНГДЮМХЪ РПХЦЦЕПНБ, ОНЙЮ АЕГ МЮОХЯЮМХЪ РНЦН, ВРН НМХ АСДСР ХЯОНКМЪРЭ:

{ РПХЦЦЕП МЮ БЯРЮБЙС МНБНЦН ДНЙСЛЕМРЮ }
CREATE TRIGGER trig1
INSERT ON documents ....

{ РПХЦЦЕП МЮ СДЮКЕМХЕ ХМТНПЛЮЖХХ Н ТХПЛЕ }
CREATE TRIGGER del_trig
DELETE ON companies ....

{ РПХЦЦЕП МЮ НАМНБКЕМХЕ ЖЕМШ РНБЮПЮ }
CREATE TRIGGER upd_price
UPDATE OF price ON items ....

{ РПХЦЦЕП МЮ ХГЛЕМЕМХЕ ХЛЕМХ ХКХ ТЮЛХКХХ ВЕКНБЕЙЮ }
CREATE TRIGGER upd_name
UPDATE OF lname, fname ON persons ....

рЕОЕПЭ ПЮЯЯЛНРПХЛ, ЙЮЙ НОХЯШБЮЧРЯЪ ДЕИЯРБХЪ РПХЦЦЕПЮ. йЮФДНЕ ДЕИЯРБХЕ ЯНЯРНХР ХГ НОХЯЮМХЪ РНЦН, ВРН БШОНКМЪЕРЯЪ ЕДХМНФДШ ОЕПЕД МЮВЮКНЛ ХЯОНКМЕМХЪ НОЕПЮРНПЮ, БШГБЮБЬЕЦН ЯНАШРХЕ ДКЪ РПХЦЦЕПЮ (ПЮГДЕК BEFORE), ДКЪ ЙЮФДНЦН ПЪДЮ (ПЮГДЕК FOR EACH ROW) Х ОНЯКЕ ХЯОНКМЕМХЪ НОЕПЮРНПЮ (ПЮГДЕК AFTER).

CREATE TRIGGER .... ON ...
BEFORE <НОЕПЮРНПШ>
FOR EACH ROW <НОЕПЮРНПШ>
AFTER <НОЕПЮРНПШ>

лНФМН ХЯОНКЭГНБЮРЭ ОПНХГБНКЭМНЕ ЯНВЕРЮМХЕ ХГ ПЮГДЕКНБ BEFORE, FOR EACH ROW Х AFTER, ЦКЮБМНЕ, ВРН АШ АШК ГЮДЮМ УНРЪ АШ НДХМ ПЮГДЕК. б ЙЮВЕЯРБЕ НОЕПЮРНПНБ ДКЪ РПХЦЦЕПНБ ЛНЦСР АШРЭ ХЯОНКЭГНБЮМШ БЯЕЦН ВЕРШПЕ РХОЮ SQL-НОЕПЮРНПНБ - НОЕПЮРНП БЯРЮБЙХ (INSERT), СДЮКЕМХЪ (DELETE), НАМНБКЕМХЪ (UPDATE) Х БШОНКМЕМХЪ УПЮМХЛНИ ОПНЖЕДСПШ (EXECUTE PROCEDURE). нВЕБХДМН, ВРН МЮКХВХЕ Б ЩРНЛ ЯОХЯЙЕ НОЕПЮРНПЮ БШГНБЮ УПЮМХЛНИ ОПНЖЕДСПШ ОНГБНКЪЕР ЯДЕКЮРЭ РПХЦЦЕП ЯЙНКЭ СЦНДМН ЯКНФМШЛ. щРХ SQL-НОЕПЮРНПШ ДНКФМШ ПЮГДЕКЪРЭЯЪ ГЮОЪРНИ Х МЮУНДХРЭЯЪ Б ЙПСЦКШУ ЯЙНАЙЮУ.

оПХЛЕПШ:

CREATE TRIGGER trig1 DELETE ON persons
AFTER ( UPDATE tab2 SET x=x+1,
UPDATE tab3 SET y=y-1 )

CREATE TRIGGER upd_trig UPDATE OF name ON companies
FOR EACH ROW ( EXECUTE PROCEDURE proc1 )
AFTER ( EXECUTE PROCEDURE proc2 )

пЮЯЯЛНРПХЛ ОНБЕДЕМХЕ ОНЯКЕДМЕЦН РПХЦЦЕПЮ (upd_trig) АНКЕЕ ОНДПНАМН. оСЯРЭ РЮАКХЖЮ companies ХЛЕЕР ЯКЕДСЧЫСЧ ЯРПСЙРСПС Х ЯНЯРНХР ХГ ЯКЕДСЧЫХУ ГЮОХЯЕИ:

CREATE TABLE companies (  
company_id SERIAL { СМХЙЮКЭМШИ ХДЕМРХТХЙЮРНП ТХПЛШ }
name CHAR(40) { МЮГБЮМХЕ ТХПЛШ }
address CHAR(60) { ЮДПЕЯ ТХПЛШ }
)

оПХ РЮЙНИ ЯРПСЙРСПЕ ДЮММНИ РЮАКХЖШ Х ОПХ РЮЙНЛ ЕЕ ЯНДЕПФЮМХХ НОЕПЮРНП

UPDATE companies
SET name = "хво лЮЯРЕП аЕГЕМВСЙ"
WHERE company_id = 101

ОПХБЕДЕР Й ХЯОНКМЕМХЧ РПХЦЦЕПЮ upd_trig. оПХВЕЛ, РЮЙ ЙЮЙ ЛНДХТХЖХПНБЮРЭЯЪ АСДЕР НДМЮ ГЮОХЯЭ, РН Х ОПНЖЕДСПЮ proc1, Х proc2 АСДСР ХЯОНКМЕМШ ОН НДМНЛС ПЮГС, ОПХВЕЛ БМЮВЮКЕ proc1, Ю ГЮРЕЛ proc2. пЮГДЕК AFTER Х, ЯННРБЕРЯРБЕММН, ОПНЖЕДСПЮ proc2, АСДСР ХЯОНКМЕМШ СФЕ ОНЯКЕ БМЕЯЕМХЪ ХГЛЕМЕМХИ Б АЮГС ДЮММШУ. мН ЕЯКХ НОЕПЮРНП UPDATE ЛНДХТХЖХПСЕР МЕЯЙНКЭЙН ГЮОХЯЕИ, РН ОПНЖЕДСПЮ proc1 АСДЕР ХЯОНКМЕМЮ МЕЯЙНКЭЙН ПЮГ (ОН НДМНЛС ПЮГС ДКЪ ЙЮФДНИ ЛНДХТХЖХПСЕЛНИ ГЮОХЯХ), Ю ОПНЖЕДСПЮ proc2 - РНКЭЙН НДХМ ПЮГ - ОНЯКЕ БМЕЯЕМХЪ БЯЕУ ХГЛЕМЕМХИ. рЮЙ, НОЕПЮРНП

UPDATE companies
SET name = "рнн кЭДХМЙЮ"
WHERE company_id > 103

ХГЛЕМХР МЮГБЮМХЕ С ДБСУ ЙНЛОЮМХИ, РН ЕЯРЭ Б НДМНЛ ГЮОПНЯЕ АСДСР ЛНДХТХЖХПНБЮМШ ОНКЪ name С ДБСУ ГЮОХЯЕИ. б ПЕГСКЭРЮРЕ, ОПНЖЕДСПЮ proc1 АСДЕР ХЯОНКМЕМЮ ДБЮФДШ, Ю ГЮРЕЛ НДХМ ПЮГ АСДЕР БШГБЮМЮ ОПНЖЕДСПЮ proc2. еЯКХ Б НОЕПЮРНПЕ UPDATE ОПЕДОНКЮЦЮЕРЯЪ ХГЛЕМЕМХЕ ОНКЪ name, МН МХ НДМЮ ГЮОХЯЭ МЕ АШКЮ ЛНДХТХЖХПНБЮМЮ (МЕ СДНБКЕРБНПХКЮ СЯКНБХЧ Б ПЮГДЕКЕ WHERE, МЮОПХЛЕП), РН ПЮГДЕК FOR EACH ROW РПХЦЦЕПЮ МЕ АСДЕР БШОНКМЕМ МХ ПЮГС, РНЦДЮ ЙЮЙ ПЮГДЕКШ BEFORE Х AFTER БЯЕ ПЮБМН ЯПЮАНРЮЧР. рЮЙ, ЯКЕДСЧЫХИ НОЕПЮРНП ХЯОНКМХР ОПНЖЕДСПС proc2 Х МХ ПЮГС МЕ БШОНКМХР proc1:

UPDATE companies
SET name = NULL
WHERE company_id < 57

ю ЯКЕДСЧЫХИ НОЕПЮРНП БННАЫЕ МЕ ОПХБЕДЕР Й БШОНКМЕМХЧ РПХЦЦЕПЮ upd_trig, РЮЙ ЙЮЙ ОНКЕ name ДЮММНИ РЮАКХЖШ МЕ ХГЛЕМЪЕРЯЪ Х ЕЦН БННАЫЕ МЕР Б ЯОХЯЙЕ НАМНБКЪЕЛШУ ОНКЕИ:

UPDATE companies
SET address = "лНЯЙБЮ, аСРШПЙЮ"
WHERE company_id = 101

хЛЕМЮ ДКЪ ЯРЮПНЦН Х МНБНЦН ГМЮВЕМХИ ГЮОХЯХ

бЕПМЕЛЯЪ Й РЕЛ ГЮДЮВЮЛ, Я ЙНРНПШУ ЛШ МЮВЮКХ ПЮГЦНБНП Н РПХЦЦЕПЮУ. ю ХЛЕММН, Н МЕНАУНДХЛНЯРХ СДЮКЪРЭ ХМТНПЛЮЖХЧ Н ЯНРПСДМХЙЮУ ОПХ СДЮКЕМХХ ТХПЛШ Х Н ОПНРНЙНКХПНБЮМХХ БЯЕУ ХГЛЕМЕМХИ Б РЮАКХЖЕ. дКЪ РНЦН, ВРНАШ ПЕЮКХГНБЮРЭ ЩРХ ГЮДЮВХ МЮДН ХГ РПХЦЦЕПЮ ОНКСВХРЭ ГМЮВЕМХЪ ОНКЕИ ЛНДХТХЖХПСЕЛНИ ГЮОХЯХ. мЮОПХЛЕП, ОПХ СДЮКЕМХХ ХМТНПЛЮЖХХ Н ТХПЛЕ МЮЛ МЮДН ГМЮРЭ СМХЙЮКЭМШИ ЙКЧВ СДЮКЪЕЛНИ ГЮОХХ - ОНКЕ companies_id, ХМЮВЕ ЛШ МЕ ЯЛНФЕЛ НОПЕДЕКХРЭ ЯНРПСДМХЙНБ СДЮКЪЕЛНИ ТХПЛШ.

б ЛЕУЮМХГЛЕ РПХЦЦЕПНБ ОПЕДСЯЛНРПЕМЮ БНГЛНФМНЯРЭ ОНКСВЕМХЪ ГМЮВЕМХИ ОНКЕИ ЛНДХТХЖХПСЕЛНИ ГЮОХЯХ. оПХВЕЛ, ЛНФМН ОНКСВХРЭ ГМЮВЕМХЕ ГЮОХЯХ ЙЮЙ ДН ЛНДХТХЙЮЖХХ (ЯРЮПНЦН ГМЮВЕМХЪ), РЮЙ Х ОНЯКЕ (МНБНЦН ГМЮВЕМХЪ). дКЪ ЩРНЦН, ПЮГДЕК "ДЕИЯРБХЕ" Б НОХЯЮМХХ РПХЦЦЕПЮ МЮДН МЮВЮРЭ Я ГЮДЮМХЪ ЯБЪГЮММШУ ХЛЕМ ГЮОХЯХ:

REFERENCING OLD AS <ЯБЪГЮММНЕ ХЛЪ ДКЪ ЯРЮПНЦН ГМЮВЕМХЪ>
REFERENCING NEW AS <ЯБЪГЮММНЕ ХЛЪ ДКЪ МНБНЦН ГМЮВЕМХЪ>

сЙЮГШБЮРЭ ЯБЪГЮММШЕ ХЛЕМЮ ЛНФМН Б КЧАНЛ ОНПЪДЙЕ. еЯКХ ЙЮЙНЕ-РН ХГ ХЛЕМ МЕ МСФМН (МЮОПХЛЕП, МЮЛ МЕ РПЕАСЕРЯЪ ХЛЪ ДКЪ ЯРЮПНЦН ГМЮВЕМХЪ), РН ЕЦН ЛНФМН МЕ СЙЮГШБЮРЭ. яКНБН AS ЛНФМН НОСЯЙЮРЭ. )

оПХЛЕПШ ХЯОНКЭГНБЮМХЪ ЯБЪГЮММШУ ХЛЕМ:

CREATE TRIGGER del_trig DELETE ON items
REFERENCING OLD del_rec
FOR EACH ROW ( UPDATE tab2 SET total=total-del_rec.price )

CREATE TRIGGER upd_trig UPDATE OF name ON companies
REFERENCING NEW newval
REFERENCING OLD oldval
FOR EACH ROW
(EXECUTE PROCEDURE proc4(oldval.name, newval.name) )
AFTER ( EXECUTE PROCEDURE proc2 )

хРЮЙ, БЯЕ-РЮЙХ, МЮОХЬЕЛ РПХЦЦЕП, ЙНРНПШИ АСДЕР ЯПЮАЮРШБЮРЭ МЮ СДЮКЕМХЕ ХМТНПЛЮЖХХ Н ТХПЛЕ (РЮАКХЖЮ companies) Х ДЕИЯРБХЕ ЙНРНПНЦН АСДЕР ЯНЯРНЪРЭ Б СДЮКЕМХХ ХГ РЮАКХЖШ persons ХМТНПЛЮЖХЧ Н БЯЕУ ЯНРПСДМХЙЮУ ЩРНИ ТХПЛШ:

CREATE TABLE companies (
company_id SERIAL, { ОЕПБХВМШИ ЙКЧВ ТХПЛШ }
....)

CREATE TABLE persons (...,
company INTEGER, { ЯЯШКЙЮ МЮ ТХПЛС, ЦДЕ ПЮАНРЮЕР }
....)

CREATE TRIGGER del_comp DELETE ON companies
REFERENCING OLD AS rec
FOR EACH ROW
(DELETE FROM persons
WHERE persons.company = rec.company_id )

рЕОЕПЭ ПЮЯЯЛНРПХЛ ПЕЮКХГЮЖХЧ РПХЦЦЕПЮ ДКЪ ЮБРНЛЮРХВЕЯЙНЦН БЕДЕМХЪ ОПНРНЙНКЮ НА ХГЛЕМЕМХЪУ ХЛЕМ С ЙНЛОЮМХИ. рПЕАСЕРЯЪ ТХЙЯХПНБЮРЭ, ЙРН, ЙНЦДЮ Х ЙЮЙ ЛНДХТХЖХПНБЮК МЮГБЮМХЕ ТХПЛШ (ОНКЕ name) Б ДЮММНИ РЮАКХЖЕ. дКЪ ЩРНЦН ГЮБЕДЕЛ РЮАКХЖС ЯКЕДСЧЫЕИ ЯРПСЙРСПШ:

CREATE TABLE protocol (
company INTEGER, { ХДЕМРХТХЙЮРНП ХГЛЕМЕММНИ ГЮОХЯХ }
login CHAR(8), { ЯХРЕЛМНЕ ХЛЪ ОНКЭГНБЮРЕКЪ }
oldname CHAR(40), { ЯРЮПНЕ ХЛЪ ТХПЛШ }
newname CHAR(40), { МНБНЕ ХЛЪ ТХПЛШ }
when DATETIME YEAR TO SECOND { ЙНЦДЮ }
)

рНЦДЮ МСФМШИ МЮЛ РПХЦЦЕП АСДЕР БШЦКЪДЕРЭ РЮЙ:

CREATE TRIGGER upd_compname UPDATE OF name ON companies
REFERENNCING NEW AS newcomp
REFERENNCING OLD AS oldcomp
FOR EACH ROW
(INSERT
INTO protocol (company, login, oldname, newname, when)
VALUES (oldcomp.company_id, USER, oldcomp.name,
newcomp.name, CURRENT)

сЯКНБХЪ Б РПХЦЦЕПЕ

рПХЦЦЕПМШЛ ЯНАШРХЕЛ ЪБКЪЕРЯЪ ЙЮЙ ЯЮЛН БШОНКМЕМХЕ НОЕПЮРНПЮ, ХГЛЕМЪЧЫЕЦН РЮАКХЖС, РЮЙ Х МЕОНЯПЕДЯРБЕММНЕ ХГЛЕМЕМХЕ ЙЮЙНИ-КХАН ГЮОХЯХ. мН ЛНФМН МЮКНФХРЭ Х ДНОНКМХРЕКЭМНЕ СЯКНБХЕ. дКЪ ЩРНЦН ОЕПЕД МЮАНПНЛ НОЕПЮРНПНБ (ЙНРНПШЕ, МЮОНЛМХЛ, ПЮГДЕКЕМШ ГЮОЪРНИ Х ГЮЙКЧВЕМШ Б ЙПСЦКШЕ ЯЙНАЙХ) МЮДН ОНЯРЮБХРЭ СЯКНБХЕ:

........
WHEN ( <СЯКНБХЕ> ) ( <НОЕПЮРНП>, <НОЕПЮРНП>, ...),
WHEN ( <СЯКНБХЕ> ) ( <НОЕПЮРНП>, <НОЕПЮРНП>, ...),
........

дКЪ ЙЮФДНЦН ХГ ПЮГДЕКНБ BEFORE/FOR EACH ROW/AFTER ЛНФМН СЙЮГШБЮРЭ ОПНХГБНКЭМНЕ ЙНКХВЕЯРБН РЮЙХУ ОЮП СЯКНБХЕ-НОЕПЮРНПШ. оПХЛЕП РПХЦЦЕПЮ Я ДНОНКМХРЕКЭМШЛХ СЯКНБХЪЛХ:

CREATE TRIGGER upd_price UPDATE OF price ON items
REFERENCING OLD AS pre
REFERENCING NEW AS post
FOR EACH ROW
WHEN (post.price < 0)
(EXECUTE PROCEDURE proc1(post.price))
WHEN (post.price > pre.price * 2)
(EXECUTE PROCEDURE proc2(ppost.price, pre.price))