Клиент-банк с 01.06.2003

ПНР и сопровождение

Модераторы: m0p3e, edward_K, Модераторы

Maxim
Постоянный гость
Сообщения: 96
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Пермь

Клиент-банк с 01.06.2003

Сообщение Maxim »

Добрый день, коллеги!
Кто-нибудь уже столкнулся со следущей проблемой:
в новых версиях "клиентов банков" новые поля платежек (101, 104-110 в нумерации галактики) нужно выводить отдельно.
В галактике это одно поле PLPOR.TAX
Формулы, разбирающие эту строку, явно в 200 символов не уложатся.
Какие предложения?
неужели единственный вариант - жесткий формат строки со значениями полей, разделенными ";" по количеству символов каждого поля, т.е.
1 поле - 4 символа
2 поле - 15 символов и т.д.
и дальше вырезать substr?
Gege
Сообщения: 4
Зарегистрирован: 29 мар 2005, 17:49

Re: Клиент-банк с 01.06.2003

Сообщение Gege »

Возможно и без кол-ва символов просто разделитель ";"
hope
Местный житель
Сообщения: 1353
Зарегистрирован: 29 мар 2005, 17:49
Контактная информация:

Re: Клиент-банк с 01.06.2003

Сообщение hope »

Максим! А ты смог выцепить КПП получателя? в каком поле оно находится?
И еще 6 строки назначения в списке-то нет?
Maxim
Постоянный гость
Сообщения: 96
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Пермь

Re: Клиент-банк с 01.06.2003

Сообщение Maxim »

Для HOPE:

Поля которые отсутствуют в списке задаются по такой методике - выбираешь "Пустое поле" и в колонке формула пишешь, в зависимости от потребностей (можно анализировать, если в платежке пусто, то брать из каталога организаций, поэтому привожу все возможные поля):

Из дополнительной информации к платежке:
КПП плательщика PLPOR.DENOSCH2
КПП получателя PLPOR.DENOSCH3

Из каталога организаций:
КПП плательщика ORGPLAT.KODPLATNDS
КПП получателя ORGPOL.KODPLATNDS

6 строка назначения - это PLPOR.TAX

Вопрос Gege:

есть возможность вырезать поле из списка, разделенного ";" по номеру?
Например строка "11;2222222;333;4444;55555"
Как мне получить:
Поле №1
Поле №2
.......
???
hope
Местный житель
Сообщения: 1353
Зарегистрирован: 29 мар 2005, 17:49
Контактная информация:

Re: Клиент-банк с 01.06.2003

Сообщение hope »

У нас файл экспорта имеет строгий формат: строки длиной 806 символов. Как это настроить для экспорта? Приходится извращаться всяко...
В редакторе формы работает только строка длиной 255 символов. Это как-то лечится?

Возможно ли написать свою функцию по разбору строки с разделителями ";", откомпилить ее в ресурс свой, и потом использовать ее при описании полей экспорта?
m0p3e
Местный житель
Сообщения: 1386
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва

Re: Клиент-банк с 01.06.2003

Сообщение m0p3e »

var I : Integer;
i := 0;
If Length ( MyStr ) > 0
Do {
If SubStr ( MyStr , i, 1 ) = ';' then ( бла-бла )
)
While ( i < Length ( MyStr ) );

Как-то так... :)
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Re: Клиент-банк с 01.06.2003

Сообщение edward_K »

КПП Плательщика - plpor.denosch2 // 102
КПП Получателя - plpor.denosch3 // 103

поля из 6-го поля "назначение платежа" (101, 104..110) вынимаются так

ФОРМУЛЫ ДЛЯ ПОЛЕЙ 101,104..110
ExtractDelimitedWord(PlPor.Tax,1,';') // 101
ExtractDelimitedWord(PlPor.Tax,2,';') // 104
ExtractDelimitedWord(PlPor.Tax,3,';') // 105
ExtractDelimitedWord(PlPor.Tax,4,';') // 106
ExtractDelimitedWord(PlPor.Tax,5,';') // 107
ExtractDelimitedWord(PlPor.Tax,6,';') // 108
ExtractDelimitedWord(PlPor.Tax,7,';') // 109
ExtractDelimitedWord(PlPor.Tax,8,';') // 110
:)
hope
Местный житель
Сообщения: 1353
Зарегистрирован: 29 мар 2005, 17:49
Контактная информация:

