Bankir.Ru
27 мая, суббота 07:24

Объявление

Свернуть

На Bankir.ru начался цикл публикаций, созданных по следам обсуждений на форуме

Показать больше
Показать меньше

Где можно добыть файл BIC Directory?

Свернуть
X
  • Фильтр
  • Время
  • Показать
Очистить всё
новые сообщения

  • Где можно добыть файл BIC Directory?

    Где можно добыть файл BIC Directory? По моему называется FI.DAT от SWIFT Alliance Access.

  • #2
    Где можно добыть файл BIC Directory?

    Комментарий


    • #3
      На сайте SWIFT http://www.bicdirectory.swift.com/bi...ne/content.asp
      можно получить бесплатный доступ к электронной версии BIC Directory.

      Комментарий


      • #4
        Можно посмотреть здесь: http://www.klientsky.ru/jasd/
        --
        WBR Sergey

        Комментарий


        • #5
          Поделитесь пожалуста файликом FI.DAT.

          Комментарий


          • #6
            Я бы с удовольствием, но у меня полугодовалой давности
            только имеется
            --
            WBR Sergey

            Комментарий


            • #7
              orbit ,
              Спасибо, я уже нашел.

              Комментарий


              • #8
                Могу кинуть свежий

                Комментарий


                • #9
                  А никто не придумал способ как этот справочник обновлять и так, чтобы бесплатно?

                  Комментарий


                  • #10
                    О.Дима ,
                    зачем, простите, если Вы не участник SWIFT ?
                    С уважением,

                    Слон

                    Комментарий


                    • #11
                      Слон
                      А что валютные платежки вбивают и отправляют только участники Свифт? А как быть с ассоциированными членами? Это ж для удобства ввода платяжей и дальнейшего транспорта в буржуйские банки-корреспонденты.

                      Комментарий


                      • #12
                        Ребята не надо путать BIC Directory это не только СВИФТ это справочник ISO и СВИФТ просто его использует.

                        Комментарий


                        • #13
                          To Tarantino
                          а можно и мне по e-mail orbit@klientsky.ru
                          --
                          WBR Sergey

                          Комментарий


                          • #14
                            2ORBIT отправил, разбил на 7 сообщений.

                            Ещё вопрос нет ли у кого нибудь описание структуры файлов этого справочника, у меня есть описание FI.DAT но оно не совсем полное.
                            Хочется что бы всё было по настоящему! И к себе в базу это дело полностью качать!

                            Комментарий


                            • #15
                              2Tarantino получил 7 сообщений!!!

                              А fi.dat от 25.09.2001 не старый?
                              Вроде в этом году д/б обновление уже?

                              А так спасибо.
                              --
                              WBR Sergey

                              Комментарий


                              • #16
                                дата вступления этого справочника 2001.12.01, она находиться в файле HD.DAT, более свежего пока нет, это действующий справочник!

                                Комментарий


                                • #17
                                  Доброго...

                                  Вот коротенькая программка, разбирающая файл справочника для TurboSWIFT. От FI.DAT он отличается только отсутствием пробелов в конце. В FI.DAT длина записи 856 байт, а в TurboSWIFT - 848 байт. На выходе получается ASCII-файл.

                                  Всех благ,
                                  Петр

                                  Это на REXX:
                                  PHP код:
                                  /*
                                    PROGRAM NAME: BICDIR                               
                                    (c) 1999 Sergey Snegiryov, Moscow, Russia 
                                    Version 1.3 dated 2001-04-18 [email]ssg@fnts.ru[/email]  
                                    Moscow, Russia                                            
                                  */

                                  /* Install a signal handler for CTRL-BREAK conditions */
                                  SIGNAL ON HALT
                                  NUMERIC DIGITS 16

                                  PARSE UPPER ARG bicfile
                                  IF bicfile '' THEN DO
                                    
                                  SAY "Usage sintax is:  bicdir bicfilename>"
                                    
                                  EXIT
                                  END
                                  IF STREAM(bicfile'c''QUERY EXISTS') = '' THEN DO
                                    
                                  SAY "File "||bicfile||" doesn't exist."
                                    
                                  EXIT
                                  END
                                  IF STREAM(bicfile'c''OPEN READ') > 'READY:' THEN DO
                                    
                                  SAY "Can't open "||bicfile
                                    
                                  EXIT
                                  END
                                  bicsize 
                                  STREAM(bicfile'c''QUERY SIZE')
                                  unlfile 'bic.asc'
                                  IF STREAM(unlfile'c''QUERY EXISTS') > '' THEN DO
                                    
                                  '@ERASE '||unlfile
                                  END
                                  IF STREAM(unlfile'c''OPEN WRITE') > 'READY:' THEN DO
                                    
                                  SAY "Can't write into "||unlfile
                                    
                                  EXIT
                                  END

                                  curpos 
                                  1
                                  crec 
                                  0
                                  DO WHILE curpos  bicsize
                                    tag 
                                  CHARIN(bicfilecurpos3)
                                    IF 
                                  tag 'FID' THEN DO
                                      
                                  bic CHARIN(bicfilecurpos 311)
                                      
                                  IName SPACE(CHARIN(bicfilecurpos 14105),1)
                                      
                                  BInfo SPACE(CHARIN(bicfilecurpos 11970),1)
                                      
                                  City SPACE(CHARIN(bicfilecurpos 18935),1)
                                      
                                  SType SPACE(CHARIN(bicfilecurpos 2244),1)
                                      
                                  VAS SPACE(CHARIN(bicfilecurpos 22860),1)
                                      
                                  EInfo SPACE(CHARIN(bicfilecurpos 28835),1)
                                      
                                  Address SPACE(CHARIN(bicfilecurpos 323140),1)
                                      
                                  Location SPACE(CHARIN(bicfilecurpos 463105),1)
                                      
                                  Country SPACE(CHARIN(bicfilecurpos 56870),1)
                                      
                                  POBNumber SPACE(CHARIN(bicfilecurpos 63835),1)
                                      
                                  POBLocation SPACE(CHARIN(bicfilecurpos 673105),1)
                                      
                                  POBCountry SPACE(CHARIN(bicfilecurpos 77870),1)

                                      
                                  rc LINEOUT(unlfilebic||"|"||,
                                                            
                                  IName||"|"||,
                                                            
                                  BInfo||"|"||,
                                                            
                                  City||"|"||,
                                                            
                                  SType||"|"||,
                                                            
                                  VAS||"|"||,
                                                            
                                  EInfo||"|"||,
                                                            
                                  Address||"|"||,
                                                            
                                  Location||"|"||,
                                                            
                                  Country||"|"||,
                                                            
                                  POBNumber||"|"||,
                                                            
                                  POBLocation||"|"||,
                                                            
                                  POBCountry||"|")
                                      
                                  crec crec 1
                                    END
                                  /* Вот здесь нужно подправить для FI.DAT */
                                    
                                  curpos curpos 848
                                  END

                                  SAY crec
                                  ||" records have been written into bi_.unl"
                                  rc STREAM(bicfile'c''CLOSE')
                                  rc STREAM(unlfile'c''CLOSE')

                                  EXIT
                                  /*----------  end of file -------------------------------*/ 
                                  А вот это оно же, на Perl'e.
                                  PHP код:
                                  #--------------------------------------------------------------------
                                  # bicdir.pl Fixed size records to ASCII delimited format
                                  #--------------------------------------------------------------------
                                  #
                                  # (c) 2001 Sergey Snegiryov, [email]ssg@fnts.ru[/email]
                                  # 20011130 Version 1.0 dated 

                                  # Здесь имя файла для считывания FI.DAT
                                  # BICFILE     File to read from ("bic_file")

                                  # и вот здесь соответственно
                                  $recsize 848;
                                  $crec 0;
                                    
                                  open(BICFILE"bic_file") || die "Couldn't open bic_file";
                                    
                                  open(BICASC">bicdir.asc") || die "Couldn't create bicdir.asc";

                                  until(eof(BICFILE)) {
                                      
                                  read(BICFILE$record$recsize) == $recsize
                                          
                                  or die "short read\n";
                                      (
                                  $Flag$BIC$IName$BInfo$City$SType$VAS$EInfo,
                                      
                                  $Address$Location$Country$POBNumber$POBLocation$POBCountry) =
                                      
                                  unpack"A3 A11 A105 A70 A35 A4 A60 A35 A140 A105 A70 A35 A105 A70",
                                      
                                  $record);
                                      if (
                                  $Flag ne 'FID') {
                                      
                                  $crec++;
                                      
                                  printf(BICASC "%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|\n",
                                      
                                  $BIC$IName$BInfo$City$SType$VAS$EInfo,
                                      
                                  $Address$Location$Country$POBNumber$POBLocation$POBCountry);
                                      }
                                  }
                                  printf("\n%s records have been written into bicdir.asc"$crec); 
                                  Tag's [ php ] by Romsan
                                  Последний раз редактировалось Romsan; 18.02.2002, 16:15.
                                  Всех благ,
                                  Петр

                                  Комментарий


                                  • #18
                                    В принципе у меня есть описание структуры FI.DAT для делфи, но опять же мне не известы другие значения поля Tag, и хочется описание для других файлов.

                                    TBICRecord = record
                                    Tag : Array[0..1] of Char ; // FI - Финансовый институт
                                    ModF : Char ; // D - Запись удаляется
                                    BIC : Array[0..10] of Char ;
                                    InsName : Array[0..104] of Char ;
                                    BrnName : Array[0..69] of Char ;
                                    CityHead : Array[0..34] of Char ;
                                    SybInd : Array[0..3] of Char ;
                                    AddServ : Array[0..59] of Char ;
                                    ExtInf : Array[0..34] of Char ;
                                    PhysAdd : Array[0..139] of Char ;
                                    Location : Array[0..104] of Char ;
                                    Country : Array[0..69] of Char ;
                                    POB_Num : Array[0..34] of Char ;
                                    POB_Loc : Array[0..104] of Char ;
                                    POB_Cou : Array[0..69] of Char ;
                                    Note : Array[0..7] of Char ;
                                    end ;

                                    Комментарий


                                    • #19
                                      TO Tarantino
                                      PLZ кинь справочник и на defpro@email.ru
                                      Заранее благодарю

                                      Комментарий


                                      • #20
                                        def429 сейчас к сожалению нет у меня этого справочника т.к. я уже работаю в другом месте, спроси у ORBIT я ему отсылал

                                        Комментарий


                                        • #21
                                          Tarantino
                                          Скажите, а где можно найти библиотеку на перле для разбора SWIFT сообщений. Искал на CPAN - ниче не нашел.
                                          Писал сам для разбора, но ...
                                          ______________________________
                                          даешь автомафикацию в колхозы!

                                          Комментарий


                                          • #22
                                            Не знаю, я всё это дело на делфи писал

                                            Комментарий


                                            • #23
                                              2 All

                                              Господа!
                                              Киньте в меня справочником SWIFT, буду очень признателен

                                              С уважением,
                                              --------------------
                                              С уважением,

                                              Комментарий


                                              • #24
                                                Да забыл можно на icbank@girmet.ru
                                                --------------------
                                                С уважением,

                                                Комментарий


                                                • #25
                                                  Эх нет у меня уже этого справочника!

                                                  Комментарий


                                                  • #26
                                                    All ! Уже вышел новый справочник июнь 2002 года !

                                                    Комментарий


                                                    • #27
                                                      Сама собой справочник раз в квартал меняеться

                                                      Комментарий


                                                      • #28
                                                        2All
                                                        Есть у меня новый справочник. Вчера обновили. Вступает в силу с июня. Но это такая бомба слать по мылу, если есть какой-то ftp общедоступный, давайте я туда залью Fi.DAT, это где-то около 60Mb, ну, можно еще его хорошо архивнуть.
                                                        Ваши предложения?
                                                        Жить надо так, чтоб тебя помнили сволочи!

                                                        Комментарий


                                                        • #29
                                                          Оба, я его сжал что-то до 3Mb, давайте мыла, разошлю. Готов расслылать ежеквартально. Заметье, совершенно бескорыстно
                                                          Жить надо так, чтоб тебя помнили сволочи!

                                                          Комментарий


                                                          • #30
                                                            Romsan
                                                            Ok!
                                                            Жить надо так, чтоб тебя помнили сволочи!

                                                            Комментарий

                                                            Пользователи, просматривающие эту тему

                                                            Свернуть

                                                            Присутствует 1. Участников: 0, гостей: 1.

                                                            Обработка...
                                                            X