|
v7: Выгрузка реестра НН (Украина) | ☑ | ||
---|---|---|---|---|
0
Kamili
17.11.11
✎
17:44
|
В выгрузке реестра НН для теперь уже МЕДОКа не дает проставить в печатной форме более 09, т.е. за октябрь тянет не 10 ,а 9. И.так все последующие месяцы. Кто знает в чем фишка?
|
|||
1
ALoHA
17.11.11
✎
18:43
|
DBFOut = СоздатьОбъект("XBASE");
НН=СоздатьОбъект("Документ.НалоговаяНакладная"); //DBFIn.КодоваяСтраница(0); DBFOut.ДобавитьПоле("NPP","S",7,0);//Номер DBFOut.ДобавитьПоле("DATEV","D",8,0);//Дата получения DBFOut.ДобавитьПоле("NUM","S",50,0);//Номер накладной DBFOut.ДобавитьПоле("NAZP","S",200,0);//Название поставщика DBFOut.ДобавитьПоле("IPN","S",20,0);//ИНН поставщика DBFOut.ДобавитьПоле("ZAGSUM","N",16,2);//Общая сумма DBFOut.ДобавитьПоле("BAZOP20","N",16,2);//Стоимость без НДС гр.7 DBFOut.ДобавитьПоле("SUMPDV","N",16,2);// DBFOut.ДобавитьПоле("BAZOP0","N",16,2);//Стоимость без НДС гр.7 DBFOut.ДобавитьПоле("ZVILN","N",16,2);// DBFOut.ДобавитьПоле("EXPORT","N",16,2);//Стоимость без НДС гр.7 DBFOut.ДобавитьПоле("PZOB","N",16,2);// DBFOut.ДобавитьПоле("NREZ","N",2,0);// DBFOut.ДобавитьПоле("KOR","N",2,0);// DBFOut.ДобавитьПоле("WMDTYPE","N",2,0);// DBFOut.ДобавитьПоле("WMDTYPESTR","S",4,0);// DBFOut.СоздатьФайл("C:\Temp\DBFOut"); Пер=0; НН.ВыбратьДокументы(ДатаНач,Датакон); Пока НН.ПолучитьДокумент()=1 Цикл Если НН.ПометкаУдаления()=1 Тогда Продолжить; КонецЕсли; Если НН.Проведен()=0 Тогда Продолжить; КонецЕсли; Если МножФильтр.РазмерСписка()>0 Тогда Если МножФильтр.Принадлежит(НН.Клиент)=0 Тогда Продолжить; КонецЕсли; КонецЕсли; Пер=Пер+1; DBFOut.Добавить(); DBFOut.NPP = Пер; DBFOut.DATEV = НН.ДатаДок; DBFOut.NUM = Число(Прав(НН.НомерДок,7)); СтрКлиент=СтрЗаменить(НН.Клиент,"і","i"); DBFOut.NAZP = Строка(СтрКлиент); DBFOut.IPN = НН.Клиент.ИНН; иСПДВ=0; иБПДВ=0; НН.ВыбратьСтроки(); Пока НН.ПолучитьСтроку()=1 Цикл Если Строка(НН.ТМЦ.СтавкаНДС)="20%" Тогда Сообщить(1); иСПДВ=иСПДВ+НН.СуммаСНДС; Иначе иБПДВ=иБПДВ+НН.СуммаБезНДС; Сообщить(2); КонецЕсли; КонецЦикла; DBFOut.ZAGSUM = иСПДВ+иБПДВ; DBFOut.BAZOP20 = иСПДВ; DBFOut.SUMPDV = иСПДВ; DBFOut.BAZOP0 = ""; DBFOut.ZVILN = иБПДВ; DBFOut.EXPORT = ""; DBFOut.PZOB = ""; DBFOut.NREZ = ""; DBFOut.KOR = ""; DBFOut.WMDTYPE = 1; DBFOut.WMDTYPESTR = "ПН"; DBFOut.Записать(); КонецЦикла; //DBFIn.Закрыть(); КонецПроцедуры |
|||
2
pumbaEO
17.11.11
✎
19:00
|
xml наше все.
|
|||
3
palpetrovich
17.11.11
✎
19:02
|
"более 09" чего?
|
|||
4
G-Re
17.11.11
✎
22:49
|
(0) Не понятно, Медок импортирует обычный хмл-файл. Вроде не замечал ошибок. Завтра проверю.
|
|||
5
Темный Эльф
17.11.11
✎
22:55
|
В первых выпусках реестра НН и еще даже за второй квартал у АББИ апшипка - тип поля HZM (звітний період) имеет длину 1 и формат Ч01.0
Обновитесь или измените параметры поля HZM в таблице ФормаВвода. Не путайте с полем PERIOD_MONTH (звітний місяць) |
|||
6
Kamili
18.11.11
✎
10:32
|
В том то и дело ,что с форматом на ФормеВВода все ОК: Формат(HZM, "Ч(0)2.0"). Я в момент отладки вижу, что :
HZM = ДатаМесяц(ДатаВКвартале); В отладчике ДатаМесяц(ДатаВКвартале) = "10", а HZM после присвоения значение показывает "09". И когда я просто заменила в модуле и в ФормеВВода HZM на HZM1, то HZM1 принимало правильное значение, а вот на форме пошла ругань, что данная переменная не определена,т.е. где-то прописано ограничение,т.к. ошибка идет уже в момент присвоения. Еще хочу глянуть может в самой схеме... даже не знаю... |
|||
7
Kamili
18.11.11
✎
10:32
|
т.е. HZM после присвоения значение показывает не "09", "9"
|
|||
8
G-Re
18.11.11
✎
16:34
|
(0) Проверил, полет нормальный.
Просто ты не обновился, эта ошибка(а она была) давно исправлена. |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |