Поиск значения в табличной части документа

[Амал]

Покажите код заполнения печатной формы целиком.

Код Выделить Развернуть

Функция ПечатьАктаОбОказанииУслуг(СведенияАктаОбОказанииУслуг, ОбъектыПечати, СтруктураПараметровПечати) Экспорт

УстановитьПривилегированныйРежим(Истина);

ДополнительнаяКолонкаПечатныхФормДокументов = Константы.ДополнительнаяКолонкаПечатныхФормДокументов.Получить();
Если НЕ ЗначениеЗаполнено(ДополнительнаяКолонкаПечатныхФормДокументов) Тогда
ДополнительнаяКолонкаПечатныхФормДокументов = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.НеВыводить;
КонецЕсли;
ВыводитьКоды = ДополнительнаяКолонкаПечатныхФормДокументов <> Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.НеВыводить;

ТабличныйДокумент = Новый ТабличныйДокумент;
ТабличныйДокумент.АвтоМасштаб = Истина;
ТабличныйДокумент.ОриентацияСтраницы = ОриентацияСтраницы.Портрет;
ТабличныйДокумент.ИмяПараметровПечати = СтруктураПараметровПечати.ИмяПараметровПечати;

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

ПервыйДокумент = Истина;

Для Каждого СведенияОДокументе ИЗ СведенияАктаОбОказанииУслуг Цикл

Если НЕ ПервыйДокумент Тогда
ТабличныйДокумент.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;

ЭтоПечатьЗаПоставщика = СтруктураПараметровПечати.ВидДокументаПечати = "ПоступлениеИзПереработки"
ИЛИ СтруктураПараметровПечати.ВидДокументаПечати = "ПоступлениеТоваровУслуг"
ИЛИ СтруктураПараметровПечати.ВидДокументаПечати = "КорректировкаПоступления"
ИЛИ СтруктураПараметровПечати.ВидДокументаПечати = "ПоступлениеДопРасходов";

ПервыйДокумент = Ложь;

// Запомним номер строки, с которой начали выводить текущий документ.
НомерСтрокиНачало = ТабличныйДокумент.ВысотаТаблицы + 1;

ТаблицаУслуги = СведенияОДокументе.ТаблицаДокумента;

// Выводим шапку документа
ОбластьМакета = Макет.ПолучитьОбласть("Заголовок");
ДанныеПечатиЗаголовок = Новый Структура("ТекстЗаголовка, ТекстЗаголовкаИсправления");
ТекстЗаголовка = НСтр("ru='Акт № %1 от %2 г.'");
ТекстЗаголовка = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ТекстЗаголовка,
СведенияОДокументе.НомерДокумента,
Формат(СведенияОДокументе.ДатаДокумента, "ДФ='дд ММММ гггг'"));
ДанныеПечатиЗаголовок.Вставить("ТекстЗаголовка", ТекстЗаголовка);
Если СтруктураПараметровПечати.ВидДокументаПечати = "КорректировкаРеализации" ИЛИ СтруктураПараметровПечати.ВидДокументаПечати = "КорректировкаПоступления" Тогда
ТекстЗаголовкаИсправления = НСтр("ru='Исправление № %1 от %2 г.'");
ТекстЗаголовкаИсправления = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ТекстЗаголовкаИсправления,
СведенияОДокументе.НомерИсправления,
Формат(СведенияОДокументе.ДатаИсправления, "ДФ='дд ММММ гггг'"));
ДанныеПечатиЗаголовок.Вставить("ТекстЗаголовкаИсправления", ТекстЗаголовкаИсправления);
КонецЕсли;

ОбластьМакета.Параметры.Заполнить(ДанныеПечатиЗаголовок);

ТабличныйДокумент.Вывести(ОбластьМакета);

СведенияОбПоставщике    = БухгалтерскийУчетПереопределяемый.СведенияОЮрФизЛице(СведенияОДокументе.Поставщик, СведенияОДокументе.ДатаДокумента, СведенияОДокументе.БанковскийСчетПродавца);

ПредставлениеПоставщика = ОбщегоНазначенияБПВызовСервера.ОписаниеОрганизации(СведенияОбПоставщике,
"НаименованиеДляПечатныхФорм,ИНН,ЮридическийАдрес,Телефоны,НомерСчета,Банк,БИК,КоррСчет");

