CHECK ON bi.ACCOUNTING  ISRC


releaseid <- "028537016622"
runQry(paste0("SELECT * FROM (SELECT distinct trackid from fact_sales where releaseid = ", releaseid, ") FF LEFT JOIN     (SELECT trackid, isrc, trackname AS track_name, track_type AS Music_vs_Video_by_tracktype FROM production.dim_track t ) Trk ON Trk.trackid = FF.trackid;"))

runQry(paste0("SELECT distinct trackid, isrc, track_name, releaseid, release_name FROM bi.accounting where releaseid = ", releaseid, ";"))


colsToPull <- c("transac_type_abbr", "trackid", "isrc", "track_name", "releaseid", "release_name")
colsToAgg  <- c("units")

runQry(.m(tbl="accounting", colsToPull=colsToPull, colsToAgg=colsToAgg, where=list(releaseid=releaseid)))

releaseid <- "022537387089"
runQry(paste0("SELECT distinct transac_type_abbr, trackid, isrc, track_name, releaseid, release_name FROM bi.accounting where releaseid = ", releaseid, " ORDER BY 1;"))