GSPERI

(GIN Macro)

Defined in: MACROS PERI

Used in: IPBERROR867, IPBIN867, IPBSTARB867, IPBSTART867

GSPERI.mac.txt

 84#Q    #MAC  GSPERI
 84SB          LDCT  0  #400 
 85#2    #STR  NC,%C 
 85RL          STO   0  CHAINADD(%B) 
 86?=          ADN   0  CHAINADD(%B) 
 86QW     MODD STO   0  JSCA5,%A,CPPTR(%B)   
 87=G          LDN   0  CPRW1(%B)
 87Q6     MODD STO   0  JSCA1,%A,CPPTR(%B)   
 889Q    #STR  %A
 88PB          PERI  0  %A   
 8992    #STR  %A
 89NL    #SKI
 8=8=          PERI  0  CPPTR(%B)
 8=MW    #NOR