zvit (663678), страница 3

Просмтор этого файла доступен только зарегистрированным пользователям. Но у нас супер быстрая регистрация: достаточно только электронной почты!

Текст из файла (страница 3)

Заповнення такої таблиці трудомісткий процес: одна людина витрачає на нього в середньому 25-30 годин, тобто це приблизно 3-4 дні безперервної клопіткої роботи. За умови автоматизації цього процесу за допомогою комп’ютерної техніки, створення такої таблиці займе приблизно 4-6 годин за умови введеної картотеки форм СП-5.

Реалізація.

Дане завдання я розділив на дві частини: створення картотеки періодичних видань і підтримання її в актуальному стані; формування сортувальної таблиці.

Мовою реалізації була вибрана мова Web-програмуваня PHP.

Перша частина програми складається з кількох модулів. Спочатку користувач вводить в Web-формі індекс потрібного видання; дані з форми попадають в скріпт, який перевіряє коректність введеного індексу (введений індекс порівнюється з індексами всіх передплатних видань України, для цього існує спеціальний електронний каталог видань в вигляді файлу бази даних), також, користувач заповнює виведену форму СП-5 для заданого видання. Після виконання цього скріпта керування передається іншому модулю: цей модуль вносить введені дані з Web-форми, створеної попереднім скріптом в файл бази даних (Data Base File).

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

ВИСНОВКИ

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

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

На основі аналізу існуючих апаратних та програмних засобів були виявленні недоліки побудови існуючого комплексу апаратно-програмних засобів та намічені шляхи виправлення даної ситуації.

Список використаної літератури:

1. Немет Э., Снайдер Г., Сибасс С., Хейн Т. Р., // Н50 UNIX: Руководство системного администратора. Для профессионалов / Пер. с англ. – СПб.: Питер; К.:Издательская група BHV, 2002. – 928 c.: ил.

2. Армстронг (мл.), Джеймс // А83 Секреты UNIX: 2-е изд.: Пер. с англ. – М.: Издательский дом «Вильямс», 2001. – 1072 с.: ил. – Парал. тит. англ.

3. Олифер В.Г., Олифер Н.А. "Компьютернне сети: технологии, протоколы. Учебник." - Питер, 2000 - 672 с.

4. Николайчук Я.М., Яцків В.В., Гринчишин Т.М. Перспективи створення телефонних ліній на основі відкритого оптичного каналу зв’язку // Вісник Технологічного університету Поділля. – 2002. Т2– №3. – С. 47 – 50.

Додаток 1. Скріпт перевірки правильності вводу індексу; вивід для заповнення форми СП-5.

echo "

Заголовок документа

";

//Перевірка на правильність вводу індексу

$type = $_GET['index'] + 10;

if ($type == 10) {

echo "Введено неправильний індекс.";

return;

}

$finding_counter = 0;

//відриваемо базу

$db = dbase_open ("C:\Apache2\htdocs\BD\Kpit.dbf", 0);

//кількість записів в базі

$records_counter = dbase_numrecords($db);

//Пошук по базі

for ($c=0; $c<$records_counter; $c++) {

$temp_record = dbase_get_record ($db,$c);

if ($temp_record[0] == $_GET['index']) {

$temp_record[1] = convert_cyr_string ($temp_record[1], d, w); //перекодування назви видання з ср866 в win-1251

$temp_record[1] = str_replace ('"', '\'', $temp_record[1]);

echo "
Індекс: "; echo $_GET['index'];

echo "
Видання: $temp_record[1]";

$finding_counter = 1;

}

if ($finding_counter == 1)

break;

}

if ($finding_counter == 0) {

echo "Видання з індексом "; echo $_GET['index']; echo " не знайдено.";

return;

}

$today = getdate();

echo "

Кількість комплектів:

  01    02    03    04    05    06     07    08    09    10    11    12

";

echo "

";

?>

Додаток 2. Скріпт переносу даних з Web-форми в файл бази даних.

$bd = dbase_open ("C:\\Apache2\\htdocs\\BD\\2004_Zl_SP1.DBF", 2);

