>(RIGHT( "0" + ALLTRIM( "13:45" ), 5 )) >
function ConvertToNonMilitary lparameters tcTime * No parameter checking yet local lnHours, lcMins lnHours = int(val(getwordnum(m.tcTime,1,':'))) lcMins = getwordnum(m.tcTime,2,':') do case case m.tcTime = '24:00' lcConvert = '12:00 AM' case m.lnHours = 12 lcConvert = m.tcTime + ' PM' case between(m.lnHours, 13,23) lcConvert = padl(m.lnHours - 12,2,'0') + ':' + m.lcMins + ' PM' otherwise lcConvert = padl(m.lnHours,2,'0') + ':' + m.lcMins + ' AM' endcase return m.lcConvertFrom the top of my head, not tested yet.