|
Автозаполнение реквизитов контрагента по ИНН |
☑ |
0
skupidom
09.06.18
✎
11:05
|
Есть сервис для проверки корректности ИНН контрагента,
но нужно автоматически выверять и дозополнять реквизиты контрагента
Определение = Новый WSОпределения(";);
Прокси = Новый WSПрокси(Определение, ";, "FNSNDSCAWS2", "FNSNDSCAWS2_Port");
Запрос = Прокси.ФабрикаXDTO.Создать(Прокси.ФабрикаXDTO.Тип(";, "NdsRequest2"));
Контрагент = Прокси.ФабрикаXDTO.Создать(Прокси.ФабрикаXDTO.Тип(";, "NdsRequest2_NP"));
Контрагент.INN = ИНН;
Контрагент.KPP = КПП;
Контрагент.DT = Формат(ТекущаяДата(),"ДФ=dd.MM.yyyy");
Запрос.NP.Добавить(Контрагент);
РезультатЗапроса = Прокси.NdsRequest2(Запрос);
Для каждого ОтветДляКонтрагента из РезультатЗапроса.NP Цикл
СтатусКонтрагента = ОтветДляКонтрагента.State;
КонецЦикла;
|
|
1
Кац
09.06.18
✎
11:06
|
Держите нас в курсе
|
|
2
Гипервизор
09.06.18
✎
11:18
|
Посмотрите как реализовано в типовых.
|
|
3
Симпатяга
09.06.18
✎
11:22
|
(0) Выровняйте и дозапоните)))
|
|
4
skupidom
09.06.18
✎
12:41
|
в типовом надо тащить огромный пласт кода в пустую базу с 1 справочником Контрагенты.Есть ли более оптимальный способ и компактное решение ?
|
|
5
lubitelxml
09.06.18
✎
12:43
|
(4) какой там пласт?
Определение = Новый WSОпределения(";);
Сервис = Новый WSПрокси(Определение,";, "RequisitesWebServiceEndpointImpl7Service", "RequisitesWebServiceEndpointImpl7Port");
ТипWSПараметра = Сервис.ФабрикаXDTO.Пакеты.Получить(";);
Сервис.Пользователь = "логинИТС";
Сервис.Пароль = "парольИТС";
параметр = Сервис.ФабрикаXDTO.Создать(ТипWSПараметра);
параметр.INN = ИНН;
Результат=Сервис.getCorporationRequisitesByINN(параметр);
|
|
6
Aleksey
09.06.18
✎
12:46
|
(5) в том то и дело что в типовых запрос идет через сервер 1С с проверкой на актуальность логина и пароля
|
|
7
Aleksey
09.06.18
✎
12:47
|
Более того количество запросов через 1с ограничено тарифом
|
|
8
Поpyчик-4
09.06.18
✎
12:50
|
(0)
(7) Дадата же есть. Скачайте с инфостарта обработку с процедурами или сами сделайте.
|
|
9
shuhard
09.06.18
✎
12:52
|
(7) угу
налетел в январе
тащил контрагентов из выписок банка по ИНН и бац - не пашет, пришлось включать мозг, парсить ошибку, лезть на ИТС и открывать доступ
|
|
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший