Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: табличный документ
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование управляемых форм 1С 8.2
sportsmen
В информационной базе написать обработку, выводящую на экран табличный документ с ФИО, текстом задания, наименования всех справочников и наименования первых трёх элементов из каждого справочника.

&НаКлиенте
Процедура Инфо(Команда)
    табДок = инф();
    ТабДок.Показать("Информация", "Инфо.mxl");
КонецПроцедуры

&НаСервере
Функция инф()
    ТабДок = Новый ТабличныйДокумент;
    Секция = ТабДок.ПолучитьОбласть("R1");
    Секция.Область("R1C1").Текст = "ФИО.";
    ТабДок.Вывести(Секция,1,"Группа",Истина);
    Секция.Область("R1C1").Текст = "Текст задачи";
    ТабДок.Вывести(Секция,1,"Группа",Истина);
    Для каждого спр Из Справочники Цикл
        Сообщить(спр);
        стр = СтрЗаменить(спр,"СправочникМенеджер.","");
        Секция.Область("R1C1").Текст = стр;
        ТабДок.Вывести(Секция,1,"Группа",Истина);
        выб = спр.выбрать();
        а = 0;
        пока выб.следующий() Цикл
            а = а + 1;
        КонецЦикла;
    Секция.Область("R1C1").Текст = а;
    ТабДок.Вывести(Секция,1,"Группа",Истина);
    КонецЦикла;
    ТабДок.ОтображатьСетку = Ложь;
    ТабДок.Защита = Ложь;
    ТабДок.ТолькоПросмотр = Истина;
    Возврат ТабДок;
КонецФункции


Помогите с решением)
Ardi
Меняю на всю первую зарплату.
Домовик
Ardi, задание больше похоже на лабораторку для студента. похоже зарплаты не будет.
pablo
Стипендия - тоже зарплата wink.gif
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.