| Предыдущая тема :: Следующая тема |
| Автор |
Сообщение |
markoff
Участник - экстремал
Вступление в Клуб: 09.06.2009
|
 Пн Май 17, 2010 13:00 Сумма в нац. валюте |
 |
Полезность: Нет оценки
|
Появилась необходимость знать сумму Платежного документа в нац. валюте еще до того когда у него статус Проведен.
Немогу ее найти, подскажите где она лежит. |
|
 |
prog
Эксперт
Вступление в Клуб: 03.03.2008
|
| Пн Май 17, 2010 13:03 |
|
Полезность: 3
|
| Код: |
declare
DtRate number;
CtRate number;
curCB boolean;
begin
if DtSum is null then
kd->[CALCSUMM].GET_CALCSUMM(DtSum, -- Сумма кассы
kd.[NUM_KS].[3].[FINTOOL], -- Валюта кассы
DtRate, -- Курс валюты плательщика
CtSum, -- Сумма клиента
bool_char(pr, kd.[NUM_KS1].[3].[FINTOOL], kd.[ACCOUNT].account_l(kd).[2].[FINTOOL]), -- Валюта клиента
CtRate, -- Курс валюты получателя
NaSum, -- Сумма нац.покрытия
kd.[MULTICURR], -- Валютное свойство
P_Date -- Дата
);
else
DtRate := nvl(DtRate, [DOCUMENT].[LIB_CUR].Get_Rate(kd.[NUM_KS].[3].[FINTOOL],P_Date));
NaSum := nvl(NaSum, DtSum * DtRate);
curCB := (round(NaSum,2) = round(DtSum*DtRate,2));
end if; |
|
|
|
markoff
Участник - экстремал
Вступление в Клуб: 09.06.2009
|
| Пн Май 17, 2010 13:05 |
|
Полезность: Нет оценки
|
Спасибо большое  |
|
|
markoff
Участник - экстремал
Вступление в Клуб: 09.06.2009
|
| Пн Май 17, 2010 13:06 |
|
Полезность: Нет оценки
|
Уже который раз оперативно помогаешь  |
|
|
|
|
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
|
|
О проекте
Поиск
Отзывы
Регистрация
Вход
