Hi Mike,

I appreciated your comment, would the following code be more appropriate?

lo_frmcalendar = newobject('frmCalendar','nav_custom_date.vcx','',l_dDate, 'Policy Effective Date',.T.,This.Name,.F.,.F.)
lo_frmcalendar.Show()