/ КОМПЬЮТЕРЫ И ПО / Языки программирования / 1С для программиста

Выпуск № 471
от 16.04.2007, 12:35

Вопрос № 81.895

Доброго времени суток. Подскажите как можно выгрузить определенную группу товара со справочника Товары. Желательно во внешней обработке. В базе присутствует много групп. Надо выбрать одну и выгрузить как подгруппы входящие в нее, так и все документы входящие в подруппы и эти группы. Пример Строительный отдел (группа) Компьютерный отдел (группа) --Мониторы (подруппа 1) --Сидирумы (подруппа 1) --Винчестеры (подруппа 1) ----Макстор (подгруппа 2) ----Сегейт (подгруппа 2) ------Сегайт барракуда 160 гб 16 метров кэш (товар) ----Прочее (подруппа 2) --Материнские платы (подруппа 1) Элекстроотдел (группа) Тоесть надо выгрузить все группы и весь товар и Компьютерный отдел. Спасибо.

Отправлен: 10.04.2007, 12:09 Вопрос задал: Аржаник Антон Николаевич (статус: 2-ой класс) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Elric Здравствуйте, Аржаник Антон Николаевич! Посмотрите пример в прикрепленом файле. Текст модуля приведен также в Приложении. Приложение: //******************************************* Процедура Сформировать() Если (ВыбГруппа.ЭтоГруппа()=0) Или (ВыбГруппа.Выбран()=0) Тогда Предупреждение("Некорректное значение группы товара!"); Возврат; КонецЕсли; Таб=СоздатьОбъект("Таблица"); Товар=ВыбГруппа; ТоварСтр=""+Товар+" (группа)"; Таб.ВывестиСекцию("Строка"); ШаблонПрефикса="----------"; УровеньВыбГруппа=ВыбГруппа.Уровень(); Спр=СоздатьОбъект("Справочник.ТМЦ"); Спр.ИспользоватьРодителя(ВыбГруппа); Спр.ВыбратьЭлементы(); Пока Спр.ПолучитьЭлемент()=1 Цикл Товар=Спр.ТекущийЭлемент(); Уровень=Товар.Уровень()-УровеньВыбГруппа+1; Префикс=Лев(ШаблонПрефикса,2*(Уровень-1)); Если Товар.ЭтоГруппа()=1 Тогда Суффикс="(подгруппа "+Уровень+")"; Иначе Суффикс="(товар)"; КонецЕсли; ТоварСтр=""+Префикс+" "+Товар+" "+Суффикс; Таб.ВывестиСекцию("Строка"); КонецЦикла; Таб.Опции(0,0,0,0); Таб.ТолькоПросмотр(1); Таб.Показать(); КонецПроцедуры Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа. --------- Мирный атом в КАЖДЫЙ дом!

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 10.04.2007, 16:02

Отвечает: Ovr1970 Здравствуйте, Аржаник Антон Николаевич! Непонятно, что у вас не получается. Теоретически, нужно создать обработку (можно внешнюю) в которой указать реквизит типа "Справочник.Товары", которым Вы выберите необходимую группу Дальше все выгрузите в плоскую таблицу (типа dbf или тестовый файл) описание каждого элемента справочника. Примерно такие поля КодГруппы(группа родитель), КОдЭлемента, НаименованиеЭлемента, Реквизит1 ... Выборка по отдельной группе выполняется так: ВыбГрп - это реквизит формы, определяющий группу элементов для выгрузки. Приложение: Спр=создатьОбъект("Справчоник.Товары"); Спр.ИспользоватьРодителя(ВыбГрп.ТекущийЭлемент()); Спр.ВыбратьЭлементы(); Пока Спр.ПолучитьЭлемент()=1 Цикл ... КонецЦикла

Ответ отправил: Ovr1970 (статус: Студент) Ответ отправлен: 11.04.2007, 13:01

Вопрос № 81.916

Подсказжите чем можно открать файлы с расширением ert Скачал библиотеки для Far поставил открываеся и появляется толи 2 папки толи 2 файла и они не открываются. Или может можно их подсоеденить к 1С?

