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

Выпуск № 724
от 09.02.2008, 13:05

Вопрос № 121.446

Здравствуйте эксперты. Есть несколько вопросов по 1с 7.7 В книгах ответа на них не нашел, поэтому спрашиваю у Вас. Какие требования "предъявляет" устанавлиемая конфигурация к компонентам системы? Как протестировать базу данных на наличие ошибок? Порядок обновления конфигурации. Обновление старых релизов. Особенности обновления доработанных конфигураций. Как определить дорабатывалась ли конфигурация? Как можно совместно использовать несколько типовых конфигураций, т.е. баз данных. Каким образом перенести информацию из одной базы данных Из Бухгалтерия+Зарплата в Бухгалтерия+Торговля. Спасибо всем, кто ответит С уважением, Александр

Отправлен: 03.02.2008, 14:51 Вопрос задал: Чепиков Александр Валерьевич (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Сергей Максименко [Elric] Здравствуйте, Чепиков Александр Валерьевич! 1. Бухгалтерская конфигурация требует установленную компоненту "Бухгалтерский учет", торговля и склад - "Оперативный учет", зарплата и кадры - "Расчет". 2. Запускаете Конфигуратор, меню "Администрирование - Тестирование и исправление". 3. С обновлением всегда приходит инструкция. Определить, дорабатывалась ли конфигурация, может только эксперт, знакомый с данной конфигурацией (либо пользователь, знающий особенности работы стандартной конфигурации). Специальной отметки типа "конфигурация изменялась" нигде нет. 4. Можно совместно использовать неограниченное количество баз данных любых конфигураций. Главное чтоб были установлены компоненты, для которых эти конфигурации написаны. 5. Переносить данные между базыми с разными конфигурациями можно с помощью МОД (Менеджера обмена данными). --------- В творчестве рождается истина

Ответ отправил: Сергей Максименко [Elric] (статус: Профессионал) Украина, Киев Тел.: (044) 22-88-369 Организация: МАКСЕР, "1С:Предприятие" в Киеве Адрес: г. Киев WWW: www.makser.com.ua ---- Ответ отправлен: 03.02.2008, 19:14 Оценка за ответ: 5

Вопрос № 121.460

Цитата: "Текст Вашего вопроса: Создал на форме табличную часть: имеются две колонки цена и количество, как сделать, чтобы в третьей колонке автоматически (по какому-нибудь событию) подсчитывалась сумма по каждой строке. Заранее спасибо... Вопрос отправлен: 03.02.2008, 12:08 Отвечает: Краюшкин Игорь Валерьевич (>>) Здравствуйте, Mkey87! В свойствах третей колонки, в закладке "Дополнительно" надо прописать формулу: Цена*Количество (если они именно так у Вас и называются). В результате, в третей колонке, автоматически будет отображаться изменение значения произведения в зависимости от изменения значений ячеек "Цена" и "Количество". Ответ отправлен: 03.02.2008, 14:32" -------------------- Я не могу найти вкладку "дополнительно". У меня 1С 8,0 Учебная версия...

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

Отвечает: Яна Здравствуйте, Mkey87! Вы не можете найти вкладку дополнительно, потому что эта вкладка есть в версии платформы 7.7, а версии платформы 8.0 - ее нет. Рекомендую в будущем, задавая вопрос, указывать версию платформы - тогда ответы будут намного понятнее. Уточняющие вопросы можно писать в том же вопросе в мини-форуме. Создавать новый не обязательно.

Ответ отправила: Яна (статус: Практикант) Ответ отправлен: 04.02.2008, 10:32

Вопрос № 121.523

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

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

Отвечает: Сергей Максименко [Elric] Здравствуйте, DiamondES! 1. Условие должно быть не "Спр.АбонНомерДоговора = 0", а Спр.АбонНомерДоговора < > 0 2. Когда задействуете метод "Спр.ВыбратьЭлементыПоРеквизиту("Неявка",1,0,0);", то внешняя выбрка (Спр.ВыбратьЭлементы();) сбивается, в итоге у Вас в данных получается каша. 3. Зачем столько раз (в цикле) создавать колонки "Наименование" и "НомерПУ"? В общем, алгоритм совсем никуда не годится. Попробуйте взять за основу тот, что у меня в Приложении. Поменял местами условия, теперь работать будет. Приложение: Процедура Выполнить() ТЗ1.НоваяКолонка("Наименование"); ТЗ1.НоваяКолонка("НомерПУ"); // ТЗ1.НоваяКолонка("Начальные"); // ТЗ1.НоваяКолонка("Конечные"); Спр = СоздатьОбъект("Справочник.Абонент"); Спр.ВыбратьЭлементыПоРеквизиту("Неявка",1,0,0); Пока Спр.ПолучитьЭлемент() = 1 Цикл Если Спр.АбонНомерДоговора <> 0 Тогда ТЗ1.НоваяСтрока(); ТЗ1.Наименование = Спр.Наименование; ТЗ1.НомерПУ = Спр.АбонНомПУ; ТЗ1.Начальные = Спр.НП.Получить(ДатаДок); ТЗ1.Конечные = Спр.КП.Получить(ДатаДок); КонецЕсли; КонецЦикла; КонецПроцедуры --------- В творчестве рождается истина

Ответ отправил: Сергей Максименко [Elric] (статус: Профессионал) Украина, Киев Тел.: (044) 22-88-369 Организация: МАКСЕР, "1С:Предприятие" в Киеве Адрес: г. Киев WWW: www.makser.com.ua ---- Ответ отправлен: 04.02.2008, 12:01 Оценка за ответ: 5 Комментарий оценки: Спасибо большое, долго мучился а оказалось вот оно как :)) PS Я только учусь поэтому опыт в программировании небольшой.

