updates for add triples
This commit is contained in:
parent
b1e90f8891
commit
f3c4ebbc56
|
@ -385,6 +385,11 @@ NEWG(NGRAPH,NMETA) ; CREATES A NEW META GRAPH, MARKS IT AS UNFINISHED
|
|||
S NMETA=NGRAPH_"A"
|
||||
Q
|
||||
;
|
||||
STARTADD ; INITIALIZE C0XFDA AND BATCNT
|
||||
K C0XFDA
|
||||
K BATCNT
|
||||
Q
|
||||
;
|
||||
ADD(ZG,ZS,ZP,ZO,FARY) ; ADD A TRIPLE TO THE TRIPLESTORE. ALL VALUES ARE TEXT
|
||||
; THE FDA IS SET UP BUT THE FILES ARE NOT UPDATED. CALL UPDIE TO COMPLETE
|
||||
I '$D(FARY) D ;
|
||||
|
|
|
@ -451,10 +451,10 @@ tagText(ztag) ; extrinsic which returns the location of the text
|
|||
; associated with ztag
|
||||
n zs,zo
|
||||
s zs=$$subject("fmts:fileTag",ztag)
|
||||
i zs="" d q ;
|
||||
i zs="" d q "" ;
|
||||
. w !,"error, tag is either missing or there are more than one ",ztag
|
||||
s zo=$$object(zs,"fmts:fileSource")
|
||||
i zo="" d q ;
|
||||
i zo="" d q "" ;
|
||||
. w !,"error, tag source not found ",zs
|
||||
w !,zo
|
||||
q $$WHERETXT^C0XF2N(zo)
|
||||
|
|
|
@ -60,6 +60,9 @@ VOCINIT ; INITIALIZE VOCABULARIES
|
|||
S C0XVOC("vmu")="http://vista.org/mu/"
|
||||
S C0XVOC("vq")="http://vista.org/quality/"
|
||||
S C0XVOC("nodeID")="iDPsDPss"
|
||||
S C0XVOC("fmts")="http://glilly.net/fmts#"
|
||||
S C0XVOC("oro")="http://oro.com/vista/sage" ;change to get URL from system
|
||||
S C0XVOC("sage")="http://oro.com/sage/schema#"
|
||||
Q
|
||||
;
|
||||
EXT(C0XIN) ; EXTRINSIC WHICH EXPANDS NAMESPACES
|
||||
|
|
Loading…
Reference in New Issue