--- Reg/Asused/Asused.pm~ 2012-01-17 13:54:47.000000000 +0000 +++ Reg/Asused/Asused.pm 2012-01-17 14:09:39.000000000 +0000 @@ -267,7 +267,7 @@ foreach my $allocation (@{$alloc->{'dbAlloc'}}){ # get list of assignments - my @assign = $assign->getIn($allocation, $ASSIGNALLOPT); + my @assign = $assign->getIn($alloc->{$allocation}->{'query'}[0], $ASSIGNALLOPT); my($errNo, $errStr) = $assign->error();