1 Тақырып. Деректер қорына кіріспе. №1-дәріс. Тақырыбы



бет104/129
Дата16.03.2022
өлшемі21,39 Mb.
#28241
1   ...   100   101   102   103   104   105   106   107   ...   129
FOR … ENDFOR командасы

Бірнеше циклдер ұйымдастыруға осы команда қолданылады.

FOR <переменная>=<начальное значение> то <конечные значение>[step <шаг>] <команды>

ENDFOR немесе NEXT

Алдымен Step мәніне байланысты өту,(үнсіздік келісім бойынша шаг=1), кейін айнымалының мәніy тексеру.

Мысал. 6 файлды көшіру керек және атаулары массив элементтері ретінде анықталсын

* дискке көшірілетін массив файлдары беріледі.

CDir = a:

DIMENSION cfile (6)

cfile (1) = “addhelp_ru.prg”

cfile (2) = “addhelp_ru.fxp”

cfile (3) = “poscursor.prg”

cfile (4) = “poscursor.fxp”

cfile (5) = “heelfrom.scx”

cfile (6) = “heelfrom.sct”

FOR I=1 TO 6

COPY FILE (cfile(I)) TO (CDir)

ENDFOR

SCAN… ENDSCAN кестені сканирлеу командасы

Бұл команда кесте бойынша басынан соңына дейін немесе көрсетілген шекарада жылуға арналған.Кестенің әрбір жазбасына көрсетілген шарттар сәйкес болса,онда команда орындалады.Әрбір ENDSCAN команда орындалған сайын жазба көрсеткіші бір жазбаға алға жылжиды.

Жазылу синтаксисі:

SCAN [граница] [FOR-условие] [WRITE -условие] [LOOP] [EXIT]



<командалар>

ENDSCAN


Мысал: Контрактпен оқитын студенттердің оқу төлемінің қарызын әрбір жарты жылда есептеу керек болсын,( егер SUM>0), яғни debt өрісінің мәнін үлкейту (теріс мәндерге)

USE Stud


SCAN FOR SUM>0

REPLACE debt WITH debt – (Sum [2])

ENDSCAN

USE


Аяқталған циклдан шығу үшін EXIT командасы қолданылады және ол басқаруды ENDSCAN кейінгі командаларға береді.



Достарыңызбен бөлісу:
1   ...   100   101   102   103   104   105   106   107   ...   129




©emirsaba.org 2024
әкімшілігінің қараңыз

    Басты бет