#SYSTEM.RAGSOC

CODTAB[1,5] CODTAB[6,9] CODTAB[10,12] CODTAB[13,15] D0 D1 B0

#SYSTEM.DATE #PAGE

USE ARB