
  CONST
*IF $true(osv$unix)
    jmc$min_ecc = (($INTEGER ('J') * 100(16)) + $INTEGER ('M')) * 10000(16);
*ELSE
    jmc$min_ecc = (($INTEGER ('J') * 100(16)) + $INTEGER ('M')) * 1000000(16);
*IFEND

