Program Flow Stops and Will not Return After Call

This bit of abbreviated code shows where the program stops and will not return after the Call. The subs referred to within the procedure are conceptual and are not intrinsic to the procedure. They are placed here to demonstrate the relationship between the external subroutines and the calling subroutine.

Sub Verification
   Call OptimizePicassso

       If F = 5 then 
       Call configureSOLVERonsite
       End If
           Sub configureSOLVERonsite          
           Call SolveIt2
               Sub SolveIt2
               End Sub
           End Sub
       End Sub

       If F <> 5 then Call SolveIt2
       Call SolveIt2     (STOPS)
               Sub SolveIt2
               End Sub
       End Sub

    End Sub
End Sub

Any help would be appreciated