>>I've written the following to mimic the Clipper function:
>>
>>

>><STRONG>
>>FUNCTION ampm
>>    LPARAMETERS cTime
>>    DO CASE
>>        CASE cTime > '12'
>>            cTime = STR(VAL(SUBSTR(cTime,1,2))-12,2) + SUBSTR(cTime,3,3) + ' pm'
>>        CASE cTime = '12'
>>            cTime = STR(VAL(SUBSTR(cTime,1,2))   ,2) + SUBSTR(cTime,3,3) + ' pm'
>>        OTHERWISE
>>            cTime = STR(VAL(SUBSTR(cTime,1,2))   ,2) + SUBSTR(cTime,3,3) + ' am'
>>    ENDCASE
>>    RETURN cTime
>></STRONG>
>>

>>
>>The problem is that this function is not recognized while the program is running...
>>
>>I 'watch' DTOC(DATE())+" "+AMPM(TIME()) in the debugger and it says "Expression could not be evaluated" but I can type ? DTOC(DATE())+" "+AMPM(TIME())in the command window and it prints fine ?!?!?!?!?!?
>>
>>How can this be? What's the difference?
>>
>>TIA
>>
>>Larry
>Larry,
>Too much work for AMPM (BTW I think there is a scope problem there).

cOldSysFormat = set("sysformat")
>nOldHours = set("hours")
>cOldDateFormat = set("date")
>set sysformats off
>set date to dmy
>set hours to 12
>cTime = ttoc(datetime())
>set hours to &nOldHours
>set sysformat &cOldSysFormat
>set date to &cOldDateFormat
>return cTime

Cetin

Thanks Cetin and Rod

But...

Rod...

The reason I'm in the debugger watch window in the first place is because the string DTOC(DATE())+" "+AMPM(TIME()) is "undefined" so I was trying to figure out why. It's still confusing that it prints from the command window but not through the program. I also discovered that TYPE( AMPM(TIME())) is "U" if that helps.

Cetin...

I need to generate documentation using a "Template" that is based on Clipper, so it uses the line DTOC(DATE())+" "+AMPM(TIME()) in several places. I was hoping to accomodate this syntax so I don't have to rewrite the templates.

Thanks again