@ 11,0 say 'Dlitelnost' get m size 1,5
@ 12,0 say 'Fio client' get x2 size 1,15
@ 13,0 say 'Date record' get n size 1,8
@ 14,0 get k picture "@ * HN write" size 1,6; 1; _ruc15ai () NOT WVISIBLE ("_ryc15ai8g") WINDOW _ryc15ai8gCYCLEWINDOW _ryc15ai8gUSED ("kursbd") kursbd ( m.currarea)
# REGION 0m.talkstat = "ON" TALK ONm.compstat = "ON" COMPATIBLE ON_ryc15aias && k VALID
# REGION 1casek = 1-1bof () topk = 2eof () bottomk = 3 readgets_ryc15aibi && r VALID
# REGION 1caser = 1topr = 2bottomr = 3delete ()
else
endif
@ 0,3 say iif (delete (), 'Видалено', '') gets_ruc15ai && k validwind krok from 5,3 to 30, 70 title 'Videoprokat'; system grow float color w +/rbwind krok = 1for (duration = m). or. (date_rec = n). or. (film_name = x1). or. (fio_client = x2). or. (genre = x3)
@ 1,2 say 'name of film' color r/gb
@ 1 + i, 2 say str (i, 2) + '.' + padl (film_name, 20)
@ 1,30 say 'Genre' color r/gb
@ 1 + i, 30 say padl (genre, 15)
@ 1,46 say 'Dlitelnost' color r/gb
@ 1 + i, 46 say padl (duration, 4) = i +1 cyclwind krokEXIT_allwindows
Return
Додаток 2
Сортування:
В
Пошук:
В
Перегляд:
В
Даталогіческая модель є моделлю логічного рівня і являє собою відображення логічних зв'язків між елементами даних без розгляду їх змісту та середовища зберігання.
R1 (КОМАНДИ, назва, тренер, стадіон, рік заснування, кількість титулів, місткість стадіону)
R2 (НОМЕР, матчі, дата, результат, оцінка гри, відвідуваність)
Інфологіческая модель
У загальному вигляді инфологическая модель в моїй роботі буде виглядати наступним чином:
В
В В