/****************************************************************/
 /*          S A S   S A M P L E   L I B R A R Y                 */
 /*                                                              */
 /*    NAME: FORMAT                                              */
 /*   TITLE: Generating Value Statements Using PROC FORMAT       */
 /****************************************************************/
 
DATA _NULL_;
   FILE PRINT;
   PUT 'PROC FORMAT IS BEING GENERATED BY MACRO PROCESSOR_SEE SASLOG';
RUN;

%MACRO FORMAT(VAL=VAL,LOW=,START=,STOP=,COUNT=);

PROC FORMAT;
   VALUE &VAL
%DO X=&START %TO &STOP %BY &COUNT;
   &LOW-&X="&LOW-&X"
   %LET LOW=%EVAL(&X+1);
   %END;
         ;
%MEND FORMAT;

%FORMAT(LOW=18,START=20,STOP=75,COUNT=5) ;

DATA NEXT;
   INPUT VALUE;
   CARDS;
18
20
56
27
30
36
66
12
75
100
;


PROC PRINT;
   FORMAT VALUE VAL.;
RUN;