S4: no unqualified END statements
**********************************

END statements shall all be qualified. 
END SUBROUTINE shall state subroutine name.

Correct use of end statement : 

.. code-block:: fortran
   :caption: end statements

   SUBROUTINE SOME_SUBROUTINE( ARG1, ARG2, ARG3)
   
   INTEGER(KIND=JPIM), INTENT(IN)  :: ARG1
   INTEGER(KIND=JPIM), INTENT(IN)  :: ARG2
   INTEGER(KIND=JPIM), INTENT(OUT) :: ARG3

   END SUBROUTINE SOME_SUBROUTINE