GET
  FILE='G:\UBC Library Final Documentation\Vienna\Vienna Allgemeines Krankenhaus 1865-1930_mo.sav'.
RECODE age parity length yearb weight hospstay codeocc catocc livedead bplace address religion marstat sex ethorgin monthb dayb (9999=SYSMIS).
EXECUTE.
SAVE OUTFILE='G:\UBC Library Final Documentation\Vienna\Vienna Allgemeines Krankenhaus '+
    '1865-1930_mo.sav'
 /COMPRESSED.

WRITE OUTFILE='G:\UBC Library Final Documentation\Vienna\Vienna_Fixed ASCII.dat'
  TABLE /ALL.

Write will generate the following

Variable          Rec   Start     End  Format
yeara               1       1       4  F4.0
age                 1       5       6  F2.0
parity              1       7       8  F2.0
weight              1       9      12  F4.0
length              1      13      16  F4.1
yearb               1      17      20  F4.0
hospstay            1      21      24  F4.0
codeocc             1      25      30  F6.0
catocc              1      31      31  F1.0
time                1      32      33  F2.0
livedead            1      34      35  F2.0
bplace              1      36      36  F1.0
address             1      37      37  F1.0
religion            1      38      38  F1.0
marstat             1      39      39  F1.0
sex                 1      40      40  F1.0
ethorgin            1      41      41  F1.0
monthb              1      42      43  F2.0
dayb                1      44      45  F2.0
montha              1      46      47  F2.0
daya                1      48      49  F2.0
EXECUTE.