kandidaadid; DECLARE min_aasta CONSTANT NUMBER := 83; max_aasta CONSTANT NUMBER := 85; tudengid_arv NUMBER; synniaasta NUMBER; kvart_1 NUMBER; kvart_2 NUMBER; kvart_3 NUMBER; kvart_4 NUMBER; BEGIN FOR synniaasta IN min_aasta .. max_aasta LOOP SELECT count(*) INTO tudengid_arv FROM lepikult.kandidaadid WHERE substr(isikukood,2,2)=synniaasta; FOR kuu IN 1..12 LOOP SELECT count(*) INTO kvart_1 FROM lepikult.kandidaadid WHERE ltrim(substr(isikukood,4,2),0) <=3 AND substr(isikukood,2,2) = synniaasta; SELECT count(*) INTO kvart_2 FROM lepikult.kandidaadid WHERE ltrim(substr(isikukood,4,2),0) <=6 AND ltrim(substr(isikukood,4,2),0) > 3 AND substr(isikukood,2,2) = synniaasta; SELECT count(*) INTO kvart_3 FROM lepikult.kandidaadid WHERE ltrim(substr(isikukood,4,2),0) <=9 AND ltrim(substr(isikukood,4,2),0) > 6 AND
massiivid ParamArray nimelised nimi:=väärtus Funktsioonid Teisendusfunktsioonid CBool, CByte CDate (CVDate) CInt, CLng, CSng, CDbl CStr, Format CVar, CDec Asc, Chr Hex, Oct Tüübifunktsioonid VarType IsNumeric, IsDate, IsEmpty, IsNull IsArray, IsObject IsError, IsMissing Ajafunktsioonid Now, Date, Time Day, Year, Month, Hour, Minute, Second Weekday DateAdd, DateDiff DateSerial, DateValue Stringifunktsioonid Len Mid, Left, Right Trim, LTrim, RTrim LCase, UCase Matemaatikafunktsioonid Abs, Sqr, Int, Fix, Exp, Log Rnd trigonomeetria Finantsfunktsioonid FV, Pmt, Rate SLN, SYD, DDB Massiiv Array LBound, UBound Failifunktsioonid EOF,LOF, FileLen, FileDateTime CurDir Input, Seek Värvid RGB, QBColor Dialoog InputBox, MsgBox Keelestruktuurid Valikud * If tingimus Then tegevus * If tingimus Then tegevus(ed) End If * If tingimus1 Then tegevus(ed)1
tühikud ja tabulaatorid. Sellise teksti kuvamisel eemaldatakse kõik automaatselt ja ei olegi nagu probleemi. Probleem tekib, kui see kirjutada näiteks andmebaasi. Aga, et tulemus oleks hetkel kenasti silmaga näha, siis lisan kõik
...siltide vahele. ? 1 $tekst = ' A woman should soften but not weaken a man '; echo "
$tekst"; 2 echo "
".trim($tekst).""; 3 echo "
".ltrim($tekst).""; 4 echo "
".rtrim($tekst).""; 5 Niisiis kasutasime trim() funktsiooni, mis eemaldas ülearuse tühja nii paremalt kui vasakult. Teised kaks, ltrim() ja rtrim() eemaldab vasavalt vasakult ja paremalt. Kõik kolm kärpimise funktsiooni lubavad lisada ka sümbolid, mida soovid eemaldada. Funktsioon on tõstutundlik, sümbolid eraldatakse komaga ning tähestiku vahemikk tuleb tähistada kahe punktiga (..). Eemaldame teksti otstest märgid A ja a ning k kuni n. ?
CHR$ teisendab arvu märgiks HEX$ tagastab arvu kuueteistkümnendkuju INSTR tagastab stringi positsiooni teises stringis LCASE$ teisendab väikesteks tähtedeks LEFT$ tagastab esimese märgi stringist LEN tagastab stringi pikkuse LSET vahetab andmeid failipuhvriga LTRIM$ eemaldab tühikud stringi eest MID$ loeb stringist alamstringi OCT$ tagastab arvu kaheksandkuju RIGHT$ tagastab viimase märgi stringist RSET vahetab andmeid failipuhvriga RTRIM$ eemaldab tühikud stringi lõpust SPACE$ tagastab stringi etteantud hulga tühikutega STR$ teisendab arvu stringiks
CHR$ teisendab arvu märgiks HEX$ tagastab arvu kuueteistkümnendkuju INSTR tagastab stringi positsiooni teises stringis LCASE$ teisendab väikesteks tähtedeks 100 / 115 LEFT$ tagastab esimese märgi stringist LEN tagastab stringi pikkuse LSET vahetab andmeid failipuhvriga LTRIM$ eemaldab tühikud stringi eest MID$ loeb stringist alamstringi OCT$ tagastab arvu kaheksandkuju RIGHT$ tagastab viimase märgi stringist RSET vahetab andmeid failipuhvriga RTRIM$ eemaldab tühikud stringi lõpust SPACE$ tagastab stringi etteantud hulga tühikutega STR$ teisendab arvu stringiks