SET /UIC=[301,2]
TIM
;CREATE THE TAPE
FLX @[301,2]FLXCREATE
TIM
;VERIFY THE TAPE
FLX SCLUGTAPE.LPT/SP=MM:[*,*]/DO/LI
TIM