DATA TRAVEL;
 INFILE 'A:\TRAVEL.TXT';
 LENGTH DEST $12.;
 INPUT AIR REGION DEST $ & NAME $ HOTEL;

PROC REPORT HEADLINE HEADSKIP NOWD LS=74;
 COLUMN   DEST  NAME,HOTEL;
 DEFINE DEST    / GROUP 'DESTINATION';
 DEFINE HOTEL   / FORMAT=9.;
 DEFINE NAME    / ACROSS 'TRAVELER NAME'  ;
 RBREAK AFTER   /DUL DOL SUMMARIZE;
  COMPUTE AFTER;
   DEST='TOTAL';
  ENDCOMP;
 TITLE 'HOTEL EXPENSES';
RUN;


PROC REPORT HEADLINE HEADSKIP NOWD LS=74;
 COLUMN   DEST ('- SALES REPRESENTATIVES -'  NAME,HOTEL);
 DEFINE DEST    / GROUP 'DESTINATION';
 DEFINE HOTEL   / FORMAT=9. ' ';
 DEFINE NAME    / ACROSS  ' '  ;
 RBREAK AFTER   /DUL DOL SUMMARIZE;
  COMPUTE AFTER;
   DEST='TOTAL';
  ENDCOMP;
 TITLE 'HOTEL EXPENSES';
RUN;