BEGIN
BOOL _bEqual
RECORD (SD.BIG) _A
RECORD (SD.BIG) _B
REDIM _A[20]
REDIM _B[20]
INT _firstColNr, _lastColNr
_firstColNr := 1
_lastColNr := _A\CNR
_A[1]^R1 := 1
_A[2]^R1 := 2
DELAY 1[s]
_B[1]^R1 := 1
_B[2]^R1 := 2
_bEqual := %StructCmp(_A[1]^_firstColNr, _A[2]^_lastColNr,_B[1]^_firstColNr,1)
;výsledok je @TRUE
_bEqual := %StructCmp(_A[1]^_firstColNr, _A[2]^_lastColNr,_B[1]^_firstColNr,2)
;výsledok je @FALSE, pretože časy hodnôt sú rôzne
END
0 komentárov