Хеш все умеет сам...

Sumo 12.01.2019 06:30

$TX[^hash::create[]] 

$hD1[$.type[D] $.device[D1] $.deviceType[T1] $.status[S1] .... ]
$hS1[$.type[S] $.sensor[S1] $.value[V1] .... ]

$TX.[^TX.count[]][$hD1]
$TX.[^TX.count[]][$hS1]

^TX.foreach[_;v]{
  ^switch( $v.type ){
   ^case[D]{
     ^switch[$v.deviceType]{
     ^case[T1]{ ^checkDeviceT1[$v] }
     ^case[T2]{ ^checkDeviceT2[$v] }
     ^case[DEFAULT]{ ^sendAlert[new device type ${v.deviceType}] }
     }
   }
   ^case[S]{ ^checkSensor[$v] }
   ^case[DEFAULT]{ ^sendAlert[new type ${v.type}] }
  }
}