DO CASE … ENDCASE командасы
Тармақталу командасынан өзгешілігі,бұл команда тізбектеліп бірнеше шарттарды орындайды.Егер шарт орындалып тұрса,онда келесі команда орындалады да,қалған CASE шарттары тексерілмейді және ENDCASE – деп кейінгі команда орындалады.
DO CASE
CASE<условия 1>
<1 шарт бойынша орындалатын команда>
CASE <условия 2>
<2 -,------->
……….................
OTHER WISE
<егер ешбір шарт орындалмаса,онда орындалатын команда>
END CASE
Мысалы.
FANCTION month of Year
DO CASE
CASE MONTH (Date())=1
Month of Year = ‘январь’
CASE MONTH (Date())=2
Month of Year = ‘февраль’
…………………………...
CASE MONTH (Date())=11
Month of Year = ‘ноябрь’
OTHER WISE
Month of Year = ‘декабрь’
END CASE
RETVRN month of Year
Мұндағы MONTH() функция ай номерін және атауын шығарады.
DO WHITE… END DO командасы
Циклдің орындалуын ұйымдастыру үшін қолданылады.
DO WHITE <циклдің жалғасу шарты>
<шарт шын болғанда команда орындалады>
END DO
Егер шарт жалған болса, онда END DO-ден кейінгі амалдар орындалады.
Мысалы:
USE Stud
INDEX ON Name TO IName
Seek ‘Hо’
IF FAUND()
DO WHILE name = ‘Ho’
? condit - condit өрісін табылған жазбалардан табу.
SKIP
END DO
? “Больше данных имен нет!”
END IF
USE
Name өрісі бойынша индекстелген Stud кестесінде ос өріс бойынша “Hо” басталып жазбаларды табу.
2>1>
Достарыңызбен бөлісу: |