Holger Knublauch

Added licence check to SPIN constraints

...@@ -191,6 +191,57 @@ arg:kindRef ...@@ -191,6 +191,57 @@ arg:kindRef
191 ]) 191 ])
192 ] . 192 ] .
193 193
194 +<http://www.epim.no/schemas/mprml/1#Obj_report>
195 + spin:constraint
196 + [ rdf:type sp:Construct ;
197 + sp:templates ([ sp:object spin:ConstraintViolation ;
198 + sp:predicate rdf:type ;
199 + sp:subject _:b3
200 + ] [ sp:object
201 + [ sp:varName "message"^^xsd:string
202 + ] ;
203 + sp:predicate rdfs:label ;
204 + sp:subject _:b3
205 + ]) ;
206 + sp:where ([ sp:object
207 + [ sp:varName "installation"^^xsd:string
208 + ] ;
209 + sp:predicate <http://www.epim.no/schemas/mprml/1#installationRef> ;
210 + sp:subject spin:_this
211 + ] [ sp:object <http://www.epim.no/schemas/mprml/1#RF_field> ;
212 + sp:predicate <http://www.epim.no/schemas/mprml/1#kindRef> ;
213 + sp:subject
214 + [ sp:varName "installation"^^xsd:string
215 + ]
216 + ] [ sp:object
217 + [ sp:varName "fieldName"^^xsd:string
218 + ] ;
219 + sp:predicate <http://www.linkedmodel.org/schema/dtype#value> ;
220 + sp:subject
221 + [ sp:varName "installation"^^xsd:string
222 + ]
223 + ] [ rdf:type sp:Filter ;
224 + sp:expression
225 + [ rdf:type sp:not ;
226 + sp:arg1 [ rdf:type rhspin:currentUserIsOperatorOfFieldWithName ;
227 + arg:fieldName
228 + [ sp:varName "fieldName"^^xsd:string
229 + ]
230 + ]
231 + ]
232 + ] [ rdf:type sp:Bind ;
233 + sp:expression
234 + [ rdf:type fn:concat ;
235 + sp:arg1 "Your company is not the operator of field with name " ;
236 + sp:arg2 [ sp:varName "fieldName"^^xsd:string
237 + ]
238 + ] ;
239 + sp:variable
240 + [ sp:varName "message"^^xsd:string
241 + ]
242 + ])
243 + ] .
244 +
194 <http://www.reportinghub.no/ep/spin/mpr-proxy-constraints> 245 <http://www.reportinghub.no/ep/spin/mpr-proxy-constraints>
195 rdf:type owl:Ontology ; 246 rdf:type owl:Ontology ;
196 rdfs:comment "Collection of constraints that are executed on the SXML proxy ontology for MPR schema based reports."^^xsd:string ; 247 rdfs:comment "Collection of constraints that are executed on the SXML proxy ontology for MPR schema based reports."^^xsd:string ;
...@@ -205,12 +256,12 @@ mpr-proxy-constraints:CheckId ...@@ -205,12 +256,12 @@ mpr-proxy-constraints:CheckId
205 [ rdf:type sp:Construct ; 256 [ rdf:type sp:Construct ;
206 sp:templates ([ sp:object spin:ConstraintViolation ; 257 sp:templates ([ sp:object spin:ConstraintViolation ;
207 sp:predicate rdf:type ; 258 sp:predicate rdf:type ;
208 - sp:subject _:b3 259 + sp:subject _:b4
209 ] [ sp:object 260 ] [ sp:object
210 [ sp:varName "message"^^xsd:string 261 [ sp:varName "message"^^xsd:string
211 ] ; 262 ] ;
212 sp:predicate rdfs:label ; 263 sp:predicate rdfs:label ;
213 - sp:subject _:b3 264 + sp:subject _:b4
214 ]) ; 265 ]) ;
215 sp:where ([ sp:object 266 sp:where ([ sp:object
216 [ sp:varName "kindRef"^^xsd:string 267 [ sp:varName "kindRef"^^xsd:string
...@@ -272,12 +323,12 @@ mpr-proxy-constraints:CheckIdAndNameMatch ...@@ -272,12 +323,12 @@ mpr-proxy-constraints:CheckIdAndNameMatch
272 [ rdf:type sp:Construct ; 323 [ rdf:type sp:Construct ;
273 sp:templates ([ sp:object spin:ConstraintViolation ; 324 sp:templates ([ sp:object spin:ConstraintViolation ;
274 sp:predicate rdf:type ; 325 sp:predicate rdf:type ;
275 - sp:subject _:b4 326 + sp:subject _:b5
276 ] [ sp:object 327 ] [ sp:object
277 [ sp:varName "message"^^xsd:string 328 [ sp:varName "message"^^xsd:string
278 ] ; 329 ] ;
279 sp:predicate rdfs:label ; 330 sp:predicate rdfs:label ;
280 - sp:subject _:b4 331 + sp:subject _:b5
281 ]) ; 332 ]) ;
282 sp:where ([ sp:object 333 sp:where ([ sp:object
283 [ sp:varName "kindRef"^^xsd:string 334 [ sp:varName "kindRef"^^xsd:string
...@@ -372,12 +423,12 @@ mpr-proxy-constraints:CheckName ...@@ -372,12 +423,12 @@ mpr-proxy-constraints:CheckName
372 [ rdf:type sp:Construct ; 423 [ rdf:type sp:Construct ;
373 sp:templates ([ sp:object spin:ConstraintViolation ; 424 sp:templates ([ sp:object spin:ConstraintViolation ;
374 sp:predicate rdf:type ; 425 sp:predicate rdf:type ;
375 - sp:subject _:b5 426 + sp:subject _:b6
376 ] [ sp:object 427 ] [ sp:object
377 [ sp:varName "message"^^xsd:string 428 [ sp:varName "message"^^xsd:string
378 ] ; 429 ] ;
379 sp:predicate rdfs:label ; 430 sp:predicate rdfs:label ;
380 - sp:subject _:b5 431 + sp:subject _:b6
381 ]) ; 432 ]) ;
382 sp:where ([ sp:object 433 sp:where ([ sp:object
383 [ sp:varName "kindRef"^^xsd:string 434 [ sp:varName "kindRef"^^xsd:string
......