diff options
| -rw-r--r-- | perllib/FixMyStreet/Cobrand/Bromley.pm | 3 | ||||
| -rw-r--r-- | perllib/Integrations/Echo.pm | 3 |
2 files changed, 4 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/Cobrand/Bromley.pm b/perllib/FixMyStreet/Cobrand/Bromley.pm index add6ac6bb..45cafeb8d 100644 --- a/perllib/FixMyStreet/Cobrand/Bromley.pm +++ b/perllib/FixMyStreet/Cobrand/Bromley.pm @@ -595,7 +595,8 @@ sub _parse_open_events { my $events = shift; my $open; foreach (@$events) { - next if $_->{ResolvedDate} || $_->{ResolutionCodeId}; # Is this the right field? + next if $_->{ResolvedDate}; + next if $_->{ResolutionCodeId} && $_->{ResolutionCodeId} != 584; # Out of Stock my $event_type = $_->{EventTypeId}; my $service_id = $_->{ServiceId}; if ($event_type == 2104) { # Request diff --git a/perllib/Integrations/Echo.pm b/perllib/Integrations/Echo.pm index 2bd98b777..d8608708e 100644 --- a/perllib/Integrations/Echo.pm +++ b/perllib/Integrations/Echo.pm @@ -336,7 +336,7 @@ sub GetEventsForObject { EventTypeId => 2118, ServiceId => 542, }, { - # Request for a new paper container + # Request for a new paper container, currently out of stock EventTypeId => 2104, Data => { ExtensibleDatum => [ { Value => 2, DatatypeName => 'Source' }, @@ -348,6 +348,7 @@ sub GetEventsForObject { }, ] }, ServiceId => 535, + ResolutionCodeId => 584, } ] if $type eq 'PointAddress'; return [ { # Missed collection for service 537 (paper) |