MSTEPINF_PRN.FMT

//------------------------------------------------------------------------
// MILLING Step Report Format File (report body)
// NOTE: Formats are driven off of the op SNCS associated with a step.
//------------------------------------------------------------------------
extern integer doff, loff, step_num, tl_num, outspeed, unspmode, unfdmode;
extern string st_desc, tl_desc;
extern float outfeed1;
procedure speed_mode
{
 format ("%s",
 map(unspmode, [ 1 = "SFM", 2 = "RPM", 11 = "m/min", 12 = "RPM"]));
}
procedure feed_mode
{
 format ("%s",
 map(unfdmode, [ 1 = "IPR", 2 = "IPM", 11 = "mm/r", 12 = "mm/min"]));
}
procedure section_1030000
{
 format ("%d: %s\n", step_num, st_desc);
 format (" Tool No=%-d - %s\n", tl_num, tl_desc);
 format (" Doff:%-d Loff:%-d Speed:%-d", doff, loff, outspeed);
 call (speed_mode);
 format (" Feed:%-0.4f", outfeed1);
 call (feed_mode);
 format ("\n\n");
}