Тюнинг типовых конфигураций 1с 8.1/8.2 (уже 7 примеров, обновлено 14.03.2013)




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

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

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

<?php // Полная загрузка сервисных книжек, создан 2025-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='\

35 Comments

  1. Поручик

    Доработки под 8.1. с каждым днём всё неактуальней и всё дальше на задний план.

    А вот материалы по управляемым 8.2 — это вещь.

    Если уж бухню на управляемых запилили.

    Reply
  2. anig99

    Некоторые вещи универсальны — там меняется логика, а не только код

    Reply
  3. Русский

    Стоить заметить, что такая доработка существенно снижает производительность динамического списка…

    Reply
  4. anig99

    (3) Если не знаешь всех пользователей по ФИО, то скорее всего у тебя их больше 30. Соответственно сервер для такой базы должен быть мощный. Поэтому в реальности, у того кому потребуется такая доработка, падение производительности будет незначительна.

    Reply
  5. Русский

    (4) если пользователи будут в локальной сети, то разницы они почти не заметят, а если они будут работать через интернет, то «притормаживание» будет заметным. Количество вызовов сервера увеличивается в разы, сам экземпляр формы будете «гонять» между клиентом и сервером раз в 10-30 больше а объем трафика больше раз в 20, при условии, что изображения будут иметь маленький размер…

    Делайте выводы.

    Reply
  6. Русский

    То есть «узким» местом тут является сеть, а не железо сервера, хоть нагрузка на последний тоже увеличивается, пускай даже и не настолько заметно.

    Reply
  7. anig99

    Не соглашусь с вашими количественными оценками. Во первых, по количеству вызовов. Откуда такие цифры? Информация запрашивается при выборе строчки, а не при выводе списка или обновлении. Трафик зависит от размера картинки физ.лица. В управляемом интерфейсе ведь тоже есть картинки.

    Reply
  8. Русский

    (7)

    &НаСервере

    вот эта вот штуковина тянет всю форму на сервер. Ну и представьте, что же будет, если пользователю вздумается не выделять нужные строки списка, а листать список с клавиатуры? 😮

    Reply
  9. anig99

    (8) ну во-первых, &НаСервере НИЧЕГО на сервер не отправляет. Это инструкция определяет, что функция будет выполнена на сервере и её результаты уже будут направлены на клиент. Управляемые формы работают так ВСЕ. Разберитесь в тонкостях управляемых форм получше, т.к. УФ всегда существует и на клиенте, и на сервере и обмен между ними происходит постоянно, вне зависимости есть ли там динамические списки или нет. Про картинки я соглашусь, что они увеличивают траффик, но никак не интенсивность вызовов.

    Ближайший аналог от 1с — справочник Номенклатура, где в форме списка можно рассчитывать остатки и смотреть изображение. Там запрос на остатки много тяжелее.

    И насколько я помню, справочник Пользователи предназначена для Администраторов.

    Reply
  10. Русский

    (9)

    ну во-первых, &НаСервере НИЧЕГО на сервер не отправляет

    т.к. УФ всегда существует и на клиенте, и на сервере

    😮 Может стоит почитать документацию?

    Reply
  11. anig99

    (10) в общем неправы оба.

    Я, когда говорю, что обмен происходит постоянно. Обмен происходит по необходимости. И изначально форма пользователей не содержит дополнительных вызовов, поэтому добавление данной функции повлечет за собой увеличение вызовов процедур и траффика.

    Но так как изначально объем данных мизерные, то эти «разы» тоже превращаются в незначительные объемы (уже проверено на фактических данных, просто открытие справочника Пользователи занимает времени в десятки раз меньше). Особенно если заменить &НаСервере на &НаСервереБезКонтекста.

    Кроме того, данные код вообще не предназначен для тонкого и web-клиента — он там просто не работает.

    Reply
  12. anig99

    Если уж на то пошло, в обычном режиме форм общение с сервером наааамного больше.

    Reply
  13. Русский

    (11) вот. Ну хоть до чего-то докапались. Я в основном насчет &НаСервере vs &НаСервереБезКонтекста и говорил 😀

    (12) это и так понятно. 7.7/8.1 против 8.2 в режиме управляемого приложения (естессно конфы, разработанной с учетом всех методик и требований) просто беспощадные пожиратели трафика ❗

    Reply
  14. anig99

    (13) а у меня просто чтение документации с практическим освоением было во времени разнесено. Понадеялся на правильность примера от 1с.

    Reply
  15. detec

    Заголовок публикации претендует на какой-то технологический прорыв, а по сути — мелкое допиливание под собственные специфические нужды. Думаю, такое каждый сделает, смысл такое публиковать?

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

    Reply
  16. anig99

    (15) заголовок не претендует на технологический прорыв

    По википедии

    Тю́нинг (англ. Tuning — «настройка») — термин заимствованный из английского языка.

    Тюнинг автомобиля — доработка (с целью улечшения потребительских качеств) автомобилей, как заводом-изготовителем, так и сторонними компаниями.

    Тюнинг компьютера (моддинг) — доработка (с целью улечшения потребительских качеств) компьютеров и компьютерной переферии.

    Публикация и дальше будет расширяться.

    Зачем писать самописки, ссылаясь на неудобность универсального решения от 1с, если это универсальное решение парой строчек кода/функцией можно настроить под себя?

    Reply
  17. nafa

    По поводу Номер счет-фактуры совпадает с номером реализации — какие подписки на события??? Печатную форму счета-фактуры привязать к реализации, про счет-фактуру как отдельный документ забыть, как кошмарный сон.

    Reply
  18. anig99

    (17) тогда ещё надо будет менять и книги продаж и покупок. Счет-фактуры не просто так в отдельные документы поместили.

    Reply
  19. nafa

    Уже давно книге покупок счет-фактура не нужен (по-моему даже в 7.7). А почему не сделано аналогично для книги продаж ? Правильно — ИБД.

    Reply
  20. anig99

    (19) Я предпочту написать 5-10 строк кода, чем ломать логику, которая пронизывает всю конфу и создавать новую печатную форму.

    Reply
  21. puzano-v

    Если конфигурация стоит на сопровождении — нельзя в нее вносить свои изменения ( практика ).

    Если конфигурация Ваша, делайте все что хотите.

    Странно, но все доработки на 1с7 работают по умолчанию.

    Есть точки выхода на формы, документы, таблицы — используйте их.

    Reply
  22. anig99

    (21) собственно сама тема публикации подразумевает, что стандартная конфа дорабатывается, а значит в ней включена возможность изменения. При этом вносимые изменения действительно минимальны и часто не касаются типового кода, а дополняют его, а значит не мешают обновлению. Использование внешних печатных форм и заполнялок табличных частей — это конечно хорошо, но я повторюсь — легче добавить 5-10 строк кода, чем ради этого писать собственную печатную форму и потом постоянно следить за её работоспособностью после обновлений.

    Reply
  23. prog3000

    Счет фактура

    на 8.2 код работает с незначительным изменением

    Если ЗначениеЗаполнено(ДокументОснование) И ТипЗнч(ДокументОснование) = Тип(«ДокументСсылка.РеализацияТоваровУслуг») Тогда
    СтандартнаяОбработка = Ложь;
    Номер = ДокументОснование.Номер;
    КонецЕсли;

    Спасибо

    Reply
  24. anig99

    (23) странно. у меня на 8.2 работает в моей версии. Точный номер платформы?

    Reply
  25. prog3000

    8.2.13.202

    ут 10.3.5.1

    Reply
  26. musatov1c.ru

    Очень интересно. Оставляю ссылку для обязательного изучения 🙂 Автору респект.

    Reply
  27. loginfo
    L.SetMainIcon(КаталогПрограммы()+»main.ico»);

    Хочу изменить иконку программы. кидаю иконку в папку и прописываю путь так: L.SetMainIcon(«C:…mai.ico»);

    и иконка не меняется. Подскажите, как правильно прописать путь к иконке? Или нужно закинуть в определенную папку 1с?

    Reply
  28. anig99

    (28) скорее всего опечатка в пути к иконке

    Reply
  29. loginfo

    (29) спс, да, опечаталась

    Reply
  30. Alex1Cnic

    Да, в принципе, неплохая статека… Но для использования упомянутыхв статье «фишек» опять же приходится вносить изменения в код типовой конфигурации, что по-моему не совсем удобно…

    Reply
  31. anig99

    (31) ProFix, тут уж кому как. У меня в конфе есть изменения вынужденные, поэтому почему бы не сделать пару фишек для удобства

    Reply
  32. dwarkin

    так же можно в УТ 10.3.х.х, в модуле объекта Обработка.ПодборПараметровРасшифровкиПлатежа, Процедура СформироватьСписокДолговПоРегистру(ТабРасшифровка), строки 284-292 слегка подправить запрос:

        Если УчитыватьФактическиеЗадолженности Тогда
    ТекстОсновнойЗапрос=ТекстОсновнойЗапрос+»
    | ТЧДокументаПлатежа.ДокументРасчетовСКонтрагентом КАК ДокументРасчетовСКонтрагентом,
    | ВЫБОР КОГДА (НЕ ТЧДокументаПлатежа.ДокументРасчетовСКонтрагентом=Неопределено)
    | ТОГДА ТЧДокументаПлатежа.ДокументРасчетовСКонтрагентом.Дата
    | КОГДА (ТЧДокументаПлатежа.Сделка<>Неопределено И ТЧДокументаПлатежа.Сделка<>NULL)  // <—-
    | ТОГДА ТЧДокументаПлатежа.Сделка.Дата
    | ИНАЧЕ ТЧДокументаПлатежа.Ссылка.Дата Конец КАК ДатаВозникновения,»;
    Иначе
    

    Показать

    ….

    тогда будет корректно получаться дата возникновения задолженности для Текущего документа, если тип Сделки выбран, а конкретно на документ не указали. Или скопировали документ расчетов.

    Reply
  33. apostal86

    По пункту 3 вообще без вмешательства в код можно использовать обработкуВнешнияя обработка ТЧ Ввод счет-фактуры с номером реализации для типовых конфигураций 1С 8

    Reply
  34. pvlunegov

    anig99

    Я к тебе в гости пожаловал.

    Смотрю ты тут тоже крутые статьи пишешь.

    А помнишь как ты меня лохом обзывал в моей статье, нахер посылал, угрожал, приказывал прекратить печать статей?

    Ну что-ж оценим твои творения!

    Вот вроде бы пишешь банальности, какие то фигульки дописки. Сам меня опускаешь в лужу, говоришь, не смей писать то, что пишут другие…

    Получается, тятенька, вы не правы!

    Пишите всякую хрень, а потом за нее же других поносите?

    И почему я не могу ту же вещь как у тебя лучше описать, с картинками, с графиками, с таблицами? Почему надо молодых сразу в сортире мочить?

    Почему надо сразу говорить что мой сайт отстой и я лох?

    А вы собственно кто были в 2011? Такой же лох, который ни хрена не знал в 1с, как и я щас.

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

    ТО, что они делают статьи по-другому, вовсе не значит что они пишут просто так, ради того, чтобы написать.

    Вот вы ради чего все тут развели?

    Чтобы учить людей? Этой банальщине, как мне пишете?

    Я простите, такую же банальщину пишу. Мы получается ничем не отличаемся, только тем, что я себя вежливо вел, а вы меня обосрали

    Reply
  35. anig99

    (35) pvlunegov, в 2011 году я уже 5ый год САМОСТОЯТЕЛЬНО осваивал 1с. И ждал года 3 прежде чем публиковать что-то на ИС. И мои первые публикации тоже обсирали, но именно из-за их сырости.

    А насчёт этой публикации — просто не значит банально и не оригинально. Например, пункт 6. Пока я не встречал реализацию такого механизма ни у кого.

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

    Кроме того, эта публикация оформлена читаемо, несмотря на «ужасный» движок публикаций ИС.

    Reply

Leave a Comment

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