КаталогВременныхФайлов()    

 ГдеИскать = КаталогВременныхФайлов();   

  // В тонком клиенте код работает

ИмяФайла = КаталогВременныхФайлов() + Элемент.ТекущиеДанные.ПредставлениеВложения;

Данные.Записать(ИмяФайла);

ЗапуститьПриложение(ИмяФайла);

   

 ПолучитьИмяВременногоФайла(<Расширение> (необязательный)   

 Для каждого СтрокаТаблицы Из ТаблицаОтчетов Цикл

    ИмяТемпФайла = ПолучитьИмяВременногоФайла();

    СтрокаТаблицы.Отчет.Записать(ИмяТемпФайла, 

            ТипФайлаТабличногоДокумента.HTML);

    ТекстHТМЛ = Новый ТекстовыйДокумент;

    ТекстHТМЛ.Прочитать(ИмяТемпФайла);

    ТекстHТМЛ = ТекстHТМЛ.ПолучитьТекст();

    // ...

КонецЦикла;   

 Макет = ПолучитьМакет("Макет"); 

ОбластьШапка = Макет.ПолучитьОбласть("Шапка"); 



ТабДок = Новый ТабличныйДокумент; 

ОбластьШапка.Параметры.НомерДок = Номер; 

ОбластьШапка.Параметры.ДатаДок = Формат(Дата, "DDMMMMYYYY"); 

ОбластьШапка.Параметры.Руководитель = Руководитель;



ТабДок.Вывести(ОбластьШапка); 



ТабДок.Защита=Истина;

ВремФайл=ПолучитьИмяВременногоФайла("pdf");

ТабДок.Записать(ВремФайл,ТипФайлаТабличногоДокумента.PDF);

ЗапуститьПриложение(ВремФайл);   

 ВЫБРАТЬ 

   Док.Дата, 

   Док.Ссылка, 

   Док.ВидОперации, 

   Док.Организация, 

   Док.ОтражатьВРегламентированномУчете, 

   Док.ОтражатьВУправленческомУчете, 

   Док.ПодразделениеКомпании, 

   Док.Контрагент, 

   Док.ДоговорВзаиморасчетов,

   Док.СкладКомпании, 

   Док.Сделка,

   Док.Сделка.ВидОперации КАК ВидЗаказаПокупателя,

   Док.КурсДокумента, 

   Док.КратностьДокумента, 

   Док.ВалютаДокумента, 

   Док.СуммаДокумента, 

   Док.КурсВзаиморасчетов,

   Док.КратностьВзаиморасчетов,

   Док.СкладКомпании.Розничный КАК СкладКомпанииРозничный,

   Док.ДоговорВзаиморасчетов.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов,

   Док.ДоговорВзаиморасчетов.ВедениеВзаиморасчетов КАК ВедениеВзаиморасчетов,

   Док.ДоговорВзаиморасчетов.КонтролироватьЧислоДнейЗадолженности 

       КАК КонтролироватьЧислоДнейЗадолженности,

   Док.ДоговорВзаиморасчетов.ДопустимоеЧислоДнейЗадолженности 

       КАК ДопустимоеЧислоДнейЗадолженности,

   Док.ДоговорВзаиморасчетов.КонтролироватьСуммуЗадолженности 

       КАК КонтролироватьСуммуЗадолженности,

   Док.ДоговорВзаиморасчетов.ДопустимаяСуммаЗадолженности 

       КАК ДопустимаяСуммаЗадолженности,

   Док.ДоговорВзаиморасчетов.ПроцентПредоплаты КАК ПроцентПредоплаты,

   Док.УчитыватьНДС,

   Док.УчитыватьНП,

   Док.СуммаВключаетНДС,

   Док.СуммаВключаетНП,

   Константы.ВалютаУправленческогоУчетаКомпании КАК ВалютаУправленческогоУчета,

   КурсыВалютСрезПоследних.Курс КАК КурсВалютыУпрУчета,

   КурсыВалютСрезПоследних.Кратность КАК КратностьВалютыУпрУчета,

   ВзаиморасчетыПоДоговору.СуммаВалОстаток КАК СуммаВалОстатокПоДоговору,

   ВзаиморасчетыПоСделке.СуммаВалОстаток КАК СуммаВалОстатокПоСделке,

   ПерваяСделка.ДатаПервойСделки,

   СуммыЗаказов.СуммаЗаказаОборот,

   СуммыЗаказов.СуммаОплатыОборот

ИЗ 

   Документ.РеализацияТоваров Док,

   Константы 

      ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&ДатаДокумента,) 

            КАК КурсыВалютСрезПоследних

      ПО Константы.ВалютаУправленческогоУчетаКомпании = КурсыВалютСрезПоследних.Валюта

 

ЛЕВОЕ СОЕДИНЕНИЕ // Для контроля суммы задолженности по договору 

                 // (ведение взаиморасчетов - любое) и числа дней задолженности по договору 

                 // (ведение взаиморасчетов - по расчетным документам)

   РегистрНакопления.КонтрагентыВзаиморасчетыКомпании.Остатки(, 

             ДоговорВзаиморасчетов = &ДоговорВзаиморасчетов) 

      КАК ВзаиморасчетыПоДоговору

   ПО Истина

 

