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

Выпуск № 451
от 24.03.2007, 23:35

Вопрос № 78.884

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

Отправлен: 19.03.2007, 07:38 Вопрос задал: Slin (статус: 1-ый класс) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 13)

Отвечает: Яна Здравствуйте, Slin! Посмотрите в синтакс-помощнике оператор Выполнить(Строка).

Ответ отправила: Яна (статус: Студент) Ответ отправлен: 19.03.2007, 08:33 Оценка за ответ: 2 Комментарий оценки: Выполнить (Execute) Синтаксис: Выполнить(<Строка>) Параметры: <Строка> Строка, содержащая текст исполняемого кода. Описание: Позволяет выполнить фрагмент кода, который передается ему в качестве строкового значения. Это не ответ. Мне не нужно ВЫПОЛНИТЬ код, мне нужен сам код. Правда, ваша подсказка натолкнула меня на мысль, что нужно использовать запросы по всей видимости (я в них совсем не силен.. возможно ли?) Второй вопрос, наверное, больше к части риторических относится )))

Отвечает: Полозов Олег aka Asher Здравствуйте, Slin! Обычно делается так: В общую форму прописывается реквизит КонстантыНабор с типом КонстантыНабор потом на форме располагаются поля или флажки с привязкой даннных из этого реквизита. Например: Поле "ОсновнойГрафикРаботыПредприятий" где даными для поля будут КонстантыНабор.ОсновнойГрафикРаботыПредприятий.

Ответ отправил: Полозов Олег aka Asher (статус: 3-ий класс) Ответ отправлен: 19.03.2007, 09:37 Оценка за ответ: 3 Комментарий оценки: Так делается в форме по умолчанию Мне бы хотелось выполнить иначе

Вопрос № 78.897

Здраствуйте. Вопрос в следующем (1с 7.7). Как мне получить (лучше в общем журнале), список документов определенного вида, ПРОВЕДЕННЫХ и за определенное число (или период). Я делаю так Командами НачалоСтандартногоИнтервала(ДатаДок1); КонецСтандартногоИнтервала(ДатаДок2); устанавливаю "рабочий интервал в журнале. А затем командами Объект=СоздатьОбъект("Документ.ТребованиеНакладная"); Объект.Выбрать("Выберите документ"); я выбираю список (всех) документов в определенном рабочем интервале. А как мне оставить в нем только ПРОВЕДЕННЫЕ документы. (затем восстанавливаю обратно стандартный интервал). Можно сделать это как нибудь проще?

Отправлен: 19.03.2007, 10:21 Вопрос задал: Zlm (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

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

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 19.03.2007, 14:09 Оценка за ответ: 5 Комментарий оценки: Cпасибо за оперативный ответ

Отвечает: Владимир Лазурко Здравствуйте, Zlm! В журнале выбрать только проведённые документы не получится, но Вы можете сделать обработку с выборкой документов в таблицу значений, и уже в этой таблице отбирать документы по необходимым признакам или их комбинации. Потом всё отобразить в таблице на форме обработки.

Ответ отправил: Владимир Лазурко (статус: 8-ой класс) Ответ отправлен: 20.03.2007, 13:51

Вопрос № 78.911

Уважаемые Эксперты подскажите пожалуста пару ссылок для работы с EXCEL . (нужно делать выгрузку в EXCEL причем 15 листов в одной книге) . За ранее спасибо

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

Отвечает: IUnknown Здравствуйте, Vikentiev! пожалуй самым полным будет ссылка на мсдн или на встроенную справку VBA Excel если есть желание могу скинуть обработку, только там наоборот импорт данных, но сути не меняет --------- я не специалист

Ответ отправил: IUnknown (статус: 10-ый класс) Ответ отправлен: 19.03.2007, 13:43 Оценка за ответ: 4 Комментарий оценки: если можете скиньте Sam@Triton.ua. Может найду чтото для себя. Спасибо

Отвечает: Vlad Skorochod Здравствуйте, Vikentiev! Посмотри на сайте http://1c.proclub.ru/ там были обработки по работе с экселем. Может почерпнешь, что интерессное.

Ответ отправил: Vlad Skorochod (статус: 2-ой класс) Ответ отправлен: 19.03.2007, 17:30 Оценка за ответ: 4 Комментарий оценки: Там уже все перерыл. Скачал все что было. Хотелось бы ALS Для синтаксис - помощника. Спасибо за ответ

Отвечает: Ovr1970 Здравствуйте, Vikentiev! В приложении начальный код, который Вам поможет разобраться. Если Вам нужно выполнить какое - либо простое действие - Вы просто создайте макрос, а потом посмотрите на его код в Excelle К сожалению, более подробное описание нужно искать в справке по VBA. Приложение: Excel=СоздатьОбъект("Excel.Application"); Excel.DisplayAlerts = 0; //ложь Попытка MyTab=Excel.WorkBooks.Open(Файл,0,1).Sheets(1); Исключение Сообщить("Ошибка открытия файла:"+Файл); Возврат -1; КонецПопытки; MyTab.Activate(); MyTab=Excel.ActiveSheet; Сообщить(Excel.ActiveSheet.name); Цикл по листам Для инд=1 по Excel.Sheets.Count Лист=Excel.Sheets(Инд) КонецЕсли;

Ответ отправил: Ovr1970 (статус: Студент) Ответ отправлен: 20.03.2007, 10:25 Оценка за ответ: 4 Комментарий оценки: Спасибо за ответ

Отвечает: Игорь К. Здравствуйте, Vikentiev! Описание - это нужно смотреть VBA, хелп есть в самом excel. Примеры по работе с экселем: Простейший вывод в excel из 1с http://www.itpb.ru/forum4/my/excel.ert Универсальная выгрузка в excel из 1c http://www.itpb.ru/forum4/my/export.ert Универсальная загрузка из excel в 1c http://www.itpb.ru/forum4/my/import.ert Информация из ссылки: http://www.itpb.ru/forum4/topic.php?id=1021&page=-1 --------- Лучше два часа потерять, потом за пять минут долететь

Ответ отправил: Игорь К. (статус: 4-ый класс) Ответ отправлен: 23.03.2007, 08:07 Оценка за ответ: 5 Комментарий оценки: Спасибо уже там был . Скачал. (Примеры довольно таки хорошие . Можно найти очень много интересуещего)

Вопрос № 78.933

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

Отправлен: 19.03.2007, 14:27 Вопрос задала: Darina (статус: Посетитель) Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 9)

