//Goto exitdofishsub
        EndIf 
    EndWhile 
    Rem exitdofishsub
Return