<?php // Полная загрузка сервисных книжек, создан 2024-01-05 12:44:55
global $wpdb2;
global $failure;
global $file_hist;
///// echo '<H2><b>Старт загрузки</b></H2><br>';
$failure=FALSE;
//подключаемся к базе
$wpdb2 = include_once 'connection.php'; ; // подключаемся к MySQL
// если не удалось подключиться, и нужно оборвать PHP с сообщением об этой ошибке
if (!empty($wpdb2->error))
{
///// echo '<H2><b>Ошибка подключения к БД, завершение.</b></H2><br>';
$failure=TRUE;
wp_die( $wpdb2->error );
}
$m_size_file=0;
$m_mtime_file=0;
$m_comment='';
/////проверка существования файлов выгрузки из 1С
////файл выгрузки сервисных книжек
$file_hist = ABSPATH.'/_1c_alfa_exchange/AA_hist.csv';
if (!file_exists($file_hist))
{
///// echo '<H2><b>Файл обмена с сервисными книжками не существует.</b></H2><br>';
$m_comment='Файл обмена с сервисными книжками не существует';
$failure=TRUE;
}
/////инициируем таблицу лога
/////если не существует файла то возврат и ничего не делаем
if ($failure){
///включает защиту от SQL инъекций и данные можно передавать как есть, например: $_GET['foo']
///// echo '<H2><b>Попытка вставить запись в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>$m_comment));
wp_die();
///// echo '<H2><b>Возврат в начало.</b></H2><br>';
return $failure;
}
/////проверка лога загрузки, что бы не загружать тоже самое
$masiv_data_file=stat($file_hist); ////передаем в массив свойство файла
$m_size_file=$masiv_data_file[7]; ////получаем размер файла
$m_mtime_file=$masiv_data_file[9]; ////получаем дату модификации файла
////создаем запрос на получение последней удачной загрузки
////выбираем по штампу времени создания (редактирования) файла загрузки AA_hist.csv, $m_mtime_file
///// echo '<H2><b>Размер файла: '.$m_size_file.'</b></H2><br>';
///// echo '<H2><b>Штамп времени файла: '.$m_mtime_file.'</b></H2><br>';
///// echo '<H2><b>Формирование запроса на выборку из лога</b></H2><br>';
////препарируем запрос
$text_zaprosa=$wpdb2->prepare("SELECT * FROM `vin_logs` WHERE `last_mtime_upload` = %s", $m_mtime_file);
$results=$wpdb2->get_results($text_zaprosa);
if ($results)
{ foreach ( $results as $r)
{
////если штамп времени и размер файла совпадают, возврат
if (($r->last_mtime_upload==$m_mtime_file) && ($r->last_size_upload==$m_size_file))
{////echo '<H2><b>Возврат в начало, т.к. найдена запись в логе.</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>'Загрузка отменена, новых данных нет, т.к. найдена запись в логе.'));
wp_die();
return $failure;
}
}
}
////если данные новые, пишем в лог запись о начале загрузки
/////echo '<H2><b>Попытка вставить запись о начале загрузки в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>0, 'last_size_upload'=>$m_size_file, 'comment'=>'Начало загрузки'));
////очищаем таблицу
$clear_tbl_zap=$wpdb2->prepare("TRUNCATE TABLE %s", 'vin_history');
$clear_tbl_zap_repl=str_replace("'","`",$clear_tbl_zap);
$results=$wpdb2->query($clear_tbl_zap_repl);
///// echo '<H2><b>Очистка таблицы сервисных книжек</b></H2><br>';
if (empty($results))
{
///// echo '<H2><b>Ошибка очистки таблицы книжек, завершение.</b></H2><br>';
//// если очистка не удалась, возврат
$failure=TRUE;
wp_die();
return $failure;
}
////загружаем данные
$table='vin_history'; // Имя таблицы для импорта
//$file_hist Имя CSV файла, откуда берется информация // (путь от корня web-сервера)
$delim=';'; // Разделитель полей в CSV файле
$enclosed='"'; // Кавычки для содержимого полей
$escaped='\
Компания «Гранд» всех отправляет в 1С франча «Интерсофт», а те продают свою обработку за 5000 рублей.
Свою версию отдаю бесплатно 😀
❗ P.S. В обработке были использованны функции найденные на инфостарт. Как говорится, взял — положи на место. 😉
❗ P.S.S. Кому понравится поставте плюсы.
+, пусть живет б/п софт, да обанкротятся франчайзи
вот бы еще афтар какой-нито файлик выложил бы
Вопросы, на которые недавно ответили
Вопрос: (29-11-2009) [Нарочно не придумаешь]
Поставил Вашу программу дома и на работе. Соответственно дома, при загрузке компьютера, когда ключ отсутствует, выходит сообщение что ключ не найден. Нужно нажать ОК. Как от этого избавится, на работу не влияет, раздражает просто. На ноутбуке тоже самое.
Автор: Андрей Витальевич
Ответ:
Необходимо установить электронный ключ.
Достовалов Андрей
файлика так и нет, однако, —
Искренне извиняюсь, бес попутал и файлик не выложил. Исправился. Скачивайте — пользуйтесь.
Вот только в описании нумер версии гранда добавить. А то их много уже стало 😎
то 7, разве форма м-29 различается?
Вопрос! А можно выложить образец заполненного файла *.xls, из которого обработка берет номенклатуру, а то у меня 1С в цикл попадает… Заранее спасибо!
всетаки хотелось увидеть бы образец файлика сметы, ибо обработка уходит в бесконечный цикл…
(9) (10) «образец» формы М-29 для жаждущих 😀
в разных версиях (4 и 5) гранд-сметы формы одинаковые.
вот только для бухгалтерии 2.0 придется править обработку из-за отсутствия налогового плана счетов и соответствующих тонкостей…
Стоит ждать версию обработки для 2.0 ? Или самому править …
Стоит ждать версию для 2.0 ?
спасибо, видимо, править)
(11) (12) (13) (14) Придется править самостоятельно. Я не работаю больше с тем заказчиком, для которого писал.