16 октября, вторник 10:24
Bankir.Ru

Объявление

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

Хороший почтовый адрес

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

  • Хороший почтовый адрес

    А нет в Бисквите функции, формирующей почтовый адрес физ. лица?Типа
    499999, Волгоградская обл., Урюпинский р-н., хутор Бобыли 3.
    Или может накропал кто?

  • #2
    Ха-ха-ха. Мне кажется еще нескоро появится в Бисквите такая функция. Пока Бис не перестанет глумиться над адресами. Пока выбираем, что есть, потом убираем лишние запятые.
    Чем больше связей, тем меньше степеней свободы.

    Комментарий


    • #3
      Про функции. Пример есть в инклюде leg161p.fun в районе функции GetCustPersAttr с тэгом ADRESS. Про лишние запятые, в {intrface.get strng} есть функция deldoublechars(tmpstr, ",").

      Но положение, на самом деле, гораздо хуже: нет одного определённого места, в котором бы хранился один определённый адрес.
      Есть основной реквизит person.address.
      Есть дополнительный реквизит PlaceOfStay.
      Есть дополнительные связи "Адреса".
      Есть дополнительные связи "Документы, удостоверяющие личность", а у документа есть "адрес регистрации".

      Вопрос: где именно хранится тот адрес, который Вы имеете в виду?
      /kiv

      Комментарий


      • #4
        Пример есть в инклюде leg161p.fun в районе функции GetCustPersAttr
        Посмотрел. Бисквит считает, что наименование страны в адресе обязательно, а наименование региона - нет.
        Наши бухи считают с точностью до наоборот.

        Слепил вот такое.

        Код:
        {intrface.get xclass}
        
        /*-------- Адрес физ.лица -----------------*/
        FUNCTION getGoodAdrs RETURNS CHAR.
        DEF VAR vCodRegCodeVal AS CHAR NO-UNDO. /* наименование региона */
        DEF VAR TmpSt AS CHAR NO-UNDO.          /* временная строка */
        IF AVAIL person THEN DO:
           TmpSt = person.address[1] + " " + person.address[2].
           IF ENTRY(2,TmpSt) = ""  THEN  /* район */
             TmpSt = STRING(fGetStrAdr(TmpSt)).
           ELSE DO:
             TmpSt = STRING(fGetStrAdr(TmpSt)).
             vCodRegCodeVal = GetCodeName("КодРегГНИ",STRING(GetXAttrValueEx("person",STRING(person.person-id),"КодРегГНИ",?),"x(2)")).
             TmpSt = SUBSTR(TmpSt,1,7) + TRIM(vCodRegCodeVal) + "," + SUBSTR(TmpSt,8).
           END.
        END.
        ELSE 
           TmpSt = "???????????????".
        RETURN TmpSt.
        END FUNCTION.

        Комментарий


        • #5
          Наши бухи считают с точностью до наоборот.
          Правильно считают

          Комментарий


          • #6
            Сообщение от ezhikov Посмотреть сообщение
            Наши бухи считают с точностью до наоборот.
            Правильно считают
            Ой, не приведи Господи, кто-нибудь перескажет это бисквитовским аналитикам. Они ведь сделают нам наименование региона в адресе нерезидента. И шо я тогда буду делать...
            /kiv

            Комментарий

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

            Свернуть

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

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