Code:
FUNCTION ShortTime AS Y ( pDT as T)

ShortTime=pDT

END FUNCTION
Code:
MyNow=now()
?myNow
= 10/30/2013 04:49:21 00 pm

?ShortTime(MyNow)
= 04:49:21 00 pm