Смекни!
smekni.com

Описание прикладной программы 17 6 Заключение 19 Список использованных источников 20 Приложение а древообразная структура запуска файлов, процедур и функций 21 (стр. 5 из 7)


Список использованных источников

1 Диго С. М. Проектирование баз данных.- М.: Финансы и статистика,
1988.- 216 с.: ил.

2 Попов А. А. Программирование в среде СУБД FoxPro 2.0. Построение систем обработки данных.- М.: Радио и связь, К.:ТОО “ВЕК”, 1995.- 352 с.: ил.

3 Дейт Введение в системы баз данных. — М.: Наука, 1980.-350 с.: ил.

4 Куправа Т. А. Создание и программирование баз данных средствами
СУБД. — М.: Мир, 1980. — 230 с.: ил.


Приложение А

(справочное)

KURS.PRG

PREDL.DBF (БД/dbf)

ZAYAV.DBF (БД/dbf)

MMM.MPR

SEEZAYAV.SPR

_RKG0NR9RC() (функция в SEEZAYAV.SPR)

_RKG0NR9YL() (функция в SEEZAYAV.SPR)

_RKN159U3J (процедура в MMM.MPR)

FINZAYAV.SPR

_RKN13YACZ() (функция в FINZAYAV.SPR)

SEEZAYAV.SPR...

_RKN159U40 (процедура в MMM.MPR)

_RKN159U4G (процедура в MMM.MPR)

FINZAYAV.SPR...

_RKN159U4V (процедура в MMM.MPR)

ZAYAV.SPR

_RKG0MPASO() (функция в ZAYAV.SPR)

SEEPREDL.SPR

_RKG0M4464() (функция в SEEPREDL.SPR)

_RKG0M44C6() (функция в SEEPREDL.SPR)

_RKN159U6L (процедура в MMM.MPR)

FINPREDL.SPR

_RKN13Z2H5() (функция в FINPREDL.SPR)

SEEPREDL.SPR...

_RKN159U71 (процедура в MMM.MPR)

_RKN159U7H (процедура в MMM.MPR)

FINPREDL.SPR...

_RKN159U7Y (процедура в MMM.MPR)

PREDL.SPR

_RKG0MO7XF() (функция в PREDL.SPR)

Рисунок А.1 - Древообразная структура запуска файлов, процедур и функций
Приложение Б

(обязательное)

Листинг файла Kurs.PRG

*:*****************************************************************************

*:

*: Program: C:\FOXPROW\KURS.PRG

*: System: Система для кадрового агентства

*: Author: А. С. Москвин и А. С. Шеховцов

*: Last modified: 16/05/97 at 19:18:18

*:

*: Calls: MMM.MPR

*:

*: Uses: PREDL.DBF

*: : ZAYAV.DBF

*:

*: Documented 20:20:45 FoxDoc version 3.00a

*:*****************************************************************************

PUBLIC ed

PUBLIC ku

PUBLIC di

PUBLIC DO

PUBLIC ur

PUBLIC uo

PUBLIC ok

PUBLIC ag

SELECT 1

USE predl

SELECT 2

USE zayav

DO mmm.mpr


Приложение В

(обязательное)

Листинг файла Mmm.MPR

*********************************************************

* Menu Definition

*********************************************************

SET SYSMENU TO

SET SYSMENU AUTOMATIC

DEFINE PAD _rkp12z3kz OF _MSYSMENU PROMPT "Заявки" COLOR SCHEME 3

DEFINE PAD _rkp12z3mj OF _MSYSMENU PROMPT "Предложения" COLOR SCHEME 3

DEFINE PAD _rkp12z3mn OF _MSYSMENU PROMPT "Выход" COLOR SCHEME 3

ON PAD _rkp12z3kz OF _MSYSMENU ACTIVATE POPUP заявки

ON PAD _rkp12z3mj OF _MSYSMENU ACTIVATE POPUP предложени

ON SELECTION PAD _rkp12z3mn OF _MSYSMENU set sysmenu to default

DEFINE POPUP заявки MARGIN RELATIVE SHADOW COLOR SCHEME 4

DEFINE BAR 1 OF заявки PROMPT "Просмотр заявок"

DEFINE BAR 2 OF заявки PROMPT "Поиск заявок"

DEFINE BAR 3 OF заявки PROMPT "Полный отчёт"

DEFINE BAR 4 OF заявки PROMPT "Отчёт по условию"

DEFINE BAR 5 OF заявки PROMPT "Ввод новых заявок"

ON SELECTION BAR 1 OF заявки do seezayav.spr

ON SELECTION BAR 2 OF заявки ;

DO _rkp12z3pz ;

IN LOCFILE("\FOXPROW\MMM" ,"MPX;MPR|FXP;PRG" ,"Where is MMM?")

ON SELECTION BAR 3 OF заявки ;

DO _rkp12z3tg ;

IN LOCFILE("\FOXPROW\MMM" ,"MPX;MPR|FXP;PRG" ,"Where is MMM?")

ON SELECTION BAR 4 OF заявки ;

DO _rkp12z3ty ;

IN LOCFILE("\FOXPROW\MMM" ,"MPX;MPR|FXP;PRG" ,"Where is MMM?")

ON SELECTION BAR 5 OF заявки ;

DO _rkp12z3ud ;

IN LOCFILE("\FOXPROW\MMM" ,"MPX;MPR|FXP;PRG" ,"Where is MMM?")

