Akcia SETCOLTIME

Funkcia

Akcia nastaví čas vzniku hodnoty pre hodnoty v stĺpci štruktúry.

Deklarácia

SETCOLTIME _srcRec^DateTimeCol, _dstRec, _dstRecColIdx

Parametre

_srcRec	in	Identifikátor stĺpca - zdrojový stĺpec štruktúry použitý pri získavaní časov.
_dstRec	out	Identifikátor lokálnej štruktúry - cieľová štruktúra použitá pri nastavovaní časov.
_dstRectColIdx	in	Identifikátor typu Int.

Popis

Akcia nastaví každej hodnote v lokálnej štruktúre _dstRec v stĺpci s poradovým číslom _dstRecCol (od 1 ...) čas vzniku hodnoty podľa hodnoty v príslušnom riadku v stĺpci _srcRec^DateTimeCol.
Štruktúry _dstRec a _srcRec musia mať rovnaký počet riadkov.

Akcia predstavuje náhradu nasledujúceho cyklu:

 RECORD (SD.Def) _srcRec
 RECORD (SD.Def) _dstRec
 
 BEGIN
   REDIM _srcRec[10]
   REDIM _dstRec[10]
 
 ; činnosť akcie SETCOLTIME
   IF _srcRec\DIM # _dstRec\DIM THEN
     ; chyba _ERR_RANGE_ERROR
     END
   ENDIF
 
   INT _row
   _row := 1
   DO_LOOP
     EXIT_LOOP _row > _srcRec\DIM
     IF ! _srcRec[_row]^TimeCol\VLD THEN
       ; chyba
       END
     ENDIF
     _dstRec[_row]^ValueCol := _dstRec[_row]^ValueCol TIME _srcRec[_row]^TimeCol
     _row := _row + 1
   END_LOOP
 ; koniec akcie
 
 END

V príklade sa predpokladá, že typ stĺpca TimeCol je Absolútny čas.

Príklad

Príklad vykoná predchádzajúcu činnosť použitím akcie SETCOLTIME. Predpokladá, že poradové číslo stĺpca ValueCol je 2.

SETCOLTIME _srcRec^TimeCol, _dstRec, 2

Súvisiace stránky:

Akcie v skriptoch