GL17

.PAS

Скачиваний:

Добавлен:

28.06.2014

Размер:

26.94 Кб

Скачать

☆

ѓ‹Ђ‚Ђ 17.
€‘ЏЋ‹њ‡“…Њ ЉЋЊЂЌ„› џ‡›ЉЂ SQL

"Ђ вҐЇҐам § Ўг¤мвҐ ўбҐ, зҐ¬г ў б гзЁ«Ё!". ђ бб¬®ваҐў Є®¬ ¤л
SQL - п§лЄ § Їа®б®ў, ўл ©¤ҐвҐ, зв® ў нв®© Ё§ЎЁв®© да §Ґ Ґбвм
¤®«п ЁбвЁл. џ§лЄ SQL, ЁбЇ®«м§гҐ¬л© ў® ¬®ЈЁе ‘“Ѓ„, пў«пҐвбп
¬®йл¬, нддҐЄвЁўл¬ баҐ¤бвў®¬ ®Ўа Ў®вЄЁ Ў § ¤ ле. ‘а ўЁвҐ
ЇаЁў®¤Ё¬лҐ Ё¦Ґ ®ўлҐ ў аЁ вл Їа®Ја ¬¬ б ЇаҐ¦Ё¬Ё Ё гЎҐ¤ЁвҐбм ў
нв®¬ б ¬Ё.

17.1. ЏаЁ¬ҐпҐ¬ Є®¬ ¤г SELECT (SQL)

ђҐ§г«мв в®¬ Ў®«миЁбвў ®ЇҐа жЁ© б Ѓ„ пў«пҐвбп в Ў«Ёж : ®ў п
Ѓ„, а бЇҐз вЄ , ¤ўг¬Ґал© ¬ ббЁў, вҐЄбв®ўл© д ©«, нЄа п в Ў«Ёж Ё в.Ї.
ђ ҐҐ ўл г§ «Ё, Є Є ®вЄалў вм Ѓ„, ®ЎҐбЇҐзЁў вм г¦го гЇ®ап¤®зҐ®бвм,
ЇаЁў«ҐЄ вм ¤ лҐ ўбЇ®¬®Ј вҐ«мле Ѓ„, ЇҐаҐЄ«оз вм Ї®в®Є ўлў®¤ Ё Їа.
Ѓ®«миЁҐ § Ёп, гбЁ«Ёп Ё вй вҐ«м®бвм ваҐЎговбп, зв®Ўл ®ЇвЁ¬Ё§Ёа®ў вм
ўлЇ®«ҐЁҐ Їа®Ја ¬¬.
Љ®¬ ¤ SELECT п§лЄ SQL ®ЇаҐ¤Ґ«пҐв гЄ § го ўлиҐ ®Ўа Ў®вЄг
Ў § ¤ ле б ўв®¬ вЁзҐбЄ®© ®ЇвЁ¬Ё§ жЁҐ© Їа®жҐбб , § ¬Ґпп б®Ў®©
ҐбЄ®«мЄ® Є®¬ ¤, зЁ п б USE. ќв® ®ЇаҐ¤Ґ«ҐЁҐ Їа®Ёбе®¤Ёв
«®ЈЁзҐбЄ®¬ га®ўҐ, ЎҐ§ «ЁиҐ© ¤Ґв «Ё§ жЁЁ. Џ®нв®¬г ¤ го Є®¬ ¤г
¬®¦Ґв ЁбЇ®«м§®ў вм Ё зЁ ойЁ©, ¤®бЄ® «м® Ё§гзЁўиЁ© ЇаЁ¬Ґал
ЇаЁ¬ҐҐЁп. Ќ зҐ¬ б ЇаЁ¬Ґа Ё ¬л.
ЏаЁ¬Ґа 17.1. Џа®Ја ¬¬г ЇаЁ¬Ґа 16.2 § ¬ҐпҐв б«Ґ¤гой п Є®¬ ¤ :
SELECT Famil, KNaz, FNaz FROM Dipl c, Kafedr a, Faki b ;
WHERE (c.NKaf=a.NKaf AND a.NFak=b.NFak) AND Pr =.F. TO PRINTER.
(ЇаЁ ЇҐаҐ®бҐ Є®¬ ¤л ®ўго бва®Єг ¤®Ў ў«пов ";" ў Є®Ґж ЇаҐ¤л¤гйҐ©;
Ґ § Ўлў ©вҐ ®бв ў«пвм Їа®ЎҐ« - б«Ґў ®в ";" Ё«Ё ў з «Ґ ®ў®© бва®ЄЁ
- ў® Ё§ЎҐ¦ ЁҐ "бЄ«ҐЁў Ёп" б«®ў).
‡ ЇЁбм "Dipl c, Kafedr a, Faki b" б®Ї®бв ў«пҐв Ё¬Ґ ¬ Ѓ„ «®Є «млҐ
ЇбҐў¤®Ё¬л (Ё¬Ґ ) c,a,b, ўҐ Є®¬ ¤л SELECT Ґ Ё¬ҐойЁҐ бЁ«л.
‘®ўЇ ¤ ойЁҐ Ё¬Ґ Ї®«Ґ© а §«Ёзле (ЁбЇ®«м§гҐ¬ле ў Є®¬ ¤Ґ) Ѓ„
®Ўп§ вҐ«м® гв®зповбп «®Є «мл¬Ё ЇбҐў¤®Ё¬ ¬Ё Ё«Ё (ў ®вбгвбвўЁҐ
«®Є «м®Ј® ЇбҐў¤®Ё¬ ) Ё¬Ґ ¬Ё Ѓ„. …б«Ё «®Є «мл© ЇбҐў¤®Ё¬ ў ¬Ё
§ ¤ , в® Ё¬Ґ® ҐЈ® ¤® ЁбЇ®«м§®ў вм ¤«п гв®зҐЁп Ё¬Ґ Ї®«Ґ©.
Џ®бЄ®«мЄг Ё¬Ґ Ї®«Ґ© Famil, KNaz, FNaz, Pr гЁЄ «мл, ®Ё ¤ л ЎҐ§
Єў «ЁдЁЄ в®а®ў, е®вп § ЇЁбм "c.Famil, a.KNaz, b.FNaz" в Є¦Ґ ¤®ЇгбвЁ¬ .
"ЂЈ«®п§лзл¬ зЁв вҐ«п¬" ўбҐ г¦Ґ ¤®«¦® Ўлвм пб®, ¤«п ®бв «мле
- ¬л ¤ Ґ¬ "ЇҐаҐў®¤" § ЇЁб ®© ўлиҐ Є®¬ ¤л, д®а¬ЁагойҐ© в Ў«Ёжг
б гЄ § л¬Ё Є®«®Є ¬Ё (Ёе б®ў®ЄгЇ®бвм ®Ў®§ зҐ Є Є <‘ЇЁб®Є Ї®«Ґ©>):
‚›ЃђЂ’њ<‘ЇЁб®Є Ї®«Ґ©> €‡<‘ЇЁб®Є Ѓ„> ѓ„…<“б«®ўЁп бўп§Ё Ѓ„ Ё гб«®ўЁҐ
дЁ«мва жЁЁ § ЇЁбҐ©> ЌЂ Џђ€Ќ’…ђ (¤«п Ј«п¤®бвЁ гб«®ўЁп бўп§Ё ў
ЇаЁ¬ҐаҐ 17.1 § Є«озҐл ў бЄ®ЎЄЁ). •®вп гЄ § ўлў®¤ ЇаЁвҐа,
®¤®ўаҐ¬Ґ® в Ў«Ёж ўлў®¤Ёвбп Ё ¤ЁбЇ«Ґ©.
…б«Ё Ўл ¬л г¤®ў®«мбвў®ў «Ёбм д ¬Ё«Ёп¬Ё Ё ®¬Ґа ¬Ё Є дҐ¤а,
в Ў«Ёжг ўлў®¤Ё«Ё в®«мЄ® ¤ЁбЇ«Ґ© (нв® Їа®Ёбе®¤Ёв Ї® г¬®«з Ёо), § ЇЁбм
Є®¬ ¤л гЇа®бвЁ« бм Ўл: SELECT Famil, NKaf FROM Dipl WHERE Pr=.F.
„«п § ЇЁбЁ в Ў«Ёжл Є Є ®ў®© Ѓ„ б Ё¬ҐҐ¬ _Dip Є®¬ ¤г а биЁапҐ¬:
SELECT Famil, NKaf FROM Dipl WHERE Pr=.F. INTO DBF _Dip .
‘®§¤ п Ѓ„ ўв®¬ вЁзҐбЄЁ ®вЄалў Ґвбп ў вҐЄгйҐ© а Ў®зҐ© ®Ў« бвЁ.
…б«Ё г¦®, зв®Ўл бва®ЄЁ в Ў«Ёжл Ўл«Ё гЇ®ап¤®зҐл Ї® Є дҐ¤а ¬,
ў ЇаҐ¤Ґ« е ®¤®© Є дҐ¤ал - Ї® д ¬Ё«Ёп¬ бвг¤Ґв®ў, § ЇЁблў Ґ¬ Є®¬ ¤г
SELECT Famil, NKaf FROM Dipl WHERE Pr=.F. ORDER BY NKaf,Famil .
ЏаЁ¬Ґа 17.2. Ќ ©¤Ґ¬ Ґ¦Ґ¬Ґбпзго нЄ®®¬Ёо бвЁЇҐ¤Ё «м®Ј® д®¤
Ї® Є ¦¤®© Є дҐ¤аҐ ЇаЁ ®взЁб«ҐЁЁ ҐгбЇҐў ойЁе ¤ЁЇ«®¬ЁЄ®ў. ЏаЁ¤Ґвбп
гЄ § вм ў <‘ЇЁбЄҐ Ї®«Ґ©> ®¤г Ё§ "ўҐавЁЄ «мле" (ЇаЁ¬ҐпҐ¬ле Є Є®«®ЄҐ) дгЄжЁ©
- бг¬¬Ёа®ў ЁҐ: Sum(Stipa), Ј¤Ґ Stipa - Ї®«Ґ Ѓ„ б а §¬Ґа®¬ бвЁЇҐ¤Ё©.
Њл гЄ §лў Ґ¬ ҐҐ ў бЇЁбЄҐ ўлў®¤Ё¬ле Ї®«Ґ©.
‚ в Ў«ЁжҐ ¤«п Є ¦¤®© Є дҐ¤ал б ҐгбЇҐў ойЁ¬Ё ¤ЁЇ«®¬ЁЄ ¬Ё г¦ ®¤
бва®Є б Ёв®Ј®¬ бг¬¬Ёа®ў Ёп. ’ Є®Ґ ЈагЇЇЁа®ў ЁҐ ®ЎҐбЇҐзЁў Ґв ваЁЎгв
GROUP BY NKaf. ‘ва®ЄЁ ¬л гЇ®ап¤®зЁ¬ Ї® ®¬Ґа ¬ Є дҐ¤а:
SELECT NKaf, Sum(Stipa) FROM Dipl WHERE Pr=.F. GROUP BY NKaf ORDER BY
NKaf.
€в Є, Є®¬ ¤ SELECT б ¬ ®вЄалў Ґв Ѓ„, Ї®¤ЎЁа Ґв Ё«Ё б®§¤ Ґв
Ґ®Ўе®¤Ё¬лҐ Ё¤ҐЄбл, ®аЈ Ё§гҐв бўп§м Ѓ„, дЁ«мвагҐв, ЈагЇЇЁагҐв Ё
®Ўа Ў влў Ґв § ЇЁбЁ, § Єалў Ґв Ѓ„, гЁзв®¦ Ґв ўаҐ¬ҐлҐ д ©«л. ЏаЁ
ҐҐ ўлЇ®«ҐЁЁ ўв®¬ вЁзҐбЄЁ ЁбЇ®«м§гҐвбп вҐе®«®ЈЁп Rushmore.
Ѓ„-Ёбв®зЁЄЁ Ё ®ў п Ѓ„, Ґб«Ё ® б®§¤ Ґвбп, ®бв овбп ®вЄалвл¬Ё
Ї®б«Ґ ўлЇ®«ҐЁп SELECT. Ќ®ў п Ѓ„ ЄвЁў . …б«Ё Їа®Ја ¬¬ Їа®¤®«¦ Ґв
а Ў®вг б нвЁ¬Ё Ѓ„ Ї®б«Ґ ўлЇ®«ҐЁп SELECT, Їа®йҐ ўбҐЈ® § Єалвм ўбҐ
д ©«л (CLOSE ALL) Ё«Ё ўбҐ Ў §л (CLOSE DATABASES), Ґ®Ўе®¤Ё¬лҐ
- ў®ўм ®вЄалвм. ’®Ј¤ Ґ ЇаЁ¤Ґвбп а §ЎЁа вмбп б ЁбЇ®«м§гҐ¬л¬Ё
а Ў®зЁ¬Ё ®Ў« бвп¬Ё.
Њл а бб¬®ваҐ«Ё б«гз Ё б®Ґ¤ЁҐЁп Ёбе®¤ле в Ў«Ёж (Ѓ„) "Ї®
Ј®аЁ§®в «Ё". ‘®Ґ¤ЁҐЁҐ "Ї® ўҐавЁЄ «Ё" (UNION) а бб¬®ваҐ® ў Ї. 17.3.
‡ ¤ ЁҐ 17.1. ‚ Ѓ„ Kadr ¤ л бўҐ¤ҐЁп ® б®ваг¤ЁЄ е, ў з бв®бвЁ,
в ЎҐ«млҐ ®¬Ґа , д ¬Ё«ЁЁ Ё ¤ вл § зЁб«ҐЁп ў ив в, вҐ«Ґд®л б
в ЎҐ«мл¬Ё ®¬Ґа ¬Ё - ў Ѓ„ Telf. ‚лўҐбвЁ Є®¬ ¤®© SELECT ў «д ўЁв®¬
Ї®ап¤ЄҐ д ¬Ё«ЁЁ ( в Є¦Ґ вҐ«Ґд®л) б®ваг¤ЁЄ®ў, бв ¦ а Ў®вл Є®в®але
ЇаҐ¤ЇаЁпвЁЁ ба ўпҐвбп б 20, 25, 30, 35 Ј®¤ ¬Ё ў гЄ § ®¬ ¬ҐбпжҐ
вҐЄгйҐЈ® Ј®¤ .

