Имя: Пароль:
1C
1С v8
объединение запросов, как-то так
0 igoza
 
01.09.13
09:30
В отчёте нада вывести IP, ФИО, имя системника, рабочая группа, учётная запись с паролем, место расположение "помещение", MAC, Наличие интернета

И вся эта информация лежит в 3 отдельных места, т.е делю 3 зарпоса, а дальше то что, как их объединить в 1

раньше всё было просто, лежало в одном месте, но так не канает))

ЭлементыФормы.Результат.Очистить();    
        
    Если НЕ обЗначениеНеЗаполнено(РабочаяГруппа) Тогда
        ПерУсловие = "И РабочаяГруппа = &РабочаяГруппа";
    КонецЕсли;
    
    
    Макет = Отчеты.IPВСети.ПолучитьМакет("Макет");
    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
        |    РабочиеМеста.IP,
        |    РабочиеМеста.Сотрудник,
        |    РабочиеМеста.Помещение,
        |    РабочиеМеста.РабочаяГруппа,
        |    РабочиеМеста.ИмяКомпьютера,
        |    РабочиеМеста.УчётнаяЗапись,
        |    РабочиеМеста.Пароль,
        |    РабочиеМеста.Запись,
        |    РабочиеМеста.IP.Интернет,
        |    РабочиеМеста.IP.Комментарий
        |ИЗ
        |    Справочник.РабочиеМеста КАК РабочиеМеста
        |ГДЕ
        |   IP.Код <> &IP
        |   "+ПерУсловие+"
        |
        |
        |";
        Пер = "";
        Запрос.УстановитьПараметр("РабочаяГруппа", РабочаяГруппа);
        Запрос.УстановитьПараметр("IP", Пер);
        Результат = Запрос.Выполнить();

    Результат = Запрос.Выполнить();

    //ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
    ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
    ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
    ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");
    ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");

    ТабДок.Очистить();
    //ТабДок.Вывести(ОбластьЗаголовок);
    ТабДок.Вывести(ОбластьШапкаТаблицы);
    ТабДок.НачатьАвтогруппировкуСтрок();

    ВыборкаДетальныеЗаписи = Результат.Выбрать();

    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
        ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетальныеЗаписи);
        ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетальныеЗаписи.Уровень());
    КонецЦикла;

    ТабДок.ЗакончитьАвтогруппировкуСтрок();
    ТабДок.Вывести(ОбластьПодвалТаблицы);
    ТабДок.Вывести(ОбластьПодвал);

    ЭлементыФормы.Результат.Вывести(ТабДок);
1 Нуф-Нуф
 
01.09.13
09:34
Соедини! Будь мужиком, блеать!
2 igoza
 
01.09.13
09:37
(1) как?
3 igoza
 
01.09.13
09:38
а нашёл, внутренне, полное, левое и правое
4 Rie
 
01.09.13
09:38
(2) СОЕДИНЕНИЕ
5 Wobland
 
01.09.13
09:58
(3) ещё одно есть
6 mulmulya
 
01.09.13
10:00
ОБЪЕДИНИТЬ