Отправлен: 10.04.2007, 14:13 Вопрос задал: Anton3 (статус: Посетитель) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Vovchai Здравствуйте, Anton3! файлы с расширеним *.ert открываются в 1С а в режиме конфигуратора их можно редактировать

Ответ отправил: Vovchai (статус: 2-ой класс) Ответ отправлен: 10.04.2007, 14:18

Отвечает: Краюшкин Игорь Валерьевич Здравствуйте, Anton3! Файлы с расширением .ert - это внешние отчеты и обработки для 1С. Если их открыть в режиме "Конфигуратор", то они откроются для редактирования. А если же открывать в режиме "Предприятие", то они открываются на выполнение. Не знаю как для FAR'а, а для Total Commandera есть плагины, которые читают .ert как архив и позволяют их редактировать. Но все равно, лучше конфигуратора ни чего нет.

Ответ отправил: Краюшкин Игорь Валерьевич (статус: 8-ой класс) Ответ отправлен: 10.04.2007, 14:19

Отвечает: Gorus Здравствуйте, Anton3! есть замечательная программка - ERTLoader, она устанавливает связи файлов *.ert с 1С. В настройках можна указать в какой базе нужно открывать файлы и в каком режиме (Конфигуратором или Предприятием). Если не найдене в инете - скинте мне мыло, я вышлю.

Ответ отправил: Gorus (статус: 5-ый класс) Ответ отправлен: 10.04.2007, 15:11

Вопрос № 81.928

Добрый день Уважаемые Эксперты!Нужна ваша помощь.Есть 1С бухгалтерия,версия проф,релиз 486.Пытаемся перепровести документ "Закрытие месяца" за январь, программма выдает такую ошибку: УслугаЕНВД = ?(Объект.Субконто1.Получить(ДатаДок).ТипНоменклатуры = Перечисление.ТипыНоменклатуры.УслугаЕНВД, 1, 0); {Документ.ЗакрытиеМесяца.Модуль Документа(11067)}: Значение не представляет агрегатный объект (ТипНоменклатуры) Не понятно причем здесь ЕНВД, т.к.ни один из документов не попадает под ЕНВД - ЕНВД вообще отключен!Нашел строку 11067 в модуле документа "ЗакрытиеМесяца"(см.приложение) - но что там нужно поменять - понятия не имею - нехватает опыта и знаний.Надеюсь на вашу помощь.Буду благодарен всем откликнувшимся! Приложение: Процедура РасчетВременныхРазницПоЕНВД(СчетаУчетаБУ,СчетаУчетаНУ, СчетНПР, СчетКВР, БухИт, Объект, ПризнакПринадлежностиЕНВД, Коэф, ВременнаяРазницаЕНВД, КорректировкаВременнойРазницыЕНВД = 0) Сч44_3 = СчетПоКоду("44.1.3"); Сч44_2 = СчетПоКоду("44.1.2"); Сч26 = СчетПоКоду("26"); Сч20 = СчетПоКоду("20"); УслугаЕНВД = 0; Если ПризнакПринадлежностиЕНВД = Сч20 Тогда Если Объект.Вид() = "ОсновныеСредства" Тогда УслугаЕНВД = ?(Объект.Субконто1.Получить(ДатаДок).ТипНоменклатуры = Перечисление.ТипыНоменклатуры.УслугаЕНВД, 1, 0); ИначеЕсли Объект.Вид() = "РасходыБудущихПериодов" Тогда УслугаЕНВД = ?(Объект.Субконто1.ТипНоменклатуры = Перечисление.ТипыНоменклатуры.УслугаЕНВД, 1, 0); ИначеЕсли Объект.Вид() = "Материалы" Тогда УслугаЕНВД = ?(БухИт.Субконто(2).Субконто1.ТипНоменклатуры = Перечисление.ТипыНоменклатуры.УслугаЕНВД, 1, 0); КонецЕсли; КонецЕсли; Если (ПризнакПринадлежностиЕНВД <> Сч44_2) И (ПризнакПринадлежностиЕНВД <> Сч44_3) И (ПризнакПринадлежностиЕНВД <> Сч26) И (УслугаЕНВД <> 1) Тогда ВременнаяРазницаЕНВД = 0; Иначе

