Filter
Top Products
USING THE COMBISCOPE INSTRUMENTS 3 - 77
3.15.4.2 Error-reporting using the SRQ mechanism
Program an error-reporting routine and use the "Service Request (SRQ)
Generation" mechanism to interrupt the execution of the program to execute the
error-reporting routine.
PROGRAM EXAMPLE:
ON PEN GOSUB ErrorCheck
PEN ON
’
*****
’
*****
APPLICATION PROGRAM
’
*****
END
’
***************************************************
’ Subroutine reading all errors from the error queue.
’
***************************************************
SUB ErrorCheck
er$ = SPACE$(1)
WHILE LEFT$(er$, 1) <> "0" ’
Loop until 0, ’No error
"
CMD$ = "SYSTem:ERRor?"
CALL Send(0, 8, CMD$, 1) ’
Sends error query
er$ = SPACE$(60)
CALL Receive(0, 8, er$, 256) ’
Reads error string
PRINT "Error = "; er$ ’
Displays error string
WEND
END SUB