Geum.ru

Програма для отримання відомості відвантаження готової продукції

Курсовой проект - Компьютеры, программирование

Другие курсовые по предмету Компьютеры, программирование

ю візуального контролю введених даних;

сортування записів файлу по кодах дільниць і номерах цехів та вивід просортованих записів на диск;

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

Для реалізації поставленого завдання в середовищі Turbo Pascal 6.0 розроблено програму KURS414.PAS. Перелічені вище операції реалізуються в програмі за посередництвом процедур. Вхідні дані отримання вхідного зведення зберігаються на ТМД у файлі послідовного доступу з фізичеим іменем MVPR.DAT. Сортування записів вхідного файлу MVPR.DAT здійснюється в оперативній памяті з використанням методу обмінного сортування [1]. Для збереження просортованих записів створення окремого файлу не передбачено.

 

1.2 Вхідна інформація

 

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

Таблиця 1

Структура запису файла MVPR.DAT

Назва реквізитуІдентифікаторЗначністьТип данихДатаCEH2символьнийСкладDIL 2символьнийКод отримувачаNOP 4символьнийНомер документуTST4символьнийНоменклатурний номер виробуRST6символьний

Файл має логічне імя oper, фізичне імя файлу - mvpr.dat, повне імя файлу d:\pascal\kurs\data\mvpr.dat.

Організація файлу - послідовна.

Ввід даних і запис їх у файл здійснює процедура ZAPYS_NA_DYSK.

Вивід записів файлу на дисплей здійснюється процедурою VYVID_Z_DYSKA.

 

1.3 Вихідна інформація

 

Вихідною інформацією при розвязуванні даної задачі є вихідне зведення, форма якого представлена в таблиці 2.

 

Таблиця 2.

Відомість зведеної трудомісткості і розцінок на виріб в розрізі номерів цехів і кодів дільниць

Н о м е рНорма часу штучно-калькуляційногоНорма часу штучно-калькуляційногоцехудільниціопераціїна вирібна вирібCEHDILNOPTSTRSTВсього по дільниціTSTdilRSTdilВсього по цехуTSTcehRSTcehРазом по відомостіTSTvidRSTvidПоказники CEH, DIL, NOP, TST, RST вибираються з вхідного файла MVPR.DAT.

Підсумкові показники TSTdil, RSTdil, TSTceh, RSTceh, TSTvid, RSTvid розраховуються за формулами:

 

,(1)

 

і - кількість записів просортованого файлу MVPR.DAT, які мають ідентичне значення показника код дільниці.

 

,(2)

 

j - кількість записів, що мають ідентичне значення показника код цеху.

 

,(3)

 

m - загальна кількість записів файлу.

Відомість зведеної трудомісткості і розцінок на виріб в розрізі номерів цехів і кодів дільниць використовується для списання сум з синтетичного рахунку №40 Готова продукція на синтетичний рахунок № 45 Товари відвантажені, виконані роботи та послуги. Відомість також використовується відділом збуту підприємства для контролю за виконанням угод на постачання готової продукції.

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

Формування та вивід зведення на дисплей здійснюється процедурами DRUK_VIDOMOSTI, DRSUM1 та DRSUM2.

2. Практична частина

 

2.1 Архітектура програми

 

Поставлена задача реалізується програмою KURS414.PAS.

Програма складається з головного блоку (блок-схему див. додаток 1) та пяти процедур:

  1. ZAPYS_NA_DYSK;
  2. VYVID_Z_DYSKA;
  3. DRUK_VIDOMOSTI;
  4. DRSUM1;
  5. DRSUM2.

Програму можна запустити на виконання способами:

  1. з головного меню інтегрованого середовища Turbo Pascal шляхом вибору опції Run (попередньо програма повинна бути завантажена в ОП - F10, File, Open, KURS414.PAS);
  2. з середовища операційної оболонки Norton Commander шляхом запуску KURS414.EXE (попередньо програма повинна буди відкомпільована з опцією Destination To Memory).

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

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

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

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

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

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

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

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

  1. код цеху;
  2. код дільниці;
  3. код операції;
  4. норма часу штучно-калькуляційного;
  5. розцінка часу штучно-калькуляційного.

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

Процедура VYVID_Z_DYSKA. Призначення - читання вхідних даних з дискового файлу OPER.DAT та вивід їх на дисплей. Процедура викликається з головного меню програми при виборі пункту Вивід файлу на дисплей (функціональна клавіша F5). П?/p>