Отправлен: 10.04.2007, 15:42 Вопрос задал: Alex81 (статус: Посетитель) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Vlad Skorochod Здравствуйте, Alex81! Быстрее всего у вас в каком-то документе не заполнено субконто 1 Посмотреть в каком, можно в отладчике или функцией сообщить(Объект). ее нужно будет вставить в модуль перед строкой 11067

Ответ отправил: Vlad Skorochod (статус: 3-ий класс) Ответ отправлен: 10.04.2007, 15:50 Оценка за ответ: 4 Комментарий оценки: Спасибо за участие, только вот хотелось бы более подробно и конкретно:"посмотреть в каком, можно в отладчике или функцией сообщить(Объект)" - как это?

Отвечает: Татьяна Ласовская Здравствуйте, Alex81! Если у вас отключен ЕНВД, то можно просто в этой процедуре оставить одну строку - это самое простое решение, но не совсем корректное. Вдруг вы перейдете на работу по ЕНВД когда-нибудь? А вообще такая ошибка возникает если у переменной Объект, передаваемой в эту процедуру, на дату ДатаДок не заполнен реквизит Субконто1, либо у этого реквизита нет рекизита ТипНоменклатуры. Отследить ситуацию можно в отладчике. Приложение: ВременнаяРазницаЕНВД = 0;

Ответ отправила: Татьяна Ласовская (статус: 5-ый класс) Ответ отправлен: 10.04.2007, 15:54 Оценка за ответ: 5 Комментарий оценки: Большое спасибо!Ваш способ помог!Только вот хотелось бы поподробнее по повду реквизита Субконто1 и как эту ситуацию можно отследить в отладчике?Помогите чайнику!

Отвечает: Elric Здравствуйте, Alex81! Ошибка выскакивала не потому, что какой-то документ попадает под ЕНВД, а потому что программа универсальная и потому должна проверить, "не попадает ли под ЕНВД". Во время проверки и происходит ошибка. Замените строку с ошибкой УслугаЕНВД = ?(Объект.Субконто1.Получить(ДатаДок).ТипНоменклатуры = Перечисление.ТипыНоменклатуры.УслугаЕНВД, 1, 0); на ту, что у меня в Приложении. Тогда программа останется такой же универсальной, и при этом будет работать корректно даже с неуказанным субконто (как в Вашем случае). Приложение: Попытка УслугаЕНВД = ?(Объект.Субконто1.Получить(ДатаДок).ТипНоменклатуры = Перечисление.ТипыНоменклатуры.УслугаЕНВД, 1, 0); Исключение ВременнаяРазницаЕНВД = 0; Возврат; КонецПопытки; --------- Мирный атом в КАЖДЫЙ дом!

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 10.04.2007, 16:19 Оценка за ответ: 5 Комментарий оценки: Большое Спасибо!Все работает!За такой ответ - только 5+!!!

Вопрос № 81.929

Здравствуйте эксперты! Скажите пожалуйста, как из конф.Торговля и Склад (типовая) можно в печатную форму вывести юридические и фактические адреса контрагентов?

Отправлен: 10.04.2007, 16:01 Вопрос задала: Darina (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 3)

Отвечает: Шахрайчук Владимир Анатольевич Здравствуйте, Darina! Ну конечно же отчетом. Рекоммендую внешним. Внешние отчеты очень удобны тем, что их можно исправлять, не выгоняя пользователей с базы. Поэтому из конфигурации все, что часто правится (зарплата, банк, печатные таблицы и т.д) я выношу во внешние модули. Высылаю на Ваш адрес образец. Вы улыбнетесь, когда увидите, как там мало строк, как все просто.

Ответ отправил: Шахрайчук Владимир Анатольевич (статус: Студент) Ответ отправлен: 10.04.2007, 18:21 Оценка за ответ: 5 Комментарий оценки: Понятно что внешним отчетом. Я имела ввиду конкретно юр.адрес

