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