Курсовая работа: Програма для отримання відомості трудомісткості і розцінок на виріб в розрізі дільниць та кодів

Програма виводить на дисплей головного меню, котре пропонує користувачеві вибір однієї з опцій:

- запис довідника на диск;

- вивiд довідника на дисплей;

- запис даних на диск;

- вивiд файлу на дисплей;

- вивiд вихідного зведення на дисплей;

- завершення роботи.

При виборі деякого пункту меню викликається відповідна процедура. Завершення роботи програми і повернення в середовище системи програмування TurboPascal здійснюється при натисканні клавіші Esc, що відповідає вибору опції «Завершення роботи». Програма формує на ТМД файли послідовного доступу MVPR.DAT і MPD/DAT та формує на основі даних цих файлів відомість зведеної трудомісткості і розцінок на виріб в розрізі номерів дільниць кодів деталей.

Процедури програми ZATRATY1.PAS має таке призначення.

Процедура In _ Oper . Призначення - ввід даних з первинних документів і запис їх на диск у файл MVPR.DAT. Процедура викликається з головного меню програми при виборі пункту «Запис даних на диск» (функціональна клавіша F4). Процедура виводить на дисплей екранну форму для вводу даних з первинних документів. Ввід даних здійснюється в такій послідовності:

- номер дільниці;

- код деталі;

- об'єм виробничої партії;

- часу підготовчий;

- час штучний;

- розцінка підготовчого часу

- розцінка штучного часу.

Після вводу запису користувачеві пропонується продовжити ввід даних, натиснувши клавішу Enter, або завершити ввід, натиснувши комбінацію клавіш CTRL+Z. В останньому випадку процедура припиняє роботу і повертає керування в програму.

Процедура Out_Oper . Призначення - читання вхідних даних з дискового файлу MVPR.DATта вивід їх на дисплей.Процедура викликається з головного меню програми при виборі пункту «Вивід файлу на дисплей» (функціональна клавіша F5). При ініціалізації процедури на екран виводиться екранна форма и відкривається вхідний файл MVPR.DAT для читання. Записи файлу зчитуються з диска один за одним і виводяться на дисплей (див. додаток 4). Процедура завершує роботу при досягненні кінця файлу MVPR.DAT і передає керування у викликаючу її програму.

Процедура Vidomist . Призначення - вивід вихідного зведення на друкуючий пристрій ПК. Вхідна інформація для жаної процедури зберігається у файлі MVPR.DAT. Виклик процедури здійснюється з головного меню програми при натисканні функціональної клавіші F6, тобто при виборі пункту «Вивід таблиці на дисплей». Процедура в свою чергу викликає процедури DRSUM1, DRSUM2.

Дана процедура здійснює ввід записів вхідного файлу MVPR.DATта форматований вивід їх на друк з одночасним підрахунком підсумків по коду деталі та коду дільниці. При досягненні кінця файлу MVPR.DAT процедура завершує свою роботу і передає керування в програму.

Блок-схема процедури представлена в додатку 3.

2.2 Опис програми

Програма складена і відладжена в середовищі TurboPascal 6.0. На початку програми згідно вимог технології програмування розміщується вступний коментар, а решта операторів програми мають таке призначення:

001 Заголовок програми

002 Підключення зовнішніх модулів управління дисплеєм (Crt) та друкуючим пристроєм (Printer)

003 опис типу даних vypusk для опису структури запису оперативного вхідного файлу

004 Опис типу даних vyroby для опису структури довідкового вхідного файлу

005 опис дискових файлів OPER та DOV‚ робочих змінних програми

006 Заголовок процедури IN_DOV