![]() |
Модераторы: stron |
![]() ![]() ![]() |
|
AlexFIG |
|
|||
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 1.6.2007 Репутация: нет Всего: нет |
Здравствуйте уважаемые коллеги!
Существует проблема с регламентными заданиями. Организован обмен между БД. Если делаю обмен вручную все идет гладко: номер принятого = номеру загруженного, т.е. базы скинули сообщения на ftp и разобрали для загрузки нужные. Описание проблемы с регламентными заданиями: Настраиваю обмен при помощи регламентных заданий: 1. Регламентное задание "Выгрузка" (В определенное время например в 21.00) 2. Регл. задание "Загрузка" (23.30) (Разности во времени вполне хватает чтобы выгрузить файлы всем базам). Иногда проходит обмен хорошо. Номер отпр. = номеру принятого. А в большинстве случаев глюки. Например: Состояние1 БД : НО =1, НП = 1; После регламентного задания "Выгрузка" Состояние 2 БД: НО=25, НП =1; - Это что то я никак не могу понять. Настройки регламентого задания: Выполнять: c 1 января 2009 г. каждый день; с 23:00:00 каждые 86400 сек., повторять после завершения через 86400 сек. Я решил отследить выполнение данного регламентного задания "Выгрузка", выставил значения, сижу жду. Действия регл. задания: Стартовало по расписанию, выполнилось, опять стартовало. Что за бред. Ведь оно должно было выполниться один раз. Помогите уважаемые коллеги решить эту проблему. За советы и ответы премного благодарен. PS: В ручном режиме выгрузка/загрузка все Ок. Это сообщение отредактировал(а) AlexFIG - 26.8.2009, 08:32 |
|||
|
||||
SaschaL |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 880 Регистрация: 13.12.2006 Где: Челябинская обл г .Нязепетровcк Репутация: 8 Всего: 9 |
Платформа какая 7.7 или 8?
|
|||
|
||||
AlexFIG |
|
|||
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 1.6.2007 Репутация: нет Всего: нет |
Пардон.
1С:Предприятие 8.1 (8.1.14.72) |
|||
|
||||
AkelaSQL |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 392 Регистрация: 14.9.2007 Где: Москва Репутация: 6 Всего: 7 |
Откуда в 7.7 регламентные задания? Их там не существует в природе. |
|||
|
||||
AlexFIG |
|
|||
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 1.6.2007 Репутация: нет Всего: нет |
Чего то все молчат...
![]() |
|||
|
||||
AlexFIG |
|
|||
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 1.6.2007 Репутация: нет Всего: нет |
Комрады, что делать ??? Настройки разные перепробовал регламентных заданий.
|
|||
|
||||
Zero |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 2169 Регистрация: 23.10.2004 Где: Россия, г. Рязань Репутация: 15 Всего: 24 |
1. Возьми/купи книгу М.Г. Радченко "1с:Предприятие 8.1. Практическое пособие разработчика". Там на простом примере показана реализация механизма регламентных заданий. Далее проработай его и сделай аналогично у себя. В начале на интервале неск. минут с выводом простых сообщений, а как получится, прикрутишь процедуры выгрузки/загрузки. 2. Если неполучится, можешь заменить на механизм с использованием процедуры "Обработка ожидания" 3. Ещё для большей надёжности добавь использование флагов, т.е. по умолчанию какойто признак будет иметь значение ноль, а после выгрузки/загрузки данных переходит в состояние один. |
|||
|
||||
AlexFIG |
|
|||
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 1.6.2007 Репутация: нет Всего: нет |
п.1 прошел уже давно.
Конечно можно использовать флаги и обработка ожидания, но ведь предполагается что регл. задания и без них справяться. |
|||
|
||||
Zero |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 2169 Регистрация: 23.10.2004 Где: Россия, г. Рязань Репутация: 15 Всего: 24 |
||||
|
||||
Itsys |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1338 Регистрация: 21.1.2008 Где: г. Москва Репутация: 7 Всего: 34 |
AlexFIG, Модуль задания и скрины настроек в студию....
Добавлено через 9 минут и 55 секунд Да, кстати, вариант работы клиент-сервер/файл-сервер? |
|||
|
||||
AlexFIG |
|
|||
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 1.6.2007 Репутация: нет Всего: нет |
Процедура регл. задания:
Процедура ВыполнитьВыгрузку() Экспорт ВыборкаУзлов = ПланыОбмена.УдаленныеОфисы.Выбрать(); Пока ВыборкаУзлов.Следующий() Цикл Если ВыборкаУзлов.Ссылка <> ПланыОбмена.УдаленныеОфисы.ЭтотУзел() Тогда УзелОбъект = ВыборкаУзлов.ПолучитьОбъект(); УзелОбъект.ЗаписатьСообщениеСИзменениями(); КонецЕсли; КонецЦикла; КонецПроцедуры //Процедура выгрузки плана обмена Процедура ЗаписатьСообщениеСИзменениями() Экспорт Сообщить("-------- Выгрузка в узел " + Строка(ЭтотОбъект) + " ------------"); //Каталог = ПланыОбмена.УдаленныеОфисы.ЭтотУзел().ПапкаОбмена; // Формируем имя временного файла ИмяФайла = КаталогВременныхФайлов() + ?(Прав(КаталогВременныхФайлов(), 1) = "\", "", "\") + "Message" + СокрЛП(ПланыОбмена.УдаленныеОфисы.ЭтотУзел().Код) + "_" + СокрЛП(Ссылка.Код) + ".xml"; // Создаем объект записи XML ЗаписьXML = Новый ЗаписьXML; ЗаписьXML.ОткрытьФайл(ИмяФайла); ЗаписьXML.ЗаписатьОбъявлениеXML(); // Создаем новое сообщение ЗаписьСообщения = ПланыОбмена.СоздатьЗаписьСообщения(); ЗаписьСообщения.НачатьЗапись(ЗаписьXML, Ссылка); Сообщить(" Номер сообщения: " + ЗаписьСообщения.НомерСообщения); // Получаем выборку изменённых данных ВыборкаИзменений = ПланыОбмена.ВыбратьИзменения(ЗаписьСообщения.Получатель, ЗаписьСообщения.НомерСообщения); //Состояние("Выгрузка файла"); Пока ВыборкаИзменений.Следующий() Цикл // Записываем данные в сообщение ЗаписатьXML(ЗаписьXML, ВыборкаИзменений.Получить()); КонецЦикла; // Завершаем запись сообщения ЗаписьСообщения.ЗакончитьЗапись(); ЗаписьXML.Закрыть(); Сообщить("Формирование файла данных закончено", СтатусСообщения.Информация); //Заархивируем наш файл обмена Сообщить("Архивирование файла", СтатусСообщения.Информация); ПутьФайлаАрхива = КаталогВременныхФайлов() + "Message" + СокрЛП(ПланыОбмена.УдаленныеОфисы.ЭтотУзел().Код) + "_" + СокрЛП(Ссылка.Код) + ".zip"; Архив = Новый ЗаписьZipФайла(ПутьФайлаАрхива, , , МетодСжатияZIP.Сжатие, УровеньСжатияZIP.Максимальный); Архив.Добавить(ИмяФайла); Архив.Записать(); //Переместим наш файл на фтп: СоединениеFTP = Новый FTPСоединение(FTP, , "obmen", "0bmennik", ,); СоединениеFTP.Записать(ПутьФайлаАрхива, "Message" + СокрЛП(ПланыОбмена.УдаленныеОфисы.ЭтотУзел().Код) + "_" + СокрЛП(Ссылка.Код) + ".zip"); //Подчищаем за собой xml и архив на дисках УдалитьФайлы(ИмяФайла); УдалитьФайлы(ПутьФайлаАрхива); Сообщить("-------- Конец выгрузки------------"); КонецПроцедуры // ЗаписатьСообщениеСИзменениями() |
|||
|
||||
AlexFIG |
|
|||
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 1.6.2007 Репутация: нет Всего: нет |
Модули выложил, а смысл выкладывать скрины ? Пробовал по разному. |
|||
|
||||
![]() ![]() ![]() |
Правила форума "1C: Предприятие, SAP, ERP и учётные системы" | |
|
Запрещается! 1. Обсуждение крэков, кейгенов и других подобных программ Пробуйте искать сами или обращайтесь в приват к участникам форума. Темы с подобными вещами будут немедленно удаляться, а нарушители - получать предупреждения. Также запрещается обсуждение проблем работы этих программ (что куда вписать, куда что скопировать и т.п...) 2. Давать ссылки на взломанные продукты
|
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | 1C: Предприятие, SAP, ERP и учётные системы | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |