$JOB .R FRTS *SYS:TUBEA *LPT:/3 *$ $END