Hi,

Here are the code in a Search Command Button click event.
I check the search form is active or not, if active show out the search form, if not, DO FORM client_srh...
First time run is ok, no problem, but second time after the form hide,
the statement premstatus() after thisform.osearchform.Show(), return .f.
so that cannot assgin the return value to thisform.txtCusno.Value, why ?

oParamObj = createobject('Empty')
if type('thisform.osearchform.name') = 'C' && form is still active
   thisform.osearchform.Show()
   if pemstatus(oParamobj, 'SelectedCustomer',5) &&<= return .f.  why ?
      thisform.txtCusno.Value = oParamObj.SelectedCustomer
   endif
ELSE 
     DO FORM client_srh1 NAME thisform.osearchform WITH oParamObj, gUserno
     if pemstatus(oParamobj, 'SelectedCustomer',5)
        thisform.txtCusno.Value = oParamObj.SelectedCustomer
     endif
ENDIF 	

Here are the code of the Click event of a OK button.

addproperty(thisform.oParam, 'SelectedCustomer', cusmas_srh->cusno)
thisform.hide()

If I remark the statement: if pemstatus(oParamobj, 'SelectedCustomer',5)...endif and run again,
it have error message for the Property SelectedCustomer is not found. Why ?

oParamObj = createobject('Empty')
if type('thisform.osearchform.name') = 'C' && form is still active
   thisform.osearchform.Show()
*!*   if pemstatus(oParamobj, 'SelectedCustomer',5)
      thisform.txtCusno.Value = oParamObj.SelectedCustomer
*!*   endif
ELSE 
     DO FORM client_srh1 NAME thisform.osearchform WITH oParamObj, gUserno
     if pemstatus(oParamobj, 'SelectedCustomer',5)
        thisform.txtCusno.Value = oParamObj.SelectedCustomer
     endif
ENDIF 	

Please advise.
Derek