17.2. €§гз Ґ¬ д®а¬л § ЇЁбЁ Є®¬ ¤л SELECT (SQL)

„«п ¤ «мҐ©иҐЈ® Ё§«®¦ҐЁп Ґ®Ўе®¤Ё¬ вҐа¬Ё "Є®«®Є ",
®в®бпйЁ©бп Є д®а¬ЁагҐ¬®© в Ў«ЁжҐ, ЇаЁ¬Ґа NKaf, Sum(Stipa) - ¤ўҐ
Є®«®ЄЁ (б¬. Є®¬ ¤г SELECT ў ЇаЁ¬ҐаҐ 17.2). Ља®¬Ґ "ўҐавЁЄ «мле"
дгЄжЁ© Sum, Avg (баҐ¤ҐҐ аЁд¬ҐвЁзҐбЄ®Ґ), Count (дгЄжЁп-бзҐвзЁЄ),
Min, Max, Є®«®ЄЁ ¬®Јгв Ўлвм § ¤ л ўла ¦ҐЁп¬Ё б ®Ўлзл¬Ё, "Ґ
ўҐавЁЄ «мл¬Ё" дгЄжЁп¬Ё ®в Ї®«Ґ© Ѓ„, ¤Ґ©бвўгойЁ¬Ё ў а ¬Є е ®в¤Ґ«м®©
§ ЇЁбЁ, Ё ¤ ¦Ґ Є®бв в ¬Ё (б¬. ЇаЁ¬Ґа 17.5), дгЄжЁп¬Ё Ї®«м§®ў вҐ«п.
‚ "ўҐавЁЄ «мле" ўла ¦ҐЁпе ¬®¦® гЄ §лў вм Ё ҐбЄ®«мЄ® Ї®«Ґ©,
ЇаЁ¬Ґа: Sum(Stipa)/5000, Max(Stipa)-Avg(Stipa) . ЏаЁ¬Ґал
"Ґ ўҐавЁЄ «мле" ўла ¦ҐЁ©: Rtrim(Famil)+" "+ Imya, Str(Stipa,6).
ЋЎп§ вҐ«мл «Ёим ¤ўҐ ЇҐаўлҐ б®бв ў«пойЁҐ Є®¬ ¤л SELECT (Ї®б«Ґ
Ґ®Ўп§ вҐ«м®Ј® ваЁЎгв DISTINCT, ЇаҐ¤®вўа й ойҐЈ® ўлў®¤ ®¤Ё Є®ўле
бва®Є; ваЁЎгв ALL Їа®вЁў®Ї®«®¦®Ј® б¬лб« ¤Ґ©бвўгҐв Ї® г¬®«з Ёо):
SELECT DISTINCT <‘ЇЁб®Є Є®«®®Є> FROM<‘ЇЁб®Є Ѓ„>.
Џ®ап¤®Є б«Ґ¤гойЁе б®бв ў«пойЁе Є®¬ ¤л Ґ пў«пҐвбп ¦ҐбвЄЁ¬.
‚ <‘ЇЁбЄҐ Ѓ„> Ґ®Ўп§ вҐ«мл© «®Є «мл© ЇбҐў¤®Ё¬ Ѓ„ бв ўпв бЇа ў ®в
Ё¬ҐЁ Ѓ„ Ё ®в¤Ґ«пов ®в ҐЈ® ®¤Ё¬ Ё«Ё ҐбЄ®«мЄЁ¬Ё Їа®ЎҐ« ¬Ё. Џ®« п
§ ЇЁбм н«Ґ¬Ґв <‘ЇЁбЄ Є®«®®Є> Ё¬ҐҐв ўЁ¤
<‹®Є «мл© ЇбҐў¤®Ё¬>.<‚ла ¦ҐЁҐ, ў з бв®бвЁ, Ї®«Ґ Ѓ„> AS<€¬п Є®«®ЄЁ>.
…б«Ё <‘ЇЁб®Є Є®«®®Є> - нв® бЇЁб®Є ўбҐе Ї®«Ґ© гЄ § ле Ѓ„, ҐЈ®
Ї®Є §лў ов § Є®¬ "*". ЏаЁ¬Ґа: SELECT * FROM Dipl WHERE Pr=.F. .
‚®§¬®¦® гЇ®ап¤®зҐЁҐ Ё ЈагЇЇЁа®ў ЁҐ Ї® Є®«®Є ¬-ўла ¦ҐЁп¬.
ЏаЁ нв®¬ ¤®ЇгбвЁ¬®© д®а¬®© гЄ § Ёп Є®«®ЄЁ пў«пҐвбп Ё¬п нв®© Є®«®ЄЁ.
Ља®¬Ґ в®Ј®, ®® б«г¦Ёв ®Ў®§ зҐЁҐ¬ ®ў®Ј® Ї®«п ў Ѓ„ - ў®§¬®¦®¬
аҐ§г«мв вҐ SELECT. ‚ ¤агЈЁе б«гз пе н«Ґ¬Ґв AS<€¬п Є®«®ЄЁ> Ґ г¦Ґ.
Џ® г¬®«з Ёо Ё¬п Є®«®ЄЁ нв®
- <Ё¬п Ї®«п Ѓ„>_<« в.ЎгЄў >, ЇаЁ¬Ґа: NKaf_A, NKaf_B; ЎгЄў
¤®Ў ў«пҐвбп «Ёим ЇаЁ ®¤Ё Є®ўле Ё¬Ґ е Ї®«Ґ© а §ле Ѓ„, § ¤ ойЁе Є®«®ЄЁ;
- <Ё¬п "ўҐавЁЄ «м®©" дгЄжЁЁ>_<Ё¬п Ї®«п>, ЇаЁ¬Ґа: SUM_STIPA;
- <Ё¬п "ўҐавЁЄ «м®©" дгЄжЁЁ>_EXP_<Ї®ап¤Є®ўл© ®¬Ґа> (дгЄжЁп
ЇаЁ¬ҐҐ Ґ Є ®в¤Ґ«м®¬г Ї®«о, Є ўла ¦ҐЁо); ЇаЁ¬Ґа: SUM_EXP_2;
- EXP_<Ї®ап¤Є®ўл© ®¬Ґа Є®«®ЄЁ> (Є®«®Є § ¤ ўла ¦ҐЁҐ¬).
€¬п Є®«®ЄЁ ®ЇаҐ¤Ґ«пҐв ҐҐ § Ј®«®ў®Є ў в Ў«ЁжҐ.
‘®бв ў«пой п Є®¬ ¤л "ЏаЁҐ¬ЁЄ в Ў«Ёжл". ‚ аЁ в "TO"<ЏаЁҐ¬ЁЄ>.
”®а¬л:TO PRINTER (б¬. ЇаЁ¬Ґа ў Ї. 17.1), TO FILE<€¬п д ©« > ADDITIVE
( ваЁЎгв ADDITIVE ®§ з Ґв, зв® в Ў«Ёж ¤®Ў ў«пҐвбп Є ЇаҐ¦Ґ¬г
б®¤Ґа¦Ё¬®¬г ASCII-д ©« , Ё зҐ д ©« ЇҐаҐ§ ЇЁблў Ґвбп). Џ а ««Ґ«м®
Їа®Ёбе®¤Ёв ўл¤ з в Ў«Ёжл нЄа , Ї®¤ ў«пҐ¬ п, Ґб«Ё г¦®, ®ЇжЁҐ©
NOCONSOLE. ЏаЁ¬Ґа: TO PRINTER NOCONSOLE. ‚ «оЎ®¬ б«гз Ґ ўл¤ зЁ
нЄа ¤®ЇгбвЁ¬л ®ЇжЁп PLAIN (§ Ј®«®ўЄЁ Є®«®®Є Ґ ўл¤ овбп) Ё ®ЇжЁп
NOWAIT (Ґ Їа®Ёбе®¤Ёв Ї г§л ЇаЁ § Ї®«ҐЁЁ нЄа , Ё¤Ґв "Їа®ЄагвЄ ").
‚ аЁ в "INTO<ЏаЁҐ¬ЁЄ>"; в Ў«Ёж нЄа Ґ ўл¤ Ґвбп. ”®а¬л:
)INTO ARRAY <€¬п ¬ ббЁў >; ¬ ббЁў Ї®¤®ЎҐ б®§¤ ў Ґ¬®¬г ў Є®¬ ¤Ґ
COPY TO ARRAY;
Ў)INTO CURSOR<€¬п Љ“ђ‘ЋђЂ - ўаҐ¬Ґ®© Ў §л>, Љ“ђ‘Ћђ ¬®¦Ґв Ўлвм
Ёбв®зЁЄ®¬ ¤ ле ¤«п ¤агЈ®© Є®¬ ¤л SELECT, ҐЈ® Ї®«п ¤®бвгЇл «Ёим
¤«п звҐЁп, ЇаЁ¬Ґа, ¬®Јгв Ўлвм гЄ § л ў Є®¬ ¤Ґ BROWSE; § ЄалвЁҐ
Љ“ђ‘ЋђЂ, ЇаЁ¬Ґа, ўл§ў ®Ґ § ўҐаиҐЁҐ¬ § ¤ зЁ, ўҐ¤Ґв Є ҐЈ® г¤ «ҐЁо;
ў)INTO TABLE<€¬п Ѓ„> Ё«Ё INTO DBF<€¬п Ѓ„> (б¬. ЇаЁ¬Ґа ў Ї. 17.1).
‚ ®¤®© Є®¬ ¤Ґ SELECT Ґ«м§п б®ў¬Ґй вм ў аЁ вл TO Ё INTO.
‘®бв ў«пой п WHERE<“б«®ўЁп бўп§Ё Ѓ„ Ё дЁ«мва жЁЁ> а бб¬®ваҐ ў
Ї. 17.1. ђ бб¬®ваЁ¬ ®Ја ЁзҐЁп Ё ў®§¬®¦®бвЁ. „®ЇгбЄ овбп
¬ Єа®Ї®¤бв ®ўЄЁ. “б«®ўЁп бўп§Ё Ѓ„ б®Ґ¤Ёповбп ¬Ґ¦¤г б®Ў®© Ё б
гб«®ўЁҐ¬ дЁ«мва жЁЁ Ґ¤ЁбвўҐ® ў®§¬®¦®© ®ЇҐа жЁҐ© AND (Ё«Ё .AND.).
‚ гб«®ўЁпе дЁ«мва жЁЁ ¤®ЇгбЄ овбп AND, OR, NOT. €е ®ЇҐа ¤л ¤®«¦л
Ўлвм а ўҐбвў ¬Ё (Ґа ўҐбвў ¬Ё), Ї®нв®¬г, § ¬Ґпп Їа®Ја ¬¬г ЇаЁ¬Ґа
16.2, ¬л ўлг¦¤Ґ® § ЇЁб «Ё ў Є®¬ ¤Ґ а ўҐбвў® Pr =.F. ‚ гб«®ўЁЁ
дЁ«мва жЁЁ ¤®ЇгбвЁ¬л в Є¦Ґ ба ўҐЁп ўЁ¤
- <‚ла ¦ҐЁҐ> LIKE < Ў«®>, ЇаЁ¬Ґа ба ўҐЁҐ Memo-Ї®«п Dosje:
Dosje LIKE "%Ї®ў а%" (¤«п ўлў®¤ д ¬Ё«Ё© Ё "¤®бмҐ" ўбҐе ЎлўиЁе Ї®ў а®ў);
ў < Ў«®Ґ> % ®Ў®§ з Ґв «оЎго Ї®б«Ґ¤®ў вҐ«м®бвм бЁ¬ў®«®ў, § Є
Ї®¤зҐаЄЁў Ёп - ҐЄ®в®ал© («оЎ®©) бЁ¬ў®«;
- <‚ла ¦ҐЁҐ> BETWEEN <ЊЁЁ¬ «м®Ґ § зҐЁҐ>AND<Њ ЄбЁ¬ «м®Ґ § зҐЁҐ>;
§ зҐЁҐ .T. ўла Ў влў Ґвбп, Ґб«Ё § зҐЁҐ <‚ла ¦ҐЁп> е®¤Ёвбп ў
гЄ § ®¬ ¤Ё Ї §®Ґ;
- <‚ла ¦ҐЁҐ> IN (<‘ЇЁб®Є Є®бв вле ўла ¦ҐЁ©>); § зҐЁҐ .T.
ўла Ў влў Ґвбп ЇаЁ б®ўЇ ¤ҐЁЁ § зҐЁп <‚ла ¦ҐЁп> б «оЎл¬ Ё§ § зҐЁ©
<‘ЇЁбЄ >. ЏаЁ¬Ґа: NOT Fak IN(" 1", " 3"); ўл¤Ґ«повбп § ЇЁбЁ бвг¤Ґв®ў,
®Ўгз ойЁебп Ґ д Єг«мвҐв е 1 Ё 3.
Ља®¬Ґ в®Ј®, ў гб«®ўЁЁ дЁ«мва жЁЁ ¬®Јгв ЇаЁ¬Ґпвмбп Єў в®а
бгйҐбвў®ў Ёп EXISTS Ё аҐ§г«мв вл ўлЇ®«ҐЁп Ї®¤зЁҐле Є®¬ ¤ SELECT
(б¬. Ї.17.4).
‘®бв ў«пой п ORDER BY <‘ЇЁб®Є Є®«®®Є Ё«Ё Ї®«Ґ© Ѓ„>. ќ«Ґ¬Ґв бЇЁбЄ
¤®«¦Ґ б®Їа®ў®¦¤ вмбп ваЁЎгв®¬ DESC (бЇа ў ), Ґб«Ё ў ¤ ®© Є®«®ЄҐ
(Ї® ¤ ®¬г Ї®«о) ¤®«¦Ґ Ўлвм гЎлў ойЁ© Ї®ап¤®Є. Џ® г¬®«з Ёо
ЇаҐ¤Ї®« Ј Ґвбп ASC (гЇ®ап¤®зҐЁҐ Ї® ў®§а бв Ёо). ЏҐаўл© н«Ґ¬Ґв
§ ¤ Ґв Ј«®Ў «мл© Ї®ап¤®Є, Їа®зЁҐ - «®Є «мл© (б¬. Ї. 3.9). ‚ <‘ЇЁбЄҐ>
Є®«®ЄЁ § ¤ ов Ё«Ё Ёе Ё¬Ґ ¬Ё, Ё«Ё Ї®ап¤Є®ўл¬Ё ®¬Ґа ¬Ё. ‘ ¬ п «Ґў п
Є®«®Є Ё¬ҐҐв ®¬Ґа 1.
‘®бв ў«пой п GROUP BY <‘ЇЁб®Є Ё¬Ґ Є®«®®Є Ё«Ё Ї®«Ґ© Ѓ„>. „®ЇгбвЁ¬
«Ёим ®¤Ё га®ўҐм ЈагЇЇЁа®ў Ёп. ЏаЁ¬Ґпп Љ“ђ‘Ћђ Ё ҐйҐ ®¤г Є®¬ ¤г
SELECT, ¬®¦® ўлЇ®«Ёвм ЈагЇЇЁа®ў ЁҐ бва®Є Ў®«ҐҐ ўлб®Є®¬ га®ўҐ Ё
в.¤.(б¬. ЇаЁ¬Ґа 17.4). Џ®«п Ѓ„, Ґ § ¤ ойЁҐ Є®«®ЄЁ в Ў«Ёжл, в Є¦Ґ
¬®Јгв гЇа ў«пвм ЈагЇЇЁа®ў ЁҐ¬ (Ё гЇ®ап¤®зҐЁҐ¬, ® Ї®б«Ґ¤ҐҐ Ґ
®Ј®ў®аҐ® ў агЄ®ў®¤бвў е).
‘®бв ў«пой п HAVING<“б«®ўЁҐ ўлў®¤ ЈагЇЇл> "а Ў®в Ґв" в®«мЄ® ў Ї аҐ
б GROUP BY Ё § ЇЁблў Ґвбп, Ґб«Ё Ґбвм ваҐЎ®ў ЁҐ, Є®в®а®¬г ¤®«¦
г¤®ў«Ґвў®апвм ®жҐЄ ЈагЇЇл, ЇаЁ¬Ґа ҐҐ а §¬Ґа.
ЏаЁ¬Ґа 17.3. “б«®ўЁп ЇаЁ¬Ґа 16.2. „«п «®¦ҐЁп "ива дле б ЄжЁ©"
ўл¤Ґ«повбп Є дҐ¤ал, Є®в®але Ґ Ї®«гзЁ«Ё § зҐв Ї® ЇаҐ¤¤ЁЇ«®¬®© Їа ЄвЁЄҐ
Ў®«ҐҐ 2 бвг¤Ґв®ў. ЏҐз в Ґвбп бЇЁб®Є нвЁе Є дҐ¤а ( §ў Ёп Ё зЁб«®
ўлиҐгЄ § ле бвг¤Ґв®ў Є дҐ¤аҐ).
SELECT KNaz, Count(*) FROM Dipl c, Kafedr a GROUP BY c.NKaf ;
WHERE c.NKaf=a.NKaf AND Pr =.F. HAVING Count(*) > 2 TO PRINTER
Ќ бв «® ўаҐ¬п ¤ вм ЇаЁ¬Ґа ЇаЁ¬ҐҐЁп DISTINCT (б¬. ®ЇЁб ЁҐ з «
Є®¬ ¤л). …б«Ё Їа®бв® г¦® ўлўҐбвЁ ®¬Ґа (Ё«Ё §ў Ёп) Є дҐ¤а,
Є®в®але е®вп Ўл ®¤Ё ¤ЁЇ«®¬ЁЄ Ґ Ї®«гзЁ« § зҐв Ї® Їа ЄвЁЄҐ, ¬®¦®
®Ў®©вЁбм Ё ЎҐ§ ЈагЇЇЁа®ў Ёп, ЇаЁ¬Ґпп DISTINCT:
SELECT DISTINCT NKaf FROM Dipl WHERE Pr =.F. && ‚лў®¤пвбп ®¬Ґа
SELECT DISTINCT KNaz FROM Dipl c, Kafedr a;
WHERE c.NKaf=a.NKaf AND Pr =.F. && ‚лў®¤пвбп §ў Ёп
‡ ¤ ЁҐ 17.2. ‘®§¤ ©вҐ Ѓ„ Prim б Ї®«п¬Ё Famil Ё Sport (гб«®ўл©
®¬Ґа ўЁ¤ бЇ®ав , Є®в®а®¬г ®в¤ Ґв ЇаҐ¤Ї®звҐЁҐ ЇҐаб® Famil).
‡ зҐЁп Ї®«п Sport б¤Ґ« ©вҐ Ї®ўв®апойЁ¬Ёбп. ‚ Ѓ„ Ras ¤ ©вҐ б«®ўҐб®Ґ
§ў ЁҐ ўЁ¤ ¤«п Є ¦¤®Ј® ®¬Ґа . 1.‘ Ї®¬®ймо SELECT ўлўҐ¤ЁвҐ §ў Ёп
ўбҐе гЄ § ле ў Ѓ„ Prim ўЁ¤®ў бЇ®ав . ѓагЇЇЁа®ў ЁҐ Ґ ЇаЁ¬Ґпвм.
2. ‚лўҐ¤ЁвҐ §ў Ёп ўЁ¤®ў бЇ®ав , гЄ § ле ў Prim Ў®«ҐҐ 5 а §.

