(:*******************************************************:)
(:Test: fn-curren-time                                   :)
(:Written By: Carmelo Montanez                           :)
(:Date: December 1, 2005                                 :)
(:Purpose: Evaluates The "current-time" function         :)
(:as argument to fn:hours-from-time function.            :) 
(:*******************************************************:)

(: insert-start :)
declare variable $input-context1 external;
(: insert-end :)

fn:hours-from-time(fn:current-time()) 
