Обсуждение:Проверка по таблице адресов массовой регистрации
0 (0)
Обсуждение:Проверка по таблице адресов массовой регистрации ( Обсуждение примера 20.10.2016 10:26 )
0(0)(в архиве класс, пример, документация, зависимости)
Адреса массовой регистрации
Макросы:
massaddr_class_free.mac — библиотека для работы с адресами массовой регистрации, содержит основную логику
massaddr_free_check.mac — рабочий пример, проверяет всех клиентов ЮЛ
Завсисимости библиотеки:
DLM
* boostre
RSL
* regcls
* odsimportclass
Таблицы
* massaddr.dbt из massaddr.def
Класс TMassAddrParserFree
Методы
Конструктор
Конструктор не имеет параметров. В конструкторе проверяется актуальность данных, если xls-файл новее, то происходит его загрузка в таблицу.
CompareAddr
CompareAddr(record_client_addr) проверяет адрес, записанный в структуру на соответствие адресам массовой регистрации. Возвращает true или false
Применение
Скачать xls файл со страницы Адреса указанные при государственной регистрации в качестве места нахождения несколькими юридическими лицами. Требуется ввести капчу.
Положить в каталог указанный в настройках. Импорт произойдёт автоматически при первом применении.
Пример
var arAdr=TArray(), adr;
GetClientAddresses (ClientID,arAdr);
for(adr,arAdr)
if(p.CompareAddr(adr.rec))
MsgBox("Обнаружен адрес массовой регистрации");
break;
end;
end;
Настройки
MyBank.ini
Настройка
Текущее значение
Описание
MASSADDR_FILE
..\Import\addrfind.xlsx
Путь и имя файла, скачиваемого с сайта налоговой
Реестр
USER_MAC\АДРЕСА МАССОВОЙ РЕГИСТРАЦИИ\LAST FILE DATE
Для пользователя 0 здесь сохраняется дата-время последнего загруженного xlsx файла. Если дата-время файла больше значения настройки, то происходмит загрузка и значение обновляется. При штатной работе вмешательство не требуется.
Посмотреть пример
>> Ответить