Внешнее представление базы
Дата последнего изменения: 20.12.2011 15:23:55
Комментарий:
Цели:
X
Правило: выборобласти
Коментарий:
Условия:
Действия:
Область=ВЫБОР("Выберите область работы",["ITсфера","Экономика","Транспорная сфера","Медицина","Образование"])
ВЫВОД("Область:",Область)
Правило: ОбластьIT
Коментарий:
Условия:
Область="ITсфера"
Действия:
ОбластьIT=ВЫБОР("Кем бы вы хотели работать в ITсфере",["Сетевик","Оператор БД","WEB дизайнер"])
xx="IT"
b=ОбластьIT
ВЫВОД("Должность:",ОбластьIT)
Правило: График работы
Коментарий:
Условия:
Действия:
График=ВЫБОР("Выберите удобный вам график работы",["Гибкий","Свободный","Полный"])
ВЫВОД("График работы:",График)
Правило: Областьэконом
Коментарий:
Условия:
Область="Экономика"
Действия:
ОбластьЭкономика=ВЫБОР("Кем бы вы хотели работать в сфере Экономики",["Бухгалтер","Кассир","Менеджер","Продавец"])
xx="Eko"
b=ОбластьЭкономика
ВЫВОД("Должность:",ОбластьЭкономика)
Правило: ОбластьТранспорт
Коментарий:
Условия:
Область="Транспорная сфера"
Действия:
ОбластьТранспорт=ВЫБОР("Кем бы вы хотели работать в сфере Транспорта",["Грузоперевозчик","Таксист","Летчик"])
xx="Transp"
b=ОбластьТранспорт
ВЫВОД("Должность:",ОбластьТранспорт)
Правило: ОбластьМедицина
Коментарий:
Условия:
Область="Медицина"
Действия:
ОбластьМедицина=ВЫБОР("Кем бы вы хотели работать в области Медицины",["Лор","Фармацевт","Хирург","Ветеринар","Ортопед"])
xx="Med"
b=ОбластьМедицина
ВЫВОД("Должность:",ОбластьМедицина)
Правило: ОбластьОбразования
Коментарий:
Условия:
Область="Образование"
Действия:
ОбластьОбразования=ВЫБОР("Кем бы вы хотели работать в сфере образования",["Учитель начальных классов","Директор школы","Завуч","Лаборант"])
xx="Edu"
b=ОбластьОбразования
ВЫВОД("Должность:",ОбластьОбразования)
Правило: Гибкий
Коментарий:
Условия:
График="Гибкий"
Действия:
c="Гибкий"
Правило: Свободный
Коментарий:
Условия:
График="Свободный"
Действия:
c="Свободный"
Правило: Полный
Коментарий:
Условия:
График="Полный"
Действия:
c="Полный"
Правило: Наличие Личного Автомобиля
Коментарий:
Условия:
Действия:
НаличАвто=ВЫБОР("Есть ли у вас личный автомобиль",["Да","Нет"])
ВЫВОД("Наличие личного втомобиля:",НаличАвто)
Правило: естьАвто
Коментарий:
Условия:
НаличАвто="Да"
Действия:
d="Да"
Правило: НетАвто
Коментарий:
Условия:
НаличАвто="Нет"
Действия:
d="Нет"
Правило: БД1
Коментарий:
Условия:
xx="IT"
Действия:
F1=ЧТЕНИЕ("IT.csv")
T1=ЗАГРТАБ(F1)
F="Поискработы"
Правило: БД2
Коментарий:
Условия:
xx="Eko"
Действия:
F1=ЧТЕНИЕ("Eko.csv")
T1=ЗАГРТАБ(F1)
F="Поискработы"
Правило: БД3
Коментарий:
Условия:
xx="Transp"
Действия:
F1=ЧТЕНИЕ("Transp.csv")
T1=ЗАГРТАБ(F1)
F="Поискработы"
Правило: БД4
Коментарий:
Условия:
xx="Med"
Действия:
F1=ЧТЕНИЕ("Med.csv")
T1=ЗАГРТАБ(F1)
F="Поискработы"
Правило: БД5
Коментарий:
Условия:
xx="Edu"
Действия:
F1=ЧТЕНИЕ("Edu.csv")
T1=ЗАГРТАБ(F1)
F="Поискработы"
Правило: ПоискРаботы
Коментарий:
Условия:
F="Поискработы"
Действия:
i=0
j=0
kol=0
i=i+3
j=j+2
ПОКА(j<5)
M1=ЭЛЕМТАБ(T1,i,j)
ПОКА(i<6)
i=i+1
M2=ЭЛЕМТАБ(T1,i,j)
if(M2=b)
i=i+1
M3=ЭЛЕМТАБ(T1,i,j)
if(M3=c)
i=i+1
M4=ЭЛЕМТАБ(T1,i,j)
if(M4=d)
ii=i-4
jj=j
Firma1da=ЭЛЕМТАБ(T1,ii,jj)
ВЫВОД("Вы подходите : ",Firma1da)
ВЫВОД("Зарплата:",ЭЛЕМТАБ(T1,7,j))
ВЫВОД("ЧасыРаботы:",ЭЛЕМТАБ(T1,8,j))
ВЫВОД("Адрес:",ЭЛЕМТАБ(T1,9,j))
ВЫВОД("Телефон:",ЭЛЕМТАБ(T1,10,j))
kol=kol+1
endif
if(M2<>b)
h=1
endif
endif
if(M3=c)
h=1
endif
if(M4=d)
h=1
endif
endif
ВЫХОД
i=3
j=j+1
ВЫХОД
Правило: Цель2
Коментарий:
Условия:
kol<1
Действия:
X=kol
ВЫВОД("Нет доступных работ по данному запросу")
Правило: Цель1
Коментарий:
Условия:
kol>=1
Действия:
X=kol
ВЫВОД("Количество фирм которым вы подошли:",X)
-- Objects --
-- Модули --