17.3. €§гз Ґ¬ ЇаЁ¬Ґал ЁбЇ®«м§®ў Ёп SELECT (SQL)

€бЇ®«м§®ў ЁҐ Є®¬ ¤ SQL Ё§Ў ў«пҐв Ї®«м§®ў вҐ«п ®в агвЁле
"вҐеЁзҐбЄЁе" ¬®¬Ґв®ў Їа®Ја ¬¬Ёа®ў Ёп, ®бв ў«пп «Ёим Ј« ўго жҐ«м:
гзЁвмбп "ўЁ¤Ґвм" бў®Ё § ¤ зЁ ў вҐа¬Ё е Є®¬ ¤ SQL. „«п нв®Ј®
б«Ґ¤гҐв Ё§гзЁвм ¬®Ј®зЁб«ҐлҐ ЇаЁ¬Ґал ЇаЁ¬ҐҐЁп Є®¬ ¤ Ё
ўлЇ®«Ёвм бҐаЁо гЇа ¦ҐЁ© б Ё¬Ё, ў з бв®бвЁ, Ё§¬Ґпп ўе®¤ Ё
ўле®¤ Є®¬ ¤ SELECT. Џа®ўҐаЁ¬ бў®Ґ Ї®Ё¬ ЁҐ SELECT (SQL) § ¤ зҐ
ЇаЁ¬Ґа 16.1. ” ЄвЁзҐбЄЁ ¤«п ҐҐ аҐиҐЁп ¬ г¦ Є®¬ ¤
SELECT DB1.Famil, DB2.Famil FROM DB1,DB2 WHERE DB1.Famil =<” ¬Ё«Ёп> ;
AND <“б«®ўЁҐ бўп§Ё>,
Ј¤Ґ ў амЁагҐ¬®Ґ <“б«®ўЁҐ бўп§Ё> ўла ¦ Ґв б®®вўҐвбвўЁҐ Ёбе®¤®© Ё
ЁбЄ®¬®© (ў DB2) «Ёз®бвҐ©. ’ҐЄбв нв®Ј® гб«®ўЁп, Є Є Ё <” ¬Ё«Ёп>,
ЇаҐ¤ў аЁвҐ«м® ўў®¤Ёвбп, ў SELECT - ЁбЇ®«м§гҐвбп ¬ Єа®Ї®¤бв ®ўЄ .
Џа®Ја ¬¬ гЇа®й Ґвбп Ё Є в®¬г ¦Ґ ¤ Ґв Ґ ®¤Ё, ўбҐ ў®§¬®¦лҐ
ў аЁ вл ®вўҐв , ЇаЁ¬Ґа, гЄ §лў Ґв ўбҐе ¤®®а®ў б Ґ®Ўе®¤Ё¬®©
Ї жЁҐвг <” ¬Ё«Ёп> ЈагЇЇ®© Єа®ўЁ.
ЏаЁ¬Ґа 17.4. ѓагЇЇЁа®ў ЁҐ ¤ўге га®ўпе.
‚ ¤®Ї®«ҐЁҐ Є аҐ§г«мв в ¬ ЇаЁ¬Ґа 17.2 ©¤Ґ¬ Ґ¦Ґ¬Ґбпзго нЄ®®¬Ёо
бвЁЇҐ¤Ё «м®Ј® д®¤ Ї® д Єг«мвҐв ¬.
SELECT NKaf, Sum(Stipa) FROM Dipl WHERE Pr =.F. GROUP BY Nkaf ;
ORDER BY NKaf INTO CURSOR Cu && ‘®§¤ Ґвбп Љ“ђ‘Ћђ б 2 Ї®«п¬Ё
SELECT * FROM Cu && ‚лў®¤ ¤ЁбЇ«Ґ© Ёв®Ј®ў Ї® Є дҐ¤а ¬
SELECT NFak, Sum(Sum_Stipa) FROM Kafedr a, Cu WHERE a.NKaf=Cu.NKaf ;
GROUP BY NFak && Џ®«гзҐЁҐ Ё ўлў®¤ Ёв®Ј®ў Ї® д Єг«мвҐв ¬
‚ Ї®б«Ґ¤Ґ© Є®¬ ¤Ґ SELECT ЁбЇ®«м§®ў ® Ё¬п Ї® г¬®«з Ёо
Sum_Stipa Є®«®ЄЁ ў Љ“ђ‘Ћђ…, ® ¬®¦® Ўл«® ў 1-© Є®¬ ¤Ґ SELECT ¤ вм
Sum(Stipa) AS <€¬п Є®«®ЄЁ>, ў 3-© Є®¬ ¤Ґ SELECT § ЇЁб вм
Sum(<€¬п Є®«®ЄЁ>) ў¬Ґбв® Sum(Sum_Stipa).
‘®Ґ¤ЁҐЁҐ в Ў«Ёж "Ї® ўҐавЁЄ «Ё". ЂваЁЎгв UNION. „ л© ваЁЎгв
бўп§лў Ґв Ґ§ ўЁбЁ¬® ўлЇ®«пҐ¬лҐ Є®¬ ¤л SELECT Ё Ї® бгйҐбвўг
ЇаҐ¤бв ў«пҐв б«Ґ¤гойго ®ЇҐа жЁо: ў ®¤®© в Ў«ЁжҐ а §¬Ґй овбп бва®ЄЁ,
ўла Ў®в лҐ ўбҐ¬Ё бўп§ л¬Ё Є®¬ ¤ ¬Ё. ќв® ў®§¬®¦®, в®«мЄ® Ґб«Ё ў
Ў®а е ®¤® Ё в® ¦Ґ зЁб«® Є®«®®Є Ё вЁЇ § зҐЁ© ў ЇаҐ¤Ґ« е Є ¦¤®©
б®бв ў®© Є®«®ЄЁ ®¤Ё Є®ў. ’аҐЎ®ў ЁҐ ®Ў®б®ў ®: ўбЇ®¬Ё¬, зв®
"ЇаЁҐ¬ЁЄ®¬" ¬®¦Ґв Ўлвм Ѓ„. ‡ ¬ҐвЁ¬, зв® Є Ё¬Ґ ¬ Ё а §¬Ґа ¬ Ї®«Ґ©
ЁЄ ЄЁе ваҐЎ®ў Ё© Ґ ЇаҐ¤кпў«пҐвбп.
ЏаЁ¬Ґа 17.5. €¬Ґовбп ¤ўҐ Ѓ„: ) Licey - в Ў«Ёж ®Ўгз Ґ¬ле ў
«ЁжҐҐ ЇаЁ ўг§Ґ, Ў) School - в Ў«Ёж иЄ®«мЁЄ®ў ўлЇгбЄ®Ј® Є« бб
Ї®¤иҐд®© иЄ®«л, § Ё¬ ойЁебп ў Єаг¦ЄҐ ЇаЁ ўг§Ґ. ‚ Ѓ„ Licey
(School) Ґбвм Ї®«Ґ Pr, Єг¤ § ®бЁвбп § зҐЁҐ .T. ¤«п вҐе
®Ўгз Ґ¬ле, Є®в®алҐ ЇаЁпвл ў ўг§ Ї® аҐ§г«мв в ¬ ўлЇгбЄле нЄ§ ¬Ґ®ў
«ЁжҐп (нЄ§ ¬Ґ®ў "Џа®ўҐам бҐЎп"). Ќ ¤® Ї®«гзЁвм бў®¤л© бЇЁб®Є
ЇаЁпвле ў ўг§ б гЄ § ЁҐ¬ ў®§«Ґ Є ¦¤®© д ¬Ё«ЁЁ (Ї®«Ґ Famil) б«®ў
"«ЁжҐ©" Ё«Ё "иЄ®« ".
SELECT Famil, "«ЁжҐ©" FROM Licey WHERE Pr =.T. UNION ;
SELECT Famil, "иЄ®« " FROM School WHERE Pr =.T.
Њл ўЇҐаўлҐ ЁбЇ®«м§®ў «Ё Є®«®Єг б Є®бв в®©. Љ®¬ ¤л Ґ§ ўЁбЁ¬л,
Ї®нв®¬г Ї®«п ў Ёе Ґ гв®зповбп. ЌҐ«м§п Ўл«® Ўл Ї®¬Ґпвм ¬Ґбв ¬Ё
н«Ґ¬Ґвл <‘ЇЁбЄ Є®«®®Є> ў ®¤®© Ё§ Є®¬ ¤: ў б®бв ўле Є®«®Є е
®Є § «Ёбм Ўл § зҐЁп а §®Ј® вЁЇ .
Џ®бва®Ґ п в Ў«Ёж ўв®¬ вЁзҐбЄЁ гЇ®ап¤®зЁў Ґвбп Ї® <‘ЇЁбЄг
Є®«®®Є>. ‚ иҐ¬ б«гз Ґ нв® ЇаЁў®¤Ёв Є ЇҐаҐ¬ҐиЁў Ёо бва®Є
иЄ®«мЁЄ®ў Ё "«ЁжҐЁбв®ў": Ї®«Ґ Famil Ј« ў®Ґ ЇаЁ гЇ®ап¤®зҐЁЁ.
„®ЎкҐ¬бп ®в¤Ґ«м®Ј® а бЇ®«®¦ҐЁп Ў®а®ў бва®Є иЄ®«мЁЄ®ў Ё
"«ЁжҐЁбв®ў", ¤®Ў ўЁў ORDER BY 2, 1 (гЄ § л ®¬Ґа Є®«®®Є).
„®Ў ў«ҐЁҐ Їа®Ё§ў®¤Ёвбп ў Ї®б«Ґ¤оо Ё§ бўп§ ле Є®¬ ¤.
…б«Ё ўл е®вЁвҐ Ї®бв ўЁвм ўЇҐаҐ¤ иЄ®«мЁЄ®ў, § ЇЁиЁвҐ
ORDER BY 2 Desc, 1 (гЇ®ап¤®зҐЁҐ Ї® гЎлў Ёо ў Є®«®ЄҐ Є®бв в).
‚ Ї®бва®Ґ®© в Ў«ЁжҐ ўв®¬ вЁзҐбЄЁ ЁбЄ«оз овбп ¤гЎ«ЁЄ вл
бва®Є. …б«Ё ў «ЁжҐҐ Ё ў иЄ®«Ґ ®Ўгз овбп ¤ў €‚ЂЌЋ‚Ђ, ¤гЎ«ЁЄ вл Ґ
ў®§ЁЄ ов, ЁЎ® "€‚ЂЌЋ‚ «ЁжҐ©" Ё "€‚ЂЌЋ‚ иЄ®« " - нв® а §лҐ
бва®ЄЁ. …б«Ё ¤гЎ«ЁЄ вл г¦л, б«Ґ¤гҐв ў Є®¬ ¤Ґ Ї®б«Ґ б«®ў
UNION ¤®ЇЁб вм ваЁЎгв ALL.
‚ б«гз Ґ б®Ґ¤ЁҐЁп ҐбЄ®«мЄЁе Є®¬ ¤ ¬®¦® ЁбЇ®«м§®ў вм
бЄ®ЎЄЁ: SELECT ... UNION (SELECT ... UNION ALL SELECT ... ).
UNION ¬®¦Ґв бўп§лў вм Є®¬ ¤л, Ё¬ҐойЁҐ Ї®¤§ Їа®бл, ® Ґ ¬®¦Ґв
бўп§лў вм Ї®¤§ Їа®бл.
ЏаЁ¬Ґа 17.6. €§¬ҐҐЁҐ бвагЄвгал Ё б®¤Ґа¦ Ёп Ѓ„.
€¬ҐҐвбп Ѓ„ Gruppa б д ¬Ё«Ёп¬Ё бвг¤Ґв®ў (Ї®«Ґ Famil), ¤ в®© (Data)
Ї®б«Ґ¤Ґ© § йЁвл « Ў®а в®але а Ў®в Ё Є®«ЁзҐбвў®¬ (Kol) § йЁйҐле
а Ў®в. ‘вг¤Ґвл, § йЁвЁўиЁҐ ўбҐ 6 « Ў®а в®але а Ў®в ¤® 21 ¤ҐЄ Ўап
1995 Ј., Ї®«гз ов § зҐв-" ўв®¬ в" Ё ў ®ў®Ґ Ї®«Ґ Itogi § ®бЁвбп
§ зҐЁҐ "‡Ђ—’…ЌЋ". ‚ § ЇЁбЁ Їа®зЁе бвг¤Ґв®ў § ®бЁвбп "‘„Ђ‚Ђ’њ
‡Ђ—…’".
SELECT Famil, Kol, Data, Iif(Kol=6 .AND. Data < {12/21/95}, ;
"‡Ђ—’…ЌЋ", "‘„Ђ‚Ђ’њ ‡Ђ—…’") AS Itogi FROM Gruppa INTO DBF _Temp
CLOSE DATABASES && „«п б«Ґ¤гойЁе Є®¬ ¤ ваҐЎгҐвбп § Єалвм Ѓ„
ERASE Gruppa.DBF
RENAME _Temp.DBF TO Gruppa.DBF
SELECT * FROM Gruppa && ‚лў®¤ ¤ЁбЇ«Ґ© б®¤Ґа¦ Ёп ®Ў®ў«Ґ®© Ѓ„
‡ ¤ ЁҐ 17.3. Ћд®а¬ЁвҐ Ё ®Їа®Ўг©вҐ ®ўл© ў аЁ в Їа®Ја ¬¬л
ЇаЁ¬Ґа 16.1, а бб¬®ваҐл© ў з «Ґ Ї. 17.3, ®ЎҐбЇҐзЁў § ЇЁбм
аҐ§г«мв в®ў ў ASCII-д ©«, Ё¬п Є®в®а®Ј® § ¤ Ґвбп ЇгвҐ¬ ўў®¤ .

