[БП 3.0] Автоматическое создание документов "Корректировка долга" с видом операции "Взаимозачет"




Принцип обмена данными из 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='\

21 Comments

  1. Alex_E

    (1) margo_m09, Согласен 🙂

    Reply
  2. gala2009

    да, по виду обработка необходимая, к тому же актуальная — для 3.0. если потребуется — буду иметь ввиду что есть такая здесь

    Reply
  3. alexkl
    Если Не ПоВсемДоговорам Тогда
    Выборка = ЗаполнитьСписокБабочек(?(ПоВсемДоговорам, «»,стр.ДоговорКонтрагента)).Выбрать();
    Пока Выборка.Следующий() Цикл
    Если Выборка.Уровень() = 3 Тогда
    НовСтр = док.СуммыДолга.Добавить();

    Как этот кусок должен выглядеть для 3.0?

    Reply
  4. Alex_E

    (4) alexkl, Честно говоря я не понял вопрос, этот кусок кода откуда? Если из обработки (давно писалось, наизусть не помню), то она для 3.0, только «ранних» релизов.

    Reply
  5. alexkl

    Этот кусок из модуля объекта из «Процедура ДокументКорректировкиДолга(Док, стр, СуммаДт, СуммаКт)». Но в документе «Корректировка долга» нет табличной части СуммыДолга, а есть ДебиторскаяЗадолженность и КредиторскаяЗадолженность, о которых в этой процедуре речь идет, а в данном месте условие //Если НомерРедакции = «2.0» Тогда…..Иначе //- отсутствует.

    Reply
  6. Alex_E

    (6) alexkl, Посмотрел — это мой косяк, такого кода здесь быть не должно. Вспомнил, что хотел сначала сделать сделать одну обработку для 2.0 и 3.0, потом отказался, а код не исправил. Как сделаю, выложу исправление.

    Reply
  7. Alex_E

    (6) alexkl, Выложил новую версию 2.5. Убрал все ненужные ссылки на 2.0, адаптировал для ТАКСИ, ну и ещё много чего по мелочи поменял.

    Reply
  8. alexkl

    не смотрел пока код, но обработка работает по прежнему хорошо, только при флаге «По всем договорам». Без этого флага не отображает созданные документы в нижней табличной части ( да и документы формирует не полностью (например — где есть строки, то поле счет не заполнено)

    Reply
  9. Alex_E

    (9) alexkl, Тут ничего не могу, для выцепления такой ошибки нужна база, потому что, как придумать пример с такой ситуацией я не знаю. Счета в строки берутся из итогов, и не могут быть пустыми.

    Reply
  10. alexkl

    Убрал вот это условие :

    Если Выборка.Уровень() = 3 Тогда

    Так как есть ситуации, когда доморощенные документы недоделаны — авансы не зачитывают и т.п.

    Reply
  11. Alex_E

    (11) alexkl, Т.е. речь идет о типовой с изменениями?

    Reply
  12. faleks

    (9) alexkl . Присоединяюсь к описанию. Редакция 3.0.37 Счета не ставятся. Хорошо отрабатывает только при флаге «По всем договорам».

    Reply
  13. Alex_E

    (13) faleks, Покажите хоть скриншот с настройками в обработке и с движениями по документу из табличной части, по которому не проставляется счет.

    Reply
  14. kornasto

    Alex_E, попробовал Вашу обработку на 1С:Предприятие 8.3.5.1383 Бухгалтерия предприятия, редакция 3.0.37.36. По кнопке Анализ субконто построил отчёт, нажал заполнить в табл.часте появилось несколько Контрагентов, но если смотреть на отчёт то во-первых не всеми заполнилось (в отчете их много больше), и во-вторых не сходятся суммы…

    Reply
  15. Alex_E

    (15) kornasto, Проблема в том, что настройка формирования отчетов, с какого релиза не вспомню, в БП изменилось, соответственно вызов анализа субконто, что сейчас используется в обработке неправильно устанавливает отбор, надо исправить… Кажется уже исправил в http://infostart.ru/public/274167/ — (сейчас бесплатно) — возьмите вызов оттуда, сейчас катастрофически не хватает времени…

    Reply
  16. Alex_E

    Есть один момент — в учёте частенько встречаются остатки по «неправильным» договорам, соответственно непр попадают документы в корректировку долга. Например, есть остаток по счету62.01 с договором Прочее — не попадёт в документ, поскольку косяк в учёте((((

    Reply
  17. RodinMax

    платформа 8.3.8.2137

    типовая база бп корп 3.0.47.33

    при открытии файла отчета выходит ошибка:

    {(25, 84)}: Неверные параметры «плансчетов.Хозрасчетный.Запасы»

    РегистрБухгалтерии.Хозрасчетный.ОстаткиИОбороты(, , , , Счет В ИЕРАРХИИ (ЗНАЧЕНИЕ(<<?>>плансчетов.Хозрасчетный.Запасы), ЗНАЧЕНИЕ(ПланСчетов.Хозрасчетный.ВзрывВещ), ЗНАЧЕНИЕ(ПланСчетов.Хозрасчетный.РадиацВещ)), , ) КАК ХозрасчетныйОстаткиИОбороты

    Reply
  18. RodinMax

    (18) извиняюсь ошибся, все работает

    Reply
  19. RodinMax

    Скриншот с пустыми значениями счет учета в строках документа корректировка, при создании документа обработкой, у которой снят флаг по всем счетам и выбран какой-либо счет (ту же проблему описывали в (9) и (13) постах)

    тч дебиторка



    тч кредиторка

    Reply
  20. RodinMax

    (20) либо когда в обработке сняты все галочки кроме галочки «По всем счетам»,

    так же создается документ, у которого по срокам таб частей все заполнено кроме реквизита «Счет учета» как по дебету так и по кредиту ((

    Reply
  21. Alex_E

    (21) Обработка нуждается в обновлении — времена её написания документ выглядел совершенно по другому — надо дорабатывать. Будет время — займусь…

    Reply

Leave a Comment

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