_HstFirst

(    dbType    : Byte;
     Index     : Word;
 dim Value        ;
 dim Attr      : Word;
 dim DFirst    : Date;
 dim DCreate   : Date;
     ZamIdent  : LongInt[;
 dim ExData    : String[200] ]) : Byte

Vyhledá první hodnotu historické položky Index od datumu platnosti vyššího nebo rovného DFirst. Není-li položka s datumem rovným nebo vyšším datumu DFirst nalezena, vrací funkce hodnotu False(0). Jinak True(1).

Jestliže existuje v rámci jedné položky několik historických vět se stejným datumem platnosti a s různými datumy založení, vrací větu s nejnižším datumem založení. To platí v případě, že zadáte datum platnosti stejný nebo nižší.

Lépe to bude vidět na příkladu. Jestliže bychom napsali:

dim DF, DC : Date;
dim Attr   : Word;
dim Val    : Longint;

DF := _Date(1, 1, 2003);
DC := DC;
_HstFirst(dbtP, 101, Val, Attr, DF, DC, O[dbIdent])

Pořadí:

1

2

3

4

5

6

Položka :

P0100

P0100

P0101

P0101

P0101

P0101

Platnost / zadání :

x

x

1.2003 / 1.2003

1.2003 / 2.2003

1.2003 / 4.2003

5.2003 / 5.2003

Data:

x

x

100

200

300

500

bude vrácena věta číslo 3.

Podívejte se na:Historie

Příklad