DECLARE SHORT GetExitCodeProcess IN WIN32API AS GetExitCodeProc ;
        INTEGER hProcess, ;
        @INTEGER lpdwExitCode
    LOCAL nRetunCode
    nReturnCode = 0
 	
    IF GetExitCodeProc(tnProcessToCheck, @nReturnCode)  && HERE HERE

DO WHILE .T.
      ME.Work()
ENDDO