
get_DT.mupcs <- function() {
  setDBall("MySQL")
  DT.mupcs <- runQry("SELECT manufacturer_upc, vendor_catalog_number, display_upc, upc FROM releases WHERE NOT(manufacturer_upc is NULL AND vendor_catalog_number IS NULL)")
  dbDisconnectAll()
  return(DT.mupcs)
}
