CODTAB[1,8] S0 S6[1,7] S7[1,7] B0

B1 S2[1,4] S2[5,8] S2[9,12] S2[13,16] S2[17,20]

#SYSTEM.DATE #PAGE

USE %NUM FROM CODTAB=#FROM TO CODTAB=#TO