Open311 Warwick (Exor) Integration

 ::Integration::Warwick subclasses ::Integration::Exor
 refactor request_class and new_request
 Exor service
 Warwickshire updates retrieval, with datetimes
 stubbing out of Oracle constants, for local testing

We also edit FMS's core PopulateServiceList routine to hide system
fields from FMS:

Bromley/Warwickshire send metadata in their services/FOO.xml
advising that you can pass, e.g. attributes[easting].

FMS by default shows all of these to the user to fill in, however
we don't *want* the user to supply these, rather they are added
by the cobrand.

Bromley had an exception for this (keyed by $body->areas->id).
We write this more generally for Warwickshire too, keying instead
by $body->name (as this is far less likely to be overridden for
installs using global or custom Mapit's)

1 files changed, 44 insertions, 0 deletions

diff --git a/perllib/Open311/Endpoint/Service/Exor.pm b/perllib/Open311/Endpoint/Service/Exor.pm
new file mode 100644
index 000000000..6261875c1
--- /dev/null
+++ b/perllib/Open311/Endpoint/Service/Exor.pm
@@ -0,0 +1,44 @@
+package Open311::Endpoint::Service::Exor;
+use Moo;
+extends 'Open311::Endpoint::Service';
+use Open311::Endpoint::Service::Attribute;
+
+has '+attributes' => (
+    is => 'ro',
+    default => sub { [
+        Open311::Endpoint::Service::Attribute->new(
+            code => 'easting',
+            variable => 0, # set by server
+            datatype => 'number',
+            required => 1,
+            datatype_description => 'a number',
+            description => 'easting',
+        ),
+        Open311::Endpoint::Service::Attribute->new(
+            code => 'northing',
+            variable => 0, # set by server
+            datatype => 'number',
+            required => 1,
+            datatype_description => 'a number',
+            description => 'northing',
+        ),
+        Open311::Endpoint::Service::Attribute->new(
+            code => 'closest_address',
+            variable => 0, # set by server
+            datatype => 'string',
+            required => 1,
+            datatype_description => 'an address',
+            description => 'closest address',
+        ),
+        Open311::Endpoint::Service::Attribute->new(
+            code => 'external_id',
+            variable => 0, # set by server
+            datatype => 'string',
+            required => 1,
+            datatype_description => 'an id',
+            description => 'external system ID',
+        ),
+    ] },
+);
+
+1;