Цена

[Roman]

//*******************************************
Процедура Сформировать()
СпрН = СоздатьОбъект("Справочник.Номенклатура");
СпрН.ВыбратьЭлементы();
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Таблица");
Таб.ВывестиСекцию("Шапка");
Цена="";
Цена = глПолучитьЦену(СпрН.ТекущийЭлемент(),ТипыЦен,РабочаяДата());
Пока СпрН.ПолучитьЭлемент() = 1 Цикл
Если СпрН.ЭтоГруппа() = 0 Тогда
Таб.ВывестиСекцию("Строка");
КонецЕсли;
КонецЦикла;
Таб.Показать(1);
КонецПроцедуры

Цену выдает равной нулю.
Вопрос- почему.
ТипыЦен = Выбираю в диалоге.

 

[puh14]

Ошибка в моменте определения цены.

 

[Дайнеко]

puh14 проповедует принцип "Дам направление". Во времена моего обучения гигантские компьютеры часто "висли". Тогда препод говорил: "Отлаживайте всухую". Этот значит нарисовать на бумаге набор исходных данных, потом поводить пальцем по распечатке и высчитать результат.
До сих пор помогает.

 

[vbs]

Во времена моего обучения гигантские компьютеры часто "висли".

А мне доводилось лазать по дампу, выведенному на АЦПУ. Длина распечатки достигала нескольких метров
А вообще-то, принцип "Дам направление" правилен. Ошибка видна сразу, и задаватель вопроса мог легко сам ее
обнаружить, если бы не ленился.

 

[Roman]

А вообще-то, принцип "Дам направление" правилен. Ошибка видна сразу, и задаватель вопроса мог легко сам ее
обнаружить, если бы не ленился.

Хм.Вообще-то я тему закрыл, кому-то делать просто не фиг. Взял и открыл тему.