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


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

More work on CCRMED6 (RPMS Med Processing)

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/CCRMEDS3.m

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