*hand10.txt;

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

PROC REPORT HEADLINE HEADSKIP NOWD LS=74;
 WHERE NAME IN ('BECKER','FOSTER');
 COLUMN   DEST  NAME,(AIR HOTEL);
 DEFINE DEST    / GROUP 'DESTINATION';
 DEFINE NAME    / ACROSS ' '  ;
 DEFINE AIR     / SUM 'AIRFARE' FORMAT=DOLLAR9.;
 DEFINE HOTEL   / SUM 'HOTEL'   FORMAT=DOLLAR9.;
 RBREAK AFTER   /DUL DOL SUMMARIZE;
  COMPUTE AFTER;
   DEST='TOTAL';
  ENDCOMP;
 TITLE 'EXPENSE REPORT';
RUN;


PROC REPORT HEADLINE HEADSKIP NOWD LS=74;
 WHERE NAME IN ('BECKER','FOSTER');
 COLUMN   DEST  NAME,(AIR AIR=AIRMEAN HOTEL);
 DEFINE DEST    / GROUP 'DESTINATION';
 DEFINE NAME    / ACROSS ' '  ;
 DEFINE AIR     / N 'TRIP COUNT' WIDTH=5;
 DEFINE AIRMEAN / MEAN 'AVERAGE/AIRFARE'   FORMAT=DOLLAR9.2;
 DEFINE HOTEL   / MEAN 'AVERAGE/HOTEL'     FORMAT=DOLLAR9.2;
 RBREAK AFTER   /DUL DOL SUMMARIZE;
  COMPUTE AFTER;
   DEST='TOTAL';
  ENDCOMP;
 TITLE 'EXPENSE REPORT';
RUN;