Версия 12:06, 21 декабря 2018

FITREFL - это функция из справочника R266

Функция возвращает имя справочника, если этот справочник может быть ( в соответствии с планом счетов ) в текущей аналитике проводки

FITREFL( Имя справочника, логический результат (по умолчанию - имя справочника) )

Если этого справочника быть не может, то возвращает пустую строку

Пример

FITREFL( 'R267' )

@@ Строка 4: / Строка 4: @@
 Если этого справочника быть не может, то возвращает пустую строку
-= Текст =
- Parameters Refl,bool:=.f.
- Local arr
- iif(bool,result:=.f.,result:='')
- if Valtype(Refl)<>'C' or ( _CurKIND='D' .and. Empty( _DEBT ) ) .or. ( _CurKIND='K' .and. Empty( _KRED ) )
-   return
- endif
- arr:=WhatRefls(iif(_CurKIND='D',AllTrim(_DEBT),AllTrim(_KRED)),,Str(_CURANAL),,,.t.)
-  if ValType(arr)='A' .and. ASCANE(arr , AllTrim(Upper(Refl)))>0
-    if bool
-     iif( ASCANE(arr , AllTrim(Upper(Refl)))>0,Result:=.t.,Result:=.f.)
-    else
-     iif( ASCANE(arr , AllTrim(Upper(Refl)))>0,Result:=Refl,Result:='')
-    endif
-  endif
 = Пример =
   [[FITREFL]]( 'R267' )
 = Смотрите также =
 [[Полезные функции]]
 [[Функции Delphi]]