FUNCTION Blockmove_SCL :bool
// Bausteinparameter
VAR_INPUT
// Eingangsparameter
QuellDB:Block_DB;
Quelle_Startbyte:INT;
Anzahl_bytes:INT;
ZielDB:Block_DB;
Ziel_Startbyte:INT;
END_VAR
VAR_OUTPUT
// Ausgangsparameter
END_VAR
VAR_TEMP
// temporäre Variablen
i:INT;
j:INT;
bytes:INT;
END_VAR
BEGIN
bytes:=Quelle_Startbyte+Anzahl_bytes;
j:=Ziel_Startbyte;
FOR i:=Quelle_Startbyte TO bytes BY 1 DO
ZielDB.DB[j]:=QuellDB.DB[i];
j:=j+1;
END_FOR;
Blockmove_SCL:=true;
END_FUNCTION