Joined: 24 Aug 2005 Posts: 3 Location: Крутских Виталий Владимирович Occupation: ЗАО НПК Interests: Москва
Posted: 25 Aug 2005 10:02 Post subject: Нужна помощь по "Клиент-банк"
Здравствуйте!!!
Вопрос мой в первую очередь адресован службе поддержки, но буду очень признателен, если кто то поделится опытом.
Никак не могу найти способ нумеровать строки в выходном файле с платежками. Среди доступных объектов с данными такого, к сожалению, нет. В объектах и функциях внутренного VBS мне также не удалось обнаружить нумерацию строк. Теоретически предполагаю, что можно организовать на VBS цикл типа a=a+1, но вот только сразу вопрос. Непонятно на что цикл можно опереть, я имею ввиду его границы, щаг и тп. В VBS для создания проводок по складу все чётко и очевидно:
DocStock.DocStockDoc.MoveFirst
For nStock=0 To DocStock.DocStockDoc.NumStock-1
-//-
DocStock.DocStockDoc.MoveNext
Next
Подскажите пожалуйста, что можно придумать. Надеюсь кто-нибудь подобное уже делал, так как описание формата файла платёжек мне прислали из департамента финансов г. Москвы.
Joined: 24 Jul 2002 Posts: 20 Location: БОНДАРЧУК ВАЛЕРИЙ ИВАНОВИЧ
Posted: 30 Aug 2005 17:08 Post subject:
Добрый день всем.
Как я понял необходимо ставить нумерацию строк, по порядку
например
:1
:2
и т.д.
Так как, количество строк платежки стандартизировано, то и поля импорта стандартизированы и включать счетчик некчему.
Надо описание строки добавить значение кавычках
т.е "01"+PayDoc.NumDoc
Подробнее смотрите ниже.
Попадаем в 1 шаг мастера настройки данных. Многие банки используют шаблон файла в формате 1С бухгалтерии в txt. – формате. Настроим его в этом примере.
Условие : некоторые стандарты формата поддерживают разбиение назначение платежа в несколько строк . В предлагаемом варианте клиент – банка IBank2 фирмы БИФИТ г. Москва, назначение платежа одна строка. Этого варианта и будем придерживаться.
СекцияДокумент=Платежное поручение
Номер=73
Дата=10.03.2005
Сумма=285
ПлательщикСчет=40802810600000000018
ПлательщикИНН=165800026706
ПлательщикКПП=0
Плательщик=ИНН 165800026706\0 Индивидуальный Предприниматель Бондарчук Валерий Иванович
Плательщик1=Индивидуальный Предприниматель Бондарчук Валерий Иванович
ПлательщикРасчСчет=40802810600000000018
ПлательщикБанк1=Филиал ОАО "АКИБАНК"
ПлательщикБИК=049205916
ПлательщикКорсчет=30101810300000000916
ПолучательСчет=40702810662260101579
ПолучательИНН=1658028053
ПолучательКПП=165801001
Получатель=ООО "Телесет"
Получатель1=ООО "Телесет"
ПолучательРасчСчет=40702810662260101579
ПолучательБанк1=ОСБ "Банк Татарстан" №8610
ПолучательБИК=049205603
ПолучательКорсчет=30101810600000000603
ВидПлатежа=Электронно
ВидОплаты=01
СрокПлатежа=10.03.2005
Очередность=6
СтатусСоставителя=
ПоказательКБК=
ОКАТО=
ПоказательОснования=
ПоказательПериода=
ПоказательНомера=
ПоказательДаты=
ПоказательТипа=
НазначениеПлатежа=Оплата за технику согласно сч700 от 01.03.05 в т.ч.: НДС 18% - 43,47 руб.
КонецДокумента
КонецФайла
Итак, существует шапка файла – 11 первых строк,
Обновляемая часть со строки СекцияДокумент до КонецДокумента.
И окончание файла в строке КонецФайла.
Приступим к Настройке
Формат файла выбираем текст
Поле укажите наименование Выбираем Новая настройка экспорта.
Поле укажите размещение файла импорта / экспорта
Пием например c:\implat.txt или другую директорию, которую просит система Клиент – Банк, в нашем случае IBank2 фирмы БИФИТ будет настраиваться от расположения нашего файла на диске.
Нажимаем клавишу Вперед
Шаг второй
Выбираем с разделителями.
Количество строк
Ограничитель текста
Кодировка Windows
Разделитель полей Перевод строки
Формат даты dd.mm.yyyy
Десятичный разделитель ,
Разделитель даты . (точка)
Разделитель времени :
Нажимаем клавишу Вперед
Шаг третий
Укажите структуру файла, так как формат текстовый, для ускорения написания
Имя поля равно номеру по порядку и все типы данных Текст
Получилось 36 строк
Нажимаем клавишу Вперед
Шаг четвертый
Укажите соответствие полей
Так как программируем в VBA, то текст заключаем в двойные кавычки
Поле источник, Поле получатель, Алгоритм
1 “СекцияДокумент=Платежное поручение”
Номер документа 2 "Номер="+PayDoc.NumDoc
Дата документа 3 "Дата="+PayDoc.DateDoc
Сумма документа 4 "Сумма="+trim((format(PayDoc.SummaDoc,"######.00"))) Определяем формат вывода и подавляем пробелы командой trim
Если после экспорта, разделитель оказывается запятой. То необходимо поправить региональные настройки Windows. Панель управления \ Языки и региональные стандарты Разделитель дробной и целой части поставить точку.
Рас.счет плательщика 5 "ПлательщикСчет="+PayDoc.EstimatedNumPlatelshik
Наименование плательщика полное 8 это поле повторяет нижнее не знаю почему, но на всякий случай заносим в текст свой ИНН
"Плательщик=ИНН 165800026706\0 "+PayDoc.NamePlatelshikFull
Наименование плательщика полное 9 "Плательщик1="+PayDoc.NamePlatelshikFull
Наименование банка Плательщика 11 "ПлательщикБанк1="+PayDoc.NameBankPlatelshik
БИК (МФО) банка плательщика 12
"ПлательщикБИК="+PayDoc.BIKBankPlatelshik
Корр/счет банка плательщика 13
"ПлательщикКорсчет="+PayDoc.CorrNumBankPlatelshik
Расчетный счет получателя 14
"ПолучательСчет="+PayDoc.EstimatedNumPoluchatelya
ПлательщикКорсчет=30101810300000000916
ИНН получателя 15
"ПолучательИНН="+PayDoc.INNPoluchatelya
КПП получателя 16
"ПолучательКПП="+PayDoc.CodeKPPPoluchatelya
Наименование получателя полное 17
"Получатель="+PayDoc.NamePoluchatelyaFull
Наименование получателя полное 18
"Получатель1="+PayDoc.NamePoluchatelyaFull
Расчетный счет получателя 19
"ПолучательРасчСчет="+PayDoc.EstimatedNumPoluchatelya
Наименование банка получателя 20
"ПолучательБанк1="+PayDoc.NameBankPoluchatelya
БИК (МФО) банка получателя 21
"ПолучательБИК="+PayDoc.BIKBankPoluchatelya
Корр/счет банка получателя 22
"ПолучательКорсчет="+PayDoc.CorrNumBankPoluchatelya
23
"ВидПлатежа=Электронно"
24
"ВидОплаты=01"
Дата документа 25
"СрокПлатежа="+PayDoc.DateDoc
Очередность платежа 26
"Очередность="+PayDoc.Ocherednost
Статус налогоплательщика 27
"СтатусСоставителя="+PayDoc.StatusNP
Код бюджетной классификации 28
"ПоказательКБК= "+PayDoc.KBK
ОКАТО получателя 29
"ОКАТО="+PayDoc.OKATOPoluchatelya
Показатель основания платежа 30
"ПоказательОснования="+PayDoc.POP
Показатель налогового периода 31
"ПоказательПериода="+PayDoc.PNP
Показатель номера документа 32
"ПоказательНомера="+PayDoc.PND
Показатель даты документа 33
"ПоказательДаты="+PayDoc.PDD
Показатель типа платежа 34
"ПоказательТипа="+PayDoc.PTP
Назначение платежа 35
"НазначениеПлатежа="+PayDoc.Content
36
"КонецДокумента"
Нажимаем клавишу Вперед
Шаг пятый.
Документ системы П/П
Нажимаем клавишу Вперед
Шаг шестой.
Вид операции системы Оплата партнерам с расчетного счета
Нажимаем клавишу Вперед
Шаг седьмой
Задайте текст верхнего колонтитула
Joined: 24 Aug 2005 Posts: 3 Location: Крутских Виталий Владимирович Occupation: ЗАО НПК Interests: Москва
Posted: 01 Sep 2005 11:40 Post subject:
Добрый день, Валерий. Спасибо конешно, за ответ. Но боюсь мне это не подходит. Мне нужно ставить порядковый номер платежки в файле. Вариант "01"+PayDoc.NumDoc для этого не годится.
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
