The oParamObj is not the same as thisform.oParam in the search form. You should reference thisform.osearchform.oParam

>
>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