<?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='\
в принципе хорошо а как на счет варианта для ТиС а то только в типовой пашет
а может без папок, а через реквизит в договоре, ну или у контрагента
А может просто анализ счета на дату, без привязки к дням запаса и добавить документы по которым надо платить
У меня обработка выдает ошибку, хотя и в том и другом случае неоплаченные долги есть на 60.1-сч:
1. в «типовой конфигурации», если поставить «запас дней»>0:
Ит.ВыполнитьЗапрос(ВЫбНачПериода, ВыбКонПериода, «60.1»,,, 1,, «С»);
{G:! ОТЧЕТЫ-77! ПЛАТЕЖНЫЕ ПОРУЧЕНИЯ. АВТОМАТИЧЕСКОЕ ФОРМИРОВАНИЕПЛАТЕЖКИ.ERT(227)}: Неправильно задан период!
2. в «доработанной конфигурации»:
глПлатежныеРеквизиты(БанковскийСчет, СтрОрганизация, СтрБанк, РасчСчет, БИК, КоррСчет, <<?>>, , 2);
{G:! ОТЧЕТЫ-77! ПЛАТЕЖНЫЕ ПОРУЧЕНИЯ. АВТОМАТИЧЕСКОЕ ФОРМИРОВАНИЕПЛАТЕЖКИ.ERT(361)}: Слишком много фактических параметров
глПлатежныеРеквизиты(БанковскийСчет, СтрОрганизация, СтрБанк, РасчСчет, БИК, КоррСчет, <<?>>, , 2);
{G:! ОТЧЕТЫ-77! ПЛАТЕЖНЫЕ ПОРУЧЕНИЯ. АВТОМАТИЧЕСКОЕ ФОРМИРОВАНИЕПЛАТЕЖКИ.ERT(361)}: Ожидается выражение
глПлатежныеРеквизиты(БанковскийСчет, СтрОрганизация, СтрБанк, РасчСчет, БИК, КоррСчет, ,<<?>> , 2);
{G:! ОТЧЕТЫ-77! ПЛАТЕЖНЫЕ ПОРУЧЕНИЯ. АВТОМАТИЧЕСКОЕ ФОРМИРОВАНИЕПЛАТЕЖКИ.ERT(361)}: Ожидается выражение
Минус За то что
1 надо переделывать справочник контрагентов , а если их 5 тысяч или срок оплаты поменялся.
2 без переделки справочника ни один поставщик не попадает в таблицу, хотя если делать анализ счета 60.1 то долгов аж на 3 ляма
2 у поставщика может быть несколько документов на оплату и если надо оплатить по конкретному документу тогда как
noblekey
По Справочнику Контрагентов:
Во-первых, при распределении Контрагентов по группам справочника именно таким образом достигается наглядность в работе бухгалтера с отнесением Поставщика по срокам оплаты по основному договору поставки. Этот договор, обычно, заключается сроком на 1 год. И в случае поступления нового договора на подпись руководителю он оперативно ( не входя в карточку Контрагента или Договоры) видит действующие сроки оплаты. Это удобно. Если меняется срок оплаты, то Контрагент переносится с другую группу. А попробуй открыть 5 тысяч карточек Контрагентов.
Во-вторых, я намеренно не шел путем добавления новых реквизитов или изменением типовой конфигурации. Вы это можете сделать самостоятельно на своих рабочих местах, если необходимо.
В-третьих, открой глаза перед тем как «минусовать». Обработка формирует платежные поручения ИМЕННО по накладным поступления. Если необходимо оплатить по конкретному документу, то возьми и сформируй глазками (Анализ счета по субконто) и ручками в этой же обработке поставь цифирь в столбце «сумма».
gutentag
Сечас поправлю и сообщу.
gutentag
Поправил. Выложил. Пользуйтесь.
По первому пункту, бухгалтерии более важно знать на основании какого документа производить оплату, а сроки оплаты в принципе не так существенны т.к. Бухгалтерия не решает куда платить а только формирует список возможных платежей а после директор указывает бухгалтеру куда платить и по какому документу. Бухгалтер сделал платежки и произвел оплату этим же днем.
А по поводу обработки, Идея хорошая но если бы при анализе платежей просто делался анализ 60.1 счета на конкретную дату и в таблицу значений выводились не только контрагенты но и документы по каждому из них, без всякой привязки к дням запаса, то и справочник Контрагентов не надо было бы перелопачивать по дням
noblekey
Чуть позже отпишусь ответом
noblekey
По порядку.
Согласен и не согласен.
Сроки оплаты определяются документами Поставки и непосредственно связаны с этими документами. Сроки оплаты также связаны с условиями оплаты по договору поставки (в большинстве случаев Товар отпускается на консигнацию). Необходимость оплаты в срок и ВАЖНОСТЬ выдерживания сроков оплаты определяется прекращением поставок Товара со стороны Поставщика, не получившего в срок деньги .
Где это Вы видели, что Бухгалтерия не решает КУДА платить? Противоречите себе. При формировании платежных поручений Бухгалтерия как раз-таки решает КУДА платить. И при наличии денежных средств Руководитель однозначно принимает решение: ПЛАТИТЬ. А при нехватке этих средств совместно с бухгалтером (опять же) решает вопрос «СКОЛЬКО ПЛАТИТЬ И КУДА ПЛАТИТЬ», другими словами задерживает платежи.
По вопросу Анализа счета 60.1 на конкретную дату…. Это стандартный отчет «Анализ счета по субконто». В качестве Вида Субконто1 выберите Контрагента и смотрите документы.
Данная обработка решает задачу автоматического формирования платежных поручений для множества Контрагентов, имеющих разные сроки оплаты по договорам поставки.
Для себя вижу лишь смысл дать дополнительный отчет по Накладным, подлежащим оплате при автоматическом формировании платежных поручений.
Мои аргументы кроме сказанного: эту обработку делал для себя, являясь директором продовольственного магазина. Этой обработкой с успехом пользуется бухгалтер, подготавливая платежные поручения. С успехом пользуюсь сам в отсутствии Бухгалтера. Оперативно контролирую оплаты поставщикам. Весь процесс занимает 5 минут в день. Я даже не задумываюсь о сроках оплаты, лишь только контролирую верность распределения Контрагентов по «группам оплаты». И мне достаточно для этого бегло посмотреть на сформированную именно таким образом структуру каталога Контрагентов.
Нареканий Поставщиков за 3 месяца работы автоматического формирования платежных поручений не было. А вот ошибки бухгалтера были сразу выявлены. Ей оказывалось проще более настойчивым поставщикам загонять деньги на Р/С, что бы её не дергали звонками с напоминаниями об оплате.
Вот так-то.
Возможно Вы правы, но для меня Ваша обработка не подходит так как
1 нашей бухгалтерии вообще сроки по барабану, так как работаем по предоплате
2 справочник перелапачивать никто не будет и не зачем, исходя из первого пункта
3 при нынешнем справочнике, при анализе платежей из обработки в ТЗ не попадает ни одного контрагента
ну и как следствие был поставлен минус
noblekey
Жаль. Если эта обработка Вам не нужна, то это же не значит, что она плохая.
Оцените объективно Код программы, реализованную идею, поставленную задачу и результат ее выполнения. Думаю при таком подходе я бы учел Ваш «-«. А так, спасибо всем, добавившим «+» в рейтинг.
noblekey. Поставив минус, Вы поступили не очень правильно. Т.к. если рассуждать как Вы, то из-за того что обработка/отчет не подходит для меня, то мне придется поставить 99-ти процентам программ минус.
>ЭКОНОМИЯ рабочего времени — 6 ЧАСОВ В ДЕНЬ!
6 часов для 50 платежек? 🙂
http://infostart.ru/projects/2406/ (не сочтите за рекламу, я никого не упрашиваю плюсовать…).
Ваша обработка подходит не для всех. В этом все дело.
Для тех, кому нужен простой пакетный ввод платежек по тмц, можете использовать вот эту:
Мне обработка тоже не нужна. С какого перепуга я должен ставить минус? Может мне не нужна, а 10-20 человек она поможет в работе?
(16) Мне вот, например, с инфостарта НИКАКИЕ обработки не нужны (кроме formex — строить и жить помогает), так что мне теперь — всем минуса впаять? И как ты с такой логикой проггером работаешь?
(0) Ребята, хотите идею подскажу? Как было сделано у меня давным давно…
Был заведен документ ПоручениеНаПлатеж с Контрагентом (кому), суммой, текстом платежа и т.п. Документы эти заводил финотдел (и, кажись, отдел снабжения). Обработка за период (обычно за день) собирала все эти предполагаемые платежи в печатную форму, кою несли финдиректору. По тем позициям, по которым он подписывал платеж (а не любяяяяяяят финдиректора платежи подписывать) проводился соответствующий документ. Потом уж другая обработка чекала проведенные документы ПоручениеНаПлатеж и на основании их хряпала платежки. Очень даже удобно было 😉
Abadonna
Это правильно. Интересней было бы узнать по какому критерию она собирала данные?
Посмотри на печатную форму. Практически Вся та же информация, кроме назначения платежа. Конечно многое зависит от организации работы внутри самой организации.
У себя решаю просто: бухгалтер подготавливает платежи в бюджет , за малоценку, за основные ср-ва и т.д. , смотрит на остаток ден. знаков в банке (Клиент-Банк). Далее бухгалтер смотрит ЭТУ обработку, формируя платежки поставщикам товара и согласовывает со мной (как с руководителем). Бюрократии нет. Поднимая ЭТОТ отчет я в 2 минуты принимаю решение.
Плюсы: Оперативность. Контроль. Простота в алгоритме работы бухгалтера и руководителя. И самое важное, заболей или уйди в отпуск Бухгалтер, эту не сложную работу сделает любой сотр. Бухгалтерии, даже и я сам.
А советы … Тут видишь как рубают идеи минусами.
Кстати, сходу не получилось запустить:(
ТЗ.Заполнить(0,,,»НадоУдалить»);
{C:\_CHE_MONEYSHED_LITE.ERT(90)}: Номер за пределами значения!
Извиняюсь, предыдущий пост к другому топику
Извиняюсь 🙂
Случайно получилось, ткнул не туда
Спасибо. Реальная экономия времени
Пожалуйста!
Судя по описанию обработка хороша. А для 8.2 такой нет?