Учебная работа № 03294. «Диплом Автоматизация расчета заработной платы ТЦ «Звездочка»

Выдержка из похожей работы

рабочим }

for i:=1 to 3 do

for j:=1 to
kol_vo[i] do a[i,j,7]:=round(nkr*balls[i,j]);

{ Зарплата по КТУ
выпл,ИТР }

for j:=1 to
kol_vo[i] do a[4,j,7]:=round(nki*balls[4,j]);

{ Итоговое
суммирование }

for i:=1 to 4 do

for j:=1 to
kol_vo[i] do begin

a[i,j,17]:=0;a[i,j,20]:=0;

for h:=3 to
5 do a[i,j,17]:=a[i,j,17]+a[i,j,h];

for h:=7 to
16 do a[i,j,17]:=a[i,j,17]+a[i,j,h];

for h:=17 to
19 do a[i,j,20]:=a[i,j,20]+a[i,j,h];

end;

end;

end.

Файл, отвечающий за вывод данных в выводные таблицы.

Unit4.pas

unit unit4;

interface

uses unit1;

procedure vivod;

implementation

procedure vivod ;

var i,j,h:integer;

begin

{Вывод в таблицу}

for i:=1 to 4 do
begin

str(i,s);assign(f,’vihod\’+s+’-‘+mw+’.txt’);rewrite(f);

s:=’Таблица
заработной платы по ‘ +s+’ участку на ‘+mes[n_mes]+’ месяц’;

writeln(f,s);

{Создание шапки
таблицы}

assign(f1,’vhod/shapka’);reset(f1);

for j:=1 to 6 do
begin readln(f1,z);writeln(f,z);end;close(f1);

for j:=1 to
kol_vo[i] do begin {Вывод данных в таблицу}

write(f,’|’);write(f,j:2);write(f,’|’);

write(f,fio[i,j]:16);write(f,’|’);

for h:=3 to 5
do begin write(f,a[i,j,h]:8);write(f,’|’);end;

str(round(balls[i,j]),s);write(f,s:8);write(f,’|’);

for h:=7 to
20 do begin write(f,a[i,j,h]:8);write(f,’|’);end;

write(f,j:2);writeln(f,’|’);

end;

close(f);

end;

{readln;}

end;

end.

Список
идентификаторов, используемых в программе:

n_mes -№
ìåñÿöà;

conv -ïåðåì.-êîíâåêòîð;

f,f1
-òåêñòîâûå;

z,s,mw:string;x,yl -äîïîëíèòåëüíûå
ïåðåìåííûå;

kol_d,tar_rab,
fzp,oc_m -Èñõîäíàÿ
èíôîðìàöèÿ;

kol_vo[1..4] -Êîëè÷åñòâî
ðàáîòíèêîâ
â ãðóïïå;

ktu[1..4,1..20] -ÊÒÓ;

fio[1..4,1..20] -Ôамилия, Èмя, Îчество работника;

a[1..4,1..20,3..20] -Âûõîäíàÿ
èíôîðìàöèÿ
èç òàáëèöû;

t:[1..4,1..20,1..7] -Òàðèô, îêëàä
è òàáåëü;

balls[1..4,1..20] of extended
-Áàëëû
ðàáîòíèêîâ;

br,bi -Ñóììы
áàëëîâ рабочих и ИТР;

i,j,g,h,c; -ïåðåìåííûå-ñ÷åò÷èêè;

nkr,nki,p,q -Íîðìàòèâíûå
êîýôôèöèåíòû,
Äîëÿ ÈÒÐ,Ïåðåì.-ñ÷åò÷èê;

fr,fi -Ñðåäñòâà
ðàñïðåä,ïî
ÊÒÓ ðàáî÷èì
è ÈÒÐ;

mes -наименование месецев;

Дополнительно:

Программа осуществляет построчный ввод из входных файлов, обрабатывает
их при помощи рабочих файлов, делая построчный вывод в выходные файлы,Для
функционирования программы используются форматные файлы,Максимальный объем
вводимой информации ограничен структурой таблицы,Помимо
основных, программа использует стандартные модули языка Delphi.

Инструкции
пользователя.

Создание входной информации:

Перед запуском программы необходимо создать соответствующие
входные файлы в директории VHOD на основе уже имеющихся файлов,При работе в Windows, пользователю
рекомендуется создавать их при помощи стандартного редактора Write (WordPad),Каждому участку в каждом месяце соответствует два файла,Формат
файлов должен строго соответствовать формату уже имеющихся файлов, сохраняя
структуру таблицы,Наименование файлов должно соответствовать следующим
стандартам:

-Имя первого файла: X-1-Y.txt , где X- номер участка, а
Y- номер месяца.

-Имя второго файла: X-2-Y.txt , где X- номер участка, а
Y- номер месяца.

Запуск программы:

Запуск программы осуществляется после запуска Windows или
эмулятора Windows 3.1 в случае использования OS/2 или MAC.
Запускающий файл- файл pr1.exe,После запуска программы перед пользователем
появляется ее интерфейс.

Пользование программой:

После успешного запуска пользователь задает параметры и
коэффициенты расчетов,После того, как соответствующие коэффициенты и параметры
определены, необходимо нажать клавишу Счет на интерфейсе
программы,Информация будет проанализирована и выведена в таблицы.

Просмотр выходной информации:

Выходные таблицы находятся в поддиректории VIHOD,Каждому
участку в каждом месяце соответствует определенный файл:

-Имя файла: X-1-Y.txt , где X- № участка, а Y- № месяца.

При работе в Windows,
пользователю рекомендуется
просматривать их при помощи стандартного редактора Write (WordPad), или Notepad.

Дополнительные операции:

Дополнительные операции над выходной информацией, как
печать выходных таблиц, перевод их в кодировку DOS и др., пользователю
рекомендуется проводить используя стандартные средства операционной системы или
оболочки.

«