_PayTable

(     Mode      : Byte; 
      TabId     : Longint; 
     [Col       : Word; 
      Row       : Word; 
[dim] Value     : Real]) : Byte

Pracuje s platovou tabulkou jejíž ident je 'TabId'. Mění funkci podle konstanty 'Mode '.

Mode

Popis
pltDejPlat Vrací plat Value podle souřadnic Col a Row. Jestliže plat v matici existuje, vrací true.
pltDejInfo Vrací informaci Value k řádce Row. Sloupec musí být 1. Jestliže informace v matici existuje, vrací true.
pltVlozPlat Vloží plat Value do souřadnic Col a Row. Jestliže budou hodnoty Col a Row v rámci rozměrů tabulky, vrací true.
pltVlozInfo Vloží informaci Value do souřadnic Col a Row. Jestliže budou hodnoty Col a Row v rámci rozměrů tabulky, vrací true.
pltUloz Ukládá změny do databáze. Stejná akce se provede po ukončení posledního makra.

Popis platové tabulky je zde .

Příklad:

dim Col, Row : Word;
dim Val : Real;
dim TabId : Longint;

_AddRec(dbtPlt)
Plt[pltNazev] := "Test";
Plt[pltRadek] := 15;
Plt[pltSloupcu] := 20;

TabId := Plt[dbIdent];
Val := 0;

for Row := 1 to 20 do
  for Col := 1 to 15 do
    Val := Col*Row;
    _PayTable(pltVlozPlat, TabId, Col, Row, Val);
  end
  _PayTable(pltVlozInfo, TabId, 1, Row, Val); 
end 
_PayTable(pltUloz, TabId);

Podívejte se na: Ostatní