книга покупок цифровой код страны

Форум Учет и отчетность Бухгалтерский учет и налоги (БУ)
1С:Комплексная 7.7 Бухгалтерский учет 7.7 Оперативный учет 7.7 Расчет 7.7
1. sergey198 1 12.09.13 14:09 Сейчас в теме
Всем привет. Не могу понять, почему при формировании книги покупок не простовляется цифровой код страны(новая форма), хотя если печатать СФ нового образца там все есть.
Посмотрел код процедуры НомераГТД, там не слова про код страны
+ – Ответить
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. sergey198 1 12.09.13 14:11 Сейчас в теме
Релиз последний, посмотрел в бухгалтерии там все проставляется кодстраны;ГТД.
А вот в комплексной нет, почему так?
Даже в коде нет намека на код страны
+ – Ответить
3. sergey198 1 12.09.13 14:15 Сейчас в теме
вот код:
Функция НомераГТД(Док)

Перем ЕстьПартия;

Если (ПустоеЗначение(Док)=1) Тогда
Возврат "";
КонецЕсли;

Если глЕстьРеквизитМнЧ("Партия",Док.Вид()) = 1 Тогда
ЕстьПартия = 1;
ИначеЕсли глЕстьРеквизитМнЧ("ГТД",Док.Вид()) = 1 Тогда
ЕстьПартия = 0;
Иначе
Возврат "";
КонецЕсли;

СписокГТД = СоздатьОбъект("СписокЗначений");
Док.ВыбратьСтроки();
Пока Док.ПолучитьСтроку() = 1 Цикл

Если ЕстьПартия = 1 Тогда
ГТД = ?(ПустоеЗначение(Док.Партия.ГТД) = 0, СокрЛП(Док.Партия.СтранаПроисхождения) + " " + СокрЛП(Док.Партия.ГТД), "");
Иначе
ГТД = ?(ПустоеЗначение(Док.ГТД) = 0, СокрЛП(Док.СтранаПроисхождения) + " " + СокрЛП(Док.ГТД), "");
КонецЕсли;

Если СписокГТД.НайтиЗначение(ГТД) = 0 Тогда
СписокГТД.ДобавитьЗначение(ГТД);
КонецЕсли;

КонецЦикла;

ГТД = "";
Если СписокГТД.РазмерСписка() > 0 Тогда
Для а = 1 по СписокГТД.РазмерСписка() Цикл
ГТД = ГТД + ?(ГТД = "", "", "; ") + СписокГТД.ПолучитьЗначение(а);
КонецЦикла;
КонецЕсли;

Возврат ГТД;

КонецФункции // НомераГТД()

Нет не слова про "цифровой код страны"
+ – Ответить
Для отправки сообщения требуется регистрация/авторизация

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот