Акт списания инвентаря

User

Сообщений: 311 Регистрация: 09.04.2008

Уфа

13.10.2008 09:05:16

Добрый день.
Работаем в БЭСТ5_34. Стали распечатывать "Акт списания инвентаря 421-АПК" в "Имуществе" (Оборотные активы). В акт садится по две строчки каждой позиции. Форма не переделывалась. Как можно исправить - не соображу.
С уважением, Лена.

Дмитрий Шлыков

Guest

13.10.2008 11:09:32

Добрый день!

Цитата
Лена пишет: Работаем в БЭСТ5_34. Стали распечатывать "Акт списания инвентаря 421-АПК" в "Имуществе" (Оборотные активы). В акт садится по две строчки каждой позиции.

Это ошибка в печатной форме. Сейчас выводятся данные по всем книгам амортизации по списываемой карточке.

Цитата
Лена пишет: Форма не переделывалась. Как можно исправить - не соображу.

Рекомендую Вам написать следующий код в событии OnBeforePrint секции MasterData.

Код
Visible := [DialogForm.dep_str."КОД_КНИГИ_АМОРТИЗАЦИИ"=DialogForm.res_card."КНИГА_АМОРТИЗАЦИИ"]

Т.ею выводитьтолько строки документа, которые относятся к основной книге амортизации.

Лена User Сообщений: 311 Регистрация: 09.04.2008 Уфа	#3 13.10.2008 12:33:05 Когда я это ставлю, то у меня вообще перестало все выводиться.

Дмитрий Шлыков

Guest

14.10.2008 11:44:37

Добрый день!
Извините, я не много перепутал источники. Я так написал в событии OnBeforePrint секции MasterData следующий код:

Код

 If [DialogForm.res_docs."КНИГА_АМОРТИЗАЦИИ_РЕКВИЗИТОВ_СТРОКИ"=DialogForm.res_card."КНИГА_АМОРТИЗАЦИИ"] Then Begin
    Visible := True;
    if [DialogForm.res_docs."ИЗНОС_ТЕКУЩИЙ_ИЗМЕНЕНИЕ"]=0 then
       sum:=sum+[DialogForm.res_docs."ЦЕНА_РЕАЛИЗАЦИИ"]*[DialogForm.dep_str."ИЗНОС_НАКОПЛЕННЫЙ"]/100
    else
       sum:=sum+[DialogForm.res_docs."ИЗНОС_ТЕКУЩИЙ_ИЗМЕНЕНИЕ"];
 End
 Else Visible := False;

Лена User Сообщений: 311 Регистрация: 09.04.2008 Уфа	#5 14.10.2008 12:29:04 Спасибо огромное. Все получилось. С уважением, Лена.

Форум