0  BEGIN PGM M34 MM 
1  FN 17: SYSWRITE ID 2000 NR70 IDX7098 =+34 ; NUMBER NC MACRO ON
2  M4
3  FN 17: SYSWRITE ID 622 NR0 IDX0.0 =+1 ; AFC ON
4  FN 17: SYSWRITE ID 2000 NR70 IDX7098 =-1 ; NC MACRO OFF
5  END PGM M34 MM