Module Ckmail(Stack,Version=1(1)-2,Reserve(1,2,3,4))=
Begin
Require Machop.bli;
Require Macros.bli;
Own Runblk[6];
ac1<lefthalf> _ 1;
ac1<righthalf>_address(runblk[0]);
runblk[0] _ sixbit'SYS';
runblk[1] _ sixbit'MAILER';
runblk[2]_runblk[3]_runblk[4]_runblk[5]_0;
run(ac1);
Print('?M?J?G??CKMCRM Unable to run SYS:MAILER?M?J');
Stop;
end;