ОбластьМакета = Макет.ПолучитьОбласть("Поставщик");
ДанныеПечатиПоставщик = Новый Структура;
ДанныеПечатиПоставщик.Вставить("ПредставлениеПоставщика", ПредставлениеПоставщика);
ДанныеПечатиПоставщик.Вставить("Поставщик", СведенияОДокументе.Поставщик);

ОбластьМакета.Параметры.Заполнить(ДанныеПечатиПоставщик);
ТабличныйДокумент.Вывести(ОбластьМакета);

Если Макет.Области.Найти("Получатель") <> Неопределено Тогда
ОбластьМакета = Макет.ПолучитьОбласть("Получатель");
Иначе
ОбластьМакета = Макет.ПолучитьОбласть("Покупатель");
КонецЕсли;
СведенияОКонтрагенте    = БухгалтерскийУчетПереопределяемый.СведенияОЮрФизЛице(СведенияОДокументе.Получатель, СведенияОДокументе.ДатаДокумента);
ПредставлениеПолучателя = ОбщегоНазначенияБПВызовСервера.ОписаниеОрганизации(СведенияОКонтрагенте,
"НаименованиеДляПечатныхФорм,ИНН,ЮридическийАдрес,Телефоны,НомерСчета,Банк,БИК,КоррСчет");

ДанныеПечатиПолучатель = Новый Структура;
ДанныеПечатиПолучатель.Вставить("ПредставлениеПолучателя", ПредставлениеПолучателя);
ДанныеПечатиПолучатель.Вставить("Получатель", СведенияОДокументе.Получатель);
ДанныеПечатиПолучатель.Вставить("Основание", СведенияОДокументе.ПредставлениеДоговора);

ОбластьМакета.Параметры.Заполнить(ДанныеПечатиПолучатель);

ТабличныйДокумент.Вывести(ОбластьМакета);

// Инициализация счетчика строк
НомерСтроки = 0;

// Выводим заголовок многострочной части
ОбластьШапки = ?(ВыводитьКоды, "ШапкаСКодом", "ШапкаТаблицы");
ОбластьМакета = Макет.ПолучитьОбласть(ОбластьШапки);
ОбластьМакета.Параметры.Заполнить(СведенияОДокументе);
ДанныеПечатиКод = Новый Структура;
Если ДополнительнаяКолонкаПечатныхФормДокументов = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Артикул Тогда
ДанныеПечатиКод.Вставить("ИмяКодАртикул", "Артикул");
ИначеЕсли ДополнительнаяКолонкаПечатныхФормДокументов = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Код Тогда
ДанныеПечатиКод.Вставить("ИмяКодАртикул", "Код");
КонецЕсли;
ОбластьМакета.Параметры.Заполнить(ДанныеПечатиКод);
ТабличныйДокумент.Вывести(ОбластьМакета);

ОбластьСтроки = ?(ВыводитьКоды, "СтрокаСКодом", "Строка");
ОбластьСтроки = Макет.ПолучитьОбласть(ОбластьСтроки);

// Выводим многострочную часть документа
Для каждого СтрокаТабличнойЧасти Из ТаблицаУслуги Цикл

НомерСтроки = НомерСтроки + 1;

СтруктураПараметры = Новый Структура();
СтруктураПараметры.Вставить("НомерСтроки", НомерСтроки);
СтруктураПараметры.Вставить("НоменклатураНаименование", СокрЛП(СтрокаТабличнойЧасти.НоменклатураНаименование));
СтруктураПараметры.Вставить("Товар",     СокрЛП(СтрокаТабличнойЧасти.НоменклатураНаименование));
СтруктураПараметры.Вставить("Номенклатура", СтрокаТабличнойЧасти.Номенклатура);
СтруктураПараметры.Вставить("Количество", СтрокаТабличнойЧасти.Количество);
СтруктураПараметры.Вставить("ЕдиницаИзмерения", СтрокаТабличнойЧасти.ЕдиницаИзмеренияНаименование);
СтруктураПараметры.Вставить("Цена",     СтрокаТабличнойЧасти.Цена);
СтруктураПараметры.Вставить("Сумма",     СтрокаТабличнойЧасти.Сумма);

