@beauraines/sprint-tracker 0.6.16 → 0.6.18

package/CHANGELOG.md

@@ -2,6 +2,20 @@
 
 All notable changes to this project will be documented in this file. See [standard-version](https://github.com/conventional-changelog/standard-version) for commit guidelines.
 
+### [0.6.18](https://github.com/beauraines/sprint-tracker/compare/v0.6.17...v0.6.18) (2024-06-05)
+
+
+### Features
+
+* **stats:** handles sprints with no stories/points ([6cc7c1c](https://github.com/beauraines/sprint-tracker/commit/6cc7c1c3d785c26deed92046327f2db0d92bbe9b))
+
+### [0.6.17](https://github.com/beauraines/sprint-tracker/compare/v0.6.16...v0.6.17) (2024-05-20)
+
+
+### Bug Fixes
+
+* **stats:** Uses proper data for combined stats outcomes chart ([#76](https://github.com/beauraines/sprint-tracker/issues/76)) ([401bedf](https://github.com/beauraines/sprint-tracker/commit/401bedf070d5543e8fcfcacbf9c4bc1dc5d70314)), closes [#75](https://github.com/beauraines/sprint-tracker/issues/75)
+
 ### [0.6.16](https://github.com/beauraines/sprint-tracker/compare/v0.6.15...v0.6.16) (2024-05-17)
 
 

package/R/combinedStats.R

@@ -21,7 +21,7 @@ select
     s.sprint_name,
     s.start_date,
     s.end_date,
-    so.story_points,
+    ifnull(so.story_points, so.issue_count) AS story_points, -- accounts for unpointed bug stories,
     o.name as outcome,
     o.id
 from 
@@ -38,7 +38,7 @@ select
     s.sprint_name,
     s.start_date,
     s.end_date,
-    so.story_points,
+    ifnull(so.story_points, so.issue_count) AS story_points, -- accounts for unpointed bug stories,
     o.name as outcome,
     o.id
 from 
@@ -95,7 +95,7 @@ sprintData = sprintData %>%
 
 sprintData = sprintData %>% 
   group_by(name) %>% 
-  mutate(velocity = cumsum(completed)/sprint_number)
+  mutate(velocity = cumsum(replace_na(completed, 0))/sprint_number)
 
 ## Add Completion Percentage
 sprintData = sprintData %>% 
@@ -230,12 +230,42 @@ commitmentPercentage <- commitmentPercentage +
 
 ### Generate Sprint Outcomes
 
-# TODO - pull in the SQL here
-outcomes = read_csv(str_c(Sys.getenv("HOME"),"/","outcomes.csv"))
+con <- dbConnect(RSQLite::SQLite(),"~/projects/sprint-tracker/tracker.db")
+
+sql <- str_c("SELECT 
+        p.name project_name,
+        s.id sprint_id,
+        s.sprint_name,
+        s.end_date,
+        case
+            when o.name = 'Commitment' then 'A-Commitment'
+            when o.name = 'Delivered' then 'B-Delivered'
+            else o.name
+        end outcome,
+        ifnull(so.story_points, so.issue_count) AS story_points -- accounts for unpointed bug stories
+    
+    from projects p
+    
+    LEFT JOIN sprints s on s.project_id = p.id
+    JOIN sprint_outcomes so on so.sprint_id = s.id
+    JOIN outcomes o on o.id = so.outcome_id
+    
+    WHERE
+      p.id =",project_id,";"
+)
+
+res <- dbSendQuery(con,sql)
+outcomes <- dbFetch(res)
+
+# Clear the result
+dbClearResult(res)
+
+# Disconnect from the database
+dbDisconnect(con)
 
 outcomes <- outcomes %>% 
   tibble() %>%
-  filter(story_points != 0) %>%
+  # filter(story_points != 0) %>%
   mutate(
     end_date = as.Date(end_date)
   )
@@ -244,12 +274,12 @@ outcomes <- outcomes %>%
 
 entire_project_velocity = (outcomes %>% 
                              filter(outcome == 'B-Delivered' ) %>% 
-                             summarize( average_velocity = mean(story_points)))$average_velocity
+                             summarize( average_velocity = mean(story_points,na.rm = TRUE)))$average_velocity
 
 average_velocity = (outcomes %>% 
                       filter(outcome == 'B-Delivered') %>%
                       filter(!sprint_name  %in% c('Accessibility Improvement 0','Accessibility Improvements 1')) %>%
-                      summarize( average_velocity = mean(story_points)))$average_velocity
+                      summarize( average_velocity = mean(story_points,na.rm = TRUE)))$average_velocity
 
 # Compute 95% band velocity
 

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@beauraines/sprint-tracker",
-  "version": "0.6.16",
+  "version": "0.6.18",
   "description": "Database and R visualizations to track sprint performance",
   "main": "cli.js",
   "bin": {