Chapter 4, Description of Fields

Fields

Programming Example for Authentication Data Table

10RE-SAVE "c:\E8285A\auth.txt"

20ON TIMEOUT 7,14 GOTO 500

30CLEAR 714

40!Enter Authentication Data Table into a string variable

50DIM Data$[100]

60OUTPUT 714;"cdma:auth:data?"

70ENTER 714;Data$

80!Determine position values for each comma

90Comma1=POS(Data$[1],",")

100Comma2=POS(Data$[Comma1+1],",")+Comma1

110Comma3=POS(Data$[Comma2+1],",")+Comma2

120!Evaluate the first data position, Authentication Type

130Type$=Data$[Comma1-1,Comma1-1]

140SELECT Type$

150CASE "1"

160PRINT "Registration with Authen: "

170CASE "2"

180PRINT "Page with Authen: "

190CASE "3"

200PRINT "Origination with Authen: "

210CASE "4"

220PRINT "Unique Challenge: "

230CASE "5"

240PRINT "SSD Update: "

250CASE "-1"

260PRINT "No ""Authentication Type"" returned"

270END SELECT

280!Evaluate the second data position, Overall Test Status

290Status$=Data$[Comma1+1,Comma2-1]

300SELECT Status$

310CASE "0"

320PRINT "Passed"

330CASE "1"

340PRINT "Failed"

350CASE "-1"

360PRINT "No ""Status"" returned"

174

S:\agilent\e8285\REFGUIDE\MANUAL\fields.chp

Page 174
Image 174
Agilent Technologies E8285A manual Programming Example for Authentication Data Table, END Select