Changeset 322 for ccr/trunk/p/CCRMEDS2.m


Ignore:
Timestamp:
Jan 11, 2009, 2:14:30 AM (15 years ago)
Author:
George Lilly
Message:

More work on CCRMED6 (RPMS Med Processing)

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/CCRMEDS2.m

    r321 r322  
    112112 . . ; To protect against failure, I will put an if/else block
    113113 . . N VUID,RXNIEN,RXNORM,SRCIEN,RXNNAME,RXNVER
    114  . . I NDFIEN D
     114 . . I NDFIEN,$D(^C0CRXN) D  ; $Data is for Systems that don't have our RxNorm file yet.
    115115 . . . S VUID=$$GET1^DIQ(50.68,VAPROD,99.99)
    116116 . . . S RXNIEN=$$FIND1^DIC(176.001,,,VUID,"VUID")
Note: See TracChangeset for help on using the changeset viewer.