Changeset 415 for ccr/trunk/p/C0CUNIT.m
- Timestamp:
- Mar 22, 2009, 3:06:25 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ccr/trunk/p/C0CUNIT.m
r400 r415 173 173 Q 174 174 PAT 175 D ANALYZE^ARJTXRD("C CRDPT",.OUT) ; Analyze a routine in the directory175 D ANALYZE^ARJTXRD("C0CDPT",.OUT) ; Analyze a routine in the directory 176 176 N X,Y 177 177 ; Select Patient … … 182 182 . W "OUT("_I_",0)"_" is "_$P(OUT(I,0)," ")_" " 183 183 . W "valued at " 184 . W @("$$"_$P(OUT(I,0),"(DFN)")_"^"_"C CRDPT"_"("_$P(Y,"^")_")")184 . W @("$$"_$P(OUT(I,0),"(DFN)")_"^"_"C0CDPT"_"("_$P(Y,"^")_")") 185 185 . W ! 186 186 Q
Note:
See TracChangeset
for help on using the changeset viewer.