DEFINE POPUP предложени MARGIN RELATIVE SHADOW COLOR SCHEME 4

DEFINE BAR 1 OF предложени PROMPT "Просмотр предложений"

DEFINE BAR 2 OF предложени PROMPT "Поиск предложений"

DEFINE BAR 3 OF предложени PROMPT "Полный отчёт"

DEFINE BAR 4 OF предложени PROMPT "Отчёт по условию"

DEFINE BAR 5 OF предложени PROMPT "Ввод новых предложений"

ON SELECTION BAR 1 OF предложени do seepredl.spr

ON SELECTION BAR 2 OF предложени ;

DO _rkp12z3w4 ;

IN LOCFILE("\FOXPROW\MMM" ,"MPX;MPR|FXP;PRG" ,"Where is MMM?")

ON SELECTION BAR 3 OF предложени ;

DO _rkp12z3wk ;

IN LOCFILE("\FOXPROW\MMM" ,"MPX;MPR|FXP;PRG" ,"Where is MMM?")

ON SELECTION BAR 4 OF предложени ;

DO _rkp12z3x0 ;

IN LOCFILE("\FOXPROW\MMM" ,"MPX;MPR|FXP;PRG" ,"Where is MMM?")

ON SELECTION BAR 5 OF предложени ;

DO _rkp12z3xg ;

IN LOCFILE("\FOXPROW\MMM" ,"MPX;MPR|FXP;PRG" ,"Where is MMM?")

*********************************************************

* _RKP12Z3PZ ON SELECTION BAR 2 OF POPUP заявки

* Procedure Origin:

* From Menu: MMM.MPR, Record: 6

Called By: ON SELECTION BAR 2 OF POPUP заявки

* Prompt: Поиск заявок

* Snippet: 1

*********************************************************

PROCEDURE _rkp12z3pz

ku=""

ur=""

uo=""

ok=0

DO finzayav.spr

DO seezayav.spr

SET FILTER TO

GO TOP

*********************************************************

* _RKP12Z3TG ON SELECTION BAR 3 OF POPUP заявки

* Procedure Origin:

* From Menu: MMM.MPR, Record: 7

* Called By: ON SELECTION BAR 3 OF POPUP заявки

* Prompt: Полный отчёт

* Snippet: 2

*********************************************************

PROCEDURE _rkp12z3tg

SELECT 2

REPORT FORMAT zayav TO PRINTER

WAIT WINDOW "Вывод отчётной формы на принтер произведён."

CLEA

*********************************************************

* _RKP12Z3TY ON SELECTION BAR 4 OF POPUP заявки

* Procedure Origin:

* From Menu: MMM.MPR, Record: 8

* Called By: ON SELECTION BAR 4 OF POPUP заявки

* Prompt: Отчёт по условию

* Snippet: 3

*********************************************************

PROCEDURE _rkp12z3ty

SELECT 2

DO finzayav.spr

REPORT FORMAT zayav TO PRINTER

WAIT WINDOW "Вывод отчётной формы на принтер произведён."

CLEA

SET FILTER TO

GO TOP

*********************************************************

* _RKP12Z3UD ON SELECTION BAR 5 OF POPUP заявки

* Procedure Origin:

* From Menu: MMM.MPR, Record: 9

* Called By: ON SELECTION BAR 5 OF POPUP заявки

* Prompt: Ввод новых заявок

* Snippet: 4

*********************************************************

PROCEDURE _rkp12z3ud

SELECT 2

APPEND BLANK

GO BOTTOM

DO zayav.spr

*********************************************************

* _RKP12Z3W4 ON SELECTION BAR 2 OF POPUP предложени

* Procedure Origin:

* From Menu: MMM.MPR, Record: 13

* Called By: ON SELECTION BAR 2 OF POPUP предложени

* Prompt: Поиск предложений

* Snippet: 5

*********************************************************

PROCEDURE _rkp12z3w4

ed=""

ku=""

di=""

DO=""

ur=""

uo=""

ok=0

ag=0

DO finpredl.spr

DO seepredl.spr

SET FILTER TO

GO TOP

*********************************************************

* _RKP12Z3WK ON SELECTION BAR 3 OF POPUP предложени

* Procedure Origin:

* From Menu: MMM.MPR, Record: 14

* Called By: ON SELECTION BAR 3 OF POPUP предложени

* Prompt: Полный отчёт

* Snippet: 6

*********************************************************

PROCEDURE _rkp12z3wk

SELECT 1

REPORT FORMAT predl TO PRINTER

WAIT WINDOW "Вывод отчётной формы на принтер произведён."

CLEA

*********************************************************

* _RKP12Z3X0 ON SELECTION BAR 4 OF POPUP предложени

* Procedure Origin:

* From Menu: MMM.MPR, Record: 15

* Called By: ON SELECTION BAR 4 OF POPUP предложени

* Prompt: Отчёт по условию

* Snippet: 7

*********************************************************

PROCEDURE _rkp12z3x0

SELECT 1

DO finpredl.spr

REPORT FORMAT predl TO PRINTER

WAIT WINDOW "Вывод отчётной формы на принтер произведён."

CLEA

SET FILTER TO

GO TOP

*********************************************************

* _RKP12Z3XG ON SELECTION BAR 5 OF POPUP предложени

* Procedure Origin:

* From Menu: MMM.MPR, Record: 16

* Called By: ON SELECTION BAR 5 OF POPUP предложени