[fire-n]

Поскажите, как изменить форму счета - фактуры в 1С Предприятие 7.7 7.70.027, конфигурация Бухучет для Украины 7.70.291 сетевая версия.
Хочется чтобы автоматически подливался код УКТ ЗЕД в счет из справочника-прочие-код УКТ ЗЕД (который уже внесен для этого товара).
Например столбец называется "код УКТ ЗЕД" и идет следом за столбцом "Назва" перед столбцом "Од." как в налоговой накладной.
Может кто подскажет?

[Pepe]

Зачем это надо. Код УКТ ЗЭД необходимо указывать только для налоговых накладных. Если хотите в счет, создайте рекизит, при вводе его заполняйте в модуле и печатайте в измененной форме.

[fire-n]

Зачем это надо. Код УКТ ЗЭД необходимо указывать только для налоговых накладных. Если хотите в счет, создайте рекизит, при вводе его заполняйте в модуле и печатайте в измененной форме.

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

Итак, отвлеклась. мне необходима эта операция. Кто нибудь поможет?

[volodya1122]

Подивіться як це реалізовано в Податковій накладній

буфКодУКТВЭД = СтрЗаменить(ТаблТМЦ.КодУКТВЭД,".",?(Константа.ПечататьКодУКТВЭДбезПробелов = 1,""," "));

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

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

Змінити на

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

Але майте на увазі, що після кожного обновлення ці дії прийдеться знову виконувати....

[fire-n]

Подивіться як це реалізовано в Податковій накладній

буфКодУКТВЭД = СтрЗаменить(ТаблТМЦ.КодУКТВЭД,".",?(Константа.ПечататьКодУКТВЭДбезПробелов = 1,""," "));

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

Спасибки, спасибки попробую...