Re: Клиент-банк с 01.06.2003

Сообщение hope »

Эдуард! Ты нас спас!!!!!
Maxim
Постоянный гость
Сообщения: 96
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Пермь

Re: Клиент-банк с 01.06.2003

Сообщение Maxim »

Огромное спасибо Edward_K !
vic
Сообщения: 2
Зарегистрирован: 29 мар 2005, 17:49
Откуда: С-Петербург ГМП
Контактная информация:

Re: Клиент-банк с 01.06.2003

Сообщение vic »

Огромное спасибо!!!!!!!Полегчало
Goblin
Местный житель
Сообщения: 474
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Сибирь-матушка
Контактная информация:

Re: Клиент-банк с 01.06.2003

Сообщение Goblin »

Клиент-Банка нет в лицензии, бедные мы :)
Выгружаю платежку своим фейсом, благо формат текстовки для импорта известен

в фейсе
plpor.tax -
01;1400402;69401363000;ТП;ГД.00.2003;0;09.06.2003;НС

ExtractDelimitedWord(PlPor.Tax,1,';')=''
ExtractDelimitedWord(PlPor.Tax,2,';')=''
ExtractDelimitedWord(PlPor.Tax,3,';')=''
ExtractDelimitedWord(PlPor.Tax,4,';')=''
ExtractDelimitedWord(PlPor.Tax,5,';')=''
ExtractDelimitedWord(PlPor.Tax,6,';')=''
ExtractDelimitedWord(PlPor.Tax,7,';')=''
ExtractDelimitedWord(PlPor.Tax,8,';')=''

Где моя ошибка в ДНК ? ???
:)
Питаю патологические отвращение и ненависть в особо тяжелой и крайне запущенной формах к семейству программ Microsoft Business Solution !
Восславим господа Кришну за то, что у нас есть ГАЛАКТИКА !
Goblin
Местный житель
Сообщения: 474
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Сибирь-матушка
Контактная информация:

Re: Клиент-банк с 01.06.2003

Сообщение Goblin »

Клиент-Банка нет в лицензии, бедные мы :)
Выгружаю платежку своим фейсом, благо формат текстовки для импорта известен

в фейсе
plpor.tax -
01;1400402;69401363000;ТП;ГД.00.2003;0;09.06.2003;НС

ExtractDelimitedWord(PlPor.Tax,1,';')=''
ExtractDelimitedWord(PlPor.Tax,2,';')=''
ExtractDelimitedWord(PlPor.Tax,3,';')=''
ExtractDelimitedWord(PlPor.Tax,4,';')=''
ExtractDelimitedWord(PlPor.Tax,5,';')=''
ExtractDelimitedWord(PlPor.Tax,6,';')=''
ExtractDelimitedWord(PlPor.Tax,7,';')=''
ExtractDelimitedWord(PlPor.Tax,8,';')=''

Где моя ошибка в ДНК ? ???
:)
Питаю патологические отвращение и ненависть в особо тяжелой и крайне запущенной формах к семейству программ Microsoft Business Solution !
Восславим господа Кришну за то, что у нас есть ГАЛАКТИКА !
Goblin
Местный житель
Сообщения: 474
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Сибирь-матушка
Контактная информация:

Re: Клиент-банк с 01.06.2003

Сообщение Goblin »

Заработало !!! 8)
Питаю патологические отвращение и ненависть в особо тяжелой и крайне запущенной формах к семейству программ Microsoft Business Solution !
Восславим господа Кришну за то, что у нас есть ГАЛАКТИКА !
Nick
Местный житель
Сообщения: 331
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Белгород

Re: Клиент-банк с 01.06.2003

Сообщение Nick »

Подкиньте пожалуйста кто-нить текст выгрузки чтоб я его скомпилил, а то ничего не пойму. Платежки вроде новые приделал, а с выгрузкой пока геморой.
maikl
Местный житель
Сообщения: 1503
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Тверь

Re: Клиент-банк с 01.06.2003

Сообщение maikl »

Так клиент-банк у каждого свой, т.е разные форматы. Мы, например, для сбербанка, выкидываем поля в текстовый файл (ARD-отчет) с разделителями, затем обрабатываем в фоксе и импортируем в клиент., поэтому, я считаю нет универсального решения.
Ответить