Если ВыводитьКоды Тогда
СтруктураПараметры.Вставить("НоменклатураКод", СтрокаТабличнойЧасти.НоменклатураКод);
СтруктураПараметры.Вставить("КодАртикул", СтрокаТабличнойЧасти.НоменклатураКод);
КонецЕсли;

ОбластьСтроки.Параметры.Заполнить(СтруктураПараметры);

ТабличныйДокумент.Вывести(ОбластьСтроки);

КонецЦикла;

// Выводим подвал документа
Если ТаблицаУслуги <> Неопределено Тогда
Сумма    = ТаблицаУслуги.Итог("Сумма");
СуммаНДС = ТаблицаУслуги.Итог("СуммаНДС");
Иначе
Сумма    = 0;
СуммаНДС = 0;
КонецЕсли;

ОбластьМакета = Макет.ПолучитьОбласть("Итого");
ОбластьМакета.Параметры.Заполнить(Новый Структура("Всего", ОбщегоНазначенияБПВызовСервера.ФорматСумм(Сумма)));
ТабличныйДокумент.Вывести(ОбластьМакета);

ОбластьМакета = Макет.ПолучитьОбласть("ИтогоНДС");
ДанныеПечатиИтогоНДС = Новый Структура("ВсегоНДС, НДС, СуммаНДС");
//НайденнаяСтрока = СсылкаНаДокумент.Услуги.Найти(Перечисления.СтавкиНДС.БезНДС, "СтавкаНДС");

//Если СуммаНДС <> 0 Тогда
//
// ДанныеПечатиИтогоНДС.ВсегоНДС = ОбщегоНазначенияБПВызовСервера.ФорматСумм(СуммаНДС);
// ДанныеПечатиИтогоНДС.НДС      = ?(СведенияОДокументе.СуммаВключаетНДС, НСтр("ru='В том числе НДС'"), НСтр("ru='Сумма НДС'"));
// //ДанныеПечатиИтогоНДС.СуммаНДС =
//
////Иначе
////
////НайденнаяСтрока = СсылкаНаДокумент.Услуги.Найти(Перечисления.СтавкиНДС.БезНДС, "СтавкаНДС");
////
////
//
//
//Иначе
//
// ДанныеПечатиИтогоНДС.ВсегоНДС = НСтр("ru='0%'");
// ДанныеПечатиИтогоНДС.НДС      = НСтр("ru='(НДС)'");
//
//
// //ТаблицаУслуги.НайтиСтроки("СтавкаНДС", );
// //ДанныеПечатиИтогоНДС.ВсегоНДС = НСтр("ru='-'");
// //ДанныеПечатиИтогоНДС.НДС      = НСтр("ru='Без налога(НДС)'");
//
//КонецЕсли;

//Таб = Новый ТаблицаЗначений;
//Отбор = Новый Структура;
//Отбор.Вставить("СтавкаНДС", "БезНДС");
//Строки = Таб.Найти(Отбор);

Строки = СсылкаНаДокумент.Услуги.Найти(Перечисления.СтавкиНДС.БезНДС, "СтавкаНДС");

Если Строки <> Неопределено Тогда

ОбластьИтогоНДС = Макет.ПолучитьОбласть("ИтогоНДС");
ОбластьИтогоНДС.Параметры.СуммаНДС = 1;
ТабличныйДокумент.Вывести(ОбластьИтогоНДС);

Иначе

ОбластьИтогоНДС = Макет.ПолучитьОбласть("ИтогоНДС");
ОбластьИтогоНДС.Параметры.СуммаНДС = ТекущаяДата();
ТабличныйДокумент.Вывести(ОбластьИтогоНДС);

КонецЕсли;

СтавкаНДС = Перечисления.СтавкиНДС;

Если СтавкаНДС = Перечисления.СтавкиНДС.БезНДС Тогда
ДанныеПечатиИтогоНДС.ВсегоНДС = "Без НДС";
ДанныеПечатиИтогоНДС.НДС      = "Без НДС";
ИначеЕсли СтавкаНДС = Перечисления.СтавкиНДС.НДС0 Тогда
ДанныеПечатиИтогоНДС.ВсегоНДС = НСтр("ru='0%'");
ДанныеПечатиИтогоНДС.НДС      = НСтр("ru='(НДС)'");
Иначе           
ДанныеПечатиИтогоНДС.ВсегоНДС = ОбщегоНазначенияБПВызовСервера.ФорматСумм(СуммаНДС);
ДанныеПечатиИтогоНДС.НДС      = ?(СведенияОДокументе.СуммаВключаетНДС, НСтр("ru='В том числе НДС'"), НСтр("ru='Сумма НДС'"));       
КонецЕсли;






//Отбор = Новый Структура("БезНДС", Перечисления.СтавкиНДС);
//НайденнаяСтрока = НайденнаяСтрока.Найти(Отбор);
//
//Для Каждого Строка ИЗ НайденнаяСтрока Цикл
// Если НайденнаяСтрока <> Неопределено Тогда
//
// ОбластьИтогоНДС = Макет.ПолучитьОбласть("ИтогоНДС");
// ОбластьИтогоНДС.Параметры.СуммаНДС = 1;
// ТабличныйДокумент.Вывести(ОбластьИтогоНДС);
// ДанныеПечатиИтогоНДС.ВсегоНДС = НСтр("ru='-'");
// ДанныеПечатиИтогоНДС.НДС      = НСтр("ru='Без налога(НДС)'");
//
// КонецЕсли;
//КонецЦикла;


// ТабЧасть = СсылкаНаДокумент.Услуги;
// НайденнаяСтрока = ТабЧасть.Найти("БезНДС", "СтавкаНДС");
//
//Если НайденнаяСтрока <> Неопределено Тогда
//
// ОбластьИтогоНДС = Макет.ПолучитьОбласть("ИтогоНДС");
// ОбластьИтогоНДС.Параметры.СуммаНДС = ТекущаяДата();
// ТабличныйДокумент.Вывести(ОбластьИтогоНДС);
//
//Иначе
// ОбластьИтогоНДС = Макет.ПолучитьОбласть("ИтогоНДС");
// ОбластьИтогоНДС.Параметры.СуммаНДС = 1;
// ТабличныйДокумент.Вывести(ОбластьИтогоНДС);
//ДанныеПечатиИтогоНДС.ВсегоНДС = НСтр("ru='-'");
//ДанныеПечатиИтогоНДС.НДС      = НСтр("ru='Без налога(НДС)'");


//КонецЕсли;


//ПараметрыОтбора = Новый Структура;
//ПараметрыОтбора.Вставить("СтавкаНДС", Перечисления.СтавкиНДС.БезНДС);
//НайденныеСтроки = СсылкаНаДокумент.Услуги.НайтиСтроки("СтавкаНДС", "Без НДС");
//
//Если НайденныеСтроки = Истина Тогда
//
//
// ДанныеПечатиИтогоНДС.ВсегоНДС = НСтр("ru='-'");
// ДанныеПечатиИтогоНДС.НДС      = НСтр("ru='Без налога(НДС)'");
//
//КонецЕсли;





//СтрокаТЧ = ДокументТабличнаяЧастьСтрока.РеализацияТоваровУслуг.Услуги

//Если НайденнаяСтрока = ТаблицаУслуги.Найти(Перечисления.СтавкиНДС.БезНДС, "СтавкаНДС") Тогда
//
// ДанныеПечатиИтогоНДС.ВсегоНДС = НСтр("ru='-'");
// ДанныеПечатиИтогоНДС.НДС      = НСтр("ru='Без налога(НДС)'");
//
//
//КонецЕсли;


//СтавкаНДС = Перечисления.СтавкиНДС;
////Объект = Документы.РеализацияТоваровУслуг;
//
//Если СтавкаНДС = Перечисления.СтавкиНДС.БезНДС Тогда
//
// //ОбластьМакета.Параметры.НДС = Строка("БезНДС");
// //ОбластьМакета.Параметры.ВсегоНДС = Строка("-");
//
// ДанныеПечатиИтогоНДС.ВсегоНДС = НСтр("ru='-'");
// ДанныеПечатиИтогоНДС.НДС      = НСтр("ru='Без налога(НДС)'");
//
//КонецЕсли;


