libname vic '/cpas/staff/vic/mar95cps';

   data _null_;

   set vic.pov95rev;

   file '/cpas/staff/vic/mar95cps/pov95rev.dat';

   put

   @1 h_seq z5.
   @6 division 1.
   @7 msasize $char2.
   @9 metrorec $char1.
   @10 h_tenure $char1.
   @11 housret z5.
   @16 ftype  $char1.
   @17 marwt1 z7.
   @24 marwt2 z7.
   @31 marwt3 z7.
   @38 marwtp1 z7.
   @45 persum1 z2.
   @47 persum2 z2.
   @49 persum3 z2.
   @51 persum4 z2.
   @53 persum5 z2.
   @55 fpersons $char2.
   @57 fpovcut z5.
   @62 incdef2 z6.
   @68 socinsur z6.
   @74 fpawval z6.
   @80 ssiother z6.
   @86 fcspval z6.
   @92 f_mv_fs z4.
   @96 f_mv_sl z4.
   @100 fhoussub $char3.
   @103hengval z5.
   @108 tottax z6.
   @114 feitcred z6.
   @120 hirecp1 1.
   @121 agep1 $char2.
   @123 sexp1 $char1.
   @124 racep1 $char1.
   @125 originp1 $char2.
   @127 hgap1 $char2.
   @129 marstp1 $char1.
   @130 earnvlp1 z6.
   @136 wkswrkp1 $char2.
   @138 weekslf1 z2.
   @140 ptweeks1 $char2.
   @142 occp1 $char3.
   @145 indp1 $char3.
   @148 agep2 $char2.
   @150 sexp2 $char1.
   @151 racep2 $char1.
   @152 hgap2 $char2.
   @154 earnvlp2 z6.
   @160 wkswrkp2 $char2.
   @162 weekslf2 z2.
   @164 ptweeks2 $char2.
   @166 occp2 $char3.
   @169 indp2 $char3.
   @172 ftotval z6.
   @178 proptax z5.;

   run;