Вход | Регистрация

1С:Предприятие ::

Метки:

Задача2 сертификация 1с77 (Тане)

Я
   MAAlekseev
 
26.05.04 - 10:25
выписка-поступление по документам модуль формы
545строка    УчитыватьНП = ?((ДокВид = "СчетФактура") или (ДокВид = "ДоговорЗайма") , 0, глПризнакУчетаНалога(Док, "НП"));//чтобы не учитывать налог с продаж
586строка ИначеЕсли ДокВид = "ДоговорЗайма" Тогда
        Кол = ?(Док.КоличествоСтрок() = 0, 1, Док.КоличествоСтрок());
        ТЗ.НоваяСтрока();
        ТЗ.КоррСчет = ?(ОплатаДоговора = 2, Сч66_33, Сч66_3);
        ТЗ.Субконто1 = Док.Контрагент;
        ТЗ.Субконто2 = Док.Договор;
        ТЗ.Субконто3 = "";
        Если (ЦеныВДоговоре = 2) и (ОплатаДоговора = 1) Тогда
            ТЗ.Приход = Док.Сумма*Док.Курс;
        Иначе
            ТЗ.Приход = Док.Сумма;
        КонецЕсли//заполняем таблицу значений

686строка Меню.ДобавитьЗначение("ДоговорЗайма","Договор займа")//добавляем в меню поступление по документам договор займа

4строка Перем Сч66_33, Сч66_//добавляем переменные счетов

1023строка Сч66_3  = СчетПоКоду("66.3");
Сч66_33 = СчетПоКоду("66.33")//раскрываем содержание переменных
Вроде все - теперь заполняем выписку по документам, выбирая договор займа (реквизиты шапки: контрагент,договор,курс,валюта,сумма и др). Выбираем рублевый договор займа, а в следующей строке выписки можно выбрать валютный договор займа.
 
 
   MAAlekseev
 
1 - 26.05.04 - 10:27
Пардон - это по первой задаче


Список тем форума
Рекламное место пустует  
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование.
Фредерик Брукс-младший
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Ветка сдана в архив. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
Рекламное место пустует