Фрагмент комп’ютерної програми “Аналіз виконання плану виробництва зерна мовою “Бейсик”

10 REM

20 DIM SN* (5), SN (5,3)

30 CLS

40 LPRINT TAB (20) ; “А Н А Л И З”

50 LPRINT TAB (9) ; « ВЫПОЛНЕНИЯ ПЛАНА ПРОИЗВОДСТВА ЗЕРНА»

60 GOSUB 600

70 LPRINT “Культуры | Площадь, га | Валовой сбор,| Откло-| Урожайность| Отклонения (+,--)

“

80 LPRINT | центнеров | нение | c 1 га, ц | ва счет, ц “

90 LPRINT “ |-----------------|-------------------|(+ --) ц|-------------------|----------------------

“

100 LPRINT | | | | | | ||||

“

110 GOSUB 600

120 DATA

130 FOR I=0 TO 5

140 READ SN (1)

150 NEXT I

160 DATA 800, 700, 3200, 28700

170 DATA 200, 180, 4000, 3240

…………

210 FOR I=0 TO 4

220 FOR J=0 TO 3

230 READ SD (I, J)

240 NEXT I

250 NEXT J

260 REM «Расчет отклонений»

270 FOR I=0 TO 4

280 SD (1,4) =SD (1,3) – SD (1,2)

290 SD (1,5) = SD (1,2)/SD (1,0)

…………

330 NEXT I

340 FOR J=0 TO 8

350 FOR I=0 TO 4

360 IF J>3 THEN 370 ELSE 430

370 ON J- 3 GOTO 380,390,400,410,420

380 SD (5,4) =SD (5,3)-SD (5,2): GOTO 440

390 SD (5,5) =SD (5,2)/SD (5,0): GOTO 440

…………..

430 SD (5,J)=SD (5,J)+SD (I,J)

440 NEXT I

450 NEXT J

460 FOR I=0 TO 5

470 IF I=5 THEN GOSUB 600

480 LPRINT USING “\ \”SN5(1);

490 FOR J=0 TO 8

500 ON J+1 GOTO 510,510,510,510,530,550,550,530,530

510 LPRINT USING “__________”; SD (I,J); LPRINT “ “;

520 GOTO 560

530 LPRINT USING “_________”; SD (I,J); LPRINT “ “;

540 GOTO 560

550 LPRINT USING “___________”; SD (I,J); LPRINT “ “;

560 NEXT J

570 LPRINT “ “

580 NEXT I

590 GOSUB 600: STOP

600 LPRINT _____________

610RETUR

В умовах інтегрованого опрацювання інформації вихідними даними для аналізу можуть бути показники річних планів і звітів, які щорічно заздалегідь вводяться в ЕОМ при їх одержанні. За ці­єї умови технологічний процес аналізу на комп'ютері здійснює­ться як діалог, при якому фахівець, котрий займається аналітич­ними розрахунками, викликає із пам'яті машини програму ана­лізу, яка надходить у розпорядження системи ведення бази да­них. Після цього аналітичні результати видаються у вигляді пе­редбачених програмою вихідних машинограм за замовленням користувача на екран дисплея або на друк.

Аналітична машинограма містить весь обсяг інформації, пере­дбачений алгоритмом і програмою. Ця інформація може бути ви­користана як безпосередньо з машинограми, так і з допомогою додаткового групування її в окремі аналітичні таблиці залежно від завдань управління виробництвом.

Вхідна машинограма складається із трьох розділів: назва задачі, вихідні дані для аналізу і розрахункова частина (аналітична інформація).

Враховуючи те, що по одній програмі можна розв’язувати задачі рівні за сукупністю показників, що аналізуються, з різною базою порівнянь, назви задач доцільно максимально уніфікувати. Наприклад, назва задачі по аналізу виробництва продукції може включати такі пункти:

1. Задача 01 – Аналіз виробництва продукції сільського господарства.

2. Машинограма 01.1 – Виконання виробничої програми.

3. Об’єднання – Київське.

4. Підприємство – ВАТ “Бориспільський”.

5. Підрозділ підприємства – В цілому по господарству.

6. Галузь – рослинництво.

7. Період – за 2002 рік.

8. Порівняння: “базис” – планові дані, “аналіз” – звітні дані.

Ефективність автоматизації опрацювання даних при економічному аналізі за допомогою ЕОМ полягає в тому, що економісти та інші фахівці одержують можливість звільнитися від виконання численних і трудомістких розрахунків, тобто від технічної, так званої “рутинної” роботи; розширити коло аналітичної інформації та скоротити строки її одержання для потреб управління; більш глибоко і всебічно усвідомити аналітичну інформацію, сформулювати висновки і розробити пропозиції щодо поліпшення роботи підприємства.