Отвечает: Полозов Олег aka Asher Здравствуйте, Darina! Адрес привязан к справочнику СвоиЮрЛица. т.е. Фирма.ЮрЛицо.ЮрАдрес (ФактАдрес)

Ответ отправил: Полозов Олег aka Asher (статус: 4-ый класс) Ответ отправлен: 11.04.2007, 04:54

Вопрос № 81.944

Уважаемые Эксперты, подскажите пожалуйста как изменить счет, который был группой на просто счет т.е. убрать субсчета (сч 01.1 разбит на 01.1.1 и 01.1.2), при попытке просто удалить в Конфигураторе счет и группу а затем в вести счет 01.1 но уже без субсчетов Изменения не сохраняться появляется сообщение, что в бухгалтерии счет записан как группа и записать новые данные не возможно.

Отправлен: 10.04.2007, 17:00 Вопрос задала: Надежда (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 2)

Отвечает: Elric Здравствуйте, Надежда! К сожалению, превратить группу в счет невозможно. Можно удалить группу, записать изменения, зайти в режиме "Предприятие" и проверить чтобы в плане счетов не осталось этой группы (если осталась, то удалить) и после этого ввести новый счет. Однако если по этой группе (ее субсчетам) есть проводки, такая операция будет запрещена. --------- Мирный атом в КАЖДЫЙ дом!

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 10.04.2007, 17:11 Оценка за ответ: 5

Отвечает: Munster Здравствуйте, Надежда! Нужно чтобы в бухгалтерии небыло проводок по счетам 01.1.1 и 01.1.2. Как это можно сделать (на свой страх и риск): 1. Создаете (не в конфигураторе) в плане счетов "левый счет", которого у Вас нет, допустим 111. 2. Меняем проводки по счетам 01.1.1 и 01.1.2 на счет 111 (специально не пишу как это сделать, если Вы опытный программист - труда большого это не доставит, если нет - лучше вам это не делать!!!); 3. В бухгалтерии помечаем на удаление всю группу 01.1. 4. Удаляем, если проводки правильно перенеслись на счет 111, то группа удалится. 5. Заходим в конфигуратор. Удаляем группу 01.1. 6. Создаем 01.1, но уже как счет не имеющий подсчетов. 7. Сохраняем изменения в конфигураторе. (должны сохраниться) 8. Делаем тоже самое что и в п.2, только проводки со счета 111, меняем на 01.1 9. Помечаем на удаление счет 111 и удаляем его. Все. Повторюсь, все это на свой страх и риск. Я это делал, но база была не очень большая. По времени почти весь день.

Ответ отправил: Munster (статус: 8-ой класс) Ответ отправлен: 11.04.2007, 08:01 Оценка за ответ: 5 Комментарий оценки: Спосибо

Вопрос № 81.954

