>IF !empty(thisform.container3.text1.value) > b_date=thisform.container3.text1.value > thisform.container3.text3.value=cdow(thisform.container3.text1.value) > thisform.container3.text2.value=alltrim(str(d_ays))+; > +alltrim("-")+alltrim(str(m_onths))+alltrim("-")+; > alltrim(str(y_ears)) >