17.4. €бЇ®«м§гҐ¬ Ї®¤зЁҐлҐ Є®¬ ¤л SELECT.
”гЄжЁЁ Ї®«м§®ў вҐ«п

„«п б«гз Ґў, Є®Ј¤ § Їа®б ®б®ўлў Ґвбп аҐ§г«мв в е ¤агЈЁе
§ Їа®б®ў (Ї®¤§ Їа®б®ў), вЁЇЁз® Ёе ЇаЁ¬ҐҐЁҐ ў б®бв ўҐ гб«®ўЁ©
дЁ«мва жЁЁ. “¤®Ў®© д®а¬®© пў«пҐвбп § ЇЁбм Ї®¤зЁҐ®© Є®¬ ¤л
SELECT Є Є Їа ў®Ј® ®ЇҐа ¤ а ўҐбвў (Ґа ўҐбвў ) Ё«Ё ®ЇҐа ¤ ў
®ЇҐа жЁЁ IN (б¬. Ї. 17.2). ’ Є п Є®¬ ¤ , § Є«оз Ґ¬ п ў бЄ®ЎЄЁ (),
ўлў®¤ Ґ ®бгйҐбвў«пҐв, ЇаҐ¤бв ў«пҐв аҐ§г«мв в § Їа®б . ‚ ҐҐ бЇЁбЄҐ
Є®«®®Є - ўбҐЈ® ®¤ Є®«®Є .
‚ б«Ґ¤гойЁе ЇаЁ¬Ґа е Ўг¤Ґ¬ ббл« вмбп Ѓ„ Student б Ї®«п¬Ё
TabN (в ЎҐ«мл© ®¬Ґа бвг¤Ґв ), Famil (д ¬Ё«Ёп б ЁЁжЁ « ¬Ё), Kurs
(Єгаб ®ЎгзҐЁп), Fak (д Єг«мвҐв), SrB (баҐ¤Ё© Ў «« бвг¤Ґв ), Bolt.
Љ®ааҐ«Ёа®ў лҐ ўлЎ®аЄЁ. ќв®в вҐа¬Ё ЇаЁ¬ҐпҐвбп ў б«гз Ґ,
Є®Ј¤ бва®ЄЁ ў в Ў«Ёжг ўлЎЁа овбп Ї® аҐ§г«мв в ¬ ўлЇ®«ҐЁп
Ї®¤зЁҐле Є®¬ ¤ SELECT, ЁбЇ®«м§гойЁе вг ¦Ґ Ёбе®¤го Ѓ„ (Ґ©
б«Ґ¤гҐв ¤ вм а §«ЁзлҐ ЇбҐў¤®Ё¬л ў Ј« ў®© Ё Ї®¤зЁҐле Є®¬ ¤ е).
ЏаЁ¬Ґа 17.7. Џ®¤§ Їа®б б аҐ§г«мв в®¬-§ зҐЁҐ¬.
„«п Є ¦¤®Ј® Єгаб Є ¦¤®Ј® д Єг«мвҐв ўлўҐ¤Ґ¬ в ЎҐ«млҐ ®¬Ґа Ё
д ¬Ё«ЁЁ бвг¤Ґв®ў, баҐ¤Ё© Ў «« SrB Є®в®але ўлиҐ баҐ¤ҐЈ®
аЁд¬ҐвЁзҐбЄ®Ј® § зҐЁ© SrB ¤«п ¤ ®Ј® д Єг«мвҐв .
SELECT TabN, Famil, Fak, Kurs FROM Student a ORDER BY Fak, Kurs ;
WHERE SrB >(SELECT Avg(SrB) FROM Student b WHERE a.Fak = b.Fak)
ЋжҐЁвҐ, бЄ®«мЄ® гЇа®й Ґвбп Їа®Ја ¬¬ Ї® ба ўҐЁо б
Ї®б«Ґ¤®ў вҐ«мл¬ ЇаЁ¬ҐҐЁҐ¬ ¬®¦Ґбвў Є®¬ ¤ SELECT. ЋЎа вЁвҐ
ўЁ¬ ЁҐ в®, зв® ў Ї®¤зЁҐ®© Є®¬ ¤Ґ ЈагЇЇЁа®ў Ёп Ґв, ЁЎ®
¤«п Є®ЄаҐв®Ј® ба ўҐЁп ваҐЎгҐвбп ®¤® § зҐЁҐ Ї®¤§ Їа®б ,
ЁбЇ®«м§гойҐЈ® Ґ®Ўе®¤Ё¬го дЁ«мва жЁо.
Љў в®а бгйҐбвў®ў Ёп. Џ®¤ўла ¦ҐЁҐ гб«®ўЁп дЁ«мва жЁЁ
EXISTS (<Џ®¤зЁҐ п Є®¬ ¤ SELECT>),
Ј¤Ґ EXISTS - в Є §лў Ґ¬л© Єў в®а бгйҐбвў®ў Ёп, ¤ Ґв § зҐЁҐ .T.
«Ёим ў б«гз Ґ ҐЇгбв®© в Ў«Ёжл - аҐ§г«мв в Ї®¤зЁҐ®© Є®¬ ¤л SELECT.
— йҐ ўбҐЈ® EXISTS ЁбЇ®«м§гҐвбп б ®ваЁж ЁҐ¬ NOT: NOT EXISTS.
Џ®бЄ®«мЄг Ї®¤зЁҐ п Є®¬ ¤ ўлў®¤ Ґ ўлЇ®«пҐв, Ґв б¬лб« ў
¤Ґв «Ё§ жЁЁ <‘ЇЁбЄ Є®«®®Є>, § ЇЁблў Ґ¬ ў Ґ© Ї®б«Ґ SELECT § Є "*".
ЏаЁ¬Ґа 17.8. ‚лўҐ¤Ґ¬ гЇ®ап¤®зҐго Ї® д Єг«мвҐв ¬, ў а ¬Є е
д Єг«мвҐв - Ї® Єгаб ¬ в Ў«Ёжг б Ї®«п¬Ё Famil, Fak, Kurs, ЁбЄ«озЁў
бвг¤Ґв®ў Ї« в®Ј® ®ЎгзҐЁп Ё бвг¤Ґв®ў, ЇаЁиҐ¤иЁе ў ўг§ Ї®б«Ґ а¬ЁЁ.
‘ЇЁбЄЁ нвЁе бвг¤Ґв®ў еа пвбп ў Ѓ„ Platn Ё PostAr б®®вўҐвбвўҐ®.
‚ нвЁе Ѓ„ - ®¤® Ї®«Ґ TabN. €бЄ®¬го в Ў«Ёжг ўлў®¤Ёв Є®¬ ¤
SELECT Famil, Fak, Kurs FROM Student a ORDER BY Fak, Kurs ;
WHERE NOT EXISTS (SELECT * FROM Platn b WHERE a.TabN = b.TabN) ;
AND NOT EXISTS (SELECT * FROM PostAr c WHERE a.TabN = c.TabN) .
ЋЎа вЁвҐ ўЁ¬ ЁҐ в®, зв® Ѓ„, ®вЄалв п ў 1-© Є®¬ ¤Ґ SELECT,
¤Ґ©бвўгҐв (Є Є Ё ЇбҐў¤®Ё¬ ҐҐ) ў Ї®¤зЁҐле Є®¬ ¤ е SELECT. •®вп
зЁб«® Ёе Ґ ®Ја ЁзҐ®, ¤®ЇгбЄ Ґвбп «Ёим ®¤Ё га®ўҐм Ї®¤зЁҐЁп.
Џ®¤§ Їа®бл б ¬®¦ҐбвўҐл¬ аҐ§г«мв в®¬. ‚ аЁ вл: ALL
(§ ¬ бЄЁа®ў п «®ЈЁЄ "€"), ANY Ё«Ё SOME («®ЈЁЄ "€‹€"). “Є § лҐ б«®ў
бв ўпвбп ў гб«®ўЁҐ Ї®б«Ґ § Є а ўҐбвў (Ґа ўҐбвў ) ¤® Ї®¤§ Їа®б .
ЏаЁ¬Ґа 17.9. Ќ ©¤Ґ¬ бвг¤Ґв®ў, Їа®Ё§®бпйЁе ў ¬Ёгвг Ґ ¬ҐмиҐ
б«®ў, зҐ¬ Є ¦¤ п Ё§ бвг¤Ґв®Є (§ ¤ з -игвЄ ). —Ёб«® б«®ў ЇаҐ¤бв ў«пҐв
Ї®«Ґ Bolt. ‚бҐ бва®ЄЁ Ї®¤§ Їа®б (ў Ґ¬ дЁЈгаЁагов бвг¤ҐвЄЁ) ¤®«¦л
е®¤Ёвмбп ў § ¤ ®¬ ®в®иҐЁЁ б® бва®Є®© бвг¤Ґв ¤«п в®Ј®, зв®Ўл
® Ўл« ўлЎа :
SELECT Famil FROM Student WHERE Pol ="Њ" AND
Bolt >= ALL (SELECT Bolt FROM Student WHERE Pol ="†")
” ¬Ё«ЁЁ ®бв ўиЁебп бвг¤Ґв®ў ¬®¦® Ї®«гзЁвм Ё ЎҐ§ ЇаЁ¬ҐҐЁп NOT Є
гЄ § ®¬г ўлиҐ гб«®ўЁо дЁ«мва жЁЁ:
SELECT Famil FROM Student WHERE Pol ="Њ" AND
Bolt < ANY (SELECT Bolt FROM Student WHERE Pol ="†")
‡¤Ґбм ANY ®Ў®§ з Ґв ¤®бв в®з®бвм Ё ®¤®© бва®ЄЁ Ї®¤§ Їа®б ,
е®¤пйҐ©бп ў § ¤ ®¬ ®в®иҐЁЁ "¬ҐмиҐ".
Џ®«м§®ў вҐ«мбЄЁҐ дгЄжЁЁ (Џ”) ў SELECT. ‘®¤Ґа¦ ЁҐ Є®«®ЄЁ
д®а¬ЁагҐ¬®© в Ў«Ёжл ¬®¦® ®ЇаҐ¤Ґ«пвм б«®¦л¬, ¤ ¦Ґ гб«®ўл¬ (ЇаЁ¬Ґа
17.6), ўла ¦ҐЁҐ¬. ЏаЁ б«ЁиЄ®¬ б«®¦ле ўла ¦ҐЁпе Ј«п¤®бвм Є®¬ ¤л
вҐапҐвбп. ќв® ®¤ Ё§ ў®§¬®¦ле ЇаЁзЁ ўлҐбҐЁп ўлзЁб«ҐЁ© ў Џ”.
ЋЁ ¬®Јгв Ўлвм ЁвҐа жЁ®л¬Ё (ўлЇ®«повбп ў жЁЄ«Ґ); в ЄЁҐ а бзҐвл Ґ
§ ЇЁблў овбп ў SELECT Їап¬®.
ЏаЁ¬Ґа 17.10. ‚ Ѓ„ Postav Ё¬Ґовбп Ї®«п Cena (жҐ Ґ¤ЁЁжл в®ў а ),
Name (ҐЈ® §ў ЁҐ), Kol (зЁб«® Ґ¤ЁЁж ў Ї авЁЁ в®ў а ). ‚лўҐ¤Ґ¬
в Ў«Ёжг б гЄ § ЁҐ¬ бв®Ё¬®бвЁ Ї авЁЁ Є ¦¤®Ј® в®ў а , ўлзЁб«пҐ¬®©
б«Ґ¤гойЁ¬ ®Ўа §®¬:
- Ґб«Ё Kol ў ЇаҐ¤Ґ« е б®вЁ - Cena*Kol;
- Ґб«Ё Kol ў ЇаҐ¤Ґ« е влбпзЁ (Ў®«миҐ б®вЁ) - 0.95*Cena*Kol;
- Ґб«Ё Kol ў ЇаҐ¤Ґ« е 10000 (Ў®«миҐ влбпзЁ) - 0.95*0.95*Cena*Kol
Ё в.¤. (жҐ Ґ¤ЁЁжл в®ў а г¬Ґми Ґвбп ў ЈҐ®¬ҐваЁзҐбЄ®© Їа®ЈаҐббЁЁ).
SELECT Name, Cena, Kol, F(Cena, Kol) FROM Postav
FUNCTION F
PARAM Cena, Kol, Z && Z - Ґ Ї а ¬Ґва
Z = Cena*Kol
Kol = Kol/100
DO WHILE Int(Kol) # 0
Z = Z* 0.95
Kol = Kol/10
ENDDO
RETURN Z
‘гйҐбвўгҐв Ё ҐЁвҐа жЁ®л© ў аЁ в а бзҐв бв®Ё¬®бвЁ Ї авЁ©.
‘«®¦лҐ Џ” ў Є®¬ ¤Ґ SELECT § ¬Ґ¤«пов а Ў®вг, Ї®нв®¬г Ёе
б«Ґ¤гҐв ЇЁб вм ЂббҐ¬Ў«ҐаҐ Ё«Ё ‘Ё. ‘«Ґ¤гҐв гзЁвлў вм Ё
®Ја ЁзҐЁп. …¤ЁбвўҐл© Їгвм ЇҐаҐ¤ зЁ § зҐЁ© ў Џ” - бЇЁб®Є
аЈг¬Ґв®ў. ‘®§¤ ў Ґ¬ п ў SELECT ®ЇҐа жЁ® п баҐ¤ Ѓ„ "ҐЇа®§а з "
Ё Џ”, а Ў®в ой п б Ѓ„, Їа ЄвЁзҐбЄЁ Ґ ¬®¦Ґв ҐҐ ®ЇЁа вмбп.
Џ®ЇлвЄЁ гЇа ў«пвм баҐ¤®© Ё§ Џ” - аЁбЄ®ў л. „ ¦Ґ Ґб«Ё ¬Ґв®¤®¬
"Їа®Ў Ё Ї®Їлв®Є" Ї®«гзҐ ¤Ґ©бвўгойЁ© ў аЁ в, ® ¬®¦Ґв бв вм
ҐЇаЁЈ®¤л¬ ў б«Ґ¤гойҐ© ўҐабЁЁ FOXPRO, ЁЎ® ®ЇвЁ¬Ё§ в®а, ®в
Є®в®а®Ј® § ўЁбЁв гЇа ў«ҐЁҐ баҐ¤®© ў SELECT, Ї®бв®п®
б®ўҐаиҐбвўгҐвбп.
‡ ¤ ЁҐ 17.4. ‚®бЇ®«м§г©вҐбм Ѓ„ Student Ё б®§¤ ©вҐ Ѓ„ Tel, ў
Є®в®а®© ¤ л вҐ«Ґд®л ҐЄ®в®але бвг¤Ґв®ў Ё Ёе в ЎҐ«млҐ ®¬Ґа .
‚лўҐ¤ЁвҐ д ¬Ё«ЁЁ бвг¤Ґв®ў, Ґ Ё¬ҐойЁе вҐ«Ґд® , ЁбЇ®«м§гп Єў в®а
бгйҐбвў®ў Ёп.

