[l2d808]

Добрый день уважаемое сообщество. У меня Платформа 7,7 windows XP. Ситуация такого плана.
в коде

Процедура В(); 
Склад=создатьобъект("Справочник.МестаХранения");
Склад.найтипокоду("8");
МестоХранения=Склад.ТекущийЭлемент();
//-----
ШТ = СоздатьОбъект("Справочник.ШтрихКод");
Если ШТ.НайтиПоКоду(Число(СокрЛП(ШтКод)),0) = 1 Тогда 
    Штрих_Код = ШТ.ТекущийЭлемент();
КонецЕсли;
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ост = Ит.СКД(СчетПоКоду("ШК",ПланыСчетов.Основной),3,,Штрих_Код,,МестоХранения);
сообщить(Ост);
ШтКод=0;
Ост=0;
КонецПроцедуры

Вроде нет явных ошибок. Согласно переменной ШтКод. должно в конце выдать количество единиц данного товара. при запуске обработки, первый раз дает правильный резкльтат, а после дает 0. Если обработку перезапустить все снова работает. только один раз. я не могу понять, почену происходит данный трабл. Помогите пожалуйста..

[5_kopeek]

Вы используете основные итоги? Откуда берется ШтКод? Если сделать так:

//ШтКод=0;

, какой результат?

[l2d808]

, какой результат?

В переменной ШтКод данные попадают с сканера

[5_kopeek]

В переменной ШтКод данные попадают с сканера

ШтКод -- реквизит формы? Повторно не срабатывает процедура при том же штрихкоде или при введении нового? Комментирование обнуления что-то изменило? Проверьте, находится ли элемент перед тем, как остаток по нему выдается равным 0.

Стоп. А штрих-код хранится в коде элемента?

[l2d808]

Немного изменил код. Упростил... Получилось так:

Процедура В(); 
    очиститьокносообщений();
//-----
Склад=создатьобъект("Справочник.МестаХранения");
Склад.найтипокоду("8");
МестоХранения=Склад.ТекущийЭлемент();
//-----
ШТ = СоздатьОбъект("Справочник.ШтрихКод");
ШТ.НайтиПоКоду(ШтКод);
Штрих_Код = ШТ.ТекущийЭлемент();
//-----
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ост = Ит.СКД(СчетПоКоду("ШК",ПланыСчетов.Основной),3,,Штрих_Код,,МестоХранения);
сообщить(Ост);
ШтКод=0;
//Ост=0;      
Форма.ПанельИнструментов(0);
КонецПроцедуры

Све работаеттерерь правильно. Но вот в чем была проблема? я так и не понял... Было бы не дурно чтоб помогли мне понять... Заранее благодарен.

ШтКод -- реквизит формы? Повторно не срабатывает процедура при том же штрихкоде или при введении нового? Комментирование обнуления что-то изменило? Проверьте, находится ли элемент перед тем, как остаток по нему выдается равным 0.

Стоп. А штрих-код хранится в коде элемента?

да. ШтКод является элементом формы.

ШтКод -- реквизит формы? Повторно не срабатывает процедура при том же штрихкоде или при введении нового? Комментирование обнуления что-то изменило? Проверьте, находится ли элемент перед тем, как остаток по нему выдается равным 0.

Стоп. А штрих-код хранится в коде элемента?

штрих-код хранится
в спавочнике штрих кода, который подченен ТМЦ.

[5_kopeek]

Тип реквизита ШтКод -- текстовый? Тип кода элементов справочника ШтрихКод -- текстовый? Вы проверили, элемент всегда находился при использовании НайтиПоКоду?

[l2d808]

Тип реквизита ШтКод -- текстовый? Тип кода элементов справочника ШтрихКод -- текстовый? Вы проверили, элемент всегда находился при использовании НайтиПоКоду?

Тип этого реквизита является числом. В первом варианте он хватал, а в последующих почему-то нулился...

[5_kopeek]

Тип этого реквизита является числом. В первом варианте он хватал, а в последующих почему-то нулился...

"Этого" -- это какого? Спрашивала о двух реквизитах. "В первом варианте" -- это когда несколько раз запускали обработку с одним и тем же значением штрихкода или что именно имелось ввиду? "Хватал" -- в смысле находил по НайтиПоКоду? Проверьте типы всех реквизитов и ищите, задавая значение нужного для поиска штрихкода, приведя его к необходимому типу. Все должно работать и в первом варианте, только КонецЕсли перенести перед КонецПроцедуры. Если ничего не сообщит, значит, не все в порядке с типами, поэтому не находится сам элемент справочника ШтрихКод.

[l2d808]

"Этого" -- это какого? Спрашивала о двух реквизитах. "В первом варианте" -- это когда несколько раз запускали обработку с одним и тем же значением штрихкода или что именно имелось ввиду? "Хватал" -- в смысле находил по НайтиПоКоду? Проверьте типы всех реквизитов и ищите, задавая значение нужного для поиска штрихкода, приведя его к необходимому типу. Все должно работать и в первом варианте, только КонецЕсли перенести перед КонецПроцедуры. Если ничего не сообщит, значит, не все в порядке с типами, поэтому не находится сам элемент справочника ШтрихКод.

Спасибо большое Вам. я уже разобрался.

[Vofka]

Спасибо большое Вам

http://pro1c.org.ua/index.php?showtopic=2314