CODTAB S0+S1+S2+S3 B0

#SYSTEM.DATE #PAGE

USE %NOT FROM CODTAB=#FROM TO CODTAB=#TO