Keysight E3632A, Service Manual, Page: 54 / 73

1 Calibration Procedures
56 Keysight E3632A Service Guide
970 OUTPUT @Dmm;"MEAS:VOLT:DC?" ! measure output with Dmm and
980 ENTER @Dmm;Dmm_rdg ! store in variable Dmm_rdg
990 PRINT Dmm_rdg
1000 OUTPUT @Pwrsupply;"CAL:VOLT:DATA ";Dmm_rdg ! send stored value to Power
Supply
1010 OUTPUT @Pwrsupply;"OUTP OFF"
1020 OUTPUT @Pwrsupply;"SYST:ERR?"
1030 ENTER @Pwrsupply;Error$
1040 !
1050 ! Check to see if there is an error. If there is an error,
1060 ! display the error and exit the program.
1070 !
1080 CLEAR SCREEN
1090 IF Error$="+0,""No error""" THEN
1100 PRINT "Voltage calibration completed for Power Supply "
1110 ELSE
1120 PRINT "ERROR:";Error$;"Voltage not Calibrated"
1130 BEEP
1140 GOTO 2250
1150 END IF
1160 PRINT TABXY(10,5),"VOLTAGE CALIBRATION COMPLETE"
1170 PRINT TABXY(10,7),"BEGIN OVP CALIBRATION"
1180 WAIT 4
1190 CLEAR SCREEN
1200 OUTPUT @Pwrsupply;"OUTP ON" ! Turn on Power Supply output
1210 OUTPUT @Pwrsupply;"CAL:VOLT:PROT" ! Perform OVP circuit calibration
1220 WAIT 9 ! Allow OVP calibration to finish
1230 OUTPUT @Pwrsupply;"OUTP OFF" ! Turn off Power Supply output
1240 OUTPUT @Pwrsupply;"SYST:ERR?"
1250 ENTER @Pwrsupply;Error$
1260 !
1270 ! Check to see if there is an error. If there is an error,
1280 ! display the error and exit the program.
1290 !
1300 CLEAR SCREEN
1310 IF Error$="+0,""No error""" THEN
1320 PRINT "OVP calibration completed for Power Supply "
1330 ELSE
1340 PRINT "ERROR:";Error$;"OVP not Calibrated"
1350 BEEP
1360 GOTO 2250
1370 END IF
1380 CLEAR SCREEN
1390 PRINT TABXY(10,5),"DAC ERROR CORRECTION AND VOLTAGE/OVP CALIBRATION
COMPLETE"
1400 WAIT 4
1410 !
1420 ! Perform the Current calibration and OCP calibration. Alert the operator
to
1430 ! hook up the connection before calibrating.
1440 !
1450 ! Alert operator to connect lead
1460 PRINT
TABXY(10,10),"*********************************************************"
1470 PRINT TABXY(10,11)," Connect a CURRENT SHUNT to the Dmm input for
measuring"
1480 PRINT TABXY(10,12)," current. Connect the output to the shunt. Observe
Polarity!"
1490 PRINT