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

PROC REPORT panels=2 HEADLINE HEADSKIP NOWD LS=74;
 COLUMN   DEST  AIR HOTEL;
 DEFINE DEST    / ORDER 'DESTINATION';
 DEFINE AIR     / SUM 'AIRFARE'       FORMAT=DOLLAR9.;
 DEFINE HOTEL   / SUM 'TOTAL/HOTEL'   FORMAT=DOLLAR9.;
 BREAK AFTER DEST /OL SUMMARIZE SKIP SUPPRESS;
 TITLE 'EXPENSES BY DESTINATION';
RUN;



PROC REPORT panels=2 HEADLINE HEADSKIP NOWD LS=74;
 COLUMN   DEST  AIR HOTEL;
 DEFINE DEST    / GROUP 'DESTINATION';
 DEFINE AIR     / SUM 'AIRFARE'       FORMAT=DOLLAR9.;
 DEFINE HOTEL   / SUM 'TOTAL/HOTEL'   FORMAT=DOLLAR9.;
 TITLE 'EXPENSES BY DESTINATION';
RUN;