$arr_to_bd[0] = $_GET['index'];

$arr_to_bd[1] = convert_cyr_string ($_GET['name'], w, a);

$arr_to_bd[2] = $_GET['amount'];

$arr_to_bd[3] = $_GET['01'];

$arr_to_bd[4] = $_GET['02'];

$arr_to_bd[5] = $_GET['03'];

$arr_to_bd[6] = $_GET['04'];

$arr_to_bd[7] = $_GET['05'];

$arr_to_bd[8] = $_GET['06'];

$arr_to_bd[9] = $_GET['07'];

$arr_to_bd[10] = $_GET['08'];

$arr_to_bd[11] = $_GET['09'];

$arr_to_bd[12] = $_GET['10'];

$arr_to_bd[13] = $_GET['11'];

$arr_to_bd[14] = $_GET['12'];

$arr_to_bd[15] = $_GET['smsp'];

$arr_to_bd[16] = $_GET['month'];

$arr_to_bd[17] = $_GET['year'];

//$records_counter = dbase_numrecords( $bd);

dbase_add_record ($bd, $arr_to_bd);

//dbase_replace_record ($bd, $arr_to_bd, $records_counter);

echo "
$temp";

echo "Запис добавлено.
";

dbase_close($bd);

echo " Ввести нову квитанцію. ";

?>

Додаток 3. Скріпт створення файлу бази даних сортувальної таблиці.

$bd_1 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_1_SP5.DBF", 0);

$bd_2 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_2_SP5.DBF", 0);

$bd_3 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_3_SP5.DBF", 0);

$bd_4 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_4_SP5.DBF", 0);

$bd_5 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_5_SP5.DBF", 0);

$bd_6 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_6_SP5.DBF", 0);

$bd_7 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_7_SP5.DBF", 0);

$bd_8 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_8_SP5.DBF", 0);

$bd_9 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_9_SP5.DBF", 0);

$bd_10 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_10_SP5.DBF", 0);

$bd_11 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_11_SP5.DBF", 0);

$bd_12 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_12_SP5.DBF", 0);

$bd_13 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_13_SP5.DBF", 0);

$bd_14 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_14_SP5.DBF", 0);

$bd_15 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_15_SP5.DBF", 0);

$bd_16 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_16_SP5.DBF", 0);

$bd_17 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_17_SP5.DBF", 0);

$bd_18 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_18_SP5.DBF", 0);

$bd_19 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_19_SP5.DBF", 0);

$bd_20 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_20_SP5.DBF", 0);

$bd_21 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_21_SP5.DBF", 0);

$bd_22 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_22_SP5.DBF", 0);

$bd_23 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_23_SP5.DBF", 0);

$bd_24 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_24_SP5.DBF", 0);

$bd_25 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_25_SP5.DBF", 0);

$bd_26 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_26_SP5.DBF", 0);

$bd_27 = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_27_SP5.DBF", 0);

$bd_Zl = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_Zl_SP5.DBF", 0);

$bd_ST = dbase_open("C:\\Apache2\\htdocs\\BD\\2004_04_ST.DBF", 2);

$records_counter = dbase_numrecords($bd_1);

//Внесення даних по ВЗ Б.К

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_1, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[2] = $temp_record_ST[2] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ Бібщани

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_2, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[3] = $temp_record_ST[3] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ Бортків

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_3, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[4] = $temp_record_ST[4] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ В.Вільшаниця

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_4, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[5] = $temp_record_ST[5] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ Вороняки

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_5, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[6] = $temp_record_ST[6] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ Глиняни

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_6, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[7] = $temp_record_ST[7] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ Гологори

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_7, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[8] = $temp_record_ST[8] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_8, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[9] = $temp_record_ST[9] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_9, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[10] = $temp_record_ST[10] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_10, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[11] = $temp_record_ST[11] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_11, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[12] = $temp_record_ST[12] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_12, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[13] = $temp_record_ST[13] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_13, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[14] = $temp_record_ST[14] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_14, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[15] = $temp_record_ST[15] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_15, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[16] = $temp_record_ST[16] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_16, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[17] = $temp_record_ST[17] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_17, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[18] = $temp_record_ST[18] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_18, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[19] = $temp_record_ST[19] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_19, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[20] = $temp_record_ST[20] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_20, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[21] = $temp_record_ST[21] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_21, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[22] = $temp_record_ST[22] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_22, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[23] = $temp_record_ST[23] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_23, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[24] = $temp_record_ST[24] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_24, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[25] = $temp_record_ST[25] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_25, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[26] = $temp_record_ST[26] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_26, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[27] = $temp_record_ST[27] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_27, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

