Weitere Funktionen
14.10 Ausgabe auf ein externes Gerät/Datei (EXTOPEN, WRITE, EXTCLOSE)
WRITE:
EXTCLOSE:
Beispiel
Programmcode
N10
N20
N30
N40
N50
N60
N70
N80
N90
N100
...
N200
N210
N220
N230
N240
...
714
Befehl zum Schreiben der Ausgabedaten
Beschreibung siehe "Datei schreiben (WRITE) [Seite 140]"!
Befehl zum Schließen eines geöffneten externen Geräts/Datei
<Fehler>: Parameter 1: Variable für die Rückgabe des Fehlerwerts
Typ:
Werte:
Parameter 2: Symbolischer Bezeichner für das zu schließende
<ExtG>:
externe Gerät/Datei
Beschreibung siehe unter EXTOPEN!
Hinweis:
Der Bezeichner muss identisch zu dem im EXTOPEN-Befehl
angegebenen Bezeichner sein!
DEF INT RESULT
DEF BOOL EXTDEVICE
DEF STRING[80] AUSGABE
DEF INT PHASE
EXTOPEN(RESULT,"LOCAL_DRIVE/my_file.txt","SYN","SHARED")
IF RESULT > 0
MSG("Fehler bei EXTOPEN:" << RESULT)
ELSE
EXTDEVICE=TRUE
ENDIF
PHASE=4
IF EXTDEVICE
AUSGABE=SPRINT("Ende Phase: %D",PHASE)
WRITE(RESULT,"LOCAL_DRIVE/my_file.txt",AUSGABE)
ENDIF
INT
0
kein Fehler
16 ungültiger externer Pfad programmiert
21 Fehler beim Schließen des externen Geräts
Programmierhandbuch, 02/2011, 6FC5398-2BP40-1AA0
Arbeitsvorbereitung