X++:
void clicked()
{
Currency cur;
ExchRates excR, excRval;
real sumEur, sumUsd,Coef;
date dt = systemdateget();// <-получаем сегодняшную дату
str Eur, Usd, stVal, StrDt;
StrDt = Date2Str(dt,2,2,2,2,2,4);
while select cur // Выбираем валюты кот. явл условными единицами
where cur.UE == NoYes::Yes
{
stVal = cur.CurrencyCode; // Запоминаем наименование валюты напр. YEEUR
Coef = cur.rate; // Запоминаем коэффициент
select excR
where excR.CurrencyCode == cur.CurrencyCodeParent
&& excR.FromDate == dt;
{
if (excR.CurrencyCode == enum2str(CurrencyUECod::EURcod))
{
sumEur = excR.ExchRate * Coef;
ttsbegin;
excR.FromDate = dt;
excR.ExchRate = sumEur;
excR.CurrencyCode = stVal;
excR.insert();
ttscommit;
}
else
if (excR.CurrencyCode == enum2str(CurrencyUECod::USDcod))
{
sumUsd = excR.ExchRate * Coef;
ttsbegin;
excR.FromDate = dt;
excR.ExchRate = sumUsd;
excR.CurrencyCode = stVal;
excR.insert();
ttscommit;
}
}
}
element.closeCancel();
info(strfmt("На: %1", StrDt));
info("Курсы у.е. успешно расчитаны");
info(strfmt("Курс YEEUR: %1", sumEur));
info(strfmt("Курс YEUSD: %1", sumUsd));
}
Если убрать ; там где она вас смущает, то выдает ошибку!!