You cannot. You've to call it as a function to get return value back. An alternative would be to pass variable by reference as the second parameter and return value in it.

llRetVal = EditPassword(pcUserName)
* or
llRetVal = .F.
DO ALLTRIM(DataRoot)+"..\APPS\EditPassword.APP" WITH pcUserName, llRetVal
* EditPassword.APP
PARAMETERS tcUserName, tlRetVal
...
tlRetVal = ...

>I have a stand-alone APP that allows users to update their password for all of the Foxpro systems in the company.
>
>Within each of the other Foxpro systems we have a login screen.
>
>We have been asked to check a users password against the company password rules and force the user to change their password if it does not match the rules.
>
>The stand-alone APP returns .T. if the user password changes are valid and .F. if they choose to quit without changing.
>
>Very silly question how can a test the return result from the following line of code;
>
>DO ALLTRIM(DataRoot)+"..\APPS\EditPassword.APP" WITH pcUserName
>
>
>Regards Michael