ОбластьМакета.Параметры.Заполнить(ДанныеПечатиИтогоНДС);
ТабличныйДокумент.Вывести(ОбластьМакета);

СуммаКПрописи = Сумма + ?(СведенияОДокументе.СуммаВключаетНДС, 0, СуммаНДС);
ОбластьМакета = Макет.ПолучитьОбласть("СуммаПрописью");
ИтоговаяСтрока = НСтр("ru='Всего оказано услуг %1, на сумму %2'");
ИтоговаяСтрока = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ИтоговаяСтрока, НомерСтроки, ОбщегоНазначенияБПВызовСервера.ФорматСумм(СуммаКПрописи, СведенияОДокументе.Валюта));
СуммаПрописью  = ОбщегоНазначенияБПВызовСервера.СформироватьСуммуПрописью(СуммаКПрописи, СведенияОДокументе.Валюта);
ДанныеПечатиСуммаПрописью = Новый Структура;
ДанныеПечатиСуммаПрописью.Вставить("ИтоговаяСтрока", ИтоговаяСтрока);
ДанныеПечатиСуммаПрописью.Вставить("СуммаПрописью", СуммаПрописью);
ОбластьМакета.Параметры.Заполнить(ДанныеПечатиСуммаПрописью);
ТабличныйДокумент.Вывести(ОбластьМакета);

// Выводим подписи
ОбластьМакета = Макет.ПолучитьОбласть("Подписи");

Если ЭтоПечатьЗаПоставщика Тогда
ЗаместительПоПриказу = "";
Иначе
ЗаРуководителяНаОсновании = ?(ПустаяСтрока(СведенияОДокументе.ЗаРуководителяНаОснованииНаименование), "" , ", " + СведенияОДокументе.ЗаРуководителяНаОснованииНаименование);
ЗаместительПоПриказу = СведенияОДокументе.РуководительФИО + ЗаРуководителяНаОсновании;
КонецЕсли;

ПредставлениеПоставщика = ОбщегоНазначенияБПВызовСервера.ОписаниеОрганизации(СведенияОбПоставщике, "НаименованиеДляПечатныхФорм");
Если НЕ ЭтоПечатьЗаПоставщика И ЗначениеЗаполнено(СведенияОДокументе.РуководительДолжностьНаименование) И ЗначениеЗаполнено(ПредставлениеПоставщика) Тогда
ДолжностьИНазваниеОрганизации = СведенияОДокументе.РуководительДолжностьНаименование + ", " + ПредставлениеПоставщика;
ИначеЕсли НЕ ЭтоПечатьЗаПоставщика И ЗначениеЗаполнено(СведенияОДокументе.РуководительДолжностьНаименование) Тогда
ДолжностьИНазваниеОрганизации = СведенияОДокументе.РуководительДолжностьНаименование;
Иначе
ДолжностьИНазваниеОрганизации = ПредставлениеПоставщика;
КонецЕсли;


ПредставлениеЗаказчика = ОбщегоНазначенияБПВызовСервера.ОписаниеОрганизации(СведенияОКонтрагенте, "НаименованиеДляПечатныхФорм");
ДанныеПечатиПодписи = Новый Структура;
ДанныеПечатиПодписи.Вставить("НазваниеЗаказчика", ПредставлениеЗаказчика);

Если НЕ ЭтоПечатьЗаПоставщика Тогда
Если ЗначениеЗаполнено(СведенияОДокументе.ЗаЗаказчикаНаОсновании) Тогда
ПредставительЗаказчика = СведенияОДокументе.ПредставительЗаказчика+", "+СведенияОДокументе.ЗаЗаказчикаНаОсновании;
Иначе
ПредставительЗаказчика = СведенияОДокументе.ПредставительЗаказчика;
КонецЕсли;
ДанныеПечатиПодписи.Вставить("ПредставительЗаказчика", ПредставительЗаказчика);
КонецЕсли;

ДанныеПечатиПодписи.Вставить("ДолжностьИНазваниеОрганизации", ДолжностьИНазваниеОрганизации);
ДанныеПечатиПодписи.Вставить("ЗаместительПоПриказу", ЗаместительПоПриказу);
ОбластьМакета.Параметры.Заполнить(ДанныеПечатиПодписи);

