ЗиК: Формирование налоговой карточки 1-НДФЛ без пустых




Принцип обмена данными из 1С с сайтом (на MySQL) и выдачи (публикации) этих данных по запросу.
PHP-Скрипт автоматической загрузки данных из файла данных в формате CSV в базу данных сайта работающего на WordPress.

В продолжение моей темы: 1С:Альфа-Авто Автосалон Автосервис: обмен с сайтом.
С помощью данного скрипта можно загружать в автоматическом режиме, по расписанию, данные сервисных книжек (ремонтов авто) из 1С:Альфа-Авто Автосалон Автосервис.
Также можно загружать данные в ручном режиме: для этого делается скрытая страница, где размещается специальная кнопка.
Комментарии размещенные внутри скрипта разъяснят логику и порядок действия.
Комментарии с "/////    echo" использовались для отладки.
Дополнительно создана таблица для журналирования результатов загрузки данных.
Скрипт включает в себя защиту от SQL инъекций (думаю безопасность соблюдена в полной мере).
В кратце:
1. Пишется скрипт, который запускает этот.
2. Создается регламентное задание в WordPress, по которому запускается скрипт из п.1. 
3. Этот скрипт осуществляет проверку на существование файла обмена в папке.
4. Если данные не новые, загрузка не производится.
5. Если данные новые, очищается таблица сервисных книжек.
6. Загружаются новые данные.

Собственно сам скрипт:

<?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='\

22 Comments

  1. TKENA13071962

    Здорово!Молодец!

    Reply
  2. alekseev

    Полезная штука.Особенно с нашими 1287-ю сотрудниками!

    Reply
  3. Stell

    Спасибо)) Все для Вас…

    Reply
  4. slp

    Недавно как раз по такому поводу заморачивалась на одном предприятии. Здарово, что есть уже готовое решение! Спасибо!

    Reply
  5. 1cadmin07

    Ставлю плюс !!!!!!!!!!!!

    Reply
  6. Stell

    Приятно)))

    Reply
  7. alex-nn

    Обработка нужная, но выдает ошибку…

    Может надо что то поправить?

    Раздел3НК.Область(Имя).Текст = ?(ТипЗначения(Зн)=1,Формат(Зн,»Ч015.2.»),Зн);

    Reply
  8. AS108

    Удобно, плюсую.

    Reply
  9. Stell

    2 alex-nn

    Да, изменился релиз ЗиК и теперь отчет барахлит. Выйду из отпуска — поправлю.

    Reply
  10. lizi

    Спасибо!!! Вы меня спасли. Мне надо сформировать в короткие сроки , сохранить в Excel отчеты 2006-2008г. по 7 базам с общей численностью около 14000 чел.

    Reply
  11. Stell

    Пожалуйста) Кстати, если есть необходимость выгружать большие файлы в Excel то рекомендую использовать вот это: http://infostart.ru/projects/1753/

    Reply
  12. анфиска

    Полезная штука, спасибо.

    Reply
  13. olen_ka

    Спасибо, пригодилось )))

    Reply
  14. lumb

    с 293 релиза выдает ошибку

    Раздел3НК.Область(Имя).Текст = ?(ТипЗначения(Зн)=1,Формат(Зн,»Ч015.2.»),Зн);

    {\NDFL1.ERT(301)}: Значение не представляет агрегатный объект (Текст)

    а обработка полезная.

    Reply
  15. Stell

    Внесла изменения. Теперь работает и на 293 релизе.

    Reply
  16. lumb

    Спасибо вам 😉

    Reply
  17. Stell

    Рада если есть польза)

    Reply
  18. Reveng

    а как поставить? помогите плиз 😮

    Reply
  19. Stell

    Ставить в программу не нужно — это внешний отчет. Просто откройте его в окне 1С через меню «файл-открыть» и используйте.

    Данная версия файла для 292 релиза ЗиК.

    Вечером выложу для 294 релиза.

    Reply
  20. Stell

    Обновила до 294 релиза ЗиК

    Reply
  21. Mellown

    а в чем там заморочка с релизами?

    Reply
  22. post279

    Спасибо

    Reply

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *