Текущая версия на 16:36, 10 октября 2019

ACTUAL_LIFETIME - это программа из справочника R266

Фактический срок эксплуатации основного средства

ACTUAL_LIFETIME( r143_kod, data )

Возвращает количество лет, месяцев

r143_kod - код основного средства

data - дата, для которой необходимо установить фактический срок эксплуатации

Пример

ACTUAL_LIFETIME( 1, DATE() )

@@ Строка 1: / Строка 1: @@
 [[ACTUAL_LIFETIME]] - это программа из справочника [[R266]]
+ Фактический срок эксплуатации основного средства
-Фактический срок эксплуатации основного средства
+[[ACTUAL_LIFETIME]]( r143_kod, data )
 Возвращает количество лет, месяцев
- ACTUAL_LIFETIME( r143_kod, data )
 r143_kod - код основного средства
 data - дата, для которой необходимо установить фактический срок эксплуатации
 = Пример =
   [[ACTUAL_LIFETIME]]( 1, DATE() )
 [[Файл:20-01-2017 8-46-14.png]]
+= Смотрите также =
+[[Полезные функции]]
-= Текст =
- parameters r143_kod, data
- local in_datdoc, dm, years, months
- // r143_kod := 3857
- // data := Date()
- in_datdoc := [[SeekRef]]( '[[R143]]', r143_kod, 'OLD_INDDT', 1 )
- if Empty( in_datdoc )
-   in_datdoc := [[SeekRef]]( '[[R143]]', r143_kod, 'INDATDOC', 1 )
- endif
- dm := DiffMonth( in_datdoc, data )
- // фактический срок эксплуатауции ( лет, месяцев )
- years := Int( dm[1] / 12 )
- months := dm[1] - years * 12
- result := years + ',  ' + months
-= Смотрите также =
 [[Функции Delphi]]
-[[Полезные функции]]