diff options
Diffstat (limited to 'perllib/FixMyStreet')
| -rw-r--r-- | perllib/FixMyStreet/Cobrand/Bromley.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/Cobrand/Bromley.pm b/perllib/FixMyStreet/Cobrand/Bromley.pm index 8b6924f2d..24210e3d6 100644 --- a/perllib/FixMyStreet/Cobrand/Bromley.pm +++ b/perllib/FixMyStreet/Cobrand/Bromley.pm @@ -546,6 +546,7 @@ sub bin_services_for_address { request_open => $open_request, request_containers => $containers, request_max => $quantity_max{$_->{ServiceId}}, + enquiry_open_events => $open->{enquiry}, service_task_id => $servicetask->{Id}, service_task_name => $servicetask->{TaskTypeName}, service_task_type_id => $servicetask->{TaskTypeId}, @@ -585,6 +586,8 @@ sub _parse_open_events { } elsif (2095 <= $event_type && $event_type <= 2103) { # Missed collection my $report = $self->problems->search({ external_id => $_->{Guid} })->first; $open->{missed}->{$service_id} = $report ? { report => $report } : 1; + } else { # General enquiry of some sort + $open->{enquiry}->{$event_type} = 1; } } return $open; |