Доброго времени суток уважаемые эксперты. Наверное, я настырный до ужаса. Подскажите скачал обработку выгрузки, загрузки Справочника Товары в XML файл. Только загрузка происходит в чистый справочник, а мне надо чтобы она перезаписывала справочник Товары. Базы полностью эдентичные. В приложении приведен код обработки. Спасибо. //Ограничения на входящие файлы XML: //XML //1) В первой строке обязателен заголовок XML вида <?xml version="1.0" encoding="windows-1251"?> //XML //2) Каждый тег должен быть записан в отдельной строке. Возможны отступы от начала строки и пустые строки. //XML //3) Значения атрибутов - строго в двойных кавычках. //XML //4) Не поддерживаются текстовые значения (любые значения можно передавать только через атрибуты). //XML //5) Комментарии и "подобные им" элементы XML не поддерживаются. //XML //XML перем xml_fso; //XML перем xml_file; //XML перем xml_ИмяТега; //XML перем xml_СписокАтрибутов; //XML перем xml_сз; //XML //XML /////////////////////////////////////////////////////////////////////// //XML //Открывает XML-файл в режиме "только чтение" //XML Процедура xml_ОткрытьФайл(прм_ИмяФайла) //XML //прм_ИмяФайла - имя файла XML (укажите полный путь и расширение .XML). //XML //XML xml_fso=СоздатьОбъект("Scripting.FileSystemObject"); //XML xml_file=xml_fso.OpenTextFile(прм_ИмяФайла, 1, 0, 0); //Открываем файл в режиме "только чтение" //XML стр=xml_file.ReadLine(); //Читаем заголовок XML вида <?xml version="1.0" encoding="windows-1251"?> //XML Если Найти(стр,"<?xml")=0 Тогда //XML Сообщить("Неправильный файл XML "+прм_ИмяФайла,"!"); а=10/0; //XML КонецЕсли; //XML Если Найти(стр,"windows-1251")=0 Тогда //XML Сообщить("Требуется кодировка windows-1251 файла XML "+прм_ИмяФайла,"!"); а=10/0; //XML КонецЕсли; //XML xml_СписокАтрибутов=СоздатьОбъект("СписокЗначений"); //XML xml_сз=СоздатьОбъект("СписокЗначений"); //XML КонецПроцедуры // xml_ОткрытьФайл //XML //XML /////////////////////////////////////////////////////////////////////// //XML //Считывает следующий тег XML. //XML //Возвращает 1, если тег прочитан и 0 - если был достигнут конец файла. //XML //Заполняет переменную xml_ИмяТега именем считанного тега в формате "<ИмяТега>" //XML Функция xml_Прочитать(прм_ОжидаемыеТеги="") //XML //Если вы используете параметр прм_ОжидаемыеТеги, то заполните его списком тегов //XML //через запятую, которые могут быть считаны в данный момент (это позволяет проверять //XML //структуру файла XML и сделать более ясным считывающий код). //XML //XML xml_СписокАтрибутов.УдалитьВсе(); //XML стр=""; //XML Пока стр="" Цикл //XML Если xml_file.AtEndOfStream=1 Тогда //XML Возврат 0; //тег не был прочитан, т.к. достигнут конец файла //XML КонецЕсли; //XML стр=СокрЛП(xml_file.ReadLine()); //XML КонецЦикла; //цикл, чтобы пропустить пустые строки //XML //XML //XML Если Найти(стр,"=")=0 Тогда //Случай, когда нет атрибутов //XML xml_ИмяТега=СокрЛП(стр); //XML Иначе //XML //Разбиваем тег на структуру, удобную для ИзСтрокиСРазделителями() //XML стр=СтрЗаменить(стр,"""",""","""); //XML стр=""""+стр+""""; //XML //XML сз=xml_сз; //XML сз.УдалитьВсе(); //XML сз.ИзСтрокиСРазделителями(стр); //XML //XML //В первом элементе списка у нас и имя тега, и имя первого атрибута. Разделим их. //XML зн=сз.ПолучитьЗначение(1); //XML поз=Найти(зн , " "); //XML xml_ИмяТега =СокрЛП(Лев(зн, поз)); //Выделим имя тега //XML xml_ИмяТега =xml_ИмяТега+">"; //XML //XML //Выделим и обновим имя первого атрибута //XML зн =СокрЛП(Сред(зн, поз)); //XML сз.УстановитьЗначение(1,зн); //XML //XML //Удаляем завершающий элемент списка /> или > //XML сз.УдалитьЗначение(сз.РазмерСписка()); //XML //XML //Переводим наш список значений в более удобный формат //XML i=1; //позиция в списке сз //XML рс=сз.РазмерСписка(); //XML Пока i<=рс Цикл //XML имя=сз.ПолучитьЗначение(i); //XML имя=СокрЛП(СтрЗаменить(имя,"=","")); //XML зн=сз.ПолучитьЗначение(i+1); //XML //Заменяем спецсимволы XML //XML зн=СтрЗаменить(зн,""",""""); //XML зн=СтрЗаменить(зн,"'","'"); //XML зн=СтрЗаменить(зн,"<","<"); //XML зн=СтрЗаменить(зн,">",">"); //XML зн=СтрЗаменить(зн,"&","&"); //XML xml_СписокАтрибутов.ДобавитьЗначение(зн,имя); //XML i=i+2; //XML КонецЦикла; //XML КонецЕсли; //XML //XML Если ПустаяСтрока(прм_ОжидаемыеТеги)=0 Тогда //XML //Проверяем наличие имени тега в списке ожидаемых тегов (если надо контролировать структуру) //XML Если Найти(прм_ОжидаемыеТеги,xml_ИмяТега)=0 Тогда //XML Сообщить("Неожиданный тег "+xml_ИмяТега+" в строке "+xml_file.line); a=10/0; //XML КонецЕсли; //XML КонецЕсли; //XML //XML Возврат 1; //успешное чтение тега //XML КонецФункции // xml_Прочитать //XML //XML /////////////////////////////////////////////////////////////////////// //XML //Получает значение атрибута считанного тега по имени атрибута. //XML //Если надо получить атрибут по его номеру, читайте список значений xml_СписокАтрибутов //XML //XML Функция xml_ПолучитьАтрибут(прм_ИмяАтрибута) //XML Возврат xml_СписокАтрибутов.Получить(прм_ИмяАтрибута); //XML КонецФункции // xml_ПолучитьАтрибут //XML //XML /////////////////////////////////////////////////////////////////////// //XML //Закрывает открытый файл XML. По завершении работы с файлом его необходимо закрыть. //XML Функция xml_Закрыть() //XML xml_file.Close(); //XML КонецФункции // xml_Закрыть //XML //******************************************* //Тестовая процедура, которая считывает XML файл в справочник Товаров. Процедура Выполнить() стрИмяФайла=КаталогИБ()+"XML\tovar.xml"; спр=СоздатьОбъект("Справочник.Товары"); НачатьТранзакцию(); //Для ускорения сч=0; //Для ускорения Сообщить("Начало чтения XML: "+ТекущееВремя()); xml_ОткрытьФайл(стрИмяФайла); xml_Прочитать("<Товары>"); спрР=СоздатьОбъект("Справочник.Товары"); Пока xml_Прочитать("<Элемент>,</Товары>")=1 Цикл сч=сч+1; //Для ускорения Если сч%1000=0 Тогда //Для ускорения ЗафиксироватьТранзакцию(); //Для ускорения НачатьТранзакцию(); //Для ускорения КонецЕсли; //Для ускорения Если xml_ИмяТега="</Товары>" Тогда Прервать; КонецЕсли; Код=Число(xml_ПолучитьАтрибут("Код")); Наименование=xml_ПолучитьАтрибут("Наименование"); Единица=xml_ПолучитьАтрибут("Единица"); Цена=Число(xml_ПолучитьАтрибут("Цена")); ЭтоГруппа=Число(xml_ПолучитьАтрибут("ЭтоГруппа")); КодГруппы=Число(xml_ПолучитьАтрибут("Группа")); спрР.НайтиПоКоду(КодГруппы,0); Если спр.НайтиПоКоду(Код)=0 Тогда спр.ИспользоватьРодителя(спрР.ТекущийЭлемент()); Если ЭтоГруппа=1 Тогда спр.НоваяГруппа(); Иначе спр.Новый(); КонецЕсли; спр.Код = Код; КонецЕсли; спр.Родитель=спрР.ТекущийЭлемент(); спр.Наименование = Наименование; спр.Цена = Цена; спр.Единица = Единица; спр.Записать(); КонецЦикла; //по элементам XML xml_Закрыть(); Сообщить("Обработка завершена! "+ТекущееВремя(),"i"); ЗафиксироватьТранзакцию(); //Для ускорения КонецПроцедуры

