Online File

How to use this page

---

Rick Aster: Professional SAS Programming Shortcuts: Contents

Chapter 77
Program
Changing system options

---

%MACRO RPTOPT;
%LET LS = %SYSFUNC(GETOPTION(LINESIZE));
%LET PS = %SYSFUNC(GETOPTION(PAGESIZE));
%LET PAGE = %SYSFUNC(GETOPTION(PAGENO));
%LET CENTER = %EVAL(%SYSFUNC(GETOPTION(CENTER)) = CENTER);
%WINDOW Options
    #2 @5 'Line size' @19 LS 3
    #3 @5 'Page size' @19 PS 5
    #4 @5 'Center' @19 CENTER 1
    #5 @5 'Page number' @19 PAGE 6
    ;
%DISPLAY OPTIONS;
OPTIONS LINESIZE=&LS PAGESIZE=&PS CENTER=&CENTER PAGENO=&PAGE;
%MEND;