AMORT SUM — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м (→Текст функции) |
||
| Строка 22: | Строка 22: | ||
sql := [ Select EKSUM ; | sql := [ Select EKSUM ; | ||
From MTUN] + [[Ret_f_ext]]( data ) + [ ; | From MTUN] + [[Ret_f_ext]]( data ) + [ ; | ||
| − | Where [[Left]]( BKACNT, 3 ) = '!02' and REFL = 'R143' and KOD = ] + r143_kod | + | Where [[Left]]( BKACNT, 3 ) = '!02' and REFL = '[[R143]]' and KOD = ] + r143_kod |
else | else | ||
sql := [ Select EKSUM ; | sql := [ Select EKSUM ; | ||
From MTUN] + [[Ret_f_ext]]( data ) + [ ; | From MTUN] + [[Ret_f_ext]]( data ) + [ ; | ||
| − | Where [[Left]]( BKACNT, 2 ) = '02' and REFL = 'R143' and KOD = ] + r143_kod | + | Where [[Left]]( BKACNT, 2 ) = '02' and REFL = '[[R143]]' and KOD = ] + r143_kod |
endif | endif | ||
Версия 15:56, 18 апреля 2017
AMORT_SUM - это функция из справочника R266
Возвращает сумму начисленной амортизации
AMORT_SUM(r143_kod, data)
Сумма начисленной амортизации
r143_kod - код основного средства
data - дата, на которую необходимо определить сумму начисленной амортизации
is_nal - логический параметр, по умолчанию false, т.е. бухгалтерский учет
Текст функции
parameters r143_kod, data, is_nal := false
local _2, sql
if is_nal
sql := [ Select EKSUM ;
From MTUN] + Ret_f_ext( data ) + [ ;
Where Left( BKACNT, 3 ) = '!02' and REFL = 'R143' and KOD = ] + r143_kod
else
sql := [ Select EKSUM ;
From MTUN] + Ret_f_ext( data ) + [ ;
Where Left( BKACNT, 2 ) = '02' and REFL = 'R143' and KOD = ] + r143_kod
endif
_2 := SqlToArr( sql, { 'EKSUM' } )
if !IsEmpty( _2 )
result := _2[1,1]
else
result := 0
endif
