Основные доработки ТИС:
В глобальном модуле добавить три функции:
Функция глГенерироватьИмяФайлаВыгрузки(ИНН,ДатаКвартала) Экспорт
ЗагрузитьВнешнююКомпоненту(КаталогИБ() + "v7plus.dll");
Инфо = СоздатьОбъект("AddIn.V7SysInfo");
ГлобальноУникальныйИдентификатор = Инфо.СоздатьGUID();
ДатаФормированияФайлаВыгрузки = Формат(РабочаяДата(), "Д ДДММГГГГ");
ДатаФормированияФайлаВыгрузки = СтрЗаменить(ДатаФормированияФайлаВыгрузки,".","");
КодОтправителяИнформации = "";
КварталСтрока = "";
МесяцКвартала = ДатаМесяц(ДатаКвартала);
Если МесяцКвартала = 12 Тогда
КварталСтрока = "00";
Иначе
КварталСтрока = "0"+МесяцКвартала;
КонецЕсли;
// Код отправителя информации
КодОтправителяИнформации = СокрЛП(ИНН) + "_" + КварталСтрока + Прав(Строка(ДатаКвартала),1);
ИмяФайлаВыгрузки = КодОтправителяИнформации + "_" + ДатаФормированияФайлаВыгрузки + "_" + ГлобальноУникальныйИдентификатор;
Возврат ИмяФайлаВыгрузки;
КонецФункции //глГенерироватьИмяФайлаВыгрузки()
Функция глПризПериодОтч(ДатаКвартала) Экспорт
КварталСтрока = "";
МесяцКвартала = ДатаМесяц(КонКвартала(ДатаКвартала));
Если МесяцКвартала = 12 Тогда
КварталСтрока = "0";
Иначе
КварталСтрока = ""+МесяцКвартала;
КонецЕсли;
Возврат КварталСтрока;
КонецФункции //глПризПериодОтч(ДатаКвартала)
Функция глРазложить1(Знач Стр, Разделитель = ",") Экспорт
Список = СоздатьОбъект("СписокЗначений");
Длина = СтрДлина(Разделитель);
Стр = СокрЛП(Стр);
Поз = Найти(Стр, Разделитель);
Пока 0 < Поз Цикл
Список.ДобавитьЗначение(СокрП(Лев(Стр, Поз-1)));
Стр = СокрЛ(Сред(Стр, Поз+Длина));
Поз = Найти(Стр, Разделитель);
КонецЦикла;
Список.ДобавитьЗначение(Стр);
Список.ДобавитьЗначение(Стр);
Возврат Список;
КонецФункции // глРазложить1()
Кроме того, добавлены справочники:
1. Завод (реквизиты: код, наименование, ИНН, КПП).
2. Классификация (реквизиты: код, наименование).
3. Лицензии (реквизиты: СерияНомер, ДатаВыдачи, ДатаОкончания, КемВыдана). Подчинен справочнику Контрагенты.
4.ЛицензииФирм (реквизиты: СерНомЛиц, ДатаНачЛиц, ДатаОконЛиц). Подчинен справочнику Фирмы.
В справочнике Номенклатура добавлены реквизиты:
1. Классификация (ссылка на справочник.Классификация).
2. Завод (ссылка на справочник.Завод).
3. Литраж.
4. Алкоголь (перечисление: алкогольная, пиво, безалкогольная).
КПП контрагента указывается в реквизите ИНН через "/".
В шапке документа ПоступлениеТМЦРозница добавлен реквизит Лицензия (Ссылка на справочник.Лицензии).
При наличии схем xsd (http://www.fsrar.ru/files/structure/2260.zip) в папке Каталог ИБ\Схемы\430 обработка проверяет файл на валидность с помощью функции (http://forum330.com/forum/79/0#p79-9) от andrewks.
Если что-то упустил, спрашивайте. И всем удачи в сдаче деклараций!
Вступайте в нашу телеграмм-группу Инфостарт
