str oct_str ( int decval) no_break
{
  int temp;
  str octl[3];

  temp = decval;
  octl = "";
  while (temp > 8)
  {
      octl =  str(temp % 8) + octl;
      temp = temp / 8;
  };

  if (temp == 8)
      octl = "10" + octl ;
  else
      octl =  str(temp % 8) + octl;

  return (octl);
}