Subroutine SLIST_Eval_LSL2(Dummy)
Declare Function Get_Property, Set_Property, Msg
 CALL MSG( '',  ICONV( '1/1/2000', 'D' ) )
Return