Rohde & Schwarz R&S FSL3 - Page 1633

R&S FSL Service Request
1300.2519.12 7.5 E-11
Reading Error Messages
REM –––––––– Subroutine for reading the error queue –––––––––––––––––––––––
Public SUB ErrorQueueHandler()
ERROR$ = SPACE$(100) 'Make space for error variable
CALL InstrWrite(analyzer, "SYSTEM:ERROR?")
CALL InstrRead(analyzer, ERROR$)
Debug.Print "Error Description : "; ERROR$
END SUB
REM
***********************************************************************
Evaluation of SCPI Status Registers
REM –––––– Subroutine for evaluating Questionable Status Register –––––––––
Public SUB Questionablestatus()
Ques$ = SPACE$(20) 'Preallocate blanks to text
'variable
CALL InstrWrite(analyzer, "STATus:QUEStionable:EVENt?")
CALL InstrRead(analyzer, Ques$)
Debug.Print "Questionable Status: "; Ques$
END SUB
REM
***********************************************************************
REM –––––– Subroutine for evaluating Operation Status Register ––––––––––––
Public SUB Operationstatus()
Oper$ = SPACE$(20) 'Preallocate blanks to text
'variable
CALL InstrWrite(analyzer, "STATus:OPERation:EVENt?")
CALL InstrRead(analyzer, Oper$)
Debug.Print "Operation Status: "; Oper$
END SUB
REM
***********************************************************************