fix to DELGRAPH to use namespaced input
This commit is contained in:
parent
f3c4ebbc56
commit
dee9731521
|
@ -644,7 +644,7 @@ TING(ZRTN,ZGRF,FARY) ; return the iens for graph ZGRF
|
|||
D USEFARY(FARY)
|
||||
K ZRTN
|
||||
N ZI,ZG S ZI=""
|
||||
S ZG=$$IENOF(ZGRF)
|
||||
S ZG=$$IENOF^C0XGET1(ZGRF)
|
||||
I ZG="" D Q ;
|
||||
. W !,"ERROR GRAPH NOT FOUND"
|
||||
I '$D(@C0XTN@("G",ZG)) Q ;
|
||||
|
|
|
@ -395,7 +395,7 @@ IENOF(ZSTRING,FARY) ; EXTRINSIC WHICH RETURNS THE IEN OF ZS IN THE STRINGS FILE
|
|||
. S FARY="C0XFARY"
|
||||
N ZIEN
|
||||
I $G(ZSTRING)="" Q "" ; NO STRING
|
||||
S ZIEN=$O(@C0XSN@("B",ZSTRING,""))
|
||||
S ZIEN=$O(@C0XSN@("B",$$EXT^C0XUTIL(ZSTRING),""))
|
||||
Q ZIEN
|
||||
;
|
||||
IENOFA(ZOUTARY,INARY,FARY) ; RESOLVE STRINGS TO IEN IN STRINGS FILE
|
||||
|
|
Loading…
Reference in New Issue