Добрый вечер. Возможно кто то имел опыт работы с компонентой для 1С ,"Сова". Компонента используется для получения данных из программы "НомерОК".В идеале нужна документация или хотя бы примеры получения данных из базы номерка посредством компоненты.
Добрвый день. Такой вопрос, возможно ли установить отбор в форме списка по одном реквизиту но нескольких значений. Пример: отбор по реквизиту "наименование" , значения Петров, Сидоров, Иванов.
Добрый день, подскажите пожалуйста каким образом можно получить строку такого типа "Документ.НазваниеДокумента" или "Справочник.НазваниеСправочника" для подальшего использование в блоке "ИЗ" моего запроса. Пытался получить через метаданные и ТипЗнч(), получал только "Название" объекта, сам объект не известен.
Цитата(VolandMaster @ 18.11.15, 13:58)
Добрый день, подскажите пожалуйста каким образом можно получить строку такого типа "Документ.НазваниеДокумента" или "Справочник.НазваниеСправочника" для подальшего использование в блоке "ИЗ" моего запроса. Пытался получить через метаданные и ТипЗнч(), получал только "Название" объекта, сам объект не известен.
Доброго времени суток уважаемые форумчане! Подскажите пожалуйста способы интеграции между УНФ и интернет-магазином на 7 друпале. Перед этим у меня был проект в котором осуществлял передачу данных посредством ODBC драйвера и передайчей SQL запросов через FTP.
Доброго времени суток уважаемые пользователи. Возникла необходимость средствами 1С получить данные из каталога eCar, подскажите пожалуйста как лучше это сделать.
Доброго утра=) По не известной причине ,возможно после обновления платформы 1С начала крашится при таких действиях: 1.Делаю в конфигураторе любые изменения; 2.Ставлю точку останова в любом месте; 3.Обновляю изменения; Сразу же выскакивает такая ошибка приложения 1cv8.exe, версия 8.3.5.1119, модуль dbgbase.dll, версия 8.3.5.1119, адрес 0x0000324b, при это сделаные изменения пропадают. Подскажите что с этим можно сделать.
+1. Если это обычное приложение, то вероятно в ее тексте есть что-то типа сообщения пользователю, поэтому и ошибка метод не обнаружен, он внутри той процедуры.
Понятно ,я сейчас попытаюсь самостоятельно отловить. Не понимаю логики, почему процедура не доступна на сервере если у неё есть код исполняймый на клиенте, я предпологал что ошибка должна вылетать в том месте где проблемный код, вместо этого вся процедура не доступана.
Процедура ЗагрузитьПрайсЛист(ПолнаяЗамена=Истина) Экспорт #Если Клиент Тогда Если ЭтоНовый() Тогда Ответ = Вопрос("Элемент еще не записан, загрузка не возможена. Записать элемент?", РежимДиалогаВопрос.ДаНет); Если Ответ = КодВозвратаДиалога.Да Тогда Попытка Записать(); Исключение Возврат; КонецПопытки; Иначе Возврат; КонецЕсли; КонецЕсли; #КонецЕсли ЕстьЗаполненныеПоля = Ложь; Для Каждого ПолеЗагрузки Из СтруктураФайлаПрайсЛиста Цикл Если обЗначениеНеЗаполнено(ПолеЗагрузки.ИмяПоляФайла) Тогда Продолжить; КонецЕсли; ЕстьЗаполненныеПоля = Истина; Прервать; КонецЦикла; Если ((Не ЕстьЗаполненныеПоля) и (ФайлИсточникДанных<>Перечисления.ИсточникЗагрузкиПрайса.Обработка)) Тогда // если поля не заполнены продолжать не имеет смысла #Если Клиент Тогда Предупреждение("Ни одно поле таблицы не заполнено!",обПраво("ТаймаутДиалогов",глПрава)); #КонецЕсли Возврат; КонецЕсли;
//Получим набор записей регистра сведений РегистрПрайсЛистов=РегистрыСведений.ПрайсЛистыКонтрагентов.СоздатьНаборЗаписей(); РегистрПрайсЛистов.Отбор.ПрайсЛист.Значение=Ссылка; РегистрПрайсЛистов.Отбор.ПрайсЛист.Использование=Истина;
Если ПолнаяЗамена Тогда РегистрПрайсЛистов.Записать(); Иначе РегистрПрайсЛистов.Прочитать(); КонецЕсли;
ТЗПрайсЛиста=РегистрПрайсЛистов.Выгрузить();
РезультатЗагрузки=Истина;
Если ФайлИсточникДанных=Перечисления.ИсточникЗагрузкиПрайса.Файл Тогда //Грузим Exсel ТипФайла=ВРег(Прав(СокрЛП(СтрокаПодключения),4)); Если ТипФайла=".XLS" ИЛИ ТипФайла="XLSX" ИЛИ ТипФайла=".CSV" Тогда РезультатЗагрузки=ПрочитатьEXCEL(ТЗПрайсЛиста); ИначеЕсли ТипФайла=".TXT" Тогда РезультатЗагрузки=ПрочитатьTXT(ТЗПрайсЛиста); Иначе #Если Клиент Тогда Сообщить("Недопустимый тип файла."); Возврат; #КонецЕсли КонецЕсли; ИначеЕсли ФайлИсточникДанных=Перечисления.ИсточникЗагрузкиПрайса.ИсточникДанных Тогда //Грузим из ADO РезультатЗагрузки=ПрочитатьADO(ТЗПрайсЛиста); Иначе #Если Клиент Тогда Форма=ПолучитьФорму("Обработка."+СокрЛП(СтрокаПодключения)+".Форма"); Форма.ПрайсЛистДляЗагрузки=ЭтотОбъект.Ссылка; Форма.СрокПоставки=СрокПоставкиПоУмолчанию; Форма.Открыть(); #КонецЕсли Возврат; КонецЕсли;
спУдалить = Новый СписокЗначений; Для Каждого СтрПрайс Из ТЗПрайсЛиста Цикл Если ПустаяСтрока(СтрПрайс.Артикул) Тогда Попытка СтрПрайс.Артикул=Лев(СтрПрайс.Наименование,15)+Прав(Строка(Новый УникальныйИдентификатор()),10); Исключение спУдалить.Добавить(СтрПрайс); КонецПопытки; КонецЕсли;
КонецЦикла; //Иначе СтрПрайс.Артикул = АртикулДляПоиска(СтрПрайс.Артикул); Для Каждого удЭлем Из спУдалить Цикл ТЗПрайсЛиста.Удалить(удЭлем.Значение); КонецЦикла;
ЗафиксироватьТранзакцию(); НачатьТранзакцию();
Если РезультатЗагрузки<>Неопределено И РезультатЗагрузки Тогда НаборЗаписейПрайсЛиста=РегистрыСведений.ПрайсЛистыКонтрагентов.СоздатьНаборЗаписей();
Если НаборЗаписейПрайсЛиста.Количество()=1 Тогда ТекущаяЗапись = НаборЗаписейПрайсЛиста[0]; ЗаполнитьЗначенияСвойств(ТекущаяЗапись,СтрРез); Попытка НаборЗаписейПрайсЛиста.Записать();
Исключение #Если Клиент Тогда Сообщить("Ошибка записи строки прайс-листа: "+ОписаниеОшибки()); #КонецЕсли КонецПопытки; Иначе НовРег = РегистрыСведений.ПрайсЛистыКонтрагентов.СоздатьМенеджерЗаписи(); ЗаполнитьЗначенияСвойств(НовРег,СтрРез); НовРег.Записать(); КонецЕсли;
сч=сч+1; Если сч%1000=0 Тогда ЗафиксироватьТранзакцию(); #Если Клиент Тогда Состояние("Записано в регистр: "+сч); #КонецЕсли НачатьТранзакцию(); КонецЕсли;
КонецЦикла;
Иначе #Если Клиент Тогда Сообщить("Ошибка при загрузке прайс-листа"); #КонецЕсли ОтменитьТранзакцию(); Возврат; КонецЕсли;
Доброго времени суток. Есть фоновое задание ,отрабатывается в общом модуле, оно вызывает процедуру из модуля объекта справочника, на клиенте процедуру видит,на сервере выдает ошибку,помогите разобратся!
Я вижу только верхний уровень, не знаю как спуститься на нижний.
Цитата(Домовик @ 29.04.14, 10:40)
задача в принципе типичная. зачем тогда ДеревоЗначений в системе, если по нему нельзя ориентироваться.
значит, решение должно быть в восьмерке.
В этом я не сомневаюсь)
Процедура ОбойтиУровеньДерева(Строки) Для каждого Строка из Строки Цикл //что-то делаем со строкой, например: Сообщить(Строка.ИмяСуществующегоВСтрокеРеквизита); ОбойтиУровеньДерева(Строка.Строки); КонецЦикла; КонецПроцедуры
//Вызываем перебор так: Дерево = Новый ДеревоЗначений; Запрос = Новый Запрос; Запрос.Текст="ВЫБРАТЬ |Ном.Ссылка как ссылка |ИЗ | Справочник.Номенклатура КАК Ном |ИТОГИ ПО |Ном.Ссылка ТОЛЬКО ИЕРАРХИЯ"; Дерево = Запрос.Выполнить().Выгрузить(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией); // перебор дерева значений ОбойтиУровеньДерева(Дерево.Строки);
Нашел нужный пример, спасибо все кто пытался помочь!
На форме в таб части деревозначений, при удалении элемента в дереве, мне нужно удалить из регистра все строки которые отвечают элементам вышестощим и нижестоящим относительно удаленногго элемента в дереве, вышестоящие элементы можно определить по родителю, не получается определить элементы которые стоят ниже.
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!