17.5. ‘®§¤ Ґ¬, ¬®¤ЁдЁжЁагҐ¬ Ё ¤®Ї®«пҐ¬ Ў §л ¤ ле ў SQL

Љ®¬ ¤л SQL "Ё§Ўлв®зл" ў п§лЄҐ FOXPRO, п§лЄ гЁўҐаб «Ґ Ё ЎҐ§ Ёе.
’ Є®ў Ё Є®¬ ¤ б®§¤ Ёп Їгбв®© Ѓ„, ў Є®в®а®© ®ЇаҐ¤Ґ«Ґ ҐҐ бвагЄвга :
CREATE DBF <€¬п Ѓ„> (<‘ЇЁб®Є ®ЇЁб Ё© Ї®«Ґ©>) ,
Ј¤Ґ <®ЇЁб ЁҐ Ї®«п> Ё¬ҐҐв ўЁ¤ <€¬п Ї®«п> <’ЁЇ> (<ђ §¬Ґа Ї®«п>,<—Ёб«®
¤а®Ўле а §ап¤®ў>), Ј¤Ґ <’ЁЇ> - ®¤ Ё§ ЎгЄў C,N,F,D,L,M (ЎҐ§ Є ўлзҐЄ),
®в¤Ґ«пҐ¬ п ®в Ё¬ҐЁ Їа®ЎҐ«®¬. <ђ §¬Ґа Ї®«п> Ґ г¦Ґ ў ®ЇЁб ЁЁ Ї®«Ґ©
вЁЇ D,L,M, Ї®б«Ґ¤Ё© н«Ґ¬Ґв § ¤ ов «Ёим ¤«п зЁбҐ«.
ЏаЁ¬Ґа 17.11. ‘®§¤ Ґ¬ Ѓ„ Student (б¬. Ї. 17.3):
CREATE DBF Student(TabN C(4), Famil C(30), Kurs C(1), Fak C(2), SrB N(3,1),
Bolt N(3,0) ). ЋжҐЁвҐ б ¬Ё г¤®Ўбвў® ¤ ®© Є®¬ ¤л.
‚ аЁ в Є®¬ ¤л CREATE DBF <€¬п Ѓ„> FROM ARRAY<€¬п ¬ ббЁў >
ЁбЇ®«м§гҐв ¬ ббЁў ў Є зҐбвўҐ ®ЇЁб Ёп бвагЄвгал (б¬. Afields() ў Ї. 3.1).
ЏаЁ¬Ґа 17.12. „®Ў ўЁ¬ ў Ѓ„ Student Ї®«Ґ Proc - Їа®жҐв ўлЇ®«ҐЁп
Ја дЁЄ (®Є®з ЁҐ Їа®Ја ¬¬л б¤Ґ« ©вҐ Ї® ®Ўа §жг ЇаЁ¬Ґа 17.6):
USE Student
N = AFields(Stru)+1 && N - зЁб«® Ї®«Ґ© Ѓ„, гўҐ«ЁзҐ®Ґ 1
DECLARE Stru[N,4] && Њ ббЁў ®ЇЁб ў®ўм б гўҐ«ЁзҐЁҐ¬ зЁб« бва®Є
Stru[4,1] = "Proc"
Stru[4,2] = "N"
Stru[4,3] = 2
Stru[4,4] = 0 && ‡ Є®зҐ® ®ЇЁб ЁҐ ®ў®Ј® Ї®«п Proc
CREATE DBF _Temp FROM ARRAY Stru && ЋвЄалў Ґвбп Їгбв п Ѓ„ _Temp
APPEND FROM Student && Ѓ„ _Temp Ї®«пҐвбп ¤ л¬Ё Ѓ„ Student
* “¤ «ЁвҐ Ѓ„ Student Ё ЇҐаҐЁ¬Ґг©вҐ _Temp ў Student, Є Є ў ЇаЁ¬ҐаҐ 17.6.

ѓ®а §¤® "н«ҐЈ вҐҐ" ўлЇ®«пҐв вҐ ¦Ґ ¤Ґ©бвўЁп б«Ґ¤гой п Є®¬ ¤ SELECT:
SELECT *, 00 AS Proc FROM Student INTO DBF _Temp .
”®а¬ в ®ў®© Є®«®ЄЁ (®ў®Ј® Ї®«п Ѓ„) Ё вЁЇ ¬л Ї®Є § «Ё Є®бв в®© 00,
Є®в®а п § ®бЁвбп ў ®ў®Ґ Ї®«Ґ Proc ўбҐе § ЇЁбҐ© Ѓ„ _Temp.
‡ ЇЁб ў +00.000, ¬л "§ Ї б«Ё" Ўл ¬Ґбв® ¤«п § Є Ё 3 а §ап¤®ў ¤а®ЎЁ.
ЏаЁ ¤®Ў ў«ҐЁЁ бЁ¬ў®«м®Ј® Ї®«п г¦® § ЇЁб вм ў SELECT Є®«®Єг
Space(N), Ј¤Ґ N - а §¬Ґа Ї®«п, ¤«п Ї®«п-¤ вл - Їгбвго ¤ вг { / / }.
ЏаЁ¬Ґа 17.13. Ќ ®б®ўҐ бвагЄвгал Ѓ„ Kadr б®§¤ ¤Ё¬ Їгбвго Ѓ„
NewKadr,¤®Ў ўЁў Ї®«п ¤ в InDate, OutDate Ё бЁ¬ў®«м®Ґ Ї®«Ґ CvetGlaz
а §¬Ґа®¬ 15:
SELECT *, {//} AS InDate, {//} AS OutDate, Space(15) AS CvetGlaz;
FROM Kadr WHERE .F. && ‡ зҐЁҐ .F. § ЇаҐй Ґв ўлЎЁа вм § ЇЁбЁ
ЏаЁ¬Ґа 17.14. ‘®§¤ ¤Ё¬ Їгбвго Ѓ„ ®б®ўҐ бвагЄвга Ў § BD1,BD2:
SELECT * FROM BD1,BD2 WHERE .F. && ЌҐ ў®§Ўа пҐвбп ¤®Ў ў«пвм Ї®«п
ЏаЁ¬Ґз ЁҐ. …б«Ё ў Ёбе®¤ле Ѓ„ Ё¬Ґовбп Ї®«п б ®¤Ё Є®ўл¬Ё
§ў Ёп¬Ё <€¬п>, ў ®ў®© Ѓ„ ў®§ЁЄгв Ї®«п б Ё¬Ґ ¬Ё <€¬п>_A, <€¬п>_B.
„®ЎЁвмбп ўЄ«озҐЁп ®¤®Ј® Ё§ Ёе ¬®¦® «Ёим пў®© § ЇЁбмо бЇЁбЄ
Є®«®®Є. Ђ«мвҐа вЁў : ¬бЄ«озЁвм ў Ѓ„ «ЁиЁҐ Ї®«п Ё гЎа вм «ЁиҐҐ
®Є®з ЁҐ Ё¬ҐЁ Ї®§¤ҐҐ зҐаҐ§ ЁвҐадҐ©б.
…б«Ё Ґ®Ўе®¤Ё¬® гбҐзҐЁҐ бвагЄвгал Ѓ„, ў SELECT ЇҐаҐзЁб«повбп
®бв ойЁҐбп Ї®«п (Ё ¤®Ў ў«повбп Є®«®ЄЁ, Ґб«Ё г¦л ®ўлҐ Ї®«п). ќв®в
ў аЁ в Їа®йҐ Їа®Ја ¬¬л, ЁбЇ®«м§гойҐ© CREATE DBF. ‘«Ґ¤®ў вҐ«м®,
ўв®а п ҐҐ а §®ўЁ¤®бвм Їа ЄвЁзҐбЄ®© жҐ®бвЁ Ґ Ё¬ҐҐв.
„®Ї®«ҐЁҐ Ѓ„ ®ў®© (ҐЇгбв®©) § ЇЁбмо ўлЇ®«пҐв Є®¬ ¤
INSERT INTO <€¬п Ѓ„>(<‘ЇЁб®Є Ї®«Ґ©>) VALUES(<‘ЇЁб®Є ўла ¦ҐЁ© -
§ зҐЁ© Ї®«Ґ©>) . ЌҐгЄ § лҐ Ї®«п Ґ § Ї®«повбп § зҐЁп¬Ё.
‚ аЁ в Є®¬ ¤л INSERT INTO <€¬п Ѓ„> FROM <€бв®зЁЄ>,
Ј¤Ґ <€бв®зЁЄ> - нв® ARRAY<€¬п ¬ ббЁў > Ё«Ё MEMVAR (б¬. Ї. 15.5),
§ Ї®«пҐв ®ўго § ЇЁбм § зҐЁп¬Ё, ў§пвл¬Ё Ё§ ¬ ббЁў Ё«Ё (MEMVAR) Ё§
ЇҐаҐ¬Ґле, ®¤®Ё¬Ґле б Ї®«п¬Ё Ѓ„. …б«Ё ¤«п Є Є®Ј®-«ЁЎ® Ї®«п в Є®©
ЇҐаҐ¬Ґ®© Ґв, ®® Ґ § Ї®«пҐвбп.
„®Ї®«пҐ¬ п Ѓ„ ®вЄалў Ґвбп, Ґб«Ё а ҐҐ Ґ Ўл« ®вЄалв , Ё ®бв Ґвбп
ЄвЁў®© Ї®б«Ґ ўлЇ®«ҐЁп Є®¬ ¤л INSERT INTO.
‡ ¤ ЁҐ 17.5. ‘ Ї®¬®ймо SELECT б®§¤ ©вҐ Ѓ„, ў бвагЄвгаг Є®в®а®©
ЇҐаў® з «м® ў®©¤гв ўбҐ Ї®«п гЄ § ле ў ¬Ё ¤ўге Ѓ„, ЁбЄ«озҐЁҐ
Ї®«Ґ©, ®ЇаҐ¤Ґ«Ґле ў ¬Ё Є Є "Ґг¦лҐ", ўлЇ®«ЁвҐ зҐаҐ§ бЁбвҐ¬®Ґ
¬Ґо (н«Ґ¬Ґв Delete ў ®ЄҐ Modify structure, ўлЇ®«пҐ¬л© ¦ вЁҐ¬
Ctrl+D ў ¬®¬Ґв, Є®Ј¤ ¬ аЄҐа ўҐ¤Ґ ЁбЄ«оз Ґ¬®Ґ Ї®«Ґ).
„®Ї®«ЁвҐ Ѓ„ ®ўл¬Ё § ЇЁбп¬Ё б Ї®¬®ймо INSERT INTO.

‡ЂЉ‹ћ—…Ќ€… Љ ѓ‹Ђ‚… 17

€бЇ®«м§гп Є®¬ ¤г SELECT ¤«п ўлЎ®аЄЁ Ё ®Ўа Ў®вЄЁ ¤ ле, ўл
б®Єа вЁвҐ бў®Ё Їа®Ја ¬¬л, гбЄ®аЁвҐ Ёе а Ў®вг Ё, зв® Ґ¬ «®ў ¦®,
Ўг¤ҐвҐ ¤Ґ« вм ¬ҐмиҐ вҐеЁзҐбЄЁе ®иЁЎ®Є. ‚ FOXPRO ¤«п д®а¬Ёа®ў Ёп
§ Їа®б®ў ў ЁвҐа ЄвЁў®¬ аҐ¦Ё¬Ґ ЇаҐ¤гб¬®ваҐ® бЇҐжЁ «м®Ґ баҐ¤бвў®
RQBE, ўл§лў Ґ¬®Ґ б Ї®¬®ймо ЇгЄв Create Ї®¤¬Ґо File.

Соседние файлы в папке материалы по FoxPro

#
28.06.201449.01 Кб25BB.TXT
#
28.06.201413.81 Кб26CC.TXT
#
28.06.201477.38 Кб25GL1.PAS
#
28.06.201447.16 Кб25GL15.PAS
#
28.06.201433.75 Кб25GL16.PAS
#
28.06.201426.94 Кб25GL17.PAS
#
28.06.201433.93 Кб25GL18.PAS
#
28.06.201432.66 Кб25GL19.PAS
#
28.06.201437.33 Кб25GL2.PAS
#
28.06.201450.06 Кб25GL20.PAS
#
28.06.201454.81 Кб25GL21.PAS