Changeset 1499 for fmts


Ignore:
Timestamp:
Aug 2, 2012, 11:08:30 AM (12 years ago)
Author:
George Lilly
Message:

changes for smart

Location:
fmts/trunk/p
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • fmts/trunk/p/C0XF2N.m

    r1483 r1499  
    396396ADD(ZG,ZS,ZP,ZO,FARY) ; ADD A TRIPLE TO THE TRIPLESTORE. ALL VALUES ARE TEXT
    397397 ; THE FDA IS SET UP BUT THE FILES ARE NOT UPDATED. CALL UPDIE TO COMPLETE
    398  I $G(NOFMTS)'="" D  Q  ; just add the triples to C0XARY
    399  . S C0XARY(ZS,ZP,ZO)=""
    400398 I '$D(FARY) D  ;
    401399 . D INITFARY("C0XFARY")
  • fmts/trunk/p/C0XRDF.m

    r1483 r1499  
    4545 . I $E(ZB,1,1)="/" D  ;
    4646 . . S ZB=$P(ZB,"/",2) ; handling gpltest:/note situations
    47  . S ZC=$G(C0XVOC(ZA))
    48  . I ZC="" S ZC=ZA
     47 . S ZC=C0XVOC(ZA)
    4948 . I ZOBJ["nodeID:" D  Q  ;
    5049 . . D ADD(ZARY,"<"_ZB_" xmlns="""_ZC_""" rdf:nodeID="""_$$EXT^C0XUTIL(ZOBJ)_"""/>")
     
    5554 . . D ADD(ZARY,"<"_ZB_" xmlns="""_ZC_""" rdf:resource="""_ZOBJ_"""/>")
    5655 . D ADD(ZARY,"<"_ZB_" xmlns="""_ZC_""">"_$$EXT^C0XUTIL(ZOBJ)_"</"_ZB_">")
    57  I ZPRED'[":" D  Q  ;
    58  . I ZPRED["." S ZPRED=$TR(ZPRED,".","-")
    59  . I ZPRED["@" S ZPRED=$TR(ZPRED,"@","_")
    60  . D ADD(ZARY,"<"_ZPRED_">"_$$EXT^C0XUTIL(ZOBJ)_"</"_ZPRED_">")
    6156 Q
    6257 ;
  • fmts/trunk/p/C0XUTIL.m

    r1419 r1499  
    5757 S C0XVOC("mv")="http://metavista.name/foundation#"
    5858 S C0XVOC("rdfs")="http://www.w3.org/2000/01/rdf-schema#"
    59  S C0XVOC("vista")="http://osehra.org/"
     59 S C0XVOC("vistaSmart")="https://smart2.vistaewd.net/vista/smart/records/"
    6060 S C0XVOC("vmu")="http://vista.org/mu/"
    6161 S C0XVOC("vq")="http://vista.org/quality/"
Note: See TracChangeset for help on using the changeset viewer.