changes for smart

p/C0XF2N.m

@@ -395,8 +395,6 @@ STARTADD ; INITIALIZE C0XFDA AND BATCNT
  ;
 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 $G(NOFMTS)'="" D  Q  ; just add the triples to C0XARY
- . S C0XARY(ZS,ZP,ZO)=""
  I '$D(FARY) D  ;
  . D INITFARY("C0XFARY")
  . S FARY="C0XFARY"

p/C0XRDF.m

@@ -44,8 +44,7 @@ DASSERT(ZARY,ZPRED,ZOBJ)
  . S ZB=$P(ZPRED,":",2)
  . I $E(ZB,1,1)="/" D  ;
  . . S ZB=$P(ZB,"/",2) ; handling gpltest:/note situations
- . S ZC=$G(C0XVOC(ZA))
- . I ZC="" S ZC=ZA
+ . S ZC=C0XVOC(ZA)
  . I ZOBJ["nodeID:" D  Q  ;
  . . D ADD(ZARY,"<"_ZB_" xmlns="""_ZC_""" rdf:nodeID="""_$$EXT^C0XUTIL(ZOBJ)_"""/>")
  . S ZOBJ=$$EXT^C0XUTIL(ZOBJ)
@@ -54,10 +53,6 @@ DASSERT(ZARY,ZPRED,ZOBJ)
  . I $E(ZOBJ,1,1)="/" D  Q  ;
  . . D ADD(ZARY,"<"_ZB_" xmlns="""_ZC_""" rdf:resource="""_ZOBJ_"""/>")
  . D ADD(ZARY,"<"_ZB_" xmlns="""_ZC_""">"_$$EXT^C0XUTIL(ZOBJ)_"</"_ZB_">")
- I ZPRED'[":" D  Q  ;
- . I ZPRED["." S ZPRED=$TR(ZPRED,".","-")
- . I ZPRED["@" S ZPRED=$TR(ZPRED,"@","_")
- . D ADD(ZARY,"<"_ZPRED_">"_$$EXT^C0XUTIL(ZOBJ)_"</"_ZPRED_">")
  Q
  ;
 DICTEND(ZARY)

p/C0XUTIL.m

@@ -56,7 +56,7 @@ VOCINIT ; INITIALIZE VOCABULARIES
  S C0XVOC("cg")="http://datasets.caregraf.org/"
  S C0XVOC("mv")="http://metavista.name/foundation#"
  S C0XVOC("rdfs")="http://www.w3.org/2000/01/rdf-schema#"
- S C0XVOC("vista")="http://osehra.org/"
+ S C0XVOC("vistaSmart")="https://smart2.vistaewd.net/vista/smart/records/"
  S C0XVOC("vmu")="http://vista.org/mu/"
  S C0XVOC("vq")="http://vista.org/quality/"
  S C0XVOC("nodeID")="iDPsDPss"