*hand2.txt;

DATA SALES;
 LENGTH ITEM $12;
 INPUT NAME $ MONTH WEEKDAY COMPID STATE $ @25 ITEM   $ & UNITS RETAIL TOTRET;
CARDS;
FOSTER   1  2  153  ID  SYSTEM         2    3100   6200
FOSTER   1  4  333  WY  Z-80           4    26     104
FOSTER   1  5  326  MT  SOFTWARE       1    99     99
FOSTER   1  6  320  NV  CABLE          3    20     60
FOSTER   2  3  333  WY  SOFTWARE       2    99     198
FOSTER   2  4  153  ID  SYSTEM         1    3100   3100
FOSTER   3  2  333  WY  Z-80           3    26     78
FOSTER   3  3  153  ID  MODEM          2    200    400
FOSTER   3  6  320  NV  CABLE          6    20     120
GRANT    1  2  043  OR  DISKS          25   5      125
GRANT    1  2  132  CA  VDT            11   199    2189
GRANT    1  2  134  CA  DISK DRIVE     5    350    1750
GRANT    2  2  132  CA  VDT            1    199    199
GRANT    2  2  134  CA  DISK DRIVE     2    350    700
GRANT    2  4  043  OR  DISKS          5    5      25
GRANT    2  4  330  WA  Z-80           2    26     52
GRANT    2  6  345  CA  MODEM          1    200    200
GRANT    3  3  043  OR  Z-80           2    26     52
GRANT    3  5  132  CA  SYSTEM         4    3100   12400
GRANT    3  5  330  WA  CABLE          2    20     40
;
OPTIONS NODATE NONUMBER ;
PROC REPORT HEADLINE HEADSKIP NOWD;
 COLUMN NAME ITEM UNITS RETAIL;
 DEFINE NAME  /  DISPLAY WIDTH=6 FORMAT=$6.;
 DEFINE ITEM  / CENTER DISPLAY WIDTH=10 FORMAT=$10.;
 DEFINE UNITS  / LEFT SUM WIDTH=15 FORMAT=COMMA5.;
 DEFINE RETAIL  / RIGHT SUM WIDTH=8 FORMAT=DOLLAR8. 'RETAIL/PRICE';
RUN;