R/h.m.R

In RObsDat: Store your observations: R-Package to the Observations Data Model from CUAHSI

h.m <- function(object){ #handler.message
	require(RSQLite)
	m <- dbDriver("SQLite")
	con <- dbConnect(m, dbname = "RODM.db")

	#dbGetQuery(con, "SELECT * FROM Versions")
	sqhandler <-  new("odm1_1Ver", con=con)
	options(odm.handler=sqhandler)
        stop("Setting default database scheme (odm1_1 with version management) and file RODM.db\nExecute command again")

}