Changeset 441 for ccr/trunk/p/C0CCCR.m
- Timestamp:
- May 5, 2009, 5:24:14 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ccr/trunk/p/C0CCCR.m
r440 r441 43 43 I UFN="" S ONAM="PAT_"_DFN_"_CCR_V1_0_22.xml" 44 44 S ODIRGLB=$NA(^TMP("C0CCCR","ODIR")) 45 S ^TMP("C0CCCR","FNAME",DFN)= UFN; FILE NAME FOR BATCH USE45 S ^TMP("C0CCCR","FNAME",DFN)=ONAM ; FILE NAME FOR BATCH USE 46 46 I $D(^TMP("GPLCCR","ODIR")) S @ODIRGLB=^TMP("GPLCCR","ODIR") 47 47 I '$D(@ODIRGLB) D ; IF NOT ODIR HAS BEEN SET
Note:
See TracChangeset
for help on using the changeset viewer.