some bug fixes
This commit is contained in:
parent
5aa04241d3
commit
fd9863b165
|
@ -142,7 +142,7 @@ INSRDF(ZRDF,ZNAME,FARY) ; INSERT AN RDF FILE INTO THE STORE AND PROCESS
|
|||
S BATMAX=10000 ; TRY BATCHES OF THIS SIZE
|
||||
N ZGRAPH,ZSUBJECT
|
||||
S ZGRAPH="_:G"_$$LKY9 ; RANDOM GRAPH NAME
|
||||
S ZSUBJECT=$$ANONS ; RANDOM ANOYMOUS SUBJECT
|
||||
S ZSUBJECT=$$ANONS() ; RANDOM ANOYMOUS SUBJECT
|
||||
D ADD(ZGRAPH,ZSUBJECT,"fmts:url",ZNAME,FARY)
|
||||
N ZTXTNM
|
||||
S ZTXTNM="_TXT_INCOMING_RDF_FILE_"_ZNAME_"_"_$$LKY9 ; NAME FOR TEXT NODE
|
||||
|
@ -463,7 +463,7 @@ IENOFA(ZOUTARY,INARY,FARY) ; RESOLVE STRINGS TO IEN IN STRINGS FILE
|
|||
. S FARY="C0XFARY"
|
||||
K ZOUTARY ; START WITH CLEAN RESULTS
|
||||
K C0XFDA2 ; USE A SEPARATE FDA FOR THIS
|
||||
I '$D(C0XVOC) D INITVOC^C0XUTIL
|
||||
I '$D(C0XVOC) D VOCINIT^C0XUTIL
|
||||
N ZINARY
|
||||
N ZI S ZI=""
|
||||
F S ZI=$O(INARY(ZI)) Q:ZI="" D ;
|
||||
|
|
|
@ -151,6 +151,7 @@ ien2tary(zrary,zinary) ; zinary is an array of iens passed by name
|
|||
; zrary is passed by reference and is return array of triples
|
||||
; format zrary(zsub,"zpred^zobj")=""
|
||||
;
|
||||
k zrary ; start out clean
|
||||
n zzz,zrsub,zrpred,zrobj,zgraph,zcnt
|
||||
s zzz=""
|
||||
f s zzz=$o(@zinary@(zzz)) q:zzz="" d ;
|
||||
|
|
Loading…
Reference in New Issue