Програма для отримання відомості трудомісткості і розцінок на виріб в розрізі дільниць та кодів деталей
Курсовой проект - Компьютеры, программирование
Другие курсовые по предмету Компьютеры, программирование
й з метою візуального контролю введених даних;
сортування записів файлу по кодах дільниць і номерах цехів та вивід просортованих записів на диск;
формування та вивід вихідного зведення на дисплей.
Для реалізації поставленого завдання в середовищі Turbo Pascal 6.0 розроблено програму ZATRATY.PAS. Перелічені вище операції реалізуються в програмі за посередництвом процедур. Вхідні дані отримання вхідного зведення зберігаються на ТМД у файлі послідовного доступу з фізичеим іменем MVPR.DAT. Сортування записів вхідного файлу MVPR.DAT здійснюється в оперативній памяті з використанням методу обмінного сортування [1]. Для збереження просортованих записів створення окремого файлу не передбачено.
1.2 Вхідна інформація
Вхідною для даної задачі є інформація первинних документів. Дані з первинних документів вводяться з клавіатури ПК і записуються на ТМД в файли MVPR.DAT (оперативний) та MPD.DAT (довідковий). Структура запису вхідного оперативного файлу представлена в таблиці 1.
Таблиця 1
Структура запису файла MVPR.DAT
Назва реквізитуІдентифікаторЗначністьТип данихКод цехуCEH2ЦілийКод дільниціDIL 2ЦілийКод деталіDET 7СимвольнийОбєм виробничої партіїOPP4ДійснийЧас підготовчо-заключнийTPZ4(1)ДійснийЧас штучнийTST4(1)ДійснийРозцінка підготовчо-заключного часуRPZ5(2)ДійснийРозцінка штучного часуRST5(2)Дійсний
Файл має логічне імя dov, фізичне імя файлу - mpd.dat, повне імя файлу d:\pascal\kurs\data\mpd.dat.
Організація файлу - послідовна.
Ввід даних і запис їх у файл здійснює процедура IN_DOV.
Вивід записів файлу на дисплей здійснюється процедурою OUT_DOV.
Структура запису вхідного довідкового файлу представлена в таблиці 2.
Таблиця 2
Структура запису файла MPD.DAT
Назва реквізитуІдентифікаторЗначністьТип данихКод виробуVYRIB2Довгий цілийКод деталіDET 7СимвольнийКількість деталей у виробіKILDET 4Цілий
Файл має логічне імя oper, фізичне імя файлу - mvpr.dat, повне імя файлу d:\pascal\kurs\data\mvpr.dat.
Організація файлу - послідовна.
Ввід даних і запис їх у файл здійснює процедура IN_OPER.
Вивід записів файлу на дисплей здійснюється процедурою OUT_OPER.
1.3 Вихідна інформація
Вихідною інформацією при розвязуванні даної задачі є вихідне зведення, форма якого представлена в таблиці 2.
Таблиця 2. Відомість зведеної трудомісткості і розцінок на виріб в розрізі номерів дільниць і кодів виробів
Номер дільниціКод деталіКількість деталейНорма часуРозцінка часуна детальна вирібна детальна вирібDILDETKILDETNORMA1V1NORMA2V2Всього по коду деталіPD1PD2Всього по дільниціPV1PV2
Показники DIL, DET, KILDET вибираються з вхідного оперативного файлу MVPR.DAT. Показники NORMA1, NORMA2, V1,V2 розраховуються за формулами:
,
де і - кількість деталей у j-му виробі.
Підсумкові показники PD1, PD2, PV1, PV2 розраховуються за формулами:
‚
де j - кількість виробів до складу яких входить деталь з кодом DET;
‚
де k- кількість різних виробів‚ що випускаються на дільниці.
Відомість зведеної трудомісткості і розцінок на виріб в розрізі номерів дільниць і кодів деталей використовується для списання сум з синтетичного рахунку №40 Готова продукція на синтетичний рахунок № 45 Товари відвантажені, виконані роботи та послуги. Відомість також використовується відділом збуту підприємства для контролю за виконанням угод на постачання готової продукції.
Вихідне зведення Відомість зведеної трудомісткості і розцінок на виріб в розрізі номерів дільниць і кодів деталей формується на основі даних вхідного файлу MVPR.DAT, попередньо просортованого по номеру дільниці та коду деталі.
Формування та вивід зведення на дисплей здійснюється процедурою VIDOMІST.
2. Практична частина
2.1 Архітектура програми
Поставлена задача реалізується програмою ZATRATY1.PAS.
Програма складається з головного блоку (блок-схему див. додаток 1) та пяти процедур:
- IN_DOV;
- OUT_DOV;
- IN_OPER;
- OUT_OPER;
- VIDOMIST.
Для виконання програми необхідно виконати такі дії:
- увійти в середовище програмування Turbo Pascal;
- завантажити текст програми - F10, File, Open, ZATRATY1.PAS);
- відкомпілювати програму в довільному режимі (наприклад Compile, Compile);
- виконати програму (F10, Run).
Програма також може бути завантажена і виконана з середовища операційної оболонки Norton Commander шляхом запуску ZATRATY1.EXE (попередньо програма повинна буди відкомпільована з опцією Destination Memory).
Програма виводить на дисплей головного меню, котре пропонує користувачеві вибір однієї з опцій:
- запис довідника на диск;
- вивiд довідника на дисплей;
- запис даних на диск;
- вивiд файлу на дисплей;
- вивiд вихідного зведення на дисплей;
- завершення роботи.
При виборі деякого пункту меню викликається відповідна процедура. Завершення роботи програми і повернення в середовище системи програмування Turbo Pascal здійснюється при натисканні клавіші Esc, що відповідає вибору опції Завершення роботи. Програма формує на ТМД файли послідовного доступу MVPR.DAT і MPD/DAT та формує на основі даних цих файлів відомість зведеної трудомісткості і розцінок на виріб в розрізі номерів дільниць кодів деталей.
Процедури програми ZATRATY1.PAS має таке призначення.
Процедура In_Oper. Призначення - ввід даних з первинних документів і запис їх на диск у файл MVPR.DAT. Процедура викликається з головного меню програми при виборі пункту Запис даних на диск (функціональна ?/p>