$SETTIO
$FOR/LIS/G TIOPARTFN
$TYPE TIOPARTFN
$LINK TIOPARTFN
$ASSIGN ETIOSCHWENKE.BIN FOR001
$ASSIGN TIOSCHWENKEPARTFN.DAT FOR007
$RUN TIOPARTFN