data mydata1;
set wuss13.mydata1; /* one page can hold 19 lines of output contents in this case */
if _n_ le 19 then pgbrk=1; /* page 1 */
else if 20 le _n_ le 38 then pgbrk=2; /* page 2 */
else if 39 le _n_ le 57 then pgbrk=3; /* page 3 */
else if 58 le _n_ le 76 then pgbrk=4; /* page 4 */
else if 77 le _n_ le 95 then pgbrk=5; /* page 5 */
else pgbrk=6; /* page 6 */
run;