Agilent Technologies 8960 10 Series Reference Manual page 202

Comprehensive Program Example
930 !
940 OUTPUT Test_set;"CALL:PAG:IMSI '001012345678901'"
950 OUTPUT Test_set;"CALL:PAG:REP OFF"
960 !
970 ! This example uses a BSE originated call. The MS must be camped to the BSE
980 ! in order for the BSE to originate a call. The following code will try to
990 ! originate a call 50 times and then STOP the program. This should give
1000 ! adequate time for the MS to camp to the BSE.
1010 !
1020 ! NOTE: This technique will cause the following error to be displayed on the
1030 ! test set's display and be put in the error message queue each time
1040 ! that the call fails to connect.
1050 ! 'GSM call disconnected; No response to page (Timer T3113 expiry)'
1060 !
1070 Tries=1
1080 LOOP
1090 OUTPUT Test_set;"CALL:ORIG"
1100 OUTPUT Test_set;"CALL:CONN:STAT?"
1110 ENTER Test_set;Call_connected
1120
1130
1140
1150
1160 EXIT IF Call_connected
1170 OUTPUT Test_set;"CALL:END"
1180 IF Tries=50 THEN
1190 BEEP
1200 DISP ""
1210 PRINT "Call did not connect after";Tries;". Program terminated."
1220 STOP
1230 END IF
1240 DISP "Call has not connected after";Tries;"attempts. Trying again."
1250 Tries=Tries+1
1260 END LOOP
1270 DISP ""
1280 !
1290 !*****************************************************************************
1300 ! Step 5: Set the Mobile Station's Operating Conditions
1310 !*****************************************************************************
1320 !
1330 OUTPUT Test_set;"CALL:MS:DTX OFF"
1340 !
1350 FOR Traf_chan=120 TO 124 STEP 2
1360 OUTPUT Test_set;"CALL:TCH:SEQ ";Traf_chan
1370
1380 OUTPUT Test_set;"CALL:STAT:STAT?"
1390 ENTER Test_set;Call_status$
1400 IF Call_status$<>"CONN" THEN
1410 PRINT "Call handover failed. New channel assignment =";Traf_chan
1420 PRINT "Program terminated."
1430 STOP
1440 END IF
1450 FOR Ms_pwr_lvl=5 TO 15 STEP 5
202
S:\Hp8960\E1960A GSM Mobile Test Application\A.04 Release\Reference_Manual\Chapters\prog_prog_guide_comprehensive_prog_example.fm
! Set paging IMSI.
! Set paging repeat state to off.
This is normal for this technique.
! Originate a call.
! CALL:CONNected hanging GPIB query.
! Program will hang here until origination
! process completes.
! the call is connected the query will
! return a 1. If unsuccessful and the call
! is not connected the query returns 0.
! Turn DTX off for all MS tests.
! Test channels 120, 122 & 124.
! Use :SEQ to force sequential
! execution of the TCH command.
! Verify that the call is still in
! the connected state after handover.
! Test power levels 5, 10 & 15.
If successful and