Service manual

1 ! 4-Wire Ohms Performance Verification

2 !

10 OPTION BASE 1

20 DIM Range(3),Source(3),Read_meas(3),Limit(3),Ohms(3)

30 DATA 1861, 119156, 1048576

40 READ Range(*)

50 DATA 1000, 100000, 1000000

60 READ Source(* )

70 OUTPUT 70903;"*RST" Sets autozero on and PLC

80 OUTPUT 70903;"CAL:LFR 60" Set 60 Hz line ref freq

90 FOR I= 1 TO 3

100 PRINT "1. Set Resistance Standard to";Source(I);"Ohms"

110 PRINT "2. Measure ACTUAL Resistance Standard value (in

Ohms)"

120 INPUT " Enter ACTUAL Resistance Standard value (in Ohms)

",Ohms(I)

130 CLEAR SCREEN

140 OUTPUT 70903;"CONF:FRES ";Range(I) Set 4-wire ohms,

range

150 OUTPUT 70903;"READ?"

160 ENTER 70903;Read_meas(I)

170 IF I= 1 THEN Limit(I)= .0004*Ohms(I)+ 2.0E-2 2 kOhm

limits

180 IF I= 2 THEN Limit(I)= .0004*Ohms(I)+ 1. 131 kOhm

limits

190 IF I= 3 THEN Limit(I)= .0004*Ohms(I)+ 10. 1 MOhm

limits

200 NEXT I

210 PRINT " Measured Source Low Limit High Limit"

220 PRINT " Resistance Resistance (Ohms) (Ohms)"

230 PRINT

240 Format:IMAGE 7D.3D,6X,7D.3D,6X,7D.3D,6X,7D.3D

250 FOR I= 1 TO 3

260 PRINT USING Format;Read_meas(I),Ohms(I),

Ohms(I)-Limit(I),Ohms(I)+ Limit(I)

270 NEXT I

280 END

Verification Tests 4-13