SUBROUTINE SQLiteBegin IMPLICIT NONE ! Enforce explicit typing of all variables in this routine INTEGER :: result END SUBROUTINE SQLiteBegin