ERRTEST

(GIN Macro)

Defined in: REPLY-MACROS

Used in: ALLOCATE867, FILESECU83, GETON867, LIBCOM867, NETOFLNE867, OLMTA85, RENAMDIR, RETURN867, TRANSPOT65, UNLOAD7

ERRTEST.mac.txt

 45L4 ...[??? ERRTEST SECT FILE FGN 2 DOC
 45TW    #     MACRO TO TEST FOR A NUMBER OF SPECIFIED FILESTORE REPLIES 
 46*G    #     AND, IF ANY OF THEM ARE FOUND, OUTPUT AN APPROPRIATE  
 46T6    #     ERROR MESSAGE AND BRANCH TO A SPECIFIED ADDRESS.  
 47#Q    #MACRO         ERRTEST             [M.B.KINGHAM 
 47SB    #SKI  %A>2-2
 48#2    #SKI
 48RL    !     ERROR   -   %A MUST BE IN RANGE X3-X7 INCLUSIVE   
 49?=          ERRTESTA %A,%C,%D,%E,%F,%G,%H,%I,%J,%K,%L 
 49QW          BRN      M2ERRTEST
 4==G    M0ERRTEST   
 4=Q6          SMO      FX2  
 4?9Q          BXE   %A ACOMMUNE9,M1ERRTEST  
 4?PB          EXIT  0  1
 4#92    M1ERRTEST   
 4#NL          SMO      0
 4*8=          LDX   0  0
 4*MW          ERRORX   0
 4B7G          STO   %A ACOMMUNE9(2) 
 4BM6          BRN      %B   
 4C6Q    M2ERRTEST   
 4CLB    #NOR