DOCSRET — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м (Пример)
 
(не показаны 3 промежуточные версии этого же участника)
Строка 1: Строка 1:
 
[[DOCSRET]] - это программа из справочника [[R266]]
 
[[DOCSRET]] - это программа из справочника [[R266]]
  По KINDDOC + LVLNUM возвращает клон таблицы,указывающий на требуемый уровень документа или NIL, если не таблица не найдена
+
  По KINDDOC + LVLNUM возвращает клон таблицы, указывающий на требуемый уровень документа или NIL, если не таблица не найдена
 
[[DOCSRET]]( KINDDOC + LVLNUM, имя текущей таблицы = Alias() )
 
[[DOCSRET]]( KINDDOC + LVLNUM, имя текущей таблицы = Alias() )
 
  Используется исключительно в формулах проводок
 
  Используется исключительно в формулах проводок
 
= Пример =
 
= Пример =
 
( [[DOCSRET]]( 'PAC4' ) )->NATTR4 := ( [[DOCSRET]]( 'PAC4' ) )->NATTR4 + AMNT
 
( [[DOCSRET]]( 'PAC4' ) )->NATTR4 := ( [[DOCSRET]]( 'PAC4' ) )->NATTR4 + AMNT
= Текст =
+
  ( docsret( 'mtr1' ) )->rmtrgnum := 1
  Parameters KindLvl,CurAls:=Alias()
+
 
Local i,j
+
KindLvl:=Upper(KindLvl)
+
j:=Val(Right(CurAls,1))
+
Result:=nil
+
For i:=j to 1 Step -1
+
    if Upper(('DOCS'+i)->(KINDDOC+LVLNUM))=KindLvl
+
        Result:=GetArea('DOCS'+i)
+
        Exit
+
    End
+
Next
+
 
= Смотрите также =
 
= Смотрите также =
 
[[Полезные функции]]
 
[[Полезные функции]]
  
 
[[Функции Delphi]]
 
[[Функции Delphi]]

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

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

По KINDDOC + LVLNUM возвращает клон таблицы, указывающий на требуемый уровень документа или NIL, если не таблица не найдена

DOCSRET( KINDDOC + LVLNUM, имя текущей таблицы = Alias() )

Используется исключительно в формулах проводок

Пример

( DOCSRET( 'PAC4' ) )->NATTR4 := ( DOCSRET( 'PAC4' ) )->NATTR4 + AMNT

( docsret( 'mtr1' ) )->rmtrgnum := 1

Смотрите также

Полезные функции

Функции Delphi