Trailing-Edge
-
PDP-10 Archives
-
red405a2
-
uetp/lib/sv2020.ver
There is 1 other file named sv2020.ver in the archive. Click here to see a list.
!
!THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
! OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
!
!COPYRIGHT (C) 1978 BY DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
!
! SV2020.VER Server Job for Superficial
! DECnet-20 Test
!
! Version 3A(1)
!
!
! This batch control file is intended to exercise the DECnet-20
! software on a DECsystem-2020. It runs under the control of
! the User Environment Test Package, UETP.
!
!
@ENABLE
@RUN <UETP.LIB>SENDER
*TYPE START
*BLABEL COM00:
*TEST SV2020
*SEND Start of DECNET-20 Test Server Job
*EXIT
COM00::
!
!
! Now run DYNETS. The data received will
! be written to the file DN20-TASK-TEST72.LOG,
! to be compared against a control file.
!
@RUN <UETP.LIB>DYNETS.EXE
*DECLARE (SERVER NAME) SRV:.TEST72 /RECL:132 /BYTE:8
*WAIT
*EXIT
!
@GOTO T2::
%ERR::
@RUN <UETP.LIB>SENDER
*TYPE ERROR
*BLABEL T2:
*TEST SV2020
*SEND Errors executing DYNETS commands
*EXIT
@GOTO COM100:
T2::
%FIN::
@CHKPNT ADSF::
@RUN <UETP.LIB>SENDER
*TYPE END
*BLABEL COM100:
*TEST SV2020
*SEND End of DECNET-20 Test Server Job
*EXIT