R&S ESR Series User Manual page 611

®
R&S ESR
eventType, eventVi)
CALL viClose(eventVi)
CALL viDisableEvent(vi, VI_EVENT_SERVICE_REQ, VI_QUEUE)
'Disable subsequent events
REM Resume main program here.
END SUB
REM ************************************************************************
Reading Output Buffers
REM --------- Subroutine for the individual STB bits -----------------------
Public SUB Outputqueue()
Dim retCount as Long
result$ = SPACE$(100)
CALL InstrRead(analyzer, result$, 100, retCount)
Debug.Print "Contents of Output Queue : "; result$
END SUB
REM ************************************************************************
Reading Error Messages
REM --------- Subroutine for evaluating the error queue --------------------
Public SUB ErrorQueueHandler()
Dim retCount as Long
ERROR$ = SPACE$(100)
CALL InstrWrite(analyzer, "SYSTEM:ERROR?")
CALL InstrRead(analyzer, ERROR$, 100, retCount)
Debug.Print "Error Description : "; ERROR$
END SUB
REM ************************************************************************
11.2.3.2 Detailed Programming Examples
In the following sections, typical programming examples for setting measurement
parameters and functions, general settings, printout and data management are provi-
ded.
Default Setting of the R&S ESR
The following settings provide typical examples of how to change the default setting of
the R&S ESR.
Note that only some of the settings are necessary depending on the application exam-
ple. In many cases, it is not necessary to set resolution bandwidth, video bandwidth
and sweep time since these parameters are automatically calculated in the default set-
ting when the span is changed. Likewise, the input attenuation is automatically calcula-
ted in the default setting as a function of the reference level. Last of all, the level detec-
tors are linked to the selected trace mode in the default setting.
The settings automatically calculated in the default setting are indicated with an aster-
isk (*) in the following program example.
User Manual 1175.7068.02 ─ 12
'Close the context before continuing
'Reading the output queue
'Create space for response
Subroutine for evaluating the error queue
Remote Control
Controlling the R&S ESR Remotely
608