for ($q=0;$q<=29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[28] = $temp_record_ST[28] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

//Внесення даних по ВЗ Золочів

$records_counter = dbase_numrecords($bd_Zl);

for ($i=1; $i<=$records_counter; $i++) {

$temp_record = dbase_get_record ($bd_Zl, $i);

$records_counter_ST = dbase_numrecords($bd_ST);

for ($e=1; $e<=$records_counter_ST; $e++) {

$temp_record_ST = dbase_get_record ($bd_ST, $e);

if ($temp_record[0] == $temp_record_ST[0]) {

$temp_rec[0] = $temp_record_ST[0];

$temp_rec[1] = $temp_record_ST[1];

for ($q=2;$q<29;$q++)

$temp_rec[$q] = $temp_record_ST[$q];

$temp_rec[29] = $temp_record_ST[29] + $temp_record[6];

dbase_replace_record ($bd_ST, $temp_rec, $e);

break;

}

}

}

dbase_close ($bd_1);

dbase_close ($bd_2);

dbase_close ($bd_3);

dbase_close ($bd_4);

dbase_close ($bd_5);

dbase_close ($bd_6);

dbase_close ($bd_7);

dbase_close ($bd_8);

dbase_close ($bd_9);

dbase_close ($bd_10);

dbase_close ($bd_11);

dbase_close ($bd_12);

dbase_close ($bd_13);

dbase_close ($bd_14);

dbase_close ($bd_15);

dbase_close ($bd_16);

dbase_close ($bd_17);

dbase_close ($bd_18);

dbase_close ($bd_19);

dbase_close ($bd_20);

dbase_close ($bd_21);

dbase_close ($bd_22);

dbase_close ($bd_23);

dbase_close ($bd_24);

dbase_close ($bd_25);

dbase_close ($bd_26);

dbase_close ($bd_27);

dbase_close ($bd_Zl);

dbase_close ($bd_ST);

?>

Додаток 4. Скріпт виводу сортувальної таблиці для друку.

$bd = dbase_open ("C:\\Apache2\\htdocs\\BD\\2004_04_ST.DBF", 0);

$rec_counter = dbase_numrecords ($bd);

echo "

";

echo "ІндексНазва виданняБ.КБібБорВ.ВВорГлнГолГончЄлЖукЗастКурКолНовПідгПлгПомПолПочРемзСасСквСлвСнвСтрЧерЯснЗол";

for ($i=1; $i<=$rec_counter; $i++) {

// if ($i==100) break;

$temp_record2 = dbase_get_record ($bd, $i);

if ($temp_record2[2] != 0) {

echo "

$temp_record2[0]";

echo "$temp_record2[1]";

for ($t=2; $t<29; $t++)

if ($temp_record2[$t] == 0)

echo "

 ";

else

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[3] != 0){

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[4] != 0){

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[5] != 0){

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[6] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[7] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[28]";}

else

if ($temp_record2[8] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[28]";}

else

if ($temp_record2[9] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[10] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[11] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[12] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[13] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[14] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[15] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[16] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[17] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[18] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[19] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[20] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[21] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[22] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[23] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[24] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[25] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[26] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[27] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[28] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

else

if ($temp_record2[29] != 0) {

echo "

$temp_record2[0]";

for ($t=1; $t<29; $t++)

echo "

$temp_record2[$t]";

echo "

$temp_record2[29]";}

}

echo "

";

dbase_close ($bd);

?>

41

Характеристики

Список файлов реферата