diff --git a/p/C0XF2N.m b/p/C0XF2N.m index 9156a42..111c651 100644 --- a/p/C0XF2N.m +++ b/p/C0XF2N.m @@ -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 ; diff --git a/p/C0XGET1.m b/p/C0XGET1.m index c343be6..73be337 100644 --- a/p/C0XGET1.m +++ b/p/C0XGET1.m @@ -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) diff --git a/p/C0XUTIL.m b/p/C0XUTIL.m index e3ac26a..0970c73 100644 --- a/p/C0XUTIL.m +++ b/p/C0XUTIL.m @@ -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