Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Как внести код УКТ ЗЕД отдельным столбцом в счет-фактуру?
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 7.7
fire-n
Поскажите, как изменить форму счета - фактуры в 1С Предприятие 7.7 7.70.027, конфигурация Бухучет для Украины 7.70.291 сетевая версия.
Хочется чтобы автоматически подливался код УКТ ЗЕД в счет из справочника-прочие-код УКТ ЗЕД (который уже внесен для этого товара).
Например столбец называется "код УКТ ЗЕД" и идет следом за столбцом "Назва" перед столбцом "Од." как в налоговой накладной.
Может кто подскажет?
Pepe
Зачем это надо. Код УКТ ЗЭД необходимо указывать только для налоговых накладных. Если хотите в счет, создайте рекизит, при вводе его заполняйте в модуле и печатайте в измененной форме.
fire-n
Цитата(Pepe @ 06.02.12, 14:48) необходимо зарегистрироваться для просмотра ссылки
Зачем это надо. Код УКТ ЗЭД необходимо указывать только для налоговых накладных. Если хотите в счет, создайте рекизит, при вводе его заполняйте в модуле и печатайте в измененной форме.


Надо, надо. Так не просила бы. И вообще необходимо это всем делать, а то наше предприятие посредник, т.е перепродаем товары. 20 дней ждать от поставщика налоговую, а ведь нам тоже необходимо выдать ее и зарегистрировать в срок в ЕРНН, а как мы это сделаем если кода не знаем.
Короче бред с этими кодами. Все не от большого ума. Сначала законы придумываем и принимаем, а потом думаем как оно должно быть в жизни.

Итак, отвлеклась. мне необходима эта операция. Кто нибудь поможет? 17000000.gif 31000000.gif
volodya1122
Подивіться як це реалізовано в Податковій накладній
буфКодУКТВЭД = СтрЗаменить(ТаблТМЦ.КодУКТВЭД,".",?(Константа.ПечататьКодУКТВЭДбезПробелов = 1,""," "));

Вам потрібно в "печатной форсе" рахунка в потрібному місці добавити колонку і в ній прописати "буфКодУКТВЭД" І поставити тип клітинки "Выражение". А в тексті модуля прописати вищевказаний код (Це після 280 рядка)

    Ном = 1;
    ВыбратьСтроки();
    Пока ПолучитьСтроку()=1 Цикл
        ЕдИзм = ?(ТМЦ.Вид()="ТМЦ",Ед,ТМЦ.БазЕдиница);
        Таб.ВывестиСекцию("Строка");
        Ном = Ном+1;
    КонецЦикла;

Змінити на
    Ном = 1;
    ВыбратьСтроки();
    Пока ПолучитьСтроку()=1 Цикл
                    буфКодУКТВЭД = СтрЗаменить(ТаблТМЦ.КодУКТВЭД,".",?(Константа.ПечататьКодУКТВЭДбезПробелов = 1,""," "));
        ЕдИзм = ?(ТМЦ.Вид()="ТМЦ",Ед,ТМЦ.БазЕдиница);
        Таб.ВывестиСекцию("Строка");
        Ном = Ном+1;
    КонецЦикла;


Але майте на увазі, що після кожного обновлення ці дії прийдеться знову виконувати....
fire-n
Цитата(volodya1122 @ 07.02.12, 11:10) необходимо зарегистрироваться для просмотра ссылки
Подивіться як це реалізовано в Податковій накладній
буфКодУКТВЭД = СтрЗаменить(ТаблТМЦ.КодУКТВЭД,".",?(Константа.ПечататьКодУКТВЭДбезПробелов = 1,""," "));

Вам потрібно в "печатной форсе" рахунка в потрібному місці добавити колонку і в ній прописати "буфКодУКТВЭД" І поставити тип клітинки "Выражение". А в тексті модуля прописати вищевказаний код (Це після 280 рядка)
Але майте на увазі, що після кожного обновлення ці дії прийдеться знову виконувати....


Спасибки, спасибки попробую... 31000000.gif
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.