Библиографический список

Библиографический список. Теоретическое учебное пособие РГТК Тантал по дисциплине Создание и ведение информационного обеспечения . 2. Теоретическое учебное пособие РГТК Тантал по дисциплине Технология разработки программного обеспечения . 3. Попов А. А. Программирование в среде СУБД FoxPro 2.0 М. изд. Радио и связь, 1993 г. 4. Сибаров Ю. Б. Охрана труда в вычислительных центрах и др М. Машиностроение, 1990 г. 5. Самгин Э. Б. Освещение рабочих мест, изд. МИРЭА, 1989 г. 6. ПРИЛОЖЕНИЕ Распечатка командных файлов START.PRG CLEAR CLEAR MACROS SET COLOR TO N SET HELP OFF SET CLOCK OFF SET RESOURCE OFF SET TALK OFF SET DOHISTORY OFF SET STATUS OFF SET BRSTATUS OFF SET ESCAPE OFF SET BELL OFF SET SCOREBOARD OFF SET CONFIRM ON SET DATE GERMAN SET CENTURY ON SET DELETED ON SET EXACT ON SET HOURS TO 24 SET STICKY ON SET CURSOR ON SET SAFETY OFF RELEASE MENU RELEASE POPUP RELEASE WINDOW SET MESSAGE TO SROWS -1 CENTER USE stuff.dbf IN a INDEX stuff.idx USE passport.dbf IN b USE educat.dbf IN c INDEX educat.idx USE language.dbf IN d INDEX language.idx USE convict.dbf IN e INDEX convict.idx USE family.dbf IN f INDEX family.idx USE workcard.dbf IN g INDEX workcard.idx USE moving.dbf IN h INDEX moving.idx USE qualific.dbf IN i INDEX qualific.idx USE bus trip.dbf IN j INDEX bus trip.idx USE holiday.dbf IN 11 INDEX holiday.idx SELECT a SET COLOR TO W B 0, 0, 24, 79 BOX REPLICATE CHR 176 ,9 DO WHILE .T. DEFINE MENU MAINMENU COLOR SCHEME 3 DEFINE PAD data OF MAINMENU PROMPT ? A ? AT 0,0 DEFINE PAD service OF MAINMENU PROMPT C AT 0,24 DEFINE PAD list OF MAINMENU PROMPT P AT 0,34 DEFINE PAD exit OF MAINMENU PROMPT X AT 0,45 ON SELECTION PAD data OF MAINMENU ACTIVATE POPUP dat ON SELECTION PAD service OF MAINMENU ACTIVATE POPUP serv ON SELECTION PAD list OF MAINMENU ACTIVATE POPUP lst ON SELECTION PAD exit OF MAINMENU DO end.prg DEFINE POPUP dat FROM 1,0 SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF dat PROMPT COLOR SCHEME 3 DEFINE BAR 2 OF dat PROMPT - DEFINE BAR 3 OF dat PROMPT COLOR SCHEME 3 DEFINE BAR 4 OF dat PROMPT - DEFINE BAR 5 OF dat PROMPT COLOR SCHEME 3 DEFINE BAR 6 OF dat PROMPT - DEFINE BAR 7 OF dat PROMPT COLOR SCHEME 3 ON SELECTION BAR 1 OF dat DO read.prg ON SELECTION BAR 3 OF dat DO write.prg ON SELECTION BAR 5 OF dat DO new.prg ON SELECTION BAR 7 OF dat DO del rec.prg DEFINE POPUP serv FROM 1,24 SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF serv PROMPT COLOR SCHEME 3 DEFINE BAR 2 OF serv PROMPT - DEFINE BAR 3 OF serv PROMPT COLOR SCHEME 3 ON SELECTION BAR 1 OF serv DO index.prg ON SELECTION BAR 3 OF serv DO initial.prg DEFINE POPUP lst FROM 1,34 SHADOW COLOR SCHEME 4 DEFINE BAR 1 OF lst PROMPT ? COLOR SCHEME 3 ON SELECTION BAR 1 OF lst DO referen.prg SHOW MENU MAINMENU ACTIVATE MENU MAINMENU ENDDO RETURN READ.PRG SELECT a edit .f. type 1 DO r w.prg WITH edit, type RETURN WRITE.PRG SELECT a edit .t. type 2 DO r w.prg WITH edit, type RETURN NEW.PRG SELECT a edit .t. type 3 APPEND BLANK DO r w.prg WITH edit, type RETURN DEL REC. PRG SELECT a DEFINE WINDOW win3 FROM 2, 11 TO 23, 69 NOGROW NOFLOAT NOZOOM SHADOW CLOSE TITLE CTRL T ? ESCAPE COLOR SCHEME 10 ACTIVATE WINDOW win3 ON KEY LABEL ctrl t DO dl undl.prg WITH org num SET DELETED OFF BROWSE NOAPPEND NOMODIFY LOCK 0 FIELDS org num H N , surname H , name H ,patron H ON KEY LABEL ctrl t RELEASE WINDOW win3 WAIT NOWAIT WINDOW PACK SELECT b PACK SELECT c PACK SELECT d PACK SELECT e PACK SELECT f PACK SELECT g PACK SELECT h PACK SELECT i PACK SELECT j PACK SELECT 11 PACK WAIT CLEAR SET DELETED ON RETURN DL UNDL.PRG PARAMETER org num org num1 org num IF DELETED .t. RECALL SELECT b RECALL FOR org num org num1 SELECT c RECALL FOR org num org num1 SELECT d RECALL FOR org num org num1 SELECT e RECALL FOR org num org num1 SELECT f RECALL FOR org num org num1 SELECT g RECALL FOR org num org num1 SELECT h RECALL FOR org num org num1 SELECT i RECALL FOR org num org num1 SELECT j RECALL FOR org num org num1 SELECT 11 RECALL FOR org num org num1 ELSE DELETE SELECT b DELETE FOR org num org num1 SELECT c DELETE FOR org num org num1 SELECT d DELETE FOR org num org num1 SELECT e DELETE FOR org num org num1 SELECT f DELETE FOR org num org num1 SELECT g DELETE FOR org num org num1 SELECT h DELETE FOR org num org num1 SELECT i DELETE FOR org num org num1 SELECT j DELETE FOR org num org num1 SELECT 11 DELETE FOR org num org num1 ENDIF SELECT a RETURN R W.PRG PARAMETER edit, type, up, down, next, previos, find, prin t, exit, eduadd, forlang, conv, structfam, pass, bok, purpos, qualcateg, tripsbus, holid list 1 exit 5 SET COLOR TO N W SELECT A IF RECCOUNT 0 APPEND BLANK ENDIF DEFINE WINDOW win0 FROM 0, 0 TO 2, 79 NOGROW NOFLOAT NOZOOM COLOR W N DEFINE WINDOW win1 FROM 3, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR GR B DO WHILE exit 1 ACTIVATE WINDOW win0 CLEAR 0,8 SAY ALLTRIM surname ALLTRIM name ALLTRIM patron IF type 1 0,63 SAY ENDIF IF type 2 0,57 SAY ENDIF IF type 3 0,61 SAY ENDIF IF list 1 0,0 SAY 1 DO wiev1.prg WITH edit ENDIF IF list 2 0,0 SAY 2 DO wiev2.prg WITH edit ENDIF IF list 3 0,0 SAY 3 DO wiev3.prg WITH edit ENDIF IF list 4 0,0 SAY 4 DO wiev4.prg WITH edit ENDIF IF list 5 0,0 SAY 5 DO wiev5.prg WITH edit ENDIF IF previos 1 SKIP -1 IF BOF .t. GO BOTTOM ENDIF ENDIF IF next 1 SKIP 1 IF EOF .t. GO TOP ENDIF ENDIF IF down 1 IF list 1 list list-1 ELSE list 5 ENDIF ENDIF IF up 1 IF list 5 list list 1 ELSE list 1 ENDIF ENDIF IF find 1 DO search.prg ENDIF org num1 org num IF eduadd 1 DO educat.prg WITH org num1,edit ENDIF IF forlang 1 DO language.prg WITH org num1,edit ENDIF IF conv 1 DO convict.prg WITH org num1,edit ENDIF IF structfam 1 DO family.prg WITH org num1,edit ENDIF IF pass 1 DO passport.prg WITH org num1,edit ENDIF IF bok 1 DO workcard.prg WITH org num1,edit ENDIF IF purpos 1 DO move.prg WITH org num1,edit ENDIF IF qualcateg 1 DO qualif.prg WITH org num1,edit ENDIF IF tripsbus 1 DO bus trip.prg WITH org num1,edit ENDIF IF holid 1 DO holiday.prg WITH org num1,edit ENDIF IF print 1 DO print.prg ENDIF ENDDO RELEASE WINDOW win1 RELEASE WINDOW win0 RETURN WIEV1.PRG PARAMETER edit ACTIVATE WINDOW win1 CLEAR eduadd 5 forlang 5 conv 5 structfam 5 pass 5 bok 5 purpos 5 qualcateg 5 tripsbus 5 holid 5 org n org num 1,1 SAY 2,1 SAY 3,1 SAY 4,1 SAY 5,1 SAY 6,1 SAY 7,1 SAY 8,1 SAY 9,1 SAY 10,1 SAY 11,1 SAY 12,1 SAY 13,1 SAY 14,1 SAY 15,1 SAY 18,4 SAY 18,29 SAY 16,0,16,77 BOX 17,26,19,26 BOX 17,52,19,52 BOX STORE 6 TO org num, ins num, surname, name, up, down, next, previos, find, print, exit 1,30 GET org num VALID UN .t. ERROR SIZE 1,6 WHEN edit .t. COLOR SCHEME 2 2,30 GET ins num PICTURE NNN-NNN-NNN SIZE 1,11 WHEN edit .t. COLOR SCHEME 2 3,30 GET surname SIZE 1,15 WHEN edit .t. COLOR SCHEME 2 4,30 GET name SIZE 1,15 WHEN edit .t. COLOR SCHEME 2 5,30 GET patron SIZE 1,15 WHEN edit .t. COLOR SCHEME 2 6,30 GET sex VALID sex ? OR sex ? OR sex ? OR sex ? ERROR SIZE 1,1 WHEN edit .t. COLOR SCHEME 2 7,30 GET birth date SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 8,30 GET birthplace SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 9,30 GET national SIZE 1,15 WHEN edit .t. COLOR SCHEME 2 10,30 GET SOCIAL SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 11,30 GET citizen SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 12,30 GET educat SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 13,30 GET NAME EDU SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 14,30 GET form train SIZE 1,20 WHEN edit .t. COLOR SCHEME 2 15,30 GET year end SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 17,14 GET up FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 19,14 GET down FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 17,38 GET next FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 18,38 GET previos FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 19,38 GET find FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 17,62 GET print FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 STORE TO MPROMPTS 19,62 GET exit FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 READ CYCLE IF org n org num org n1 org num SELECT 2 REPLACE org num WITH org n1 FOR org num org n SELECT 3 REPLACE org num WITH org n1 FOR org num org n SELECT 4 REPLACE org num WITH org n1 FOR org num org n SELECT 5 REPLACE org num WITH org n1 FOR org num org n SELECT 6 REPLACE org num WITH org n1 FOR org num org n SELECT 7 REPLACE org num WITH org n1 FOR org num org n SELECT 8 REPLACE org num WITH org n1 FOR org num org n SELECT 9 REPLACE org num WITH org n1 FOR org num org n SELECT 10 REPLACE org num WITH org n1 FOR org num org n SELECT 11 REPLACE org num WITH org n1 FOR org num org n SELECT 1 ENDIF RETURN FUNCTION un rec un RECNO tab un org num SEEK tab un IF RECNO rec un SKIP ENDIF IF tab un org num AND !EOF GO rec un RETURN .f. ENDIF GO rec un RETURN WIEV2.PRG PARAMETER edit ACTIVATE WINDOW win1 CLEAR eduadd 5 forlang 5 conv 5 structfam 5 pass 5 bok 5 purpos 5 qualcateg 5 tripsbus 5 holid 5 1,1 SAY 2,1 SAY 3,1 SAY 4,30 SAY EDU NUM COLOR SCHEME 2 5,1 SAY 6,1 SAY 7,1 SAY 8,1 SAY 9,1 SAY 10,30 SAY LANG NUM COLOR SCHEME 2 11,30 SAY conv num COLOR SCHEME 2 12,1 SAY 13,30 SAY famil num COLOR SCHEME 2 14,1 SAY 15,1 SAY 18,4 SAY 18,29 SAY 16,0,16,77 BOX 17,26,19,26 BOX 17,52,19,52 BOX STORE 6 TO diploma, qual dip, spec dip, eduadd, kind hir,KIND WRK,s degree, s rank, mar spec, forlang, conv, mar status, structfam, tr union, group, up, down, next, previos, find, print, exit 1,30 GET diploma PICTURE XXXX N SIZE 1,25 WHEN edit .t. COLOR SCHEME 2 2,30 GET qual dip SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 3,30 GET spec dip SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 4,0 GET eduadd FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 5,30 GET kind hir SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 6,30 GET KIND WRK SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 7,30 GET s degree SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 8,30 GET s rank SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 9,30 GET mar spec SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 10,0 GET forlang FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 STORE TO MPROMPTS 11,0 GET conv FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 12,30 GET mar status SIZE 1,20 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 13,0 GET structfam FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 14,30 GET tr union SIZE 1,40 WHEN edit .t. COLOR SCHEME 2 15,30 GET group SIZE 1,1 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 17,14 GET up FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 19,14 GET down FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 17,38 GET next FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 18,38 GET previos FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 19,38 GET find FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 17,62 GET print FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 STORE TO MPROMPTS 19,62 GET exit FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 READ CYCLE RETURN WIEV3.PRG PARAMETER edit ACTIVATE WINDOW win1 CLEAR eduadd 5 forlang 5 conv 5 structfam 5 pass 5 bok 5 purpos 5 qualcateg 5 tripsbus 5 holid 5 1,1 SAY 2,1 SAY 3,1 SAY 4,1 SAY 5,1 SAY 6,1 SAY 7,1 SAY 9,1 SAY 10,1 SAY 11,1 SAY 12,1 SAY 13,1 SAY ? 14,1 SAY ? 15,1 SAY 18,4 SAY 18,29 SAY 16,0,16,77 BOX 17,26,19,26 BOX 17,52,19,52 BOX STORE 6 TO pensioner, partic war, post index, region, area, address, telephone, pass, passport, conscript, milit rank, number, mil ticket, mil valid, attitude, mobile ins, up, down, next, previos, find, print, exit 1,30 GET pensioner VALID pensioner ? OR pensioner ? OR pensioner ? OR pensioner ? ERROR SIZE 1,1 WHEN edit .t. COLOR SCHEME 2 2,30 GET partic war VALID partic war ? OR partic war ? OR partic war ? OR partic war ? ERROR SIZE 1,1 WHEN edit .t. COLOR SCHEME 2 3,30 GET post index SIZE 1,6 WHEN edit .t. COLOR SCHEME 2 4,30 GET region SIZE 1,20 WHEN edit .t. COLOR SCHEME 2 5,30 GET area SIZE 1,40 WHEN edit .t. COLOR SCHEME 2 6,30 GET address SIZE 1,40 WHEN edit .t. COLOR SCHEME 2 7,30 GET telephone PICTURE SIZE 1,18 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 8,0 GET pass FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 8,30 GET passport PICTURE X-XX SIZE 1,29 WHEN edit .t. COLOR SCHEME 2 9,30 GET conscript SIZE 1,20 WHEN edit .t. COLOR SCHEME 2 10,30 GET milit rank SIZE 1,20 WHEN edit .t. COLOR SCHEME 2 11,30 GET number SIZE 1,12 WHEN edit .t. COLOR SCHEME 2 12,30 GET mil ticket PICTURE XXX SIZE 1,23 WHEN edit .t. COLOR SCHEME 2 13,30 GET mil valid SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 14,30 GET attitude SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 15,30 GET mobile ins VALID mobile ins ? OR mobile ins ? OR mobile ins ? OR mobile ins ? ERROR SIZE 1,1 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 17,14 GET up FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 19,14 GET down FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 17,38 GET next FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 18,38 GET previos FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 19,38 GET find FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 17,62 GET print FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 STORE TO MPROMPTS 19,62 GET exit FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 READ CYCLE RETURN WIEV4.PRG PARAMETER edit ACTIVATE WINDOW win1 CLEAR eduadd 5 forlang 5 conv 5 structfam 5 pass 5 bok 5 purpos 5 qualcateg 5 tripsbus 5 holid 5 1,1 SAY 2,1 SAY 3,1 SAY 4,1 SAY 5,1 SAY 6,1 SAY 7,30 SAY record num COLOR SCHEME 2 8,30 SAY purpos num COLOR SCHEME 2 9,30 SAY qual num COLOR SCHEME 2 10,1 SAY 11,1 SAY 12,1 SAY 13,1 SAY 14,1 SAY 15,30 SAY trial num COLOR SCHEME 2 18,4 SAY 18,29 SAY 16,0,16,77 BOX 17,26,19,26 BOX 17,52,19,52 BOX STORE 4 TO group acc, category a, commissar, start date, close date, last date, bok, purpos, qualcateg, company, suddivis, cur post, employment, trial clos, admission, up, down, next, previos, find, prin t, exit, tripsbus 1,30 GET group acc SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 2,30 GET category a SIZE 1,20 WHEN edit .t. COLOR SCHEME 2 3,30 GET commissar SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 4,30 GET start date SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 5,30 GET close date SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 6,30 GET last date SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 7,0 GET bok FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 STORE ? TO MPROMPTS 8,0 GET purpos FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 STORE TO MPROMPTS 9,0 GET qualcateg FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 10,30 GET company SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 11,30 GET subdivis SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 12,30 GET cur post SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 13,30 GET employment SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 14,30 GET trial clos SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 15,0 GET tripsbus FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 STORE TO MPROMPTS 17,14 GET up FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 19,14 GET down FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 17,38 GET next FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 18,38 GET previos FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 19,38 GET find FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 17,62 GET print FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 STORE TO MPROMPTS 19,62 GET exit FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 READ CYCLE RETURN WIEV5.PRG PARAMETER edit ACTIVATE WINDOW win1 CLEAR eduadd 5 forlang 5 conv 5 structfam 5 pass 5 bok 5 purpos 5 qualcateg 5 tripsbus 5 holid 5 1,30 SAY holid num COLOR SCHEME 2 2,1 SAY 3,1 SAY 4,1 SAY 5,1 SAY 6,1 SAY 7,1 SAY 18,4 SAY 18,29 SAY 16,0,16,77 BOX 17,26,19,26 BOX 17,52,19,52 BOX STORE 6 TO holid, date dis, reason d, inn, series tax, num tax, date tax, up, down, next, previos, find, print, exit STORE TO MPROMPTS 1,0 GET holid FUNCTION MPROMPTS SIZE 1, 30 COLOR SCHEME 11 2,30 GET date dis SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 3,30 GET reason dis SIZE 1,47 WHEN edit .t. COLOR SCHEME 2 4,30 GET inn SIZE 1,12 WHEN edit .t. COLOR SCHEME 2 5,30 GET series tax SIZE 1,14 WHEN edit .t. COLOR SCHEME 2 6,30 GET num tax SIZE 1,14 WHEN edit .t. COLOR SCHEME 2 7,30 GET date tax SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 17,14 GET up FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 19,14 GET down FUNCTION MPROMPTS SIZE 1, 8 COLOR SCHEME 11 STORE TO MPROMPTS 17,38 GET next FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 18,38 GET previos FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 19,38 GET find FUNCTION MPROMPTS SIZE 1, 12 COLOR SCHEME 11 STORE TO MPROMPTS 17,62 GET print FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 STORE TO MPROMPTS 19,62 GET exit FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 READ CYCLE RETURN BUS TRIP.PRG PARAMETER org num1,edit SELECT j DEFINE WINDOW win3 FROM 3, 11 TO 20, 68 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 10 DEFINE WINDOW win4 FROM 21, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR R N IF edit .t. ACTIVATE WINDOW win4 0,1 SAY Ctrl T , Ctrl N , Ctrl W ? 1,30 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE LOCK 0 FIELDS start trp H , closed trp H , destinat H REPLACE org num WITH org num1 FOR org num 0 ELSE ACTIVATE WINDOW win4 0,26 SAY ESC 1,28 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS start trp H , closed trp H , destinat H ENDIF GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SELECT a RELEASE WINDOW win4 RELEASE WINDOW win3 REPLACE trial num WITH f RETURN CONVICT.PRG PARAMETER org num1,edit SELECT e DEFINE WINDOW win3 FROM 3, 5 TO 20, 75 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 10 DEFINE WINDOW win4 FROM 21, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR R N IF edit .t. ACTIVATE WINDOW win4 0,1 SAY Ctrl T , Ctrl N , Ctrl W ? 1,30 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE LOCK 0 FIELDS date verd H , article H , period H REPLACE org num WITH org num1 FOR org num 0 ELSE ACTIVATE WINDOW win4 0,26 SAY ESC 1,28 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS date verd H , article H , period H ENDIF GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SELECT a RELEASE WINDOW win4 RELEASE WINDOW win3 REPLACE conv num WITH f RETURN EDUCAT.PRG PARAMETER org num1,edit SELECT c DEFINE WINDOW win3 FROM 3, 0 TO 20, 79 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 10 DEFINE WINDOW win4 FROM 21, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR R N IF edit .t. ACTIVATE WINDOW win4 0,1 SAY Ctrl T , Ctrl N , Ctrl W ? 1,30 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE LOCK 0 FIELDS date begin H ,date end H , education H ,name educ H dipl H ,form tr H , qualific H ,special H REPLACE org num WITH org num1 FOR org num 0 ELSE ACTIVATE WINDOW win4 0,26 SAY ESC 1,28 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS date begin H , date end H , education H , name educ H ,dipl H , form tr H ,qualific H , special H ENDIF GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SELECT a RELEASE WINDOW win4 RELEASE WINDOW win3 REPLACE EDU NUM WITH f RETURN FAMILY.PRG PARAMETER org num1,edit SELECT f DEFINE WINDOW win3 FROM 3, 0 TO 20, 79 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 10 DEFINE WINDOW win4 FROM 21, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR R N IF edit .t. ACTIVATE WINDOW win4 0,1 SAY Ctrl T , Ctrl N , Ctrl W ? 1,30 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE LOCK 0 FIELDS relation H , names H date relat H , expense H REPLACE org num WITH org num1 FOR org num 0 ELSE ACTIVATE WINDOW win4 0,26 SAY ESC 1,28 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS relation H , names H date relat H , expense H ENDIF GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SELECT a RELEASE WINDOW win4 RELEASE WINDOW win3 REPLACE famil num WITH f RETURN HOLIDAY.PRG PARAMETER org num1,edit SELECT 11 DEFINE WINDOW win3 FROM 3, 0 TO 20, 79 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 10 DEFINE WINDOW win4 FROM 21, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR R N IF edit .t. ACTIVATE WINDOW win4 0,1 SAY Ctrl T , Ctrl N , Ctrl W ? 1,30 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE LOCK 0 FIELDS kind hol H , basis hol H , with hol H ? ,on hol H , d st hol H , amount H , d en hol H REPLACE org num WITH org num1 FOR org num 0 ELSE ACTIVATE WINDOW win4 0,26 SAY ESC 1,28 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS kind hol H , basis hol H , with hol H ? ,on hol H , d st hol H , amount H ,d en hol H ENDIF GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SELECT a RELEASE WINDOW win4 RELEASE WINDOW win3 REPLACE holid num WITH f RETURN LANGUAGE.PRG PARAMETER org num1,edit SELECT d DEFINE WINDOW win3 FROM 3, 13 TO 20, 67 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 10 DEFINE WINDOW win4 FROM 21, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR R N IF edit .t. ACTIVATE WINDOW win4 0,1 SAY Ctrl T , Ctrl N , Ctrl W ? 1,30 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE LOCK 0 FIELDS oth lang H , level H REPLACE org num WITH org num1 FOR org num 0 ELSE ACTIVATE WINDOW win4 0,26 SAY ESC 1,28 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS oth lang H , level H ENDIF GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SELECT a RELEASE WINDOW win4 RELEASE WINDOW win3 REPLACE LANG NUM WITH f RETURN MOVE.PRG PARAMETER org num1,edit SELECT h DEFINE WINDOW win3 FROM 3, 0 TO 20, 79 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 10 DEFINE WINDOW win4 FROM 21, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR R N IF edit .t. ACTIVATE WINDOW win4 0,1 SAY Ctrl T , Ctrl N , Ctrl W ? 1,30 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE ? LOCK 0 FIELDS date mov H , reason mov H , depart H , post mov H ,method mov H REPLACE org num WITH org num1 FOR org num 0 ELSE ACTIVATE WINDOW win4 0,26 SAY ESC 1,28 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE ? NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS date mov H , reason mov H , depart H , post mov H ,method mov H ENDIF GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SELECT a RELEASE WINDOW win4 RELEASE WINDOW win3 REPLACE purpos num WITH f RETURN PASSPORT.PRG PARAMETER org num1,edit SELECT b LOCATE FOR org num org num1 IF FOUND .f. APPEND BLANK REPLACE org num WITH org num1 ENDIF DEFINE WINDOW win3 FROM 3, 1 TO 24, 78 NOGROW NOFLOAT NOZOOM SHADOW CLOSE COLOR SCHEME 10 TITLE ACTIVATE WINDOW win3 1,5 SAY 2,5 SAY 6,5 SAY 7,5 SAY 8,5 SAY 9,5 SAY 10,5 SAY 11,5 SAY 12,5 SAY 13,5 SAY 14,5 SAY 4,2,16,73 BOX 4,30 SAY STORE 5 TO exp given, date distr, index p, area p, region p, city p, point p, street p, house p, corps p, flat p, end 1,20 GET exp given SIZE 1,50 WHEN edit .t. COLOR SCHEME 2 2,20 GET date distr SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 6,30 GET index p SIZE 1,6 WHEN edit .t. COLOR SCHEME 2 7,30 GET area p SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 8,30 GET region p SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 9,30 GET city p SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 10,30 GET point p SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 11,30 GET street p SIZE 1,30 WHEN edit .t. COLOR SCHEME 2 12,30 GET house p SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 13,30 GET corps p SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 14,30 GET flat p SIZE 1,10 WHEN edit .t. COLOR SCHEME 2 STORE TO MPROMPTS 18,34 GET end FUNCTION MPROMPTS SIZE 1,5 COLOR SCHEME 11 READ CYCLE SELECT a RELEASE WINDOW win3 RETURN QUALIF.PRG PARAMETER org num1,edit SELECT i DEFINE WINDOW win3 FROM 3, 10 TO 20, 69 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 10 DEFINE WINDOW win4 FROM 21, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR R N IF edit .t. ACTIVATE WINDOW win4 0,1 SAY Ctrl T , Ctrl N , Ctrl W ? 1,30 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE LOCK 0 FIELDS date qual H , reas qual H , qualificat H REPLACE org num WITH org num1 FOR org num 0 ELSE ACTIVATE WINDOW win4 0,26 SAY ESC 1,28 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS date qual H , reas qual H , qualificat H ENDIF GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SELECT a RELEASE WINDOW win4 RELEASE WINDOW win3 REPLACE qual num WITH f RETURN WORKCARD.PRG PARAMETER org num1,edit SELECT g DEFINE WINDOW win3 FROM 3, 0 TO 20, 79 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 10 DEFINE WINDOW win4 FROM 21, 0 TO 24, 79 NOGROW NOFLOAT NOZOOM COLOR R N IF edit .t. ACTIVATE WINDOW win4 0,1 SAY Ctrl T , Ctrl N , Ctrl W ? 1,30 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE LOCK 0 FIELDS date wrk H , date dism H , name wrk H , post wrk H , reason wrk H ,basis wrk H REPLACE org num WITH org num1 FOR org num 0 ELSE ACTIVATE WINDOW win4 0,26 SAY ESC 1,28 SAY Ctrl F ACTIVATE WINDOW win3 BROWSE FOR org num org num1 TITLE NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS date wrk H , date dism H , name wrk H , post wrk H ,reason wrk H , basis wrk H ENDIF GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SELECT a RELEASE WINDOW win4 RELEASE WINDOW win3 REPLACE record num WITH f RETURN PRINT.PRG SELECT a n alltrim surname alltrim name alltrim patron peject after SET PRINTER ON SET CONSOLE OFF PRINTJOB ? space 80-len n 2 ,n WAIT NOWAIT WINDOW ,org num ? ,ins num ? ,surname ? ,name ? ,patron ? ,sex ? ,birth date ? ,birthplace ? ,national ? ,SOCIAL ? ,citizen ? ,educat ? ,NAME EDU ? ,form train ? ,year end ? ,diploma ? ,qual dip ? ,spec dip ? ,kind hir ? ,KIND WRK ? ,s degree ? ,s rank ? ,mar spec ? ,mar status ? ,tr union ? ,group ? ,pensioner ? ,partic war ? ,post index ? ,region ? ,area ? ,address ? ,telephone ? ,conscript ? ,milit rank ? ,number ? ,mil ticket, mil valid, attitude ? ,mobile ins ? ,group acc ? ,category a ? ,commissar ? ,start date ? ,close date ? ,last date ? ,company ? ,subdivis ? ,cur post ? ,employment ? ,trial clos ? ,date dis ? ,reason dis ? ,inn ? ,series tax ? ,num tax ? ,date tax ? SPACE 25 , ,EDU NUM org num1 org num EDU NUM1 EDU NUM SELECT c SET FILTER TO org num org num1 GO TOP FOR n 1 TO EDU NUM1 ? ,date begin, ,date end, name educ ? ,education ? ,dipl ? ,form tr ? ,qualific ? ,special ? REPLICATE - ,39 SKIP NEXT n SET FILTER TO SELECT a ? SPACE 25 , ,LANG NUM LANG NUM1 LANG NUM SELECT d SET FILTER TO org num org num1 GO TOP FOR n 1 TO LANG NUM1 ? ,oth lang, ,level SKIP NEXT n SET FILTER TO SELECT a ? SPACE 25 , ,conv num conv num1 conv num SELECT e SET FILTER TO org num org num1 GO TOP FOR n 1 TO conv num1 ? ,date verd ? ,article, ,period ? REPLICATE - ,39 SKIP NEXT n SET FILTER TO SELECT a ? SPACE 25 , ,famil num struct f1 famil num SELECT f SET FILTER TO org num org num1 GO TOP FOR n 1 TO struct f1 ? ,date relat, names ? ,relation, ,expense ? REPLICATE - ,39 SKIP NEXT n SET FILTER TO SELECT a ? SPACE 12 , ,passport SELECT b GO TOP f 0 LOCATE FOR org num org num1 DO WHILE EOF .f. IF FOUND .t. f f 1 ENDIF CONTINUE ENDDO SET FILTER TO org num org num1 GO TOP FOR n 1 TO f ? ,exp given ? ,date distr ? SPACE 25 ,index p ? ,area p ? ,region p ? ,city p ? ,point p ? ,street p ? ,house p ? ,corps p ? ,flat p SKIP NEXT n SET FILTER TO SELECT a ? SPACE 25 , ,record num record num1 record num SELECT g SET FILTER TO org num org num1 GO TOP FOR n 1 TO record num1 ? ,date wrk, ,date dism ? ,name wrk ? ,post wrk ? ,reason wrk ? ,basis wrk ? REPLICATE - ,39 SKIP NEXT n SET FILTER TO SELECT a ? SPACE 25 ,purpos num purpos num1 purpos num SELECT h SET FILTER TO org num org num1 GO TOP FOR n 1 TO purpos num1 ? ,date mov, ,reason mov ? ,depart ? ,post mov ? ,method mov ? REPLICATE - ,39 SKIP NEXT n SET FILTER TO SELECT a ? SPACE 25 , ,qual num qual num1 qual num SELECT i SET FILTER TO org num org num1 GO TOP FOR n 1 TO qual num1 ? ,date qual, ,reas qual ? ,qualificat ? REPLICATE - ,39 SKIP NEXT n SET FILTER TO SELECT a ? SPACE 25 , ,trial num trips1 trial num SELECT j SET FILTER TO org num org num1 GO TOP FOR n 1 TO trips1 ? ,start trp, ,closed trp ? ,destinat ? REPLICATE - ,39 SKIP NEXT n SET FILTER TO SELECT a ? SPACE 25 , ,holid num holid num1 holid num SELECT 11 SET FILTER TO org num org num1 GO TOP FOR n 1 TO holid num1 ? ,kind hol ? ,basis hol, with hol, ,on hol ? ,d st hol, ,amount ? ,d en hol ? REPLICATE - ,39 SKIP NEXT n SET FILTER TO SELECT a WAIT CLEAR ENDPRINTJOB SET PRINTER OFF SET CONSOLE ON RETURN SEARCH.PRG DEFINE WINDOW win3 FROM 3, 11 TO 20, 69 NOGROW NOFLOAT NOZOOM SHADOW CLOSE TITLE ? ESCAPE COLOR SCHEME 10 ACTIVATE WINDOW win3 BROWSE NOAPPEND NOMODIFY NODELETE LOCK 0 FIELDS org num H N , surname H , name H ,patron H RELEASE WINDOW win3 RETURN INDEX.PRG WAIT NOWAIT WINDOW SELECT a INDEX ON org num TO stuff.idx SELECT c INDEX ON date begin TO educat.idx SELECT d INDEX ON oth lang TO language.idx SELECT e INDEX ON date verd TO convict.idx SELECT f INDEX ON date relat TO family.idx SELECT g INDEX ON date wrk TO workcard.idx SELECT h INDEX ON date mov TO moving.idx SELECT i INDEX ON date qual TO qualific.idx SELECT j INDEX ON start trp TO bus trip.idx SELECT 11 INDEX ON with hol TO holiday.idx WAIT CLEAR RETURN INITIAL.PRG DEFINE WINDOW win3 FROM 7, 10 TO 13, 70 NOGROW NOFLOAT NOZOOM CLOSE COLOR SCHEME 12 ACTIVATE WINDOW win3 0,12 SAY 1,13 SAY ? STORE 2 TO no, yes STORE TO MPROMPTS 3,19 GET no FUNCTION MPROMPTS SIZE 1, 8 STORE TO MPROMPTS 3,30 GET yes FUNCTION MPROMPTS SIZE 1, 8 READ CYCLE RELEASE WINDOW win3 IF yes 2 RETURN ENDIF WAIT NOWAIT WINDOW SELECT a ZAP SELECT b ZAP SELECT c ZAP SELECT d ZAP SELECT e ZAP SELECT f ZAP SELECT g ZAP SELECT h ZAP SELECT i ZAP SELECT j ZAP SELECT 11 ZAP WAIT CLEAR RETURN REFEREN.PRG SELECT a DO search.prg peject after SET PRINTER ON SET CONSOLE OFF PRINTJOB WAIT NOWAIT WINDOW n ALLTRIM company ? space 80-len n 2 ,n SPACE 28 REPLICATE - ,79 ? SPACE 26 REPLICATE - ,79 n alltrim surname alltrim name alltrim patron ? space 80-len n 2 ,n ? d MONTH birth date IF d 1 n ENDIF IF d 2 n ENDIF IF d 3 n ENDIF IF d 4 n ENDIF IF d 5 n ENDIF IF d 6 n ENDIF IF d 7 n ENDIF IF d 8 n ENDIF IF d 9 n ENDIF IF d 10 n ENDIF IF d 11 n ENDIF IF d 12 n ENDIF IF sex ? OR sex ? sx1 sx2 sx3 ELSE sx1 sx2 sx3 ENDIF ? ,sx1,DAY birth date, n,YEAR birth date ,ALLTRIM national, sx2,ALLTRIM birthplace ,ALLTRIM citizen, sx3,ALLTRIM NAME EDU ,ALLTRIM mar status ,ALLTRIM cur post ,ALLTRIM subdivis ,ALLTRIM address ,ALLTRIM region, telephone SPACE 60 ,DATE SELECT a WAIT CLEAR ENDPRINTJOB SET PRINTER OFF SET CONSOLE ON RETURN END.PRG CLEAR CLOSE ALL QUIT 7. ГРАФИЧЕСКИЙ МАТЕРИАЛ Рис. 2.2.1. Описание связи объект-свойство. Рис. 2.4.1 Взаимосвязь командных файлов в проекте.