Отправлен: 10.04.2007, 18:36 Вопрос задал: Аржаник Антон Николаевич (статус: 2-ой класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Elric Здравствуйте, Аржаник Антон Николаевич! В Приложении -- измененное окончание кода. Все цитировать -- слишком большой объем и нет необходимости. (комментарий // Вставка) Только это не сработает если будет попытка записать элемент вместо группы или наоборот (синхронизация по коду). Приложение: Если спр.НайтиПоКоду(Код)=0 Тогда спр.ИспользоватьРодителя(спрР.ТекущийЭлемент()); Если спр.НайтиПоКоду(Код)=0 Тогда // Вставка Если ЭтоГруппа=1 Тогда спр.НоваяГруппа(); Иначе спр.Новый(); КонецЕсли; спр.Код = Код; КонецЕсли; // Вставка КонецЕсли; спр.Родитель=спрР.ТекущийЭлемент(); спр.Наименование = Наименование; спр.Цена = Цена; спр.Единица = Единица; спр.Записать(); КонецЦикла; //по элементам XML xml_Закрыть(); Сообщить("Обработка завершена! "+ТекущееВремя(),"i"); ЗафиксироватьТранзакцию(); //Для ускорения КонецПроцедуры --------- Мирный атом в КАЖДЫЙ дом!

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 10.04.2007, 22:50

Вопрос № 82.043

Здравствуйте Уважаемые Эксперты. Вопрос такой Для чего служит терминал сбора данных? Если приобрести терминал сбора данных нужен ли сканер штрих кодов? Терминал с/д может выполнять работу сканера или нет, если ДА какую модель лучше приобрести? Заранее благодарю! Приложение: 1С v.7.7 ТиС

Отправлен: 11.04.2007, 09:34 Вопрос задал: Рубик (статус: 1-ый класс) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Dimaxx Здравствуйте, Рубик! Терминалы сбора данных – специализированные устройства предназначенные для сбора, хранения и обработки информации о товаре и последующей передачи этих данных в компьютер (в зависимости от типа ТСД информация передается через специальную коммуникационную подставку, интерфейсный кабель, ИК-порт или по радиоканалу). Более того, терминалы сбора даных способны производить определенные операции со считанными штрих-кодами: хранить их в, находить соответствующее коду наименование товара из справочника, формировать списки товаров и кодов по требованию оператора или автоматически. Различия между моделями терминалов сбора данных заключаются в типе считывающего устройства (могут быть лазерными и светодиодными), объемом внутренней памяти (чем больше объем памяти в терминале сбора данных, тем больше информации в нем можно хранить), условия, в которых могут работать терминалы сбора данных (реакции на условия внешней среды, такие как запыленность, низкие или высокие температуры, ударопрочность) Терминалы сбора данных используются при проведении инвентаризации складов, приемка и расход товара, организации выездной торговли. По поводу какой лучше приобрести. Это зависит от задач которые ставятся помотрите например CASIO IT-10. http://do.495.su/1-133-267/22782/ --------- Hайден неизвестный драйвер, воткните какое-нибудь устройство!

Ответ отправил: Dimaxx (статус: 4-ый класс) Ответ отправлен: 11.04.2007, 09:45

Отвечает: Ovr1970 Здравствуйте, Рубик! Под терминалом сбора данных обычно подразумевается (но не обязательно) карманный компьютер, который имеет сканер и защищен от воздействий окружающей среды (температура, влажность) и пользователя (от ударов и царапин). Поэтому купив терминал сбора данных к примеру Symbol - ты не ошибешься, но это дорого. Можно купить просто карманный компьютер и сканер к нему и назвать это терминалом сбора данных, он даже сможет работать в таком качестве, боюсь не долго. В любом случае, терминал сбора данных должен быть запрограммирован на действия по сбору данных и иметь возможность связи с Вашей БД 1С v.7.7 Вы задавались вопрос, кто будет его программировать? 1С на нем не запустится!

Ответ отправил: Ovr1970 (статус: Студент) Ответ отправлен: 11.04.2007, 13:14

Вопрос № 82.063

Добрый день ЭКСПЕРТЫ в инете нашел интересную конфу по 8 версии а там стоит пароль для пользователя с правами админа как обойти пароль на вход

Отправлен: 11.04.2007, 12:22 Вопрос задал: Vp1973 (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Андрей Тимофеев Здравствуйте, Vp1973! В 8-ке у вас не получится его обойти, программисты 1С пересмотрели подход к защите :)

Ответ отправил: Андрей Тимофеев (статус: 1-ый класс) Ответ отправлен: 11.04.2007, 15:49

© 2001-2007, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Email: support@rusfaq.ru, тел.: +7 (926) 535-23-31 Авторские права | Реклама на портале Версия системы: 4.50 (beta) от 15.04.2007