Если ТипЦБ = 0 Тогда

ЭтаФорма.ЭлементыФормы.Поступление.Колонки.НКД.Доступность = 0;

ИначеЕслиТипЦБ = 1 Тогда

ЭтаФорма.ЭлементыФормы.Поступление.Колонки.НКД.Доступность = 1; // только для облигаций разрешаем НКД

ИначеЕслиТипЦБ = 2 Тогда

ЭтаФорма.ЭлементыФормы.Поступление.Колонки.НКД.Доступность = 0;

ИначеЕслиТипЦБ = 3 Тогда

ЭтаФорма.ЭлементыФормы.Поступление.Колонки.НКД.Доступность = 0;

КонецЕсли;   

  //Текущему Элементу формы присваиваем элемент котровый необходимо активизировать

ЭтаФорма.ТекущийЭлемент = ЭлементыФормы.ТабличноеПоле;   

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

// Получим суммы начисленные документами НачислениеЗарплатыРаботникамОрганизаций в ПериодВзаиморасчетов

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

|ВЫБРАТЬ

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

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

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

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

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

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

|ИЗ

|	РегистрНакопления.ВзаиморасчетыСРаботникамиОрганизаций КАК ВзаиморасчетыСРаботникамиОрганизаций

|ГДЕ

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

|	И ВзаиморасчетыСРаботникамиОрганизаций.Регистратор ССЫЛКА Документ.НачислениеЗарплатыРаботникамОрганизаций

|";

Запрос.УстановитьПараметр("ПериодВзаиморасчетов",Дата("01.09.2009 0:00:00"));

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

// Выгрузим Результат Запроса в ТЗ

ТзВрем = Результат.Выгрузить();

Для Каждого стр Из Тзврем Цикл

       // ТаблЧастьДокРезультат - Табличная часть на форме, создаем в ней новую строку

	НовСтр=ТаблЧастьДокРезультат.Добавить();

        // Заполняем значения новой строки значениями  результат запроса:

	ЗаполнитьЗначенияСвойств(новстр, стр);

        //ВНИМАНИЕ!!! ЗаполнитьЗначенияСвойств( - работает только когда имена колонок табл части и результата запроса совпадают!

        //Если не совпадают, то обычным способом:

        НовСтр.Дата = стр.ПериодВзаиморасчетов;

        НовСтр.Сумма = стр.СуммаВзаиморасчетов;

КонецЦикла;    

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

// Получим суммы начисленные документами НачислениеЗарплатыРаботникамОрганизаций в ПериодВзаиморасчетов

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

|ВЫБРАТЬ

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

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

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

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

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

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

|ИЗ

|	РегистрНакопления.ВзаиморасчетыСРаботникамиОрганизаций КАК ВзаиморасчетыСРаботникамиОрганизаций

|ГДЕ

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

|	И ВзаиморасчетыСРаботникамиОрганизаций.Регистратор ССЫЛКА Документ.НачислениеЗарплатыРаботникамОрганизаций

|";

Запрос.УстановитьПараметр("ПериодВзаиморасчетов",Дата("01.09.2009 0:00:00"));

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

// Выгрузим Результат Запроса в ТЗ

ТзВрем = Результат.Выгрузить();

// ТЗРезультат - это Табличное Поле на Форме, присваиваем ему таблицу значений 

ТЗРезультат=ТзВрем;

//Создаем колонки в табличном поле, после чего видим в поле тз

ЭлементыФормы.ТЗРезультат.СоздатьКолонки();     

 СправочникОбъект.Наименование = "Новое наименование";   

 Если ИмяРеквизита="Наименование" тогда

СправочникОбъект.Наименование = ЗначениеРеквизита;

ИначеЕсли ИмяРеквизита="Код" тогда

СправочникОбъект.Код = ЗначениеРеквизита;

ИначеЕсли

.....

КонецЕсли;   

 СправочникОбъект[ИмяРеквизита] = ЗначениеРеквизита;   

  // функция ПолучитьТаблицуЧисленностейВТЗ() возвращает таблицу значений

ТзВрем=ПолучитьТаблицуЧисленностейВТЗ(Организация, НачПериода,КонПериода);

// теперь нужно вывести тыблицу значений  в табличное поле

ТЗРезультат=ТзВрем; // ТЗРезультат - это Табличное Поле на Форме, присваиваем ему таблицу значений 

//Создаем колонки в табличном поле, после чего видим в поле тз

ЭлементыФормы.ТЗРезультат.СоздатьКолонки();