Wait For im Submit?
Ich öffne die Verbindung nur immer einmal und überwache das dann mittels Interrupt.
Code
;EKI Verbindung initialisieren
;*****************************
RET = EKI_INIT("MyXml")
RET = EKI_OPEN("MyXml")
;EKI Interrupt bei Verbindungsabbruch
;************************************
INTERRUPT DECL 2 WHEN NOT $FLAG[1] DO CONNECT_EKI()
INTERRUPT ON 2
$FLAG[999] = FALSE
DEF CONNECT_EKI()
;EKI Verbindung initialisieren
;*****************************
DECL EKI_STATUS RET
INTERRUPT OFF 2
RET = EKI_CLEAR("MyXml")
RET = EKI_INIT("MyXml")
RET = EKI_OPEN("MyXml")
INTERRUPT ON 2
END
Alles anzeigen