Fixed a tiny bug so that invalid vuids can't try to get a GCN

rxnorm/trunk/routines/C0CRXNAD.m

@@ -1,5 +1,5 @@
 C0CRXNAD	; VEN/SMH - Add a drug to VISTA from RxNorm;2013-04-19  5:39 PM
-	;;2.2;RXNORM FOR VISTA;;Nov 14, 2013;Build 8
+	;;2.3;RXNORM FOR VISTA;;Jul 22, 2014;Build 10
 	; (C) 2013 Sam Habiel
 	; Proprietary Code. Don't use if license terms aren't supplied.
 	;

rxnorm/trunk/routines/C0CRXNLK.m

@@ -1,5 +1,5 @@
-C0CRXNLK	; VEN/SMH - RxNorm Lookup Utilities ;2013-11-14  2:43 PM
-	;;2.2;RXNORM FOR VISTA;;Nov 14, 2013;Build 8
+C0CRXNLK	; VEN/SMH - RxNorm Lookup Utilities ;2014-07-22  2:27 PM
+	;;2.3;RXNORM FOR VISTA;;Jul 22, 2014;Build 10
 	;(c) Sam Habiel 2013
 	; See accompanying license. Don't use otherwise.
 	;
@@ -236,6 +236,7 @@ VUI2GCN(VUID)	; $$ Public - Get GCNs for a given VUID (any VUID type)
 	; Output: GCNs delimited by ^
 	; TODO: Unit Test
 	N RXNS S RXNS=$$VUI2RXN(VUID)
+	Q:RXNS="" ""  ; VUID not a drug or ingredient (can be food)
 	N GCNS S GCNS=""
 	N I F I=1:1:$L(RXNS,U) S GCNS=GCNS_$$RXN2GCN($P(RXNS,U,I))_U
 	S GCNS=$E(GCNS,1,$L(GCNS)-1)

rxnorm/trunk/routines/C0CRXNRD.m

@@ -1,5 +1,5 @@
 C0CRXNRD	; VEN/SMH - RxNorm Utilities: Routine to Read RxNorm files;2013-11-14  1:23 PM
-	;;2.2;RXNORM FOR VISTA;;Nov 14, 2013;Build 8
+	;;2.3;RXNORM FOR VISTA;;Jul 22, 2014;Build 10
 	; (C) Sam Habiel 2013
 	; See license for terms of use.
 	;