Changeset 204 for ccr/trunk/p/CCRMEDS1.m
- Timestamp:
- Oct 7, 2008, 10:42:00 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ccr/trunk/p/CCRMEDS1.m
r192 r204 185 185 . . . S MDZNA=$NA(@MAP@("M","DIRECTIONS",MDZ1)) 186 186 . . . D MAP^GPLXPATH(DIRXML1,MDZNA,DIRXML2) 187 . . . D INS INNER^GPLXPATH(RESULT,DIRXML2)187 . . . D INSERT^GPLXPATH(RESULT,DIRXML2,"//Medications/Medication") 188 188 . D:MEDCOUNT=1 CP^GPLXPATH(RESULT,OUTXML) ; First one is a copy 189 189 . D:MEDCOUNT>1 INSINNER^GPLXPATH(OUTXML,RESULT) ; AFTER THE FIRST, INSERT INNER XML
Note:
See TracChangeset
for help on using the changeset viewer.