Рецензия на дипломную работу Студента факультета технической кибернетики Рег Жучкова Михаила Юрьевича . фамилия, имя, отчество Дипломная работа, представленная на рецензию, содержит пояснительную записку на 87 листах и графический материал на 6 листах.

Дипломная работа посвящена созданию базы данных Кадры. В работе осуществлена разработка базы данных по результатам работы отдела кадров ОАО Судостроительный завод Лотос. Характеристика работы. Настоящая дипломная работа полностью соответствует условию и объему задания.

В работе приведены структура и тип данных, сведение их в определенные объекты и построение связи между ними. Разработанная база данных дает возможность реально применять ее в задачах подсистемы управления кадрами судостроительного предприятия, отличается полнотой и простотой обращения.

Архитектура базы позволяет легко использовать входящие в нее данные для расчета трудоемкости постройки судов и формирования необходимых сведений для отдела кадров и руководства.

В тоже время разработанная база данных носит определенный унифицированный характер, что позволяет использовать ее после несложных преобразований для других предприятий.

Сервисные программы обслуживания базы просты в обращении.

Используя реляционную архитектуру, студент отразил научно-технический прогресс. Работа является составной частью автоматизации управления производственно-хозяйственной деятельности предприятия.

В данной дипломной работе хорошо отражены вопросы охраны труда.

Работа написана ясно и грамотно, отличается четкостью изложения, имеет хорошее качество оформления.

Оценка дипломной работы - 5. Опробация базы данных на ОАО ССЗ Лотос показали ее практическую ценность в части облегчения и скорости обработки большого объема данных и составлении необходимых сведений.

Рецензент Петров П.П ОАО ССЗ Лотос, начальник бюро корпусообработки, инженер ф.и.о место работы, должность, звание Дата Подпись Отзыв на дипломную работу Студента факультета технической кибернетики Рег Жучкова Михаила Юрьевича . фамилия, имя, отчество на тему Разработка базы данных Кадры Руководитель дипломной работы Иванов Иван Иванович, главный технолог ОАО ССЗ Лотос фамилия, имя, отчество, должность, звание Дипломная работа содержит пояснительную записку на 87 листах и графический материал на 6 листах.

Дипломная работа посвящена созданию базы данных Кадры. В работе осуществлена разработка базы данных по результатам работы отдела кадров ОАО Судостроительный завод Лотос. Работа выполнена по заявке производства. Характеристика работы Работа соответствует заданию и требованиям.

Имеет удобный интерфейс под WINDOWS . В состав