Не выбираются валюты во внешней обработке загрузка валют в ут11(помогите)

Форум Программирование Интеграция и обмен данными, конвертация данных (Обмен)

1С:Управление торговлей 11

1. KaterinaJun 22.11.23 21:58 Сейчас в теме

Здравствуйте, помогите начинающему .Есть задача - сделать внешнюю обработку для загрузки курса валют с ЦБ РФ( выбор по дате и валюте) на УТ11. Обработку для вывода курса всех валют сделала, а вот с выбором валюты затормозила. На форму вывожу справочник Валюты, а дальше никак не могу в коде соединить выбранную валюту и вывод курса этой валюты.
С нижепредставленном коде выводит 2 валюты,которые есть в базе, где ошибка?
Код -

Определения = Новый WSОпределения("http://www.cbr.ru/DailyInfoWebServ/DailyInfo.asmx?WSDL");
Прокси = Новый WSПрокси(Определения, "http://web.cbr.ru/", "DailyInfo", "DailyInfoSoap");
ТипWSПараметра = Прокси.ФабрикаXDTO.Пакеты.Получить( "http://web.cbr.ru/").Получить("GetCursOnDate");  
  
     WSПараметр = Прокси.ФабрикаXDTO.Создать(ТипWSПараметра);
	 WSПараметр.On_Date = ДатаЗагрузки; 
	 КурсыВалют = Прокси.GetCursOnDate(WSПараметр);
	 КурсыВалют = Прокси.GetCursOnDate(WSПараметр);   
	 Для Каждого Элемент Из   КурсыВалют.GetCursOnDateResult.diffgram.ValuteData.ValuteCursOnDate Цикл   
		 
		  НайденнаяВалюта = Справочники.Валюты.НайтиПоКоду(Элемент.Vcode) ;
		  Если ЗначениеЗаполнено(НайденнаяВалюта)   Тогда
         НоваяСтрокаТЗ = ТаблицаКурсовВалют.Добавить();
		 НоваяСтрокаТЗ.НазваниеВалюты = НайденнаяВалюта;
		 НоваяСтрокаТЗ.Номинал = Элемент.Vnom;
		 НоваяСтрокаТЗ.ЦифровойКодВалюты = Элемент.Vcode;
		 НоваяСтрокаТЗ.СимвольныйКодВалюты = Элемент.VChCode;
		 НоваяСтрокаТЗ.КурсВалюты = Элемент.Vcurs;  
	 КонецЕсли;  
	 
 
	 КонецЦикла; 

            
 КонецПроцедуры

Показать

Прикрепленные файлы:

Найденные решения

2. RustamZz 22.11.23 23:07 Сейчас в теме

(1)

Если НайденнаяВалюта = Валюта Тогда Сообщить("Вот же она, голубушка!"); КонецЕсли;

3. KaterinaJun 23.11.23 08:10 Сейчас в теме

(2)Спасибо, помогло."Голубушка" выходит )))

Остальные ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. RustamZz 22.11.23 23:07 Сейчас в теме

(1)

Если НайденнаяВалюта = Валюта Тогда Сообщить("Вот же она, голубушка!"); КонецЕсли;

3. KaterinaJun 23.11.23 08:10 Сейчас в теме

(2)Спасибо, помогло."Голубушка" выходит )))

Оставьте свое сообщение

E-mail: