ISaGRAF. Version 3.4


FM_READ


:

ID INT : F_ROPEN

Q MSG

:

. F_ROPEN F_CLOSE. , . F_ROPEN , . (0), (\n) (\r);

F_EOF. ISaGRAF.

(*FBD , *)

(* ST : *)

file_id := F_ROPEN('voltramp.bin');

status1 := FM_READ(file_id);

status2 := FM_READ(file_id);

IF (F_EOF(file_id)) THEN

ERROR := ERR_FILE;

unused_eof_mes := FM_READ(file_id);

END_IF;

ok := F_CLOSE(file_id);

(* IL : *)

LD 'voltramp.bin'

F_ROPEN

ST file_id

FM_READ (* status1 *)

ST status1

LD file_id

FM_READ (* status2 *)

ST status2

LD file_id

F_EOF

JMPNC CLOSE_FILE (* , *)

LD ERR_FILE

ST ERROR

LD file_id

FM_READ (* unused_eof_mes *)

ST unused_eof_mes

CLOSE_FILE LD file_id

F_CLOSE

ST ok