ТабличныйДокумент.Вывести(ОбластьМакета);

// В табличном документе зададим имя области, в которую был
// выведен объект. Нужно для возможности печати покомплектно.
УправлениеПечатью.ЗадатьОбластьПечатиДокумента(ТабличныйДокумент,
НомерСтрокиНачало, ОбъектыПечати, СведенияОДокументе.Документ);

КонецЦикла;

Возврат ТабличныйДокумент;

КонецФункции


[alex0402]

СтавкаНДС = Перечисления.СтавкиНДС;

эта строчка присваивает значение и дальнейшая проверка условия не имеет смысла.
Такое присавивание часто делают для сокращения кода, что бы вместо
Перечисления.СтавкиНДС.БезНДС
писать
СтавкиНДС.БезНДС.

Если СтавкаНДС = Перечисления.СтавкиНДС.БезНДС Тогда

в условии вместо СтавкаНДС должно быть то самое значение из формы:

чтобы при выборе в поле "%НДС"

[Амал]

в условии вместо СтавкаНДС должно быть то самое значение из формы:

"%НДС" это синоним колонки. В действительности его имя "СтавкаНДС". Как правильно к нему обратиться?

[alex0402]

"%НДС" это синоним колонки. В действительности его имя "СтавкаНДС". Как правильно к нему обратиться?

Если в Форме, то, наверное, нужно Объект.СтавкаНДС?

[Амал]

Если в Форме, то, наверное, нужно Объект.СтавкаНДС?

Это ВПФ, через "Объект" нельзя обратиться на прямую.

[alex0402]

Если в Форме, то, наверное, нужно Объект.СтавкаНДС?

Это ВПФ, через "Объект" нельзя обратиться на прямую.

Тогда СсылкаНаОбъект.СтавкаНДС или как-то еще, но

СтавкаНДС = Перечисления.СтавкиНДС;

перед проверкой условия - полная чушь...

[Амал]

Тогда СсылкаНаОбъект.СтавкаНДС или как-то еще

Я создал реквизит в ВПФ с ссылкой на документ. Назвал его СсылкаНаДокумент. Такой вариант тоже пробовал обращаясь к табличной части "Услуги" - СсылкаНаДокумент.Услуги.

перед проверкой условия - полная чушь...

Да, мне это уже сказали. Но убрав это - результат не поменялся.

Код Выделить Развернуть

Строки = СсылкаНаДокумент.Услуги.Найти(Перечисления.СтавкиНДС.БезНДС, "СтавкаНДС");

Если Строки <> Неопределено Тогда

ОбластьИтогоНДС = Макет.ПолучитьОбласть("ИтогоНДС");
ОбластьИтогоНДС.Параметры.СуммаНДС = 1;
ТабличныйДокумент.Вывести(ОбластьИтогоНДС);

Иначе

ОбластьИтогоНДС = Макет.ПолучитьОбласть("ИтогоНДС");
ОбластьИтогоНДС.Параметры.СуммаНДС = Строки;
ТабличныйДокумент.Вывести(ОбластьИтогоНДС);

КонецЕсли;


Я просто даже это значение не могу найти (БезНДС), срабатывает "иначе", что значит - Неопределено (т.е. в колонке его якобы нет)

[alex0402]

СсылкаНаДокумент.Услуги.Найти(Перечисления.СтавкиНДС.БезНДС, "СтавкаНДС")

возвращает Неопределено или Строку
поэтому:

ОбластьИтогоНДС.Параметры.СуммаНДС = Строки;

заменить на

Код Выделить Развернуть

ОбластьИтогоНДС.Параметры.СуммаНДС = Строки.СтавкаНДС
или как там реквизит называется?

[Амал]

или как там реквизит называется?

Когда пишешь так:

Код Выделить Развернуть

ОбластьИтогоНДС.Параметры.СуммаНДС = Строки.СтавкаНДС;


То получается ошибка: Значение не является значением объектного типа (СтавкаНДС). Хотя колонка именно так называется "СтавкаНДС", а её синоним "%НДС"

[alex0402]

а если поставить точку останова и посмотреть, что там на самом деле?