<?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='\
Я бы еще добавил фильтр множественный по номенклатуре, для типовой позволит разбить на разных поставщиков, да и вообще удобно. По складу для остатков тоже нужен, чтобы исключить брак, неликвиды.
Для номенклатуры, по которой нулевые остатки и нет заявок, но минимальный остаток задан можно предусмотреть включение в заказ.
Учитываются ли при расчете товары, ожидаемые к поставке до даты отгрузки и являющиеся «свободными» ???
Я делаю проще: на «фиктивного» поставщика формирую «штатный» заказ поставщику — т.е. за меня здесь «трудится» штатный алгоритм 1С ТиС 9.2, а вот уже сформированный заказ поставщику я использую просто как источник разбиения «по поставщикам» (или по иному признаку…). Нагло пиарить не буду себя — но у мну в профиле выкладывается подробное описание «прайс-аналита».
(1) добавление МФ в систему заказов поставщику и так усугубит для юзверей и без того не сильно прозрачную схему работы с заказами — фиг ты потомдобъещься от юзверя признания какой он такой МФ построил, что умудрился прошляпить заказ на 1000 позиций… чем меньше юзвери будуь колупаться в заказах поставщикам — тем лучше для системы в целом…
(2)
Нет, не учитываются. Если имеются свободные ожидаемые к поставке товары, то они должны быть зарезервированы при проведении заявки от покупателя.
Если они в тот момент не зарезервировались, то нет гарантии, что они достанутся конкретному покупателю после поступления.
(1)
> Для номенклатуры, по которой нулевые остатки и нет заявок, но минимальный
> остаток задан можно предусмотреть включение в заказ.
Если этот товар был, но сейчас его ноль, значит была заявка от покупателя. В тот момент этот товар и был в заказе.
Встраивать в код что-то дополнительное по рассматриваемому вопросу не вижу необходимости.
(1,4)
По поводу фильтров. Сейчас фильтров нет, потому что так хотел заказчег. Прикрутить фильтры было в планах. Если будет обоснованный спрос, то фильтры будут.
Ну что скажешь? — как всегда весьма добротно.
я не соображаю совершенно, но подскажите, плиз: будет ли эта самая обработка работать в 1с: 8 Бухгалтерия или тока для 7-ки ТиС годится?
(9)
Нет, не будет. Обработка только для 7-ки и только для ТиС…
вопрос:
ошибается в ТИС 7.7 9.2
Док.Договор.ВалютаВзаиморасчетов,Док.ДатаДок,<<?>>Док.Кратность);
{Обработка.ЗаявкаПоставщику.Форма.Модуль(254)}: Слишком много фактических параметров
??? плиз как поправить? что не так?
(11)
Reel, ты используешь ранний релиз ТиС.
Чтобы исправить, нужно либо обновить конфигурацию, либо убрать лишний фактический параметр из обработки.
А КАК ЭТО РАБОТАЕТ?
(13) Возможно, как написано в описании?
я убрала из кода «Док.Курс» и «ВалютаВзаиморасчетов» в куске «Иначе
СуммаВзаиморасчетовДок = Док.Итог(«Сумма»)
+?(Док.СуммаВклНП =1,0,Док.Итог(«СуммаНП» ))
+?(Док.СуммаВклНДС=1,0,Док.Итог(«СуммаНДС»));
Док.СуммаВзаиморасчетов = глПересчет(СуммаВзаиморасчетовДок,
Док.Валюта,Док.Курс,
Док.Договор.ВалютаВзаиморасчетов,Док.ДатаДок,Док.Кратность);»
и все заработало.Видно курс перегружает.
вот что получилось для таких как я))
Все отлично