ЛЕВОЕ СОЕДИНЕНИЕ 

   (ВЫБРАТЬ // Выбирает даты самых ранних сделок по договорам, указанным в т.ч. 

        МИНИМУМ(Сделка.Дата) КАК ДатаПервойСделки,

        ДоговорВзаиморасчетов

    ИЗ РегистрНакопления.КонтрагентыВзаиморасчетыКомпании.Остатки(, 

         ДоговорВзаиморасчетов = &ДоговорВзаиморасчетов)

    ГДЕ СуммаВалОстаток > 0 // Дебиторская задолженность больше 0

        И ДоговорВзаиморасчетов.ВедениеВзаиморасчетов = &ПоРасчетнымДокументам

        И ДоговорВзаиморасчетов.КонтролироватьЧислоДнейЗадолженности

    СГРУППИРОВАТЬ ПО ДоговорВзаиморасчетов) КАК ПерваяСделка

   ПО Истина

 

ЛЕВОЕ СОЕДИНЕНИЕ // Для контроля суммы задолженности по расчетному документу 

                 //(ведение взаиморасчетов - по расчетным документам)

   РегистрНакопления.КонтрагентыВзаиморасчетыКомпании.Остатки(,

   ДоговорВзаиморасчетов = &ДоговорВзаиморасчетов

   И Сделка = &Сделка

   ) КАК ВзаиморасчетыПоСделке

   ПО Истина

 

ЛЕВОЕ СОЕДИНЕНИЕ 

   РегистрНакопления.СуммыЗаказов.Обороты(,,, Заказ = &Сделка) КАК СуммыЗаказов

   ПО Истина

ГДЕ 

   Док.Ссылка = &ДокументСсылка

ДЛЯ ИЗМЕНЕНИЯ РегистрНакопления.КонтрагентыВзаиморасчетыКомпании.Остатки 

                           // Блокирующие чтение таблицы остатков регистра для разрешения 

                           // коллизий многопользовательской работы   

  ГраницаКНД = Новый Граница(КонецДня(Дата), ВидГраницы.Включая);

Запрос.УстановитьПараметр("КонГраница", ГраницаКНД );   

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

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

"ВЫБРАТЬ

|	ВзаиморасчетыСРаботникамиОрганизацийОстатки.Физлицо,

|	ВзаиморасчетыСРаботникамиОрганизацийОстатки.СуммаВзаиморасчетовОстаток

|ИЗ

|	РегистрНакопления.ВзаиморасчетыСРаботникамиОрганизаций.Остатки(&МомВрем, Физлицо = &Физик) КАК ВзаиморасчетыСРаботникамиОрганизацийОстатки";

МомВрем = Документы.НачислениеЗарплатыРаботникамОрганизаций.НайтиПоНомеру("00012","31.12.2009 23:59:59");

Запрос.УстановитьПараметр("МомВрем", Новый Граница(МомВрем.МоментВремени(), ВидГраницы.Включая));

Запрос.УстановитьПараметр("Физик", Справочники.ФизическиеЛица.НайтиПоКоду("365"));	

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

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

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

"ВЫБРАТЬ

|	ВзаиморасчетыСРаботникамиОрганизацийОстатки.Физлицо,

|	ВзаиморасчетыСРаботникамиОрганизацийОстатки.СуммаВзаиморасчетовОстаток

|ИЗ

|	РегистрНакопления.ВзаиморасчетыСРаботникамиОрганизаций.Остатки(&МомВрем, Физлицо = &Физик) КАК ВзаиморасчетыСРаботникамиОрганизацийОстатки";

МомВрем = Документы.НачислениеЗарплатыРаботникамОрганизаций.НайтиПоНомеру("00012","31.12.2009 23:59:59");

Запрос.УстановитьПараметр("МомВрем", Новый Граница(МомВрем.МоментВремени(), ВидГраницы.Исключая));

// или так: Запрос.УстановитьПараметр("МомВрем", МомВрем.МоментВремени());

Запрос.УстановитьПараметр("Физик", Справочники.ФизическиеЛица.НайтиПоКоду("365"));	

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

 '20050308' 

Дата(2005, 1, 1) 

Дата(1, 1, 1) 

Дата(2005, 1, 1, 10, 29, 50) 

ДАТАВРЕМЯ(2005, 01, 01)    

 Сообщить('20040814093941');

Сообщить('2004-08-14 09:39:41');   

 // Перевод Даты в Строку и Обратно

//ТекущаяДата() - 28.02.2010 23:58:59



//Переведем текущую дату в строку

СтрокаДата = Формат(ТекущаяДата(), "ггггММддЧЧммсс");  // Получаем:  20100228235859



//Переведем строку в дату

ТекДата = Дата(СтрокаДата); // Получаем:  28.02.2010 23:58:59    

 ДАТАВРЕМЯ(2003, 10, 12, 10, 15, 34)

ДАТАВРЕМЯ(2003, 10, 12)   

 ДатаНачала = '01.01.2009';

//В условиях

Если РабочаяДата() > '31.12.2009' Тогда

   //...

КонецЕсли;