CODTAB[1,10] S0 S3[1,20] B0

S1

#SYSTEM.DATE #PAGE

USE %FRR FROM CODTAB=#FROM TO CODTAB=#TO