Jetter JC-350 Betriebsanleitung Seite 604

12 Betriebssystemupdate
604
//****************************************************
// 1. Tracing in JetSym einschalten
// 2. Name der Quelldatei in 'SourceName' festlegen
// 3. Name der Zieldatei in 'DestinationName' festlegen
// 4. Merker 'UpdateIt' setzen
//****************************************************
Task OSupdate Autorun
Var
ResCopy:
End_Var;
Loop
UpdateIt := False;
When UpdateIt Continue;
ResCopy := FileCopy(SourceName,
Trace('Result : '
End_Loop;
End_Task;
Int;
DestinationName);
+ IntToStr(ResCopy) + '$n');
Jetter AG