Вопрос № 121.536

Разбираю код обработки ИмпортАдресныхКлассификаторов из Зик 7.7 Объясните, пожалуйста, следующие строки: Попытка Если Таб.UNO = Таб.UNO тогда КлассификаторИМНС = 1; КонецЕсли; Исключение КлассификаторИМНС = 0; КонецПопытки; В таблице поле UNO не нашел (открывал kledr.dbf с помощью Excel) Зато увидел поле GNINMB - назначение которого не понятно. Если можете растолкуйте и скажите, нужно ли его как то учитывать при импорте классификатора? Дополнил вопрос из мини-форума ----- ∙ Отредактировал: Сергей Максименко [Elric] (Профессионал) ∙ Дата редактирования: 04.02.2008, 12:05 Приложение: Функция ЯвляетсяФайломИМНС() Таб = СоздатьОбъект("XBase"); Таб.КодоваяСтраница(?(_DOS=1,1,0)); ИмяФ="KLADR"+ ?(_DOS=1,"","w"); ИмяТаб = СокрЛП(Каталог)+""+ИмяФ+".DBF"; Если ФС.СуществуетФайл(ИмяТаб)=0 Тогда Предупреждение("Не обнаружен файл "+ИмяТаб+" - импорт адресного классификатора не возможен!"); Возврат 0; КонецЕсли; Если ФС.СуществуетФайл(СокрЛП(Каталог)+""+ИмяФ+".CDX")=1 Тогда Таб.ОткрытьФайл(ИмяТаб,СокрЛП(Каталог)+""+ИмяФ+".CDX",1); ИначеЕсли ФС.СуществуетФайл(КаталогИБ()+ИмяФ+".CDX")=1 Тогда Таб.ОткрытьФайл(ИмяТаб,КаталогИБ()+ИмяФ+".CDX",1); Иначе Таб.ОткрытьФайл(ИмяТаб); глСтатусСтрока(Контекст,"Предварительная индексация классификатора улиц..."); Таб.ДобавитьИндекс("ПоКоду","CODE",0,0,""); Попытка Если (Лев(СокрЛП(Каталог),2) = "A:") или (Лев(СокрЛП(Каталог),2) = "B:") Тогда tmpVar = 1/0; // для вызова исключительной ситуации Иначе Таб.СоздатьИндексныйФайл(СокрЛП(Каталог)+""+ИмяФ+".CDX"); КонецЕсли; Исключение Попытка Таб.СоздатьИндексныйФайл(КаталогИБ()+ИмяФ+".CDX"); Исключение Предупреждение("Не создан индексный файл - импорт адресного классификатора не возможен!"); Возврат 0; КонецПопытки; КонецПопытки; КонецЕсли; Попытка Если Таб.UNO = Таб.UNO тогда КлассификаторИМНС = 1; КонецЕсли; Исключение КлассификаторИМНС = 0; КонецПопытки; Возврат КлассификаторИМНС; КонецФункции // ЯвляетсяФайломИМНС

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

