AMORT SUM — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м (→Текст функции) |
||
| Строка 21: | Строка 21: | ||
if is_nal | if is_nal | ||
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 | ||
| − | _2 := SqlToArr( sql, { 'EKSUM' } ) | + | _2 := [[SqlToArr]]( sql, { 'EKSUM' } ) |
| − | if !IsEmpty( _2 ) | + | if ![[IsEmpty]]( _2 ) |
result := _2[1,1] | result := _2[1,1] | ||
else | else | ||
Версия 11:33, 5 декабря 2016
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
