Writing An Srq And Fault Handler - Fluke 5700A Series II Operator's Manual

5-54. Writing an SRQ and Fault Handler

It is good practice to include fault (error) handling routines in your applications. The
following sample Fluke 1722A Basic program lines show a method for halting program
execution on occurrence of an SRQ (Service Request) on the bus, checking to see if the
calibrator is the source of the SRQ, retrieving its fault messages, and acting on the faults.
You should modify and extend this code as necessary for your application.
1Ø INIT PORTØ
2Ø CLEAR PORTØ
3Ø ! INITIALIZE THE 57ØØA SRQ HANDLER
4Ø PRINT @4, "*SRE 8"
5Ø ON SRQ GOTO 11ØØ
6Ø ! BODY OF THE APPLICATION GOES HERE
11ØØ ! BUS SRQ HANDLER
111Ø CLEAR PORTØ
112Ø IF (SPL(4) AND 64) THEN GOSUB 12ØØ ! IF (STB.RQS) CALL 57ØØA SRQ
113Ø ! TEST OTHER DEVICES RQS BITS IF DESIRED
114Ø RESUME
12ØØ ! 57ØØA SRQ HANDLER
121Ø IF (SPL(4) AND 8) THEN GOSUB 13ØØ
122Ø ! TEST OTHER STB BITS IF DESIRED
1299 RETURN
13ØØ ! 57ØØA STB.EAV (FAULT) HANDLER
131Ø
132Ø PRINT @4, "FAULT?"
133Ø INPUT @4, E%
134Ø PRINT @4, "EXPLAIN? ";E%
135Ø INPUTLINE @4, E$
136Ø PRINT E%,E$
137Ø IF (E% <> Ø) THEN GOTO 132Ø
138Ø PRINT "PLEASE FIX THE SOURCE OF THESE FAULTS BEFORE CONTINUING"
139Ø STOP
1399 RETURN
Emulating a Fluke 5100B or 5200A Calibrator
! IFC THE BUS
! DCL THE BUS
! ENABLE STB.EAV (FAULT AVAILABLE)
! INSTALL SRQ HANDLER
! IF (STB.EAV) CALL FAULT HANDLER
! DO {
! READ AND CLEAR 57ØØA FAULT
! READ IN THE FAULT NUMBER
! GET THE EXPLANATION STRING
! READ IN THE EXPLANATION STRING
! PRINT USEFUL MESSAGE
! } UNTIL (NO MORE FAULTS)
!OTHER COMMANDS FOR YOUR APPLICATION
Remote Operation 5
5-67