Отвечает: Сергей Максименко [Elric] Здравствуйте, Сергеев Александр! Эти строки означают, что если в таблице есть колонка UNO, то "КлассификаторИМНС = 1;", а если такой колонки нет (срабатывает Исключение), то "КлассификаторИМНС = 0;". --------- В творчестве рождается истина

Ответ отправил: Сергей Максименко [Elric] (статус: Профессионал) Украина, Киев Тел.: (044) 22-88-369 Организация: МАКСЕР, "1С:Предприятие" в Киеве Адрес: г. Киев WWW: www.makser.com.ua ---- Ответ отправлен: 04.02.2008, 12:04 Оценка за ответ: 5 Комментарий оценки: Ставлю такую оценку, хотя ответа на свой вопрос не получил. Наверное не корректно задал вопрос (хотя все пояснения были сразу же даны в минифоруме)

Отвечает: Vlad Skorochod Здравствуйте, Сергеев Александр! GniNMB - это код налоговой. UNO - это код территориального участка ИФНС . А вообщето по структуре KLADR можн опрочитать здесь: ссылка Отредактировано : длинная ссылка. ----- ∙ Отредактировал: Федоров Михаил (Профессор) ∙ Дата редактирования: 04.02.2008, 16:22

Ответ отправил: Vlad Skorochod (статус: 8-ой класс) Ответ отправлен: 04.02.2008, 16:00 Оценка за ответ: 5 Комментарий оценки: За ссылку большое спасибо.

Вопрос № 121.546

Здравствуйте эксперты. У меня вопрос по 8.0. Дело в том, что я щас пытаюсь визуально сделать более удобным список выводимых записей в табличном поле (записи выводятся по данным о расходе горючего для определенного автомобиля на определенный день за выбранный период). Для машин, у которых по одному виду топлива я воспользовалась ЧередованиемЦветаСтрок. Получилось очень зрительно удобно. Но также есть две машины, по которым выводится по три записи на один день (т.е. документ один, а записей в нем три). И тут получается большое загромождение данными. ЧередованиеЦветаСтрок не помогает,т.к. разделяет цветом строки только через одну, а в моем случае нужно три через три. Написала такой код как в приложении. При заполнении табличного поля - все идеально закрашивает, а стоит прокрутить скроллингом записи от начала до конца как все снова становится белым. Что это? И как с этим бороться? Приложение: //Задала глобальные переменные Перем х; Перем у; Перем з; //В процедуре заполнения присвоила начальные значения х = 1; у = 2; з = 3; //Далее воспользовалась обработчиком события ПриПолученииДанных для табличного поля ТаблицаПутевыхЛистов Процедура ТаблицаПутевыхЛистовПриПолученииДанных(Элемент, ОформленияСтрок) Для каждого Оформлениестроки из ОформленияСтрок цикл Если Автотранспорт = Справочники.Автотранспорт.НайтиПоКоду("22") ИЛИ Автотранспорт = Справочники.Автотранспорт.НайтиПоКоду("27") Тогда Если ОформлениеСтроки.Ячейки.НомерСтроки.Значение = х Тогда ОформлениеСтроки.Ячейки.НомерСтроки.ЦветФона= WEBЦвета.Кремовый; х = х+6; ИначеЕсли ОформлениеСтроки.Ячейки.НомерСтроки.Значение = у Тогда ОформлениеСтроки.Ячейки.НомерСтроки.ЦветФона= WEBЦвета.Кремовый; у = у+6; ИначеЕсли ОформлениеСтроки.Ячейки.НомерСтроки.Значение = з Тогда ОформлениеСтроки.Ячейки.НомерСтроки.ЦветФона= WEBЦвета.Кремовый; з = з+6; КонецЕсли; КонецЕсли; КонецЦикла; КонецПроцедуры //В данном коде закрашивала ячейку номера строки, пока эксперементирую на ней

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

