DOCSRET

Функция возвращает указатель на таблицу. DocsRet используется исключительно в формулах проводок.

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

Примеры

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

Текст программы

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

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