let
Source = Folder.Files("C:\Path\To\Your\Folder"),
#"Filtered Hidden Files1" = Table.SelectRows(Source, each [Attributes]?[Hidden]? <> true),
#"Invoke Custom Function1" = Table.AddColumn(#"Filtered Hidden Files1", "Transform File", each #"Transform File"([Content])),
#"Removed Other Columns1" = Table.SelectColumns(#"Invoke Custom Function1", {"Name", "Transform File"}),
#"Expanded Table Column1" = Table.ExpandTableColumn(#"Removed Other Columns1", "Transform File", Table.ColumnNames(#"Transform File"(#"Sample File"))),
Grouped = Table.Group(#"Expanded Table Column1", {"CNR dept", "license report"}, {{"StateCounty", each _, type table [state=nullable text, county=nullable text]}}),
AddCustom = Table.AddColumn(Grouped, "Custom", each [
CNR = [CNR dept],
dept = "test1",
license = Record.FromList(
List.Transform(
Table.ToRecords([StateCounty]),
each [
licenseType = [license report],
state = Record.FromList(
List.Transform(
List.Distinct([StateCounty][state]),
each _,
each List.Select([StateCounty][county], each [state] = _)
),
List.Distinct([StateCounty][state])
)
]
),
List.Distinct([StateCounty][license report])
)
]),
RemoveOtherColumns = Table.SelectColumns(AddCustom, {"Custom"}),
ConvertToJSON = Json.FromValue(RemoveOtherColumns[Custom])
in
ConvertToJSON