Формы КС-2 и КС-3




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

36 Comments

  1. alfanika

    Хорошая работа. Плюс.

    Reply
  2. freya-j

    БухИт.ВыполнитьЗапрос(‘01.01.1980’,ПозицияПередДок,»62.1″,»90.1″,,2,»Операция»,1);

    {C:PROGRAM FILES1CТСГБУХEXTFORMSPRNFORMSКС-3.ERT(26)}: Неправильно задан период!

    ????

    Reply
  3. pavelakaev

    (2) Исправлено. Ошибка возникала при не сохраненном документе

    Reply
  4. АллаБух

    однозначно плюс. Молодцы!!!

    Reply
  5. svetic

    Очень нужная. Давно искала. А для типового документа «Выполнение этапа работ» можно сделать КС-3?

    Reply
  6. marmelad24.81@mail.ru

    Очень и интересно.Давно хотела эти документы для 1С

    Reply
  7. lexsa

    неплохо.Для «выполнения этапа работ» можно сделать,то на http://www.infostart.ru/projects/78/ платные формы

    Reply
  8. kolikd1

    для кс 2 :Сформировать<<?>>()ь Процедура не обнаружена (Сформировать)

    для кс 3 :глПереписатьИзТаблицыВТаблицу<<?>>(ВремТЗ,ТабРабот);

    {D:DISTRФОРМЫ 1СКС-3.ERT(47)}: Процедура не обнаружена (глПереписатьИзТаблицыВТаблицу)

    глПереписатьИзТаблицыВТаблицу<<?>>(ВремТЗ,ТабРабот);

    {D:DISTRФОРМЫ 1СКС-3.ERT(57)}: Процедура не обнаружена (глПереписатьИзТаблицыВТаблицу)

    Reply
  9. kolikd1

    как исправить?

    Reply
  10. pavelakaev

    (9) Да все верно, я забыл напомнить, это ВНЕШНЯЯ ПЕЧАТНАЯ форма для типовой 1С бухгалтерии 77.

    Напомню на всякий случай. Внешние печатные формы регистрируются следующим образом в типовых семерках.

    Файлы печатных форм кладутся в ПутьКПапкеСБазойExtFormsPrnForms

    далее в режиме 1С предприятия заходим в меню «сервис -> регистрация внешних печатных форм», выбираем «документ» «оказание услуг» далее кнопкой «изменить» выбираем подпункт «внести в список» и в окне находим названия наших печатных форм (кс-2 и кс-3) и обе добавляем в список доступных форм для Оказания услуг.

    Reply
  11. Buhgalter

    (8) Подтверждаю: Ошибка!

    Не работает форма

    Reply
  12. лори

    Спасибо. очень хорошие формы!!!!

    Reply
  13. TLOLESYA

    а для 1с 8 есть?

    Reply
  14. pavelakaev

    Специально по пожеланиям (11) и (8) и для всех тех кто качает и плюсует добавил функцию авторегистрации при открытии через пункт «файл — открыть» в 1С. Теперь форму можно подключить просто открыв ее как внешнюю обработку, спасибо вам за комменты.

    Напомню (8) форма предназначена для 1С бухгалтерии, а не для УСН.

    Reply
  15. lebelena

    Спасибо +

    Reply
  16. gaca

    Спасибо +

    Reply
  17. piotr

    Классно реализованно 🙂

    Reply
  18. 1452

    ОткрытьФорму(«Отчет», Параметры, глКаталогПечФорм+ТаблицаПечФорм.ПолучитьЗначение(НомерТекущейФормы,»Файл»));

    {Документ.ОказаниеУслуг.Форма.Модуль(467)}:

    Ошибка создания внешнего отчета \User1Account1SBDBExtFormsPrnFormsКС-2(2).ert

    Как исправить?

    Заранее спасибо.

    Reply
  19. pavelakaev

    (18) Хмм.. да вроде нет ошибок. Совет простой, попробуйте заново формы установить. Распакуйте файлы куда нибудь и в 1С предприятии нажмите «файл — открыть», выберете каждый из этих файлов, программа предложит их подключить. Должно работать. Удачи

    Reply
  20. 1452

    Огромное спасибо!!

    Очень облегчает и ускоряет работу!!

    Reply
  21. wolfdmv

    ЦенаБезНДС = СуммаБезНДС / Количество;

    {\SERVERБУХГАЛТЕРИЯБУХГАЛТЕРИЯEXTFORMSPRNFORMSКС-2.ERT(21)}: Деление на 0

    Вот нашел!

    Reply
  22. pavelakaev

    (21) Ну а как же без количества то в документе, ну поставьте хотя бы 1, ошибкой же это не будет.

    А так спасибо за коммент, добавлю чтобы при нулевом количестве тоже считало.

    Reply
  23. alex4x

    для 8рочной бухгалтерии есть КС2 и КС3 ?

    Reply
  24. yakuninsp

    Спасибо. Дельная штука. А есть возможность сделать тоже самое для «Выполнения этапа работ»? Или я чего-то не понимаю.

    Reply
  25. asvic

    а для 8-и таки формы есть?

    Reply
  26. morpod

    спасибо

    Reply
  27. airat-nv

    Сэкономил время. Блогадарю.

    Reply
  28. Маруся

    супер!

    огромное спасибо

    Reply
  29. анфиска

    Хреново, что форма не редактируется в печатном виде. Если заказчик и инвестор разные организации??? н

    Reply
  30. pavelakaev

    (29) 💡 дело то не хитрое поправить, меню «таблица» — «только просмотр»

    снимаем его и правим на здоровье

    универсальность хороша до тех пор пока начинает мешать простоте

    Reply
  31. анфиска

    (30) Что-то я наверное не увидела редактирование печатной формы, ну это ерунда, потом посмортю. Плохо, что инвестора и заказчика разделить нельзя и объект обработка выбирает тот же что и договор, а они то разные. Я всего лишь бухгалтер и высказываю пожелания. Мне бы хотелось чтоб была возможность выбора. Желаю вам успехов на этом поприще.

    Reply
  32. panreg

    Огромное спасибо и за все пояснения тоже++++

    Быстро все встало и облегчило работу!

    Reply
  33. wumka

    Спасибо.

    Reply
  34. Pashok

    Спасибо. Нашёл что надо.

    Reply
  35. LOM2006

    Большое спасибо. Работает.

    Reply
  36. annagolinskaya

    Спасибо!

    Reply

Leave a Comment

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