Отвечает: Gorus Здравствуйте, Darina! нужно добавить в текст запроса: |Условие(ПустоеЗначение(Товар)=1); А проверку "Если Запрос.Товар = ВыбранныйТовар Тогда" убрать. Сумироваться по товару будет, так как у Вас определена в запросе функция "Количество"

Ответ отправил: Gorus (статус: 4-ый класс) Ответ отправлен: 19.03.2007, 15:39 Оценка за ответ: 3 Комментарий оценки: Да но это проблему не решает и наверно так? : |Условие(ПустоеЗначение(ВыбранныйТовар)=1);

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

Ответ отправил: Strawberry (статус: 5-ый класс) Ответ отправлен: 19.03.2007, 16:34

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

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 19.03.2007, 17:05 Оценка за ответ: 4 Комментарий оценки: Во-первых у меня выдаётся ошибка про |Условие Товар в ВыбранныйТовар; просит поставить "(". Я сделала так: |Условие (Товар в ВыбранныйТовар); Если ВыбранныйТовар выбран, то всё правильно (как у меня и было), а вот если не выбран, то выводится всё полностью из документа причем если у меня сейчас один такой документ, то в отчете выводится вдвойне. И без суммирования мне как бы и не надо. Спасибо

Отвечает: Vlad Skorochod Здравствуйте, Darina! Вот можно так. См. Приложение. Условие "В" можно выбирать как отдельный элемент, так и группу, или ничего не выбирать. И еще один уровень группировки по номенклатуре, чтобы в запросе еще и к документу не обращаться. Приложение: Перем Документ; Перем Кол; //******************************************* Процедура ПриОткрытии() ВыбранныйТовар=""; ВыбНачПериода=НачМесяца(РабочаяДата()); ВыбКонПериода=РабочаяДата(); КонецПроцедуры Процедура Сформировать() Перем Запрос, ТекстЗапроса, Таб; Запрос = СоздатьОбъект("Запрос"); ТекстЗапроса = "//{{ЗАПРОС(Сформировать) |Период с ВыбНачПериода по ВыбКонПериода; |Обрабатывать НеПомеченныеНаУдаление; |Док = Документ.ПередачаМПЗ.ТекущийДокумент; |Товар = Документ.ПередачаМПЗ.Продукция; |Номенклатура = Документ.ПередачаМПЗ.Номенклатура |КолВо = Документ.ПередачаМПЗ.Количество; |Сум = Документ.ПередачаМПЗ.Сумма; |Группировка Док упорядочить по Док.ДатаДок; |Группировка Товар упорядочить по Товар.Наименование; |Группировка Номенклатура; |Условие (Товар в ВыбранныйТовар) ; |Функция Количество = Сумма(КолВо); |Функция Всего = Сумма(Сум); |"//}}ЗАПРОС ; Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда Возврат; КонецЕсли; Таб = СоздатьОбъект("Таблица"); Таб.ИсходнаяТаблица("Сформировать"); Таб.ВывестиСекцию("Заголовок"); Состояние("Заполнение выходной таблицы..."); Таб.Опции(0,0,Таб.ВысотаТаблицы(),0); ИтогоСумма=0; Пока Запрос.Группировка(1) = 1 Цикл Пока Запрос.Группировка(2) = 1 Цикл Документ = Запрос.Док; Таб.ВывестиСекцию("Док"); Ном=0; Пока Запрос.Группировка(3)=1 Цикл Ном=Ном+1; Материал=Запрос.Номенклатура; Кол = Запрос.Количество; Сумма=Запрос.Всего; Таб.ВывестиСекцию("Расход"); КонецЦикла; КонецЦикла; КонецЦикла; ИтогоСумма=Запрос.Всего; // На каждом уровне группировки функция выдает сумму по группе Таб.ВывестиСекцию("Итого"); Таб.ТолькоПросмотр(1); Таб.Показать("Производственные затраты",""); КонецПроцедуры

Ответ отправил: Vlad Skorochod (статус: 2-ой класс) Ответ отправлен: 19.03.2007, 17:26 Оценка за ответ: 4 Комментарий оценки: Спасибо так уже ближе. Причем хорошо что Группировка Номенклатура; Но как же мне быть с суммированием?

Вопрос № 78.945

Здравствуйте уважаемые эксперты. Помогите пожалуйсто, вот например в регламентированных отчетах есть такие отчеты где форма открывается сразу с печатной формой И эта конструкция как бы является одним целым. Потом можно редактировать данные в форме, вызывать обработки и др отчеты и т.п. Скажите пожалуйсто как это делается??? Пытался не чего не получается открывается форма отчета и отдельно открывается печатная форма...

Отправлен: 19.03.2007, 15:21 Вопрос задал: Иля (статус: Посетитель) Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Elric Здравствуйте, Иля! Это называется "Таблица в режиме ввода данных". В Конфигураторе при открытом диалоге формы отчета выбираете в главном меню "Действия / Свойства формы". Там выбираете пункт "Для ввода данных" и таблицу, которую хотите для этого использовать. Есть два замечания. 1. Свойства формы, открываемые через контекстное меню, не содержат этих вариантов, не удивительно что Вы их не нашли, нужно именно через Главное меню. 2. Работа таблицы в режиме ввода предполагает целый ряд нюансов. Рекомендую ознакомиться с ними прежде чем начинать работать непосредственно с таблицей. В частности, секции выводить нельзя, зато есть ряд новых возможностей. --------- Мирный атом в КАЖДЫЙ дом!

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 19.03.2007, 15:31 Оценка за ответ: 5 Комментарий оценки: Спасибо! Все получилость. Вот только проблем стало больше и боюсь результат не оправдает затраченное время

Отвечает: Strawberry Здравствуйте, Иля! В конфигураторе Отчет форма таблица - дейстивя- свойства формы - точечка "для ввода данных" ну и балешься :) --------- Мальчик-извращенец прочел деду Морозу с табуретки всего Пастернака!

Ответ отправил: Strawberry (статус: 5-ый класс) Ответ отправлен: 19.03.2007, 16:05 Оценка за ответ: 5 Комментарий оценки: Спасибо!

Отвечает: Хижняк Антон Сергеевич Здравствуйте, Иля! Открываем конфигуратор, нужный отчет, заходим в меню ДЕЙСТВИЯ, выбираем СВОЙСТВА ФОРМЫ, Выбираем ИСПОЛЬЗОВАТЬ ТАБЛИЦУ -> ПУСТУЮ дальше всё как обычно.

Ответ отправил: Хижняк Антон Сергеевич (статус: 1-ый класс) Ответ отправлен: 19.03.2007, 17:22 Оценка за ответ: 5 Комментарий оценки: Спасибо!

Отвечает: Gorus Здравствуйте, Иля! Дополню ответы. Если выбирать в свойствах формы не "Для ввода данных" а "Пустую", то работать с таблицей можно точно так же как и с обычной - то есть заполнять и выводить по секциям. единственное отличие нужно не забывать что эта таблица существует постоянно, и программно ее при старте инициализировать, а при формировании очищать (если нужно). Например так, как написал в примере. Приложение: Процедура ПриОткрытии() Таблица.ТолькоПросмотр(1); Таблица.Опции(0,0,3,0); Таблица.ВывестиСекцию("Шапка"); КонецПроцедуры Процедура Сформировать() Таблица.Очистить(); Таблица.ВывестиСекцию("Шапка"); .... .... КонецПроцедуры

Ответ отправил: Gorus (статус: 4-ый класс) Ответ отправлен: 20.03.2007, 09:28 Оценка за ответ: 5 Комментарий оценки: Большое спасибо!!!

Вопрос № 78.977

Добрый вечер! Как прописать формулу для столбца текстовой формы Поступления ТМЦ, который бы выводил размеры товара, если размер находится в свойствах товара? Заранее благодарю!

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

Отвечает: Coch Здравствуйте, Flomik! Надо в формуле прописать обращение к функции, которая возвращает значение свойства "Размер товара". Эту функцию надо описать в модуле формы или в глобальном модуле с ключевым слово Экспорт Примерный (неоптимизированный) текст функции, при допущении, что Наименование вида свойства равно "Размер товара" (Хотя я бы советовал создать константу, где хранился бы вид свойства, являющийся "Размером товара") см. в приложении Приложение: Функция ВернутьРазмерТовара() Если ПустоеЗначение(Номенклатура) = 1 Тогда Возврат ""; КонецЕсли; ВидСвойства = СоздатьОбъект("Справочник.ВидыСвойств"); Если ВидСвойства.НайтиПоНаименованию("Размер",0,0) = 0 Тогда Возврат ""; КонецЕсли; Свойства = СоздатьОбъект("Справочник.СвойстваНоменклатуры"); Свойства.ИспользоватьВладельца(Номенклатура); Если Свойства.НайтиПоРеквизиту("ВидСвойства",ВидСвойства.ТекущийЭлемент(),0) = 1 Тогда Возврат Свойства.ЗначениеСвойства; Иначе Возврат ""; КонецЕсли; КонецФункции

Ответ отправил: Coch (статус: 1-ый класс) Ответ отправлен: 20.03.2007, 06:57

Отвечает: BigHard Здравствуйте, Flomik! Все очень просто: Допустим, у вас на форме есть реквизит "товар", и соответственно реквизит "размер", который вам и надо указать размер товара указан в справочнике товары под реквизитом "разм" Так вот в формуле реквизита "товар" просто пишете размер=товар.разм Все.... единственное и обязательное условие, чтоб реквизит формы и реквизит справочника были одинакового типа, число, строка, справочник и.т.п. --------- Чем отличается чайник от программиста: У чайника в одном килобайте 1000 байт, а у программиста в одном километре 1024 метра

Ответ отправил: BigHard (статус: 5-ый класс) Ответ отправлен: 20.03.2007, 07:02

Отвечает: Ovr1970 Здравствуйте, Flomik! В форма документа добавляете в табличную часть реквизит типа "Текст", полученную колонку редактируете (выставляете в нужное место, задаете заголовок), добавляете формулу этого текстового поля ту, которую хотите видеть.

Ответ отправил: Ovr1970 (статус: Студент) Ответ отправлен: 20.03.2007, 10:35

Вопрос № 78.988

Здравствуйте люди добрые. Кто-нить сталкивался с проблемой переноса данных (всей базы) с ЗиКа на УПП? Кто чем пользовался? Подскажите как лучше провернуть это дело, если есть обработки или файлы правил буду премного благадарен.... Заранее спасибо всем кто откликнется.

Отправлен: 19.03.2007, 21:03 Вопрос задал: AlekseyX13 (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Яна Здравствуйте, AlekseyX13! Перенос данных из 7.7 в 8.0 я делаю следующим образом: 1. Конвертирую базу 7.7 2. Проверяю нет ли одноименных объектов с новыми из 8.0, если есть - переименовываю 3. Объединяю с новой конфигурацией. 4. Внутри одной базы переношу с помощью обработки данные из старой базы в новую.

Ответ отправила: Яна (статус: Студент) Ответ отправлен: 19.03.2007, 21:53

© 2001-2007, Портал RusFAQ.ru, Россия, Москва. Идея, дизайн, программирование: Калашников О.А. Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31 ООО "Мастер-Эксперт Про", Москва, 2007 Авторские права | Реклама на портале Версия системы: 4.46 от 18.03.2007