Bankir.Ru
8 декабря, четверг 03:12

Объявление

Свернуть
Пока нет объявлений.

Сверка оборотов в RS и Retail?

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

  • Сверка оборотов в RS и Retail?

    Необходимо реализовать автоматическую сверку дебетовых и кредитовых оборотов по 423... счетам в РС (5.00.066) и Ритейле. Цель - сведение остатков и выявление некорректных сумм.
    Если есть некий соответствующий макрос/плаг-ин или идея как это можно реализовать - прошу оказать посильную помощь.

  • #2
    Присоединяюсь к просьбе.
    birukov

    Комментарий


    • #3
      если можно подробнее алгоритм сверки и можно попробовать макрос написать

      Комментарий


      • #4
        если я правильно понимаю, то все выглядит примерно так:
        1. Входные данные - дневные проводки по дебету и по кредиту 423-го счета из РС и из Ритейла (нужны только суммы).
        2. Для каждой суммы из РС проверяется наличие соответствующей суммы в Ритейле, если таковая имеется, то проверяем следующую и т.д, если нет, то кидаем ее (эту сумму) в некий итоговый отчет.
        3. Делаем тоже самое только наоборот - для каждой суммы из Ритейла проверяется наличие соответствующей суммы в РС. Тут надо продумать как быть с одинаковыми суммами, в принципе, важно чтобы совпало их количество, т.е. если в РС есть N сумм по XXXр, то достаточно если в Ритейле тоже будет N сумм по XXXр.
        4. Выдаем отчет из двух столбцов - что-то типа "лишние суммы в РС", "лишние суммы в Ритейл".
        5. Далее операционист ищет в соответствующей программе соответствующую сумму и выясняет причину несоответствия.

        Комментарий


        • #5
          2 DIS63:
          Все выглядит так как Вы описали только в том случае, если в RS-Bank проводки выгружаются не в сводном виде. В противном случае мы имеем одну сумму по счету вида вклада в RS-Bank и N сумм по счетам этого вида вклада в RS-Retail.
          То же самое касается и наращенных процентов.
          В случае, если выгрузка производится в "развернутом виде", то есть на каждую операцию в RS-Retail делается проводка в RS-Bank, то использование RS-Retail становится довольно неэффективным.
          Думаю, что Вам следует более точно поставить задачу сверки, чтобы можно было хотя бы примерно оценить ее необходимость и эффективность.

          Комментарий


          • #6
            Вообще то мы сделали такой макрос, анализируются остатки и обороты в РС с остатками и оборотами в ретайле , за период по всем видам, и по виду вклада

            Комментарий


            • #7
              /*пример сверки остатков. остались еще %% недоделанными - пока не придумал*/

              file test_rs.mac

              file accrur(account, "bank73.def");
              file acccur("account$.dbt", "bank73.def");
              file dacc(depositr,"sbbank.def");

              RSBANK_DBFILE="..\\..\\rsbank\\dbfile\\";
              if(not(open(accrur,RSBANK_DBFILE+"account.dbt")))
              msgbox("Sorry");
              exit(1);
              end;
              if(not(open(acccur,RSBANK_DBFILE+"account$.dbt")))
              msgbox("Sorry");
              exit(1);
              end;

              while(next(accrur))
              message(accrur.Account);
              if(
              (accrur.Open_Close!="З")
              and
              ((substr(accrur.Account,1,3)=="423")or(substr(accrur,1,3)=="426"))
              and
              ((accrur.Client==НомерКлиентаСводногоРезидента)or
              (accrur.Client==НомерКлиентаСводногоНеРезидента))
              and
              (index(accrur.Type_Account,"П")==0)
              )
              /*определяем маску для файлов в ретейле*/
              mask1=substr(accrur.Account,1,8);
              mask2=substr(accrur.Account,10,4);
              rewind(dacc);
              sums=$0;
              while(next(dacc))
              if(
              (mask1==substr(dacc.Account,1,8))
              and
              (mask2==substr(dacc.Account,10,4))
              )
              sums=sums+dacc.Sum_Rest;
              end;
              end;
              if(sums!=accrur.R0)
              mystr="Внимание! Остаток не сравнился!";
              else
              mystr="";
              end;
              if(sums!=accrur.PlanRest)
              mystr=mystr+" Внимание! Планируемый остаток не сравнился!";
              end;
              [│#########################│####################│####################│####################│#]
              (accrur.Account:f, accrur.R0:a, accrur.PlanRest:a, sums:a, mystr:w);
              end;
              end;

              /*и по валюте повторить*/

              Комментарий

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

              Свернуть

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

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