BEGIN
RECORD (SD.BIG) _A
RECORD (SD.BIG) _B
RECORD (SD.BIG) _C
REDIM _A[20]
REDIM _B[20]
REDIM _C[20]
INT _firstColNr, _lastColNr
_firstColNr := 1
_lastColNr := _A\CNR
_A[1]^R1 := 1
_A[2]^R1 := 2
_B[1]^R1 := 1
_B[2]^R1 := 2
%StructCalcOp(_A[1]^_firstColNr,_A[2]^_lastColNr,_B[1]^_firstColNr,_C[1]^_firstColNr,0)
END
Pridať komentár