From 6c5e1fb774a2c11db9c0d626b25aa52d020a157d Mon Sep 17 00:00:00 2001 From: george Date: Mon, 2 Aug 2010 15:29:35 +0000 Subject: [PATCH] update for eRx analysis --- p/C0CXPATH.m | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/p/C0CXPATH.m b/p/C0CXPATH.m index c98f094..feb0470 100644 --- a/p/C0CXPATH.m +++ b/p/C0CXPATH.m @@ -589,7 +589,7 @@ MAP(IXML,INARY,OXML) ; SUBSTITUTE MULTIPLE @@X@@ VARS WITH VALUES IN INARY . . . . I '$D(@INARY@(TNAM,"F")) D ; NOT A SPECIAL FIELD . . . . . S TVAL=@INARY@(TNAM) ; PULL OUT MAPPED VALUE . . . . E D DOFLD ; PROCESS A FIELD - . . . S TVAL=$$SYMENC^MXMLUTL(TVAL) ;MAKE SURE THE VALUE IS XML SAFE + . . . ;S TVAL=$$SYMENC^MXMLUTL(TVAL) ;MAKE SURE THE VALUE IS XML SAFE . . . S TSTR=TSTR_TVAL_$P(@IXML@(I),"@@",J+1) ; ADD VAR AND PART AFTER . . S @OXML@(I)=TSTR ; COPY LINE WITH MAPPED VALUES . . I DEBUG W TSTR