| Шартты және циклді мәліметтерді өңдеу
Есептеу процестерін басқару үшін және циклді мәліметтерде өңдеу үшін келесі қосалқы операторлар қолданылады:
IF…ENDIF,SCAN…ENDSCAN,DOWHILE…ENDDO…DOCASE…ENDCASE,FOR…ENDFOR.
Тармақталу командасы
If <условия>
<Егер шарт дұрыс болсаб онда команда орындалады>
Else
Егер шарт дұрыс емес болса, онда келесі команда орындалады
Мысалы:
If Not ENPTY(dbf())
PUBLIС rec
rec=recount()
else
wait ‘ағымдық кесте жоқ ‘
экранды ағымдық кестелердің атауын, жазбалар санын, жолын немесе жұмыс обласын шығару
Do case…endcase командасы тармақталу командасынан өзгешелігі, бұл командада шарттар тізбектеліп орындалады.
Function monthof year
Do case
Case month(date())=1
monthof year=’январь’
Case month(date())=2
monthof year=’февраль’
Case month(date())=11
monthof year=’ноябрь’
otherwise
monthof year=’декабрь’
endcase
return month of year
Айдың нөмері мен атауын шығарады
Do while…enddo
Циклдің орындалуын ұйымдастыру үшін қолданылады.
Index on name to tname
Seek ‘Ho’
If Found()
Do while name =’Ho’
? condit
Skip
Enddo
?’Heт’
Endif
use
Достарыңызбен бөлісу: |