Отвечает: Сысоев Дмитрий Олегович Здравствуйте, 2kasandra! Дело в том, что обработчик события ПриПолученииДанных вызывается только один раз при получении данных из таблицы источника. В следствии чего при прокрутке срабатывает обработчик ПриВыводеСтроки и оформление теряет актуальность. Рекомендую воспользоваться именно им так как он он будет отслеживать все ваши движения и пере закрашивать видимую область табличного поля. При проблеме с написанием кода обращайтесь. Удачи! --------- Hайден неизвестный драйвер, воткните какое-нибудь устройство!

Ответ отправил: Сысоев Дмитрий Олегович (статус: Студент) Ответ отправлен: 04.02.2008, 09:33 Оценка за ответ: 5 Комментарий оценки: Странно. Воспользовалась только что обработчиком ПриВыводеСтроки, но проблема повторилась... Вот процедура, может что-то не так делаю? : Процедура ТаблицаПутевыхЛистовПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки) Если Автотранспорт = Справочники.Автотранспорт.НайтиПоКоду("22") ИЛИ Автотранспорт = Справочники.Автотранспорт.НайтиПоКоду("27") Тогда Если ОформлениеСтроки.Ячейки.НомерСтроки.Значение = х Тогда ОформлениеСтроки.Ячейки.НомерСтроки.ЦветФона= WEBЦвета.Кремовый; х = х+6; ИначеЕсли ОформлениеСтроки.Ячейки.НомерСтроки.Значение = у Тогда ОформлениеСтроки.Ячейки.НомерСтроки.ЦветФона= WEBЦвета.Кремовый; у = у+6; ИначеЕсли ОформлениеСтроки.Ячейки.НомерСтроки.Значение = з Тогда ОформлениеСтроки.Ячейки.НомерСтроки.ЦветФона= WEBЦвета.Кремовы й; з = з+6; КонецЕсли; КонецЕсли; КонецПроцедуры

Отвечает: Яна Здравствуйте, 2kasandra! 1. Попробуйте сделать вывод в ПолеТабличногоДокумента - для каждой строки(первая вторая, третья) можно сделать отдельный макет со своим цветом. 2. Если уж хочется это делать в табличном поле, сделайте в нем невидимый реквизит с номером записи для данной машины, и в зависимости от значения этого реквизита для данной строки - задавайте цвет. 3. А еще можно сделать одно табличное поле с документом - а рядом еще одно со списком строк для этого документа.

Ответ отправила: Яна (статус: Практикант) Ответ отправлен: 04.02.2008, 10:42

Отвечает: Кулевский Сергей Владимирович Здравствуйте, 2kasandra! Попробуйте из кода убрать ".Ячейки.НомерСтроки.", должно помочь.

Ответ отправил: Кулевский Сергей Владимирович (статус: 2-ой класс) Ответ отправлен: 04.02.2008, 11:32 Оценка за ответ: 5 Комментарий оценки: Спасибо. Сработало. Только я что-то не решалась без определения Ячейки менять фон. В книжках посмотрела - все через них делается, думаю - значит так надо. Буду знать на будущее.

© 2001-2008, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале Версия системы: 4.70 от 17.01.2008
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru