Re: Пересчет курсовой разницы


[ Пpишедшие ответы ] [ Отпpавьте свой ответ ] [ Пеpеговоpный пункт ] [ FAQ ]

Posted by Денис, Днепропетровск (212.3.107.183) on August 26, 2002 at 04:11:02:

In Reply to: Пересчет курсовой разницы posted by Анатолий Головатый on August 25, 2002 at 12:28:20:

*: завел счет 52 где субсчета разные валюты у них *первый параметр текущий курс, второй параметр *остаток в валюте.
*: Теперь как мне сделать изменение курса и *пересчет на счет 80-01 курсовую разницу
*: конструкция типа:
*
*: ==========
*: * Файл коэффицент расчета курсовой разницы
*: *O=[ep $D,1] значение предыдущего курса
*: *S=[ep $D,2] сумма в валюте
*: D=[n1 $D] номер валютного счета
*: K=$ значение текущего курса
*: R=K-O разница
*: ! R > 0.0000001 если новый курс больше старого
*: D=[n1 $D] номер валютного счета
*: K='80-01' номер корреспондирующего *счета
*: ! R < 0.0000001
*: D='80-01'
*: K=[n1 $D]
*: R=R*(-1) изменяем знак числа
*: !
*: RK=R*S сумма разницы курса
*: $=RK
*
*: ==========
*: у меня не работает
*: в дереве проводок сделано так
*: 52 =
*: *D *K valuta

УБЕРИ ЗВЕЗДОЧКИ ПЕРЕД O и S В ПЕРВЫХ ДВУХ СТРОЧКАХ
А вобще лучше делай проводку в файле коэффициенте (код знака проводки alt + 177 ), а не в дереве
: ==========
: * Файл коэффицент расчета курсовой разницы
: O=[ep $D,1] значение предыдущего курса
: S=[ep $D,2] сумма в валюте
: .52 = ($) добавь!!!!!
: D=[n1 $D] номер валютного счета
: K=$ значение текущего курса
: R=K-O разница
: ! R > 0.0000001 если новый курс больше старого
: D=[n1 $D] номер валютного счета
: K='80-01' номер корреспондирующего счета
: ! R < 0.0000001
: D='80-01'
: K=[n1 $D]
: R=R*(-1) изменяем знак числа
: !
: RK=R*S сумма разницы курса
: .*D *K (RK) добавь!!!
: $=0 добавь!!!
: ==========

а, в дереве оставь например:
*: 52 % valuta




Пpишедшие ответы:



Отпpавьте свой ответ

Name:
E-Mail:

Subject:

Comments:
Link URL:
(можно не вводить)
Link Title:
(можно не вводить)
Image URL:
(можно не вводить)
ВАЖНО: Если отпpавленное сообщение не будет видно сpазу в
списке сообщений, нажмите клавишу Reload в browser'e.


[ Пpишедшие ответы ] [ Отпpавьте свой ответ ] [ Пеpеговоpный пункт ] [ FAQ ]