||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | |||
Получить имена существующих документов
  • ut10 0. 18.01.2015, 20:25

    ¶Функция ПолучитьИменаСуществующихДокументов() Экспорт¶	Запрос = Новый Запрос;¶	Запрос.Текст = "";¶	¶	н = 0;¶	МетаКоллекция = Метаданные["Документы"];Для Каждого МетаДокумент из МетаКоллекция Цикл¶		н = н + 1;¶		Имя = МетаДокумент.Имя;¶		¶		Запрос.Текст = Запрос.Текст + "¶		|"+?(н=1,"","ОБЪЕДИНИТЬ ВСЕ")+"¶		|ВЫБРАТЬ ПЕРВЫЕ 1 Документ."+Имя+".Ссылка ИЗ Документ."+Имя+"¶		|";КонецЦикла; // по всем видам документов¶	¶	Тз = Запрос.Выполнить().Выгрузить();¶	Возврат Тз;¶КонецФункции // ПолучитьИменаСуществующихДокументов¶
    

Ответы
  • Ответов: 4
  • ut10 1. 18.01.2015, 20:47

    123

  • ut10 2. 18.01.2015, 20:47

    345

  • ut10 3. 18.01.2015, 20:48

    [code]
    Функция ПолучитьИменаСуществующихДокументов() Экспорт
    Запрос = Новый Запрос;
    Запрос.Текст = "";

    н = 0;
    МетаКоллекция = Метаданные["Документы"];
    Для Каждого МетаДокумент из МетаКоллекция Цикл
    н = н + 1;
    Имя = МетаДокумент.Имя;

    Запрос.Текст = Запрос.Текст + "
    |"+?(н=1,"","ОБЪЕДИНИТЬ ВСЕ")+"
    |ВЫБРАТЬ ПЕРВЫЕ 1 Документ."+Имя+".Ссылка ИЗ Документ."+Имя+"
    |";
    КонецЦикла; // по всем видам документов

    Тз = Запрос.Выполнить().Выгрузить();
    Возврат Тз;
    КонецФункции // ПолучитьИменаСуществующихДокументов
    [/code]

  • ut10 4. 18.01.2015, 21:01


    Функция ПолучитьИменаСуществующихДокументов() Экспорт

       
    Запрос = Новый Запрос;

       
    Запрос.Текст = "";



       
    н = 0;

       
    МетаКоллекция = Метаданные["Документы"];

        Для Каждого
    МетаДокумент из МетаКоллекция Цикл

           
    н = н + 1;

           
    Имя = МетаДокумент.Имя;



           
    Запрос.Текст = Запрос.Текст + "

            |"
    +?(н=1,"","ОБЪЕДИНИТЬ ВСЕ")+"

            |ВЫБРАТЬ ПЕРВЫЕ 1 Документ."
    +Имя+".Ссылка ИЗ Документ."+Имя+"

            |"
    ;

        КонецЦикла;
    // по всем видам документов



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

        Возврат
    Тз;

    КонецФункции
    // ПолучитьИменаСуществующихДокументов


Я Реклама

Веб-сайты на 1С! Сравнение рабочих макетов...