Manager Effectiveness template - can't refresh or identify dynamic data source after publishing

Thank you! I have rebuilt a couple of times. I've tried re-publishing, but nothing has worked yet. I don't make any changes to the Microsoft template other than pasting in the odata query links.  I don't see a query 1, but I do see that this particular template has a different setup than all the other templates. 

let
FileToUse = #"Manager effectiveness query URL",
Source = ImportData(FileToUse),
#"Changed Type" = Table.TransformColumnTypes(Source,{{"Unscheduled_call_hours_manager_1on1", Currency.Type}, {"Workweek_span", Currency.Type}, {"After_hours_collaboration_hours", Currency.Type}, {"Networking_outside_organization", Int64.Type}, {"Internal_network_size", Int64.Type}, {"Generated_workload_unscheduled_call_hours", Currency.Type}, {"Generated_workload_IM_hours", Currency.Type}, {"Generated_workload_email_hours", Currency.Type}, {"Generated_workload_meeting_hours", Currency.Type}, {"Meeting_hours_with_manager", Currency.Type}, {"Meetings_with_manager_1_on_1", Int64.Type}, {"Meeting_hours_with_manager_1_on_1", Currency.Type}, {"Collaboration_hours_direct_reports_all", Currency.Type}, {"Collaboration_hours", Currency.Type}, {"Instant_Message_hours", Currency.Type}, {"Unscheduled_call_hours", Currency.Type}, {"Email_hours", Currency.Type}, {"Meeting_hours", Currency.Type}}),
#"Add SupervisorIndicator" =
if List.Contains(Table.ColumnNames(#"Changed Type"), "SupervisorIndicator")
then
let
#"Renamed Columns" = Table.RenameColumns(#"Changed Type",{{"SupervisorIndicator", "SupervisorIndicatorSource"}}),
#"Add SupervisorIndicator" = Table.AddColumn(#"Renamed Columns","SupervisorIndicator",each [SupervisorIndicatorSource]),
#"Remove SupervisorIndicatorSource" = Table.RemoveColumns(#"Add SupervisorIndicator", "SupervisorIndicatorSource")
in
#"Remove SupervisorIndicatorSource"
else
if List.Contains(Table.ColumnNames(#"Changed Type"), #"Organizational attribute for supervisor indicator")
then Table.RenameColumns(#"Changed Type",{{#"Organizational attribute for supervisor indicator", "SupervisorIndicator"}})
else Table.AddColumn(#"Changed Type", "SupervisorIndicator", each null, type text),

#"Duplicate SupervisorIndicator" = Table.DuplicateColumn(#"Add SupervisorIndicator", "SupervisorIndicator", "Supervisor Indicator"),

Dimensions =
let
Source = #"Duplicate SupervisorIndicator",
SourceColumnList = Table.ColumnNames(Source),
LastMetricColumnName = "Meeting_hours",
PostionofLastMertic = List.PositionOf(SourceColumnList,LastMetricColumnName),
Dimensions = List.RemoveItems(List.Range(SourceColumnList,PostionofLastMertic+1),{"SupervisorIndicator", "IsActive", "WorkingStartTimeSetInOutlook", "WorkingEndTimeSetInOutlook", "WorkingDaysSetInOutlook"})
in
Dimensions,

#"Duplicate HR attributes" = fnDuplicateColumns(#"Duplicate SupervisorIndicator", Dimensions),
#"Unpivot Dimension Attrbiutes" = Table.Unpivot(#"Duplicate HR attributes", Dimensions, "Dimension", "DimensionValue"),
RenameHeaders = List.Transform(List.Transform(Dimensions, each _ &".Copy"), each {_, Text.Replace(_,".Copy","")}),
#"Rename Filter Attributes" = Table.RenameColumns(#"Unpivot Dimension Attrbiutes", RenameHeaders),
#"Unpivot Filter Attrbiutes" = Table.Unpivot(#"Rename Filter Attributes", Dimensions, "Filter", "FilterValue"),
#"Added Custom" = Table.AddColumn(#"Unpivot Filter Attrbiutes", "PersonIdMonthKey", each Text.From([PersonId]) & "|" & Text.From(Date.Year([Date])) & Text.From(Date.Month([Date])), type text)
in
#"Added Custom"

All the other templates do all those steps in mostly separate queries.

I also notice that the glossary table is populated by a data source - all the other templates have the glossary as a static table: 

let
Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("rVZRb9s2EP4rhJ/swfHirF27AHsIhnYLtqTDmqIPcR9o6iQRpkiNpOy4v353JCVLjrLURV4SSzred/fdd8e7v5/cAHipC1aaxrrJfHLbVGuwzOTxDfMlsBqsM5q5GrRnUrMqnnFsJ33JuGcKuPPMaGAG7W06gN6Wky/z+8m7ikv17QgOdEYhcZ0xCwLklp6AnND5i+Dzk3aihKxRkDHB1QnuMYHm6DBZWdMUJbsDXpGXnwLItXae45EKnOMFnIRxdNax6fWNmw2BnifwVYjjN6MUXxvLvUQILyuIJzOJ/HgkqTbWn1q9eaR0nkKJPBjLRMn9c5Et2DCkiCa1UE0GbI2m+ODBaq5CGeEhPbQMvg55DcQXISuukS3LlpdLNhWGixINZoPUqsEpqbdGBYUYrfb9jAkYH6VtnaKXn/u4x5DoAf9Mcwv/NqDFfhT2VMQ3ETFhCHPGvUeBcy3G9DTMbQelBRYPAHQEZ4fCPAP+NoD/DhqwUCT2QdWU4dkY+rEyUBBBGF2b9WGFheA6R4tQc65VL+T1Ho8WXMuvlBad60DaPqeXAbBVH/2v+Kb9dtAnBvvLo+4vnsiO2mSQ3Ysm9V3BL89D9B9Pj32oixegn6JZpiGXK5I7MCcMym0quxe1QT9eckWdcMV0U4GVItl5SlYiCwIDcBjZDvWKZAqjNU4lUmkbpMSQTRogRzY1mFoBzSUKTpiq5nq/YFeslAWZR6wKuHYRsZd7yR1iFIEBewiWsDIrt0D10AV0M1f6VXN+fvHGMQ1+Z+yGSLhIJKQBlb4wJ78iFZl0SJbwh2mWIsciOSLlDqPRXZVSMjRVWrpTRnHS7EpTDRPot/LOhDzxZN6oVMyI1NKjyC5HCSCLsKHJsYwX1W2Keo1cZL58FFiXRxJDUBlm02iZZv2wACNUf2OkIc+nw32V5u/o4SCyccckoQxyqUlWLt5HeQDJsXHMLtC9r1GH+HrQS5cr/QPOxtik4XfbAvGBWpN+oUiAdDi8tRcMiXRwuMWFaVTG1kADwFN7EVsplAOusV3NaCYs2HtsT3jgFcpjTq/3naNLNuWzhN6htM4pT2qxrcyaKOzQRMF5mCxzGjfTdeugq3PnKbcoue41TS2wg4o7XkFvJi5W+gY7zmzB4jWAf/dPVaRqsLol38JQGEMS1o2nz5XBr4Ad7Y++19x6KWTNw3RLIfVQFiSauCxc5dTl37OnjtxnLlyXj/dA03gns1ZceJd+aLwyZnOGToXMJRpSo/U35mXcKT7ja5I5wnPa3O5oS1tjXwLoXnTtBMqldT7Wubs+2iGfxnfWXumxkR6Z0cgHXJBYxjsJhilAYVBgcfW4dn/JDaj9H0ZJspw6FMp7qTwE/jXQHFvhldo41BguNNhOR9cROVxN2K+41LZabPMInR3HBcdBrQIUchOw3I/s77sPyWYavKRjKBtLG7UYWyMdu2DUhhm3GXb9VvI4W/gOww+CDnhDQkmlY+5mC/ZJY5XFhtoHHsIGhSpfTf6BolHc/l92tmeCGVzh1RV/EveI1+vNSiKBI4V+nlm3mlAJlm8H5fpTmx3qsgASFir9ibJ1ZqH0+C1k8g4HjdnTAhD3eN0Rjjp5HURE12rku4aY4KFxhjFOj/rIDRspLVFuRpzeGn22OT0kheOKiqoxuJcNarT6xDYukl/+Aw==", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [Metric = _t, Definition = _t, #"Metric number" = _t]),
#"Changed Type" = Table.TransformColumnTypes(Source,{{"Metric", type text}, {"Definition", type text}, {"Metric